@L|}6CD l0C)HCC WhL/h `CmCDiD`  R@W1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` D  C D     )16CS S)  C)D1 p p }0 C9DI pCDL~CiCDiD` DD˙` d J)L !}D L(( LL()  L| L( S LH 0p n  } CY?  q  L L  ` )} `A! d߰")-݆ "  $G@LLL&0") $G% }H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(0 })8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH) }  hyhyB q L> Lm JJ  Ln*` dB%' }8  H H` 1 { LL   !L     Hh SY?  q  1L }  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF } G) *Gȩ GȽG GȌd q q G`  8   0G  `D}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y}`piH n0)բY? 08`0 }  0$L GGȽG L `8L`L}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR}1LJ舩9GIH`LJJ`HGHh l`} S gL   8 rii `дCDCG W  }C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}} |||DDOS DOSDOS SYS }}}}CDOS SYS} 0`BDELV !B }`LVUQ   ]   TU J ]L!T  #      TU  } L ? .  t`GBJ V~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI   0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -'}LLu DEHILV 9 .l 9 .l  `` s$B VBH(}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL)}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e*}1i1232435ޥ<<8K} CE: vC y@y@`A# *` :105L; 0L>! * 0` * : ;` 1 *` 1 *` Disk Drive Sp,}eed:XXX RPM~~~Drive # X PRESS:C > check drive speedL > list error sectorsP > print error sectorsW > write al-}l zeroesto error sectorsM > return to main menui0k ^ 1 :ɛL 800 퍍L5 RETRY ERROR 3 TIME(S)؆莟.}R'S  `=D;EHI 1 1! @ :ɛ8A0.) ȅ 1 1i/}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU!L; .{z:*{}.|~ 1 0 00}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # O 0 n&|D! 1L NOT A DISK FILE1}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH2}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L 3} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED007 FREE SECTORS COPYING---D1:FORT4}UNE.RUN# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B5} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#6}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%7} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C}/$/CHu ξL/L DRIVE TO WRITE DOS & DUP TO?WRITING NEW DOS & DUPTYPE "Y" TO WRITE DOS/DUP:DISK 1.?}D1:DOS.SYSERROR - NOT VERSION 2 FORMAT. , &* բ( 1L `[) 0NΞ 0 L1M) 1@} L BAD LOAD FILELOAD FROM WHAT FILE?) 0 0#B 1L WHAT FILE TO LOCK?) 0 0$B 1L WHAT FILE TO UNLOCK?DIA}SK 1 IS WRITE-PROTECTED !!TYPE "Y" IF OK TO USE PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV. h  ,B}  `CԭC ؠȱC)CȩC`߅C ذ ٥ԍCՍC`800  `0  0`C}i7``ߍDCEHIB 10H``TRʠĩ`D` +CDCC /,D} 8 l0浥CޥC` b,`8` g+  CRC S0NCC S09CE}ե ݩԩ (۰ ٰ ؠ)`i iAC :L., :0 C :`i F}iAC`CC X*C>> ` 0>>  D, q; ,`COPY SECTORS`RLS ; , ,>  , ,G}ۢ>  ,?  , ,`= `=L :ɛ`hL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLtH}% A.= ` <0 0 .@L# .BJ 1  DEHIB V L1 = g <0,L. I} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 = ` <0,0Lf- B VJ},A#P= ` <0 0L#L ߢ) 1* 1 ~0YjC8C}mm ݭK}}`8}``|* ? ɛ,`|:(|/ 1L `INVALID DESTINATIL}ON:DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξM}hAΞB,0 J 1 BޝDEHI,HDE 1H$IHIDELSAVE-N}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L O}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥP}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{Q}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1R} L ERROR- 165ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALIDS} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4CT} $;CC $;C $;CC 8C Z: *DCC ,=  , lɀL +U}CCC.LE4 k:泭C0iiCLg3CL<3 Z: *DCC ,=  , /,C0 8V} l0N S0G :CC# k:浭C0iiCЪL<3 ,٢=  * q;L8 D, q; $; ,WC W} L 4C>  :A>810CC ,/> 1C1>  :Z>810CC ,C> 1CCC , 1= 1 :YhX}hL `=CCЍCCCCCCCCC ; ; ; , 4L3 ,\> 1 * 鈹CɛሢCɛ )CC0Y}CC ~* 5CCCC Co> 1 * Cɛ ~* 5ܭCCCC C˭CCLE5CCLE5`C`Z}`C`~, , E5C 4L3? , E5CC 4C $;D浭CC 8CCCBC[} lɀYC :L6 : lC񠀈Ѱиi iACCC k:LX6CCCCC q\};L8= ; , ,p  , ,  ,1@  :ɛL 15))C q+L 7= , ,V@  ,u@  :ɛL H 7 ]}7Lj7 7Lj7D 8 7L7 7L7բ@ `ߢC ` ,@  * ECɛ>0$C *00C0C *0" CCL^}7`C X*`8` ,@  *0\X TCɛM ~*HC)JJJJ *6CȽC) *(CC0CC_}C`8`=8W=Wy 8W=PyL5 ON ,C` ; *nDEǍHI 1C L!9 :C `}q+L8L 9 q;L8P 9 q;L8W +L8ML 15))C g+L8 ,C&D?E BHCCC /,C\a}XCC X*C-?0  -?C0L8:8鉍C mC mCE?1?C V0*CCC LW9C? b}`CL09PC B VB DAEJNK V0 09 ,ʢ? PC D,P B V`CC mC mC?1?L9c}CC`i`i`i`i`i`P Bd} VBDAEJ VBHIL1HI B} V@`HS S ShH )Lc;Lj;h` 0)¢e})  q; ,` M;hL$; b,hL$; ,>  , ,L,=L1 :HOh:` ; 0L>!}DISK UTILITIES (c)1983 Atari Vf}er 2.6f MODIFIED FOR ATARI 800 USEA. DISK DIRECTORY K. BINARY SAVEB. RUN CARTRIDGE L. BINARY LOADC. COPY FILE g}M. RUN AT ADDRESSD. DELETE FILE N. CREATE MEM.SAVE. RENAME FILE O. DUPLICATE FILEF. LOCK FILE P. COPY SECTORSGh}. UNLOCK FILE Q. CHECK SECTORSH. WRITE DOS/DUP R. RADIX CONVERTI. FORMAT DISK S. DRIVE SPEEDJ. DUPLICATE DISK T. WRi}ITE VERIFY:ON 9!&x#!7&p))'&5./)L''-66C76u8COPY DISK Insert source disk and Λ Insert DESTINATION j}disk and Λ IT'S DONE !'Y' to execute or for menuSource drive # ?DESTINATION drive # ?Source drive is # 1Desk}tination drive is # 2Enter first sectorEnter last sectorCHECK DRIVE # X >>>>ERROR # 144<<< BASIC LANGUAGE OBJ > }MACHINE LANGUAGE DOC > DOCUMENTATION PIC/MIC/FNT/MVM > GRAPHICS AMS/MUS/MBD > MUSIC LST > BASIC LISTING }-SOME MACHINE LANGUAGE PROGRAMS CAN ONLY BE RUN BY BOOTING THE DISK MENU "WITHOUT" BASIC.-FOR SOME PROGRAMS, XL OR XE MOD }ELS MAY REQUIRE A "TRANSLATOR" PROGRAM TO BE BOOTED FIRST. [AVAILABLE SEPARATELY FROM B E L L C O M.]-MOST PROGRAMS ARE } RELATIVELY SELF-EXPLANATORY; HOWEVER, SOME HAVE SEPARATE DOCUMENTATION FILES AVAILABLE. BASIC PROGRAMS MAY CONTAIN INSTR }UCTIONS IN THEIR PROGRAM LISTINGS.-TO WRITE THIS GREAT MENU PROGRAM ONTO ANOTHER DISK, (Q)UIT MENU, BOOT DOS, AND USE TH }E "O" COMMAND TO COPY THE MENU FILE "AUTORUN.SYS" ONTO YOUR DISK. < MENU by DAVID CASTELL >ONTARIO, CANADA K9J 7A5 e6502 DisassemblerBy Greg Menke One thing that can really help a machine language programmer is a disassembler to pri}nt out his or somebody elses code. If you don't have one, its not worth $30 to buy a disassembler limited to listing code fr}om memory or disk file only. A disassembler may sound easy to make, but it isn't. There are 56 different 6502 ML instr}uctions, some have only one form, but most have up to four different forms that do up to four different things. Because of t}he number of possibilities, it isn't practical to use upwards of 120 different IF-THEN statements. In my disassembler, }rather that using ten million IF-THENs, I used a big string that is subscripted into 4 byte chunks that hold the 3 letter ML }instruction and an option byte. The option byte tells the program what form to use in the disassembly. The disassembler loo}ks up the instruction by taking the number it is trying to disassemble, multiplying it by 4, and subtracting 3. That gives t}he instruction's location in the string. With that, the rest is easy; decode the option byte, get any other bytes that are }needed to complete the form of the instruction, and print it. Type in the program, SAVE it and RUN it. The program wil}l set up the string and prompt you from where to disassemble. If you choose the disk option, a disk directory will come up. } Then enter a BINARY LOAD file name. Take care that the # of sectors in the file isn't greater that the avalible buffer spac}e, or when it loads, the program will probably crash. If you chose the memory option, enter the start address in hex or deci}mal. If you use hex, precede the address with a '$'. Next, choose where the output will go. If you choose the printer, be }sure it is ready BEFORE you press P. If you type D, enter in a filename and hit return. The resultant file will be text, bu}t it will be pretty long if your source code is good sized. When the program is disassembling, pressing any key will pa}use it. Then press START to exit back to the start of the program, press SELECT to continue the listing, or press OPTION to }end.t. Then press START to exit back to the start of the program, press SELECT to continue the listing, or press OPTION to qrAMNEMFIOUTINSTARNLOOLOHEXCONVERHNUOPTIONFOPERANDXTOPMNEADADDRASIZBUFFIOCO}F }} !"#$%& ##Memory/Disk file disassembler  By Greg Menke} 9/9/84 V2.0 HEX and DECimal conversionroutines by Shane Rolin.See the Oct}ober 1983 ACE.#<' +'0@F~~;A ,;@ ,;@ ,;@ ,;@,};@#,;@,;@,;@ ,;@ ,;@,G!6-I:,&A$!;,H.67@,.67},..67@,.K6.0123456789ABCDEFP467@,.%67A ,.467@,.S,AR@,(}}Initializing ... Zk "!6@967$@&@<$@,.K-@a(7@<@,k @}_ARd++("}Disassemble from isk or emory ?fU@-@@K:)@A(>}:,L@U6.>:,i0DA kA (}@7@@D:*.*A An0@}("@&(0 As7( (7(P:'A%, free sectors of file space.vG@(1(Enter ٠ }filename.4(8G4Ax99(0}Disassemble to creen, isk file, or rinter ?}U@-@@}K:)@A(>:,L@U6.>:,!4S)4>:AU,!6.E: 4P6.P:4 4D!(}Enter f}ilename %44A 4DAB,($}Enter start address in or ./(3B4}A J7@<@,4$06.7@TT106,ROR1,102,ROR3,118,ROR4,110,ROR6,126,ROR7,6}4,RTI9,96,RTS9,233,SBC2,229,SBC3HUU245,SBC4,237,SBC6,253,SBC7,249,SBC8,225,SBCB,241,SBCC,56,SEC9,248,SED9,120,SEI9R__13}3,STA3,149,STA4,141,STA6,157,STA7,153,STA8,129,STAB,145,STAC,134,STX3,150,STX5,142,STX6\^^132,STY3,148,STY4,140,STY6,170,T}AX9,168,TAY9,186,TSX9,138,TXA9,154,TXS9,152,TYA9,-1,NULL CONVERT DEC TO HEX NN6-?:C::F:,,2 V7@<@,400*"m6.}7@<@, $CONVERT HEX TO DEC^6- -@B:,R+7<,2A)7<,3F,*+7<,20)7<,3}9,^6-@C  6-@($򡡡C$ 6-C:,6-B:,]]6-?:C:Ihhh}hhΠԄձ001@0 A0)G%i )&&&&eԅԥi`,<<,$D:DISASM6-B:,]]6-?:C:Ihhh_lm 00CHOICEHHEZORMNZAAZLSAHLRSMTYOPSDTFFADDNUTOTLAALOPCODELNNBTDNOP} @}@} !"#$%&@'@()*+,-d +@}'0@@@A0@@@SAA2eAA2wAA-@}nP (@-2-@P(@&x3-@3(@}E'( Would You Prefer Decimal (D),8( or Hex (H)E;@,J A %-@A%) J7@}<@,4DA`76-@7ƠؽΠ٠ӠΠ̠ss;@,;@,;@,;@},;@,;@,;@,;@,;@,;@,##@@E:06.012345678}9ABCDEF&6-@06.000Q0@@@70@@@Q0@@@++("ŭ}РҠӺ8.;@V$@,9@V,9@V,8#A#O-@@V"O67$@}&@<$@,.7@<@,5 68,-A:7@<@,,568,-A:7@,,    ((Immediate } LDA #15(Absolute LDA 1500 (Zero Page LDA 15"(Accumulator ASL,(Indirect X LDA (15X})6(Indirect Y LDA (15)Y@(Zero Page X LDA 15XJ(Zero Page Y LDA 15YT(Absolute X LDA 1500X^}(Absolute Y LDA 1500Yh)()( ӠŠԡr%(%( ENTER ALL NUMBERS IN |"@ }(4(.(#ADDRESSES:USE 1536-1791 (0600-06FF)1(4(W(PLEASE ENTER STARTING;(ADDRESS FOR ML PR}OGRAM?F4M(W A/"@6. A%6-/ A@ 6-A:,@ AV)!B `3(}NOT ZPAGE OR ROM!6(@ A 6-(} ApG((ԠҠ(("@D((e.g. #5 should be #05)}G(?"@6-!6-@+ Ap5(: ? A (: K A`@!(3@@} :4A(K ApĠנϭӠŮ4B:,!@.7B:,&@,4FORWARD46-B4RES}OLVE6-&/%@&@8( OKB Ap:4POKE$ ADDR,NUMBER(DEC)*0: Ap 4HEX} A@&4DECIMALAp04 DISASSEMBLERA :! 4END B! AD# 6-B:,#6.7@<}@,NB-@@VB47$@&@<$@,A X b Al!!٠Š}v 6-8,6-8, "6- Ap" A?"@6-@'"@56-%}@? A(6.7@,"@( A036.7@<@,#6-B:,34#A 4(A`}"@A @'"@6-%@' A7,4X)7,4YA p$$7@<@,4JA}p 6-A:, !AUAp;-"@)"@)"@)"@;6-%@ APT6-P:'AV},&6-+&AV$,<"@)"@J6-%@T A E-"@)"@)"@)"@;6-%@}E A!!"@)"@ A  A* A46-A:7@,,>'"@6-%@' }APH#"@)"@# APR A\7&@,4)YAf7&@,4X)A p6-A}:7@<&@,,z'"@6-%@' AP A6-A:7@<&@,,"@ A}P AJ 6-A:,6-&&@3 6A()!A'@ ϠJ A 6-%AV } AP7&@,4)YA7,4XApϠŠ٠36-A:7@<&@,,3!AU}A0!!"@)"@A"@A1 A "@'6-%@$1 A`'"@}6-%@(' A` A$ A.?6-A:7@<&@,,+!AU5 A ? A08'"@}6-%@' AB;#"@)"@)"@16-%@ ; AL AV AP`'6-P:}'AV,$6-&AV$'$j'"@6-%@$' A`t;#"@)"@)"@16-%@(; A`}~ A A 6-A:, A  A`(Ҡ ApŠŠӠ+ }6-%@+"@A@( Ap! 6- Ap(! ApϠŠӠ8!}AV(.(ERROR-- >256 ($100)8 Ap9 %@%6-%@9"@A (  Ap}  6- Ap( ! 6- Ap(! ApŠŠӠ(G %@%%@}36-%@G"@A@2(   Ap< 6- Ap( F 6- Ap( }P! 6- Ap(! ApZ ̠ϠؠŠϠȤd 6.6-P:'AV,'!86-P:'@,H6}-&$@c6.7%@<%@,67@,.7%@<%@,n6-&$AV$6-P:'@,46-&$@}]67B:,%@,.7%@<%@,67B:,%@,.7%@<%@,6-@$x ؠϠ̠Ȥ}Ϡũ]6-6-@/-@@C6-@:7,,&@HO!@ ]6-&@#6-$@%  6}-P:,#$GGԠؠŠԠĠŠԠϠ̠d7@<@,4#%6.00=67@},.7@,G AO6.#a67@,.=:,d$< 6-B:,#6.7@<@,,6.7,<0(Ar 4}Y6.00467@,.7@<@,> AF6.(X67@,.=:,o67B:,%@,.)Yr$r 4)6.00 }467@,.7@<@,> AF6.(X67@,.=:,o67B:,%@,.X)r$4X)4YA/ 6 }. @/6.7@<@&,-67B:,%@,.! A*6.=:,-$0"@&6.7@<@,0 } A0, 6.00,67@,.7@<@,- A6.=:,*67B:,%@,.-$K%(ENTER DECIMA }L NUMBER)5!AUA6-@K A`6-@2 Ap(( = $2 Ap"!(E }NTER HEX NUMBER!,//SX=LEN(H$):BK$="000":H$= BK$((1, -SX)+H$)61 A'( = 1 Ap@@((}*STARTS "6-@(6-2 Ap@( ($)J@( ENDS 6-%6-@/ Ap=( ($)@T))}ŠϠŠŠҠ^ɠҠh[ +'0@@@A0@@@}[0@@@ri*("This assembler directly pokes yourE(opcodes into memory. i(There are a few Pseudo-}Opcodes,|/,($and more can be added to the program/(i#( Same as Basic POKE.J(" Does Decimal to Hex Con}verti( Opposite of k'( AND TogetherO(# they will correctly handle k( o}ne forward branchc&( Assembler will handle allB( backward branches.c( Quits the program anda( } returns to basic.C( Turns the programa( over to disassembly.@+(# Disassembly is done in d}ecimal.(@AR@f*("Disassembly is paused by pressing N( and together; and exitedf(by pressing }.**("Wait,please,for loading to finish.ND;AV$@,9AU,9AU,;@,;@,N#A P}-AU "68,-B:,++67$@%@<$@%8,,. 68,-  (} $5 } } -@5(ԠҠ&((PRESS TO EXIT0'($(PRESS AND TO PAUSE'(:< }AP.(STARTING ADDRESS (DECIMAL) 2< BD!! )!BU5APN 6-F:,6-8,X++6.7$@}%@<$@%8,,b1(@@(1@@l77%@AA0APA`A}pv:6-@ 6-F:%@,,!A(:6-&AV9(@@ /( %@%9 A+(} !6-@+ A!( %@%! A#@@ (# AM(F:%@,}%@@ 96.=:F:%@,,C A @M AG(F:%@,%@@5(F:%@,G@@ }8.6.=:+F:%@,%AV$F:%@,,,8 A @% 6-% %6-BU6&!BU56-@}w F:B2y,"@ApB APBΠϠҠ٠ǠŠӮNK(7@ }<@%+8,!@,,7@%@$+8,!@,,N$DDBRK,1,ORA (X),2,?,0,?,0,?,0,ORA ,2,ASL ,2,?,0,PHP,1,O!}RA # ,2 AAASL A,1,?,0,?,0,ORA ,3,ASL ,3,?,0,BPL,-1,ORA ()Y,2,?,0,?,0CC?,0,ORA X,2,ASL X,2,?,0,CLC,1,ORA Y,3,?,0,?,"}0,?,0,ORA X,3 CCASL ,3,?,0,JSR ,3,AND (X),2,?,0,?,0,BIT ,2,AND ,2,ROL ,2,?,0*JJPLP,1,AND # ,2,ROL A,1,?,0,BIT ,3,AND #},3,ROL ,3,?,0,BMI,-1,AND ()Y,24@@?,0,?,0,?,0,AND X,2,ROL X,2,?,0,SEC,1,AND Y,3,CLI,1,?,0>CC?,0,AND X,3,ROL X,3,?,0$},RTI,1,EOR (X),2,?,0,?,0,?,0,EOR ,2HHHLSR ,2,?,0,PHA,1,EOR # ,2,LSR ,1,?,0,JMP ,3,EOR ,3,LSR ,3,?,0RGGBVC,-1,EOR %}()Y,2,?,0,?,0,?,0,EOR X,2,LSR X,2,?,0,CLI,1,EOR Y,3\???,0,?,0,?,0,EOR X,3,LSR X,3,?,0,RTS,1,ADC (X),2,?,0,?,0fKK?,&}0,ADC ,2,ROR ,2,?,0,PLA,1,ADC # ,2,ROR A,1,?,0,JMP (),108,ADC ,3pDDROR ,3,?,0,BVS,-1,ADC ()Y,2,?,0,?,0,?,0,ADC X,2,RO'}R X,2,?,0zDDSEI,1,ADC Y,3,?,0,?,0,?,0,ADC X,3,ROR X,3,?,0,?,0,STA (X),2==?,0,?,0,STY ,2,STA ,2,STX ,2,?,0,DEY,1(},?,0,TXA,1,?,0LLSTY ,3,STA ,3,STX ,3,?,0,BCC,-1,STA ()Y,2,?,0,?,0,STY X,2,STA X,2@@STX Y,2,?,0,TYA,1,STA Y,3,T)}XS,1,?,0,?,0,STA X,3,?,0,?,0PPLDY # ,2,LDA (X),2,LDX # ,2,?,0,LDY ,2,LDA ,2,LDX ,2,?,0,TAY,1,LDA # ,2DDTAX,1,?,0,*}LDY ,3,LDA ,3,LDX ,3,?,0,BCS,-1,LDA ()Y,2,?,0,?,0OOLDY X,2,LDA X,2,LDX Y,2,?,0,CLV,1,LDA Y,3,TSX,1,?,0,LDY X,3,LD+}A X,3IILDX Y,3,?,0,CPY # ,2,CMP (X),2,?,0,?,0,CPY ,2,CMP ,2,DEC ,2,?,0KKINY,1,CMP # ,2,DEX,1,?,0,CPY ,3,CMP ,3,},DEC ,3,?,0,BNE,-1,CMP ()Y,2>>?,0,?,0,?,0,CMP X,2,DEC X,2,?,0,CLD,1,CMP Y,3,?,0,?,0JJ?,0,CMP X,3,DEC X,3,?,0,CP-}X # ,2,SBC (X),2,?,0,?,0,CPX ,2,SBC ,2FFINC ,2,?,0,INX,1,SBC # ,2,NOP,1,?,0,CPX ,3,SBC ,3,INC ,3,?,0GGBEQ,-1,SB.}C ()Y,2,?,0,?,0,?,0,SBC X,2,INC X,2,?,0,SED,1,SBC Y,3''?,0,?,0,?,0,SBC X,3,INC X,3,?,0 EEADC1097,AND1033,ASL3002,/}BCC8144,BCS8176,BEQ8240,BIT7036,BMI8048 EEBNE8208,BPL8016,BRK0000,BVC8080,BVS8112,CLC0024,CLD0216,CLI0088 EECLV0184,CMP0}1193,CPX4224,CPY4192,DEC2198,DEX0202,DEY0136,EOR1065$ EEINC2230,INX0232,INY0200,JMP6076,JSR9032,LDA1161,LDX5162,LDY5160. E1}ELSR3066,NOP0234,ORA1001,PHA0072,PHP0008,PLA0104,PLP0040,ROL30348 EEROR3098,RTI0064,RTS0096,SBC1225,SEC0056,SED0248,SEI0122}0,STA1129B EESTX2134,STY2132,TAX0170,TAY0168,TSX0186,TXA0138,TXS0154,TYA0152L ************************V * 3} *` * - *j * *t * *~ * by Ray Huds4}on * * * * ORIGINAL PROGRAMS * * WERE 'FAST DISASSE- * * MBLER' AND 'SIMPLE 5} * * ASSEMBLER' FROM * * 'MACHINE LANGUAGE * * FOR BEGINNERS.' * * COPYRIGHT 1983,SMALL *6} * SYSTEM SERVICES,INC. * * * * THE ORIGINAL PROGRAMS* * HAVE BEEN CHANGED TO * *7} ALLOW THEM TO WORK * * TOGETHER AS A UNIT * * * * HAVE FUN ASSEMBLING *( * 8} *2 ************************<  D2:ASEMBLER * * HAVE FUN ASSEMBLING *( * J~ OPCODELNNBTDNADDO@3E A A  @ :} 2ɠҠdQ0@@@70@@@Q0@@@i;}U(} !-@:(ԠҠ=(U( LOADING OPCODES...nDD;AV$@,9AU,9AU<},;@,;@,x-AU} "68,-B:,++67$@%@<$@%8,,. 68,=}- 5 } -@5(ԠҠ ( (> A0(STARTING ADDRESS (DECIMAL) 4>>} B!! )!BU5A 6-F:,6-8,++6.7$@%@<$@%8,,1(@?}@(1@@77%@ABADAPA`Ap:6-@ 6-F:%@,,!A(@}:6-&AV9(@@ /( %@%9 A+( !6-@+ A!(A} %@%! A#@@ (# AM(F:%@,%@@ 96.=:F:%@,,C AB}M AG(F:%@,%@@5(F:%@,G@@ 8.6.=:+F:%@,%AV$F:%@C},,,8 A,% 6-% %6-BU6&6!BU56-;@w@ F:B2y,"@AD}NK(7@<@%+8,!@,,7@%@$+8,!@,,N$DDBRK,1,ORA (X),2,?,0,?,0,?,0,ORA ,2,ASL E},2,?,0,PHP,1,ORA # ,2AAASL A,1,?,0,?,0,ORA ,3,ASL ,3,?,0,BPL,-1,ORA ()Y,2,?,0,?,0CC?,0,ORA X,2,ASL X,2,?,0,CLC,1,OF}RA Y,3,?,0,?,0,?,0,ORA X,3CCASL ,3,?,0,JSR ,3,AND (X),2,?,0,?,0,BIT ,2,AND ,2,ROL ,2,?,0JJPLP,1,AND # ,2,ROL A,1,?G},0,BIT ,3,AND ,3,ROL ,3,?,0,BMI,-1,AND ()Y,2&@@?,0,?,0,?,0,AND X,2,ROL X,2,?,0,SEC,1,AND Y,3,CLI,1,?,00CC?,0,AND X,H}3,ROL X,3,?,0,RTI,1,EOR (X),2,?,0,?,0,?,0,EOR ,2:HHLSR ,2,?,0,PHA,1,EOR # ,2,LSR ,1,?,0,JMP ,3,EOR ,3,LSR ,3,?,0DI}GGBVC,-1,EOR ()Y,2,?,0,?,0,?,0,EOR X,2,LSR X,2,?,0,CLI,1,EOR Y,3N???,0,?,0,?,0,EOR X,3,LSR X,3,?,0,RTS,1,ADC (X),2,?J},0,?,0XKK?,0,ADC ,2,ROR ,2,?,0,PLA,1,ADC # ,2,ROR A,1,?,0,JMP (),108,ADC ,3bDDROR ,3,?,0,BVS,-1,ADC ()Y,2,?,0,?,0,?K},0,ADC X,2,ROR X,2,?,0lDDSEI,1,ADC Y,3,?,0,?,0,?,0,ADC X,3,ROR X,3,?,0,?,0,STA (X),2v==?,0,?,0,STY ,2,STA ,2,STXL} ,2,?,0,DEY,1,?,0,TXA,1,?,0LLSTY ,3,STA ,3,STX ,3,?,0,BCC,-1,STA ()Y,2,?,0,?,0,STY X,2,STA X,2@@STX Y,2,?,0,TYM}A,1,STA Y,3,TXS,1,?,0,?,0,STA X,3,?,0,?,0PPLDY # ,2,LDA (X),2,LDX # ,2,?,0,LDY ,2,LDA ,2,LDX ,2,?,0,TAY,1,LDA # ,2N}DDTAX,1,?,0,LDY ,3,LDA ,3,LDX ,3,?,0,BCS,-1,LDA ()Y,2,?,0,?,0OOLDY X,2,LDA X,2,LDX Y,2,?,0,CLV,1,LDA Y,3,TSX,1,?O},0,LDY X,3,LDA X,3IILDX Y,3,?,0,CPY # ,2,CMP (X),2,?,0,?,0,CPY ,2,CMP ,2,DEC ,2,?,0KKINY,1,CMP # ,2,DEX,1,?,0,CP}PY ,3,CMP ,3,DEC ,3,?,0,BNE,-1,CMP ()Y,2>>?,0,?,0,?,0,CMP X,2,DEC X,2,?,0,CLD,1,CMP Y,3,?,0,?,0JJ?,0,CMP X,3,DQ}EC X,3,?,0,CPX # ,2,SBC (X),2,?,0,?,0,CPX ,2,SBC ,2FFINC ,2,?,0,INX,1,SBC # ,2,NOP,1,?,0,CPX ,3,SBC ,3,INC ,3,?,0R}GGBEQ,-1,SBC ()Y,2,?,0,?,0,?,0,SBC X,2,INC X,2,?,0,SED,1,SBC Y,3''?,0,?,0,?,0,SBC X,3,INC X,3,?,0 D2:DISASS}EMBBEQ,-1,SBC ()Y,2,?,0,?,0,?,0,SBC X,2,INC X,2,?,0,SED,1,SBC Y,3''?,0,?,0,?,0,SBC X,3,INC X,3,?,0 D2:DISAS&Ev8=7EJ&&K&L&ʩ * d5I&&&© 1 -L*I&˜ ' 4&0& 1&& *L!U}*& & 1 -& & 1 - - *`RUNTIME ERROR AT LINE &&Lr*+ +L&` '!V}& &L&PROGRAM STOPPED&&Ńł ȱ`iL'HH 1*L/ r* . 1 + '. . . !W}1 . ' 1 + . 'hhL.ʥ`HHhh`8L'u!X}`Huh` Lr*L' Lr*L' ) . ( . ' r* .Lo* )!Y} . ' , ( . ' + ' r* ' + 1 , . o*Lr* ) ' ' , ( . ' + ' r* ' + !Z}1 , . (( . o*Lo* ' 1* '.L/` ) r* .L. ) . . + ' . ' ,L' ) ' ,![} ' . + 'L'J&K&L& ) 1 1,L&eJ&iK&`L&8LM& . '.!\}L&`ʔȱȱȱ 1*Șe惠 惨6,*6-* L*HHhh``!]}`Lo*ʱ` ** &JL&J *HHl JLw TO BOOT FOR DOS!^} TO RERUNp B V8+` +ȱLr*&&8558凅刐SJj)ee`ф!_}фiiL#+8L#+ LM&uuuLr*8` +Lr*iLr*豂Hȱ!`}h`p +Lr*+H+ BHI+ 4 -h`8` ,L, ,#` ,0 ,0L, ,0!a}` ,0L,L,`޵` `Ȕ`ʔ惥u`!b}+ BHI DEH 4 -HyhLo* + -`+JJJJ`d-+e- +- c-0 c-Lr* J-Lr*!c}` f-H J-h 0 c-`L+8 0ƅ`66&Ln-HH` B VhH)Kh)0 IJD-EB 4hLr*S:+Lr*!d}TUVLo* -`++L+ -8ɰɅ +`ʱȱȱ`ȵȵLr*Lr* '. . .ʥ!e} . . '. .L3 '. . . . 1*uȱuȱu W* 1* .0 @,L3 ȱLr* T,L.ʵ!f}`eeLM&HHhh`ؐHH 1*L/ r*HH . .6 +i i!g} .i i .hh . . 'hh .`HH 1*% r*HH 1L'/ 1* '. LM& .6 + !q} b'DOS SYSbL+DUP SYSb wAUTORUN SYSbHELP DOCbDISASEM DOCb3DISASEM BASbaASEMBLERBASb9DIS6502 BASb@TCOMPRESSOBJbDEBUG DOCb0DEBUG OBJb0FILEINFOOBJbORGFINDRBASbDLDUMP BASboDUMPER BASbAUTODATABASbAUTOTYPEBASbDECTOHEXBASbDECTOBINBASbHEXTODECBASbEDIT4TH BAS. +` 1* '.ޠ . 1 +L/  o*Lr*H+ B Vh` ҵ  o*Lo*H+BHI 4+h+L1 g!r}0+KJBD0EH 4h o*Lr* r* '.0Ɔ򩛙0` -H`B 4h`00!s}L1Lr*Lr* +`H o*hL11HH eHHƆeiH '.lꦆ 1Օ`0  !t}L,`8`|1rd-1e- (- 10|1L1|10|1`1 r* '.1 1`+6-1L180!u}1LM& + 1 . 1 1 ++ 1 +Ɔʭ1 +`ʕ`66`HHH66666u!v}uuhhhLr* +愵 ' + 'I 1 280/66&&&`!w}uuu` 2 2Ј 2 o* +`@32@2 .22222 LM&ȥ2i!x}223`L*32 3`LM&2@82ƅ3 ȱ222` w3L?33L?3H3 2h`!y}1+ %  88L3 o* o*` o* o*`  o* o*` 3$' 3"0 !z}30 !4L, 4L, 4L,L1L14 1 '. .4444`H+? ++HI4D44E4B 4H!{}4h` VLM&4` D44 14α44 1L4 D44LM&44, α44ﭯ4 148e44α4 !|}11L1  'Lr*hh iLr* (5L2 (5L*42&&ȱ0 5Lw5 555&!}}& L5&&`i`J&&K&L&` +ȱ&&%8e慱HȱhױL&!~}iJ&iK&Lr*+ BH Vh 1LW*+&BH 4hN 1 W*L 1MLW*+%BNLMH 4hLo*)}*1*N!}*W*v*11+,J2+,a,s,@,/,T,9,H,),**++++,,-------6.c./x///2:3}10000)///0090.444(4!4440&D'@(!}f(()))V)4440T5\5A1+1d5355&(6@6j6S1 v8y889 j9!9#9(':2:< ;P;UO;Z^;_{;d;e;x;;!<s`>>>% ?&?J@To@V}@Y@^@_@`@aAhArEA|HAtAAAAB2B!CBT dB^ !}B@BC%C C C C& nDl vD D D(#DE=8>Comp!}ress filespec?*@8D=8J@8C8WC@8D7F86I86@8 D1:COMPRESSAF8I89Error--ab!}ortedJ@8L8WC@8D7F8I8 *|"䚠0F86I86U8F8!}I8F8I89 O8F8-AO8I8-BF86I86R8F8I8O8F8-BO8I8-BU8R89@X8!}R8R8U8  [8':X8U8[8 ^8O8D.O8X8U8  BI8^8 T^8I8 UI8^8X8U8 !}I8^8 X^8I8 YI8RI8hLV.Ja8I8F8U8O8O8X8U8 FAU83 ;I8I83U8!} F8F83U8 U8;F8F8I8I8I8O8D/ X8 3 O;F8^; O8I8I8F<!}{;Pd8I8d8d8d8O8D/;(#O8d8d8F=;d=8=8d8I8  l *g8F8 j8g8 O8a8a8g8!}j8 -CO8a8a8j8-Ca8I8g8F8d8I8  j8g8 O8I8I8g8j8 -CO8I8I8j8!}-Cj8X8 O8I8I8X8j8 -CO8I8I8j8-CO8I8O8d8EBF8F8d8I8 I8I8P!}@8GAI@8D/@8D1:@8D884=@8@8DB@8DC@8:*.*B+@8D=?=+@8D/f=m8@8DA@8D1:A@8m8DB+@8!}F:9@8F:9=m8@8DA@8D1:A@8m8DB+ *66"bloc!}" WRITTEN BY " "   !}OF WASHINGTON, D.C. andPress any key to continue.>!}C8L8E:7[8M [8O8@@8@m8@?T *~ΠՠA) Disk Directory!}B) Change DrivesC) Compress FileD) Delete FileE) Rename FileF) Lock FileG) U!}nlock File H) RebootI) Format DiskSelect item or for menu.@8GAI@8D/o@Pleas!}e type one letterJ@8D=}@%@8DA;@8DI< @ Not menu itemJT@8D5@  Drive or filespec?*!}@8D=@@8D:*.*A@8D7a?@8GAI@8D`4JSource, dest drivesC8HL8HI%Delet!}e filespec?*!@8D7JRename filespec?* @8D7JLock filespec?*#@8D7J!}Unlock filespec?*$@8D7JF8wJWhich drive to format?*@8D7J?CB@44!}T *Error J *R }Source: C8 Dest: L8(!}+44T *@8D1:*.*A@8L8WC_O8DX8R8%C U8X8^8U8 O8U8^8!} -AO8^8-B^8R8 O8R8^8 -BO8^8-B#R8CO8a8a8Cs8O8D/X8 X8!}CO8O8s8FA=8=8X8 l *O8s8s8C^8X8 O8s8s8^8-CO8s8s8X8^8!} -CO8s8O8s8O8D/FB=8=8l *"=8} +D+ +^8X8d8 I8j8^!}8 O8a8a8^8j8 -CO8a8a8j8-CO8O8O8D/d8 I8FA&+^8X8d8 I8j8^ _ DEBUG Commands Key Function --- -------- * Address Set D Display Toggle Q Q%}uit, Debug, go to DOS G Go at Address T Trace Program P Print Disassembly E Erase Memory %} C Change 1 byte of RAM N Change Register Value R Diplay Registers B Set/Reset Break Point S %} Save a binary file L Load a binary file F Find a string in memory H High Speed Display " D%}ec/Hex, Hex/Dec convert - Scroll up in memory = Scroll down in memory Prompts: * - expects num%}ber ? - expects character stringp in memory = Scroll down in memory Prompts: * - expects num$*3إ  ^ _UVyz yzآWDԆ膲jxY  X)}ZZZ ԭ @ E : 1 ) )ر  pL 걍ޡ뱍ߡ L Lb \UV)}  x^_ Xhhl L3  =l01!/L\ BLVԅ` ɛ T`)}dҩҩҎ` 1 :  Ohh`#.= O#ɛ`{hhLp&&&&Պԅ戥L)} O#ɛ"򄉩 ذ ٰ ` {hhLpȦL膄 থԥբ `A O QԤɛ)}:  (#$ й` ԅՅ Ԡ` hhԍՍxZZZXH)}W(l ԅՅT v #ɛ TTT` Q\ থԥբ ` O)}Ԣ `5ȱ  '# $ ɤei`#I#` ʥ#9)}ԥբL` ʥL ʥ ᤠ蹥$ʈ` ʥ إL L ,$Y%` ʥ ȩ ʥ 楠$`A9` ʥ O)}44)Ii8L|8囅ԥLeԥiթeԅԅiՅ Ƅ` ʥ إ 楩)$` ʥ L OԢ L` O)}ԢL`(9L OԄ p ؠ#)#$ŭ0* ,$豁$)$%T )}#LVʆ ئ#)#` #譃#`$#襄#`5JJJJ{Ȧ5Ԫ{)}Ȧ` '#`Wh@؎hhh8hXLJnml +?<ƳI? Lbh)H()}WL3W* ɜ#hhhhXLJl^ O P8 8 ׭ԭ 8 )}9dz `I b0 Թ L /ϳ` /ӳ`H****)h)`)}T` : 8`(v  pL[~$Ƈ p ڨˤ  !L[ɜ𩤇#ɛ    ڨL[#)}ɛ ` !`>` B#DE(HI: ɤ V0`hhLET ./`I!0)}ԥLݳ׳ 㳅``L4L7@`ɀɁ ILɂ I@LɃ)}@оɄдɅ𰥷@a { LŸE``ZZL8HZhZʎ)}ȱ` ԅՅ :A F SO = : 1 4 ꙥ  5 gLV?)}L` L@ZZZLL @L  'Ll @HȱhL󫥡/`d󭺳9h)}L󫭺9hLĄxZZZZZZպH(h)}xZZZZZZX@ 0Э Li i)}i i`^` #%=ș#ȄI `#$򩛙% 򬥰LY ԅՅ )}œ#Œ擥œŒ똑`L`T`T  TLY )! )!hhH)}h`; ߬ UD 1 :  !LS ѭLS   ԅՅ 4 45 ɤ L 򬩛) Y ) LLE :)}5 ߬ hhhh`Q  pL` ./0 v  & "𩛝" ԅՅ`ԥL8嶅ԥ)}L` `׳Թݳ X8 񤉹ͥi` 1" O`#81$ $)}4 LLpԝ׳՝ݳԝ㳘LE 1׳ݳ㳑鳝׳ݳLEL 1 O`#ɛ ,)}K 턀, 8Ȅ =iiɸ#Z`KĀ ঢ#)}ԥ #ʈ$#5敥ԥբ `  LWD  w0NO EL w Nԭ)}O ְ w ˰ 0LH EhɈ/ ঠ#  #ʈ$#0 LYLN BDE)}HILV䥖8唅啅ii`NO`NO`N`O`LwL E JKBSDE V0)}`hhL HSUhD` 1 Ohh`#,ɛS젥hhLS`D ԅՅ ԅՅŕEŔ; )}NO w0+NO w0NO w0 0LEH EhLQDRN*CGLSBT-=FPH.E-񣝣dL!ѭf1W٤)} )8OU !Aa!Aa>^  P0p@pppB B Bֲ)}Al쀀|||||)}|$)3!)}|||||| @@ ` @`~})}Ҵ #4ALZhw$ 0 5 $ 3 & / !8930 DP : AXYSPBRK POINT FOUND~,.0123456)}789ABCDEFGHIJKLMNOPQRSTUVWXYZFIND #,X)Y,)LOAD ATBREAK KEY ABORNO DEVICE HANDLETRUNCATED RECORDEVICE TIMEOUDEVICE NAWRITE)} PROTECTEFUNCTION NOT DONDISK FULFILE NUM MISMATCBAD FILE NAMFILE LOCKEDIRECTORY FULFILE NOT FOUNFILE NOT BINARNO SE)}T BRK POININVALID OPCODBRK POINT SEADR RANGE ERROADCANDASLBCCBCSBEQBITBMIBNEBPLBVCBVSCLCCLDCLICLVCMPCPXCPYDECDEXDEYEOR)}INCINXINYJMPJSRLDALDXLDYLSRNOPORAPHAPHPPLAPLPROLRORRTIRTSSBCSECSEDSEISTASTXSTYTAXTAYTSXTXATXSTYA???ieum}yaq)%5-=9!1 $,)}0PpXʈIEUM]YAQLl JFVN^  Hh(*&6.>jfvn~@`8x)} !$'*-033333333666999<<<:A%,dAR@6-@6-6@2}0-@@d=@K6-%@a"@"*"@m6-@ y6- A;"@ *"2}@"--@A1 ; A - ( k B@" @6-@A: L-@2}@!^ARa(k @ BA@6@D:ORGFINDR.BASTD:ORGFINDR.BAS2}@5@D:ORGFINDR.BAS D2:ORGFINDRD:ORGFINDR.BASTD:ORGFINDR.BAS0G  <AFLAD@  +9A,-@@6} @(WHAT GRAPHICS MODE (2+6-<%%6-F:A`,%F:Aa,$AVF-AP6}6-F:%,Z'"@e*"'6-%@d 68,- +n (USE 'CTRL 1' TO FREEZE.x( (-6}&&(DL BYTE %@ = 8, ( ( ( @0D:DLDUMPCTRL 1' TO FREEZE.x( (-4Zbc77QQQQQQQQQQ1Q1Q1Q1Q1Q1Q1Q1Q1Q1Q2Q2Q2Q2Q2Q2Q2Q2Q3Q3Q3Q3Q3Q3Q4Q4Q4Q4Q4Q4Q5:}Q5Q6Q6Q6Q6Q7Q8Q9Q10Q12Q12Q13Q16Q19Q21Q25Q25Q25Q25Q26Q27Q29Q49Q51Q53Q61Q68Q70Q72Q75Q75Q76Q77Q:}83Q93Q98HFHEXDECSASSBINANSFFSSSMEFINAZENOLINEPVALUPWISBLLKIPAGILINJIHLKKSUMI:} :}:} !"#$%&'()*+,-./:}0123456789:;<=>?: }@ABCDEFGHIJKLMN:!}OPQRSTUVWXYZ[\]^:"}_`abcdefghijklm:#}nopqr6-6-@'6-@36-@?6-@K6-@W6-@:$}c6-@o6-@{6-@6-@ 6-A6-@6-@6-@6-@6-@6-:%}@6-@6-@!6-@"6-@ '6-@%36-@&?6-@'K6-@(W6-@)c6-@:&}0o6-@1{6-@6-@56-@66-@86-@@6-@A6-A0@6-@B6-@2:'}6-@I'6-@S36-@U?6-@`K6-@aW6-@dc6-@eo6-@w{6-@6-A0:(}6-A6-A#6-A(6-A66-AA`6-A6-AB'6-ARP36-AS?6-AUK6:)}-AVW6-A`c6-B2yo6-AR{6-AT6-A6-A06-A{6-AV6-AW'6-:*}AW 36-AR?6-AUK6-AdW6-Apc6-A0o6-A0{6-A '@!@@9:+}' (BB;,;,;,;,;,;,;,;,;,;@P,;,2# 6-6-6-A$$#6-<&6:,}.0123456789ABCDEF&6-@fPZ d+%  F D U M P E R ( + nc$  Version 2.1 : printG:-}  by: Michael J Raymondc  (C) 1981x    = ---%-0=2&:.}+$,K2&++%,$,+2&++%,$,?2&++%,$,C G K 9 02%2/2:/}92 6-  j* " If you desire printed outputQ " turn your printer on and setg  :0}paging now.j n* " If you do desire printedR # output turn off the expansionn  module or printer:1}Y (  In any event, please hitO " to begin this program.U-YP:6- A:2}0 Q ENTER:,  Q  FOR MEMORY DUMP"""  TO CEASE USE6:3} 6.D1:@ A JL 6-F:, ҭ+"A0H  I DON'T KNOW THE DEVICEL r("A3$  DEVI:4}CE NOT OPEN( |/"A8+  DEVICE DID NOT RESPOND/ +"A`'  DRIVE NUMBER ERROR+ '"Ap# :5} FILE NOT FOUND'    4END+4MEMORY6-4MEMORY A4A:6}7<,4:6. 7<,4:6. 67<,.  6. A@L 6.-:7}B:,,67<,.>:@:7<,,%,0 3 L  1)HEX DUMPDW  2)DECIMAL DUMP;  3)OCTAL DUMPW :8} 4)BINARY DUMPb AP6-A:, Ap> 6-F:, ҭ$")":  A NUMBER PLEASE!> :9}" ")!  ŠΡ"  " `%  ENTER STARTING ADDRESSA  XXXXX - DECIMAL`  $X::}XXX - HEXIDECIMAL'7<,0$6-A:,' A0  6-6-6-`$  ENTER ENDING ADDRESS@  :;} XXXXX - DECIMAL`  $XXXX - HEXIDECIMAL!7<,0$6-A:,!   6- C-B:,66.:<}7<,$6-%;6-P:#+&,%?P,C-(47<,6-%++&,$,( A  * 4$> H " :=}A`R2  ( ǡ - REENTER <2 A\''ApA! A2PACpf 6-p " Ap:>}zE " HEX DUMP OF FILE -->& 0-8->-E   --) 6.|!")")")":?})")6. "6.' "")")")")"'6. "*"6. "6.$ "*"6.:@}.D -   -&6.|<")")")")"D6.t "6.~ "6.6 -  :A}-# BYTE#)-6 DISPLAY; - CHARS-! 0'-. 14-; 2* - 3- 4#-:B}* 5* - 6- 7#-* 8* - 9- A#-* B@ - C- D#:C}-) E/-6 F@ A 9 --6-P:'," ' --96-&+$,F6  -6- 6-&:D}!.6-&66-%n-+$,%x " A0& 6-F:,6-%!%& A 0 AP )6-%:E}'  6..*!'6.>:,% -%    >:,% 6-F:, "  " A A:F}0" 6-6-,JB3Hexidecimal dump of file  Page:J6-%@JJ3BBYTE #| 0| 1| 2| 3| 4| :G}5| 6| 7| 8| 9| A| B| C| D| E| F|Print CharsJYO3G------+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+----------------Y:H}-&^P:',$A`hOO3G------+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+--+----------------r A|:I}c#67<,. | | | | | | |C67<,. | | | | | c67<,. | | | | | M#67<,. :J} .6-P:',2 =67<,.I6-&+$,M .67<,. A -."A 6-F:,6-%!% :K}  A ); 6-% 6-+&,$*67%<%,.;67%<%,..: *!67%<%,.>:,D   3:L}X  3 33 Al 6-F:," v--3Error  occured in this print run AP?3?3 End of:M} File  reached at byte #  (decimal) -%3   H6-P:',6-&+$,.67<,.7%<%,B6:N}7<,.7%<%,H$* 6-F:,-& ERROR #*  -6-- -6-6-!:O}%6-&-6-%D-+$,%  -%&  * . 4-D  EOF REACHED> H 6-R " A'\B :P}& DECIMAL DUMP OF FILE -->* 4-<-B-,   -$-,6.|!")")")":Q})"!6.' "")")")")"'6. "6. "*"6. "6.  "*"6.:R} & -   -&6.|B !")")")")"!6.L  "6.V  "6.` ; -  :S}-# BYTE #)-/ 05-; 1~ ' - 2- 3!-' 4 . -  DISPLAYABLE-.  CHARACTER:T}S ' - 5- 6!-' 7 % - 8- 9% A1P 6 -6-P:', "-& 26-&+$:U},6  7 - -6-!6-'!/6-&76-%  " A% & 6-F:,6-%!%& A1`  :V} A%  )6-%  /-%+$, 6..&!* /6.>:,2 + -%   -% >:,+d :W} 6-F:,n " x "A$ A&`  6-6- A0 G?3Decimal Dump of file  :X} Page:G6-% CC3;BYTE # | 0| 1| 2| 3| 4| 5| 6| 7| 8| 9|Print Chrs MC3;--------+---+---+---+---+--:Y}-+---+---+---+---+---+----------M-& P:',$A( CC3;--------+---+---+---+---+---+---+---+---+---+---+--:Z}-------- A) c#67<,. | | | C67<,.| | | | | c67<,.| | |  M#:[}67<,. .6-P:',2 =67<,.I6-&+$,M 6 $67<,.-$"A) T 6-F:,6-:\}%!% ^   A)0h  )6-% r /6-+&,$67%<%,./67%<%,..   *!67%<%:]},.>:,   3   3 33 A'   6-F:,"  223Error  occured during this print run. A0:^}` ?3?3 End of File  reached at byte #  (decimal)  -%3     G 6. 6-P:',&6:_}7<,.=:,96-P:+&+$,,',G67<,.=:,& :67<,.=:,&6-P:&+$,&+$,,467<,.=:,:D $N * 6-F:,:`}-& ERROR #* X  -6-l - -6-6-!%6-&-6-% E-+$,%   -%:a}'  + / 5-E  EOF REACHED   6-  " A8  @ $ OCTAL DUMP OF FILE -->( 2-:b}:-@- ,   -$-,6.|> !")")")")"!6.H ' "")")")")"'6:c}.R  "6.\  "*"6.f  "6.p  "*"6.z & -   -&6.| !:d}")")")")"!6.  "6.  "6. ; -  -# BYTE #)-/ 05-; 1 ' -:e} 2- 3!-' 4 % - DISPLAY-% CHARS 1 - 5- 6!-' 71 ABp6 :f}-6-P:', "-& 26-&+$,6 87 - -6-!6-'!/6-&76-%V " A7`:g}& 6-F:,6-%!%& ABj  A7t )6-% ~/-%+$, 6..&!* /6.>:,+:h} -%   -% >:,+ 6-F:, " "A6 A7 6-6- AA0B:3:i}Octal dump of file  Page:B6-%<<34BYTE # | 0| 1| 2| 3| 4| 5| 6| 7|Print chrs[<:j}34---------+---+---+---+---+---+---+---+---+----------F-&[P:',$A9 <<<34---------+---+---+---+---+---+-:k}--+---+---+----------F AAPc#67<,. | | | C67<,. | | | | | c67<,. | :l} nM#67<,. .6-P:',2 =67<,.I6-&+$,M $67<,.-$"A@@ :m} 6-F:,6-%!%   A@P )6-% 56-+&,$$67@%<%,.567%<%,.. :n} *!67%<%,.>:,   3  3 33 A8@" 6-F:," ,113Error  occured during this :o}print run6 AA@?3?3 End of File  reached at byte #  (decimal)T -%3  h rU 6.:p} 6-P:',&67<,.=:,96-P:+&+$,,',G67<,.=:,U67<,.=:,,6-P:&+$,&+$,,&67<,.=:,,:q}$* 6-F:,-& ERROR #*  -6-- -6-6-!%6-&-6-%E-+$,%:r}   -%'  + / 5-E  EOF REACHED  6- " AI&A % BINARY DUMP OF FILE -:s}->) 3-;-A-b,   -$-,6.|-%")")")")")")")"-6.3:t} "+")")")")")")")"36. "6. "*"6. "6. "*"6.:u}& -   -&6.| -%")")")")")")")"-6. "6.  "6.*; -:v}  -# BYTE #)-/ 05-; 1H ASR6 -6-P:', "-& 26-&+$,6 z! -:w} -6-!6- " AG& 6-F:,6-%!%& AT  AH )6-% /:x}-%+$, 6..&!* /6.>:,+ -%   -% >:,+ 6-F:, " "AF:y}$ AHp. 6-6- AR BG?3Binary Dump of file  Page:G6-%VAA39 BY:z}TE # | 00 | 01 | 10 | 11 |Chrs`KA39----------------+--------+--------+--------+--------+----K-&:{}tP:',$AP~AA39----------------+--------+--------+--------+--------+---- ARc#67<,. :|} | C67<,. | | c67<,. | | M#67<,. .6-P:',2:}} =67<,.I6-&+$,M $67<,.-$"AQ0 6-F:,6-%!%   AQ@  ):~}6-% /6-+&,$67%<%,./67%<%,..2  *!67%<%,.>:,<   3P  3 33 AI0:}d 6-F:," n113Error  occured during this print runx AR`;;3 End of File  reached at byt:}e #  (decimal) -%3   36. 6-P:',+67<,.=:,36-$,6-P:+&,', 67:}<,.=:,,6-%+$,,6-P:+&,', 67<,.=:,,6-%+$,,6-P:+&,', 67<,.=:,,6-%+$,,6-P:+&,':}, 67<,.=:,,6-%+$,,6-P:+&,', 67<,.=:,,6-%+$,I6-P:+&,', 67<,.=:,,6-%+$,;6-P:+&:},',I67<,.=:, $* 6-F:,-& ERROR #*  -6-,N -6-6-:}#-+$,%1  ?-@7%F  J N ^ -  EOF REACHEDh r= --  $-*-:}1 5 =-9 -  -"-) - 9-@#.. %PRESS START TO CONTINUE;OPTION TO END:}&$0. -)"AV.:8' HIT RETURN TO CONTINUE +04 8 D -:} N3' HIT RETURN TO CONTINUE +/ 3 X+0v$ D:DUMPER.BAS8rGHuAUTOTYPXYFILENAMECCCBYTELNINCLNULENPDIPSPECXPCHRBA>}@@ >}@(#))ԠҠŠϠӛ2#6-B6-A<#;;@,;@,'6->}36-@;6-%F#T +-@(( +(T($ ҠP#R(*( Please e>}nter information belowR(# For default values (..) hit Z#2(( USR code FILENAME #24APd#f 6. >}Ap,7@<@,4Df+7@<@,4:)7@<@,4:,An#,67@<@,.D:,67@>},.x#( A$@( #:+AU)AU,0( ԠĠ: A#  6- >}6-&%#:6-A A 6(First Line Number(100) :#@6-@ A0<(Incremental line number (10) >}@# B#  #ڭئ٬#$ ))!6-%AV$$$T$(ϠŠĠ>}^$+($(Hit to RUN again (+%'Š'TYPE LINES IN PROGRAM$'!6-B6-B!6-.>}' 6--" 8' )6-%CODE BYTEL': (,!F:@,"@6F:@,!@0: V'   >}`'+A$t'!!ͭ堣~'0(>:A%,(!( DATA 06-F:@,'(-@( CO>}NT%-@($'ԭ'(>:A&,'$(>:A&,-6-$6-%'"AB@&"Ϡ>}'$AB@$РϠ($ D:AUTODATA>:A&,-6-$6-%'"AB@&"Ϡ<<GHewAUTOTYPXYFILENAMECCCBYTELNINCLNULENPDIPSPECXPCHRBAB}@@ B}@(# ԠҠŠϠǛ2#6-B6-A<#;;@,;@,'6-36-@B};6-%F#M +-@(( +(M( ҠP#R(*( Please enter informationB} belowR(# For default values (..) hit Z#2(( USR code FILENAME #24APd#f 6. Ap,7@B}<@,4Df+7@<@,4:)7@<@,4:,An#,67@<@,.D:,67@,.x#( AB}$@( #:+AU)AU,0( ԠĠ: A#  6- 6-&%#:6-B}A A 6(First Line Number(100) :#@6-@ A0<(Incremental line number (10) @# BB}#  #ڭئ٬#$ ))!6-%AV$$$T$(ϠŠĠ^$+($(Hit B} to RUN again (+%'Š'TYPE LINES IN PROGRAM$'!6-B6-B!6-.' 6--B}" 8' )6-%CODE BYTEL': (,!F:@,"@6F:@,!@0: V'   `'+AB}$t'!!ͭ堣~'0(>:A%,(!( DATA 06-F:@,'(-@( CONT%-@(B}$'ԭ'(>:A&,'$(>:A&,-6-$6-%'"AB@&"Ϡ'$AB@B}$РϠ($ D:AUTOTYPE>:A&,-6-$6-%'"AB@&"Ϡ'$AB@@,/btH?%@, (},(THE FOLLOWING PROGRAM CONVERTSG(DECIMAL TO HEF}X NUMBERS!(D(ENTER A '0' TO END THE PROGRAMG( ;@,6.0123456789ABCDEF"(6-A@F}2-@@<6-P:',F5(7%@<%@,'6-&$56-'@P   (Z @  F}D:DECTOHEX-@@<6-P:',F5(7%@<%@,'6-&$56-'@P   (Z @  D  AH, (},(THE FOLLOWING PROGRAM CONVERTSJ}J!(DECIMAL TO BINARY NUMBERS$(G(ENTER A '0' TO END THE PROGRAMJ( ;@, 6.01"#-J}!AU#(NUMBER TO LARGE- @0(6-A(2-@@<6-P:',F5(7%@<%@,'6J}-&$56-'@P   (Z @  D:DECTOBIN-@@<6-P:',F5(7%@<%@,'6H?'M_HN @, (},(THE FOLLOWING PROGRAM CONVERTSD(HEX TO DECIMAL NUMBERN}S!(D(ENTER A '0' TO END THE PROGRAM( ;@#,;@ ,!!6. !!!!!!! 40(N}-@B:,2''6-$@%@:7@:7,,&@G,,< F(P6- @0 D:HEXTODEC40(LsQRe z BABUECSTARSIZLINSCRSECTOAMMBUFFEOPCOUNBUFHBUFLSECHSECLRESULR} R} F;@ ,;@,46-+I:,&A,F;,;A ,?67,. '67@<@R},. ?67@,.7@,oAdA'Ae@29Af@KAf@]AgA(oR}Ah@2$$(THIS PROGRAM TRANSFERS FORTH<''(INTO TEXT FILES, AND VISA-VERSAF%%(USE TEXT FILES TO EDIT FORTR}H!K(NAME OF TEXT FILEP""(WHAT IS THE FORMAT OF YOURZ''(FORTH,1-1K SCREEN 64 CHAR. LINE_=#(2-1/2K SCREER}N 32 CHAR. LINE'=01*02@d( START SCREENn;6-@6-@d#42/6-@;6-@2R}x+'(1-FORTH TO DOS, 2-DOS TO FORTH+41A42A A FORTH TO TEXT FILE11(R})INSERT DISK IN DRIVE # 1, TO READ SCREENS1( # OF SCREENS1$$A(!A$6-@%$6-$$6-C:R},'6-@-@' A@6-%@6-%A( K(CREATING TEXT FILE -G($INSERT DISKR} TO WRITE TO, HIT RETURN K"+@+@@,-@+$$A(,'66.7$&+&@R},<$,@ 6-B:,J,7<,4 "6-&@, A0T)(@7@<,) APY(@^ R}@TEXT TO FORTH-)(!INSERT TEXT-FILE DISK, HIT RETURN- @@6-R} A@!@ 6-B:,6-$%@("66-%@@ A@&6 67<%&@,.R},6-%@6 A@0. 6-.7%@<%@,4 A:,7<,0 "6-&@, ApD'"R}6-'CANT FIND BLANKNL#67<%&@,.7@<,46.7%@,B6-%@L AEX6@6-'R}@%P:,66-P:,%@bN(INSERT DISK IN DRIVE #1:( TO WRITE  SCREENSJ( HIT RETURNNl$ 6-$6R}-C:,$6-@%$v'6-@-@' A@6-%@6-%A( 6-P:'AV,R}6-&$AVArAs!Ai@!Ap6-P:'AV,6-&$AVAR}xAy6-?:Ad,$ D:EDIT4TH.BAS!Ap6-P:'AV,6-&$AVAPA