..BFLBFHSECTOGETSEAERROMENN1N2N3N4CCCCDCOMNREADSTATIWRITOUDDEVIDUNIDBYTLDBYTHDTIMLDBUFLDBUFHDAUXSCLDAUXSCHPUTSEDUNUSSTATUPUFORMAGETTABLPUTTABLLOOLINTSTARSELECOPTIOSINGLMEDIUDOUBLXYBXA  * C \ B1y@A)AWAAAp@Aq@d@A(AhAiAvAwAtAr As!Ax"#Ay$%A0&Au'@(@)@3*@x+@y,@-A. /@0@1@2345@(6789:;<= " AP"SAVE "D4:STAT.BAS"70@70@@1AR@'1 B FU,($PLEASE INSERT DUNGEON CHARACTER DISKU($INTO DRIVE-1, PRESSWHEN READYP A ( A ٠қ6-&P:'AV,$AV 6-P:'AV, 6-@ 6-%A(ҭ6-&P:'AV,$AV 6-P:'AV, 6-@ 6-%A(ҭ6-&P:'AV,$AV 6-P:'AV, 6-A 6-%A(ҭ 6-&P:'AV,$AV 6-P:'AV, 6-Aq 6-%A(ҭ6-&P:'AV,$AV" 6-P:'AV, 6-AU' +̠ӠĠϠ,ˠҠҠ˛1++7@<@,4AR CHAR!A66-F:,%@@A@A0A`J,,($(COULD YOU POSSIBLY BE THIS STUPID?)TGG(I SAID >:@4, CHARACTER>:@4, DISK, BYTE-BRAIN!^ @h (AGHH! - I GIVE UP!r7-(%USER INCOMPETENCE ERROR AT LINE 370!7 A5ԠӠĠӛ6-@' Ap(( THINKING...(-@A(7<,467<,. % 6.7@%,%6.7@Q,!6.7@w,!6.7A,((1) %6-@ 6-@!% AI A!((2) %6-@6-@"% AI A"((3) %6-@6-@#% AI A#((4) %6-@6-@$% AI A$ĠΠ A %X$6-$500-699 AVAILABLE!]6-@ APb 6- APg 6- APl 6- APq 6- APv(-%A'@ A(0 @(0 (: -@(>:@',7%<%,  ( $ ԠР ĠϠˠɯϛ " A@"READ 710/WRITE 730 @I@A(@ AP     ˠɯϠР֛%6-?:C:hLS,,*F:,"@$/ Ap4( Ҡ - F:,>(YOU'VE GOT A PROBLEM!C70@@ @70@@ @H'AdAU'ARMAVA$RîӛU6-&P:'AV,$AVW6-P:'AV,$\$6-F:@,!6-F:@,$$f*-@@ *(k$Πš'6-Ah6-Ai'6-Ap'6-At6-Au'6-Av'6-Aq6-Ar'6-As'6-At6-Au'6-Av'6-Aw6-Ax'6-Ay-@-@'6-@-@'NO VERIFY'-@36-@d'6-A(-@x-@y6-@6-A-A-A066;@8$A(%@,;@,;@%,&&;@%,;@%,;@%,36-A)6-AW'6-A36-A'6-@6-@'6-@467@,.%67AHi,.467@,. 6-C:,$ԠҠԾٛ A` B!AR@ A "A0 "A@A @$ F76-?:C:'h e ԍ ԍЭ`,,F6-F:Ad,%"@(+*6-F:B2y,$4Ҡӛ97@!<@!,4 $> 6- A% ( $7@"<@",4 $ 6- A% ( $7@#<@#,4 $  6- A%_ ( $` 7@$<@$,4 $j  6- A% $ STATUS DISPLAY SUBROUTINE 36-@:7%@Y,,)((female)3 A%0 ((male) #6-@:7%@`,,#(LV:  @(  TG6-@:7%@b,,$BU6%@:7%@c,,$AV%@:7%@d,,T( EXP: TG6-@:7%@f,,$BU6%@:7%@g,,$AV%@:7%@h,,T( () ''6-@:7%A",,%@:7%A#,,' $ ӛ @ A 1(}ɠΠӠԠҠՠàԠɠϠΠӠ4(@6-@ R+(# This utility will show you theR("status of your DUNGEON characters. T-(%It will show your character level andT("experience points, as well as your o*("character's sex, and the number ofP(!points required to reach the nexto(level (in parenthethesis). W-(% Thekey brings up anotherW(%menu of options, including displaying **("all STATS. The top number is your& R*("current game total, and the bottomR(#is the default value. The last two: R)(!columns are SPEED and HIT-POINTS.R($ I wrote it simply because I wasD L+(#bored one day, and wanted somethingL(to do! I hope you enjoy it.X e(/($ Fare thee well,X($ DragonSlayerb A e%OPTIONS MENU ROUTINES"@B@AI B A "@@AH"@bAF"@AG"@XAEA@5%Šқ' A@-@@"'('AdAU'AR(DELETE CHARACTER (1-4)'6-%@'AR@!! @ )!@A@ AHP7<,4A@867<,.6-&@86-$@%%+&@, -%@% 67<,.    B ' A٠̠ӛ(>:A%,.6-@ 6-@!$(}. AIAF # AF6-A# AFp& AF6-A# AFu&( *6-@6-@" (* AIAF0# AF6-A0# AFp& AF6-A1# AFu&(*6-@6-@# (* AIAF@# AF6-AX# AFp& AF6-AY# AFu&( *6-@6-@$ (* AI"AFP$# AF6-A# AFp&# AF6-A# AFu*4 B A %>FULL STAT SUBROUTINES!?-@@@ AF (| A AF(| B!6-&@` AF(!$C-@@D AF (| E AF(| F!6-&@Y AF(!$H.+(#--- --- --- --- --- --- | --- | ---.$M.+(#STA CHR STR INT WIS SKL | SPD | HIT.$R6-@:7<,,T$6-%@ @$( V A( X ( $Z''6-@:7,,$AV%@:7%@,,[ AF\Šқ]""A$(25,49) = A$(C1+33,C1+57)^""A$(51,75) = A$(C2+33,C2+57)_""A$(77,101) = A$(C3+33,C3+57)`""A$(103,127)= A$(C4+33,C4+57)a AHP6-f?6-@%6-@I'6-Ab36-A?6-@ k AHp?6-@Q6-@u'6-A36-A?6-@u AHz?6-@w6-A'6-A36-AB?6-@ AH?6-A6-A''6-AF36-Ap?6-@ AH"AH@  B ' AΠԩӛ# AHP6-# AH  B ' A"-@ @"FIX DATA47<,0*7<,0(67<,.46-@   ' A@Ԡٛ 6-C:,GET DIRECTORY6-&P:'AV,$AV 6-P:'AV, 6-@  &#7@<@,0AR CHAR!&%$<7<,07<,#67<,.7<,067<,.<6-@$$ՠқ8:-(%* YOU NEED A CHARACTER DISK FIRST! *0': @~STATUS SUBROUTINE!(6-7<,4%((OK)($67<,4 )7<,4'((EMPTY)36-@6$)7<,0 *7<,0&((LOST))$(DELETED$͠ҠԛAAV+;A ,116.'h#h3h2j542435j`CHARACTER DATAnn67A(,.[<<<fffffff>`<|fl0fF68of;`p88p`f<x<6>ffss67B:,%@,.[sccnccss67B:,%@,.[8pp8?ss67B:,%@,.[ww<~~~<ss67B:,%@,.[x`x`~<~~<0~0 ~ <~~<>fff;``|ff|ff:ss67B:,%@,.[>|x|``lvff0 8flxl0 f~~jc|fffc#ss67B:,%@,.[|v```>`<|0~0006ffn;ff<k>6f<x~ ~1~<~~<(//67B:,%@,.~x|nf8x8880P6-?:C:, |L'!!( T 10 ## W-+->EV'( H 9 # |`'( 8 ## Sj'( t'( EAST 123456789~'('""( '^' TO SWORD OF THE ADEPT'( (AND AMETHIST ROD)'##( '>' TO FOUNTAIN OF HEALING' A %*PRINT MENU+H A`-@@H($ +,,($àԠɠϠΠ͠ŠΠՠ+,,($ +,,($S:Ԡ*+,,($R:ԩ󠠠4+,,($D:򡠠>+,,($U:󠠠H+>,($>AR@\+ B! f+?-@@#?($******** TO RUN AGAIN ********p+ - $.MAIN SCREEN.'@@'-@@.,,($/,,($/,,($Š٬ŠΠ /,,($/,,($ֺ/,,($򢬠렠/,,($ᬠ頭!/2,($/(2$D/I B! -@@#I($:NEXT :MENU :HELPN/ - $X/VF:AV,"AV*-@@"S($V$b/A-@@">($A$ D2:STAT.BAS