@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@W!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H  }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED697 FREE SECTORS COPYING---D8:COPY32.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 144ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uM) !"`3!3:AU,LAU4^$]}AU5A6P 6-C:,6-P:'AV,)AS?AR&AV$P6-?:C:hL,, D:INTRO.SYS DISK$^} #154 'S?AR&AV$P6"nN"nN4446-C:,6-P:'A$_}V,)AS?AR&AV$P6-?:C:hL,,6-?:C:hL,,E 1BH6-C:,6-P:'A$kP6-?:C:hL,,6-?:C:hL,,E 1BHI-C:,6-P:'A(DaUةD%FFExpXE@ABCDAD D/0˭1̠ Șe˅ͩe̅ b} !E2E D@"/ BE E E I gF ?K}F}F}F}#GɯLL &FLL??? 00 ` c}` gFBDEEDK)I J V0LDS:ȩFͩ`H ԍЩʍh@X˥Y̠({;e˅˥i̢{ȑ0 d}i˥iLcEȑ%FRR>ɛ KUT` F` gFBޝDEEJK V0 EQ Q gF`D1:TITLE.SYS e}FHHD gFBhDhEDJK VLR`D1:*.*1FH6HDLEK: BdDFE VLR` FHdHDLEP: B f}LVBD>E*HI V` BD>E*HI V`).$%83/,54)/.|&),%3/.$)3+by#hris4homson| g}# |0ressfor(%,0#/-054%23/,54)/.3|<=,/!$25.).$%83/,54)/. h}).3%24$)3+ 02%334/#/.4).5%!.9/4(%2+%94/2%452.4/ i}).$%8).$%83/,54)/.02%33!.9+%94/2%452.4/).$%8 j}).$%83/,54)/. k}%.4%2.%7.!-%).$%83/,54)/. l}02%334/%2!3%&),%!.9/4(%2+%94/2%452.4/).$%8JJ m}oFɈ/LR>0&J IJ J iJ0JJJLI`GJHJF FLRGJHJLJ $K> n}Ƚ>ɛ LVJ` J0>LnJJJLiJ`J  LJъ Fȥ FJJJJJJJJ)J`J $KJ o}ψ` NO FILES BAS BXLXL DEMLSTSRCM65MACDOCOBJEXECOMCMDЭJ &iaϩUeЅ`JJ $K K p} K KJJJ)J J $K K K`) KLbK>ʩ > KJJ)`ϝ>ɛ >LK.>LK> q}`>ɛ >LK>ɛ@i@8 >`UJ)T` FLR`sHHL!E FMLlMLRLL r}JJ ?K LLLLLLOx)LM)LL)LL) LRL$LJJJJ J GK LLLJe` s}JJЭJJLL L $K K K KJJJ) $K K KLLJ JLL L $K K K KJ)JLLJ JJLLJʎ t}JLL@BkDMEHI V`kMC!LLDʩD D` gF`Dl ELNFL:NHLOLL?PPLXP u}RL}PSLQTLLQULQ*LR15F EF%FLDLL FMkMY`+ȩI M!D $K ;R (P LR !ELLLD v}KȩG MDF>ɛ (PLR/04)/.nextpage3%,%#4choosefile34!2 w}4runOloadfile(%,0thisdisplay defaultdrive#gotocartridge$gotodos%erasefile&format x}disk(thisdisplay,loadnewdisk0printdirectory2renamefile3switchrunOload4titledisk y}5unlockfile lockfile0˭1̠dȩNˠȩG MXȥY !ELLPDB z}D>E V`KȩG M !ELLLD 9F TF E oF0 FLR gF &FLL͍ȩH͍ $K ;R>ɛ>L {}P,>Ѣ oFLR>ɛ5Ѡ>>ɛLP>>H( D (P LR !ELLLDQI)Q8QF LL |}BQF LL,/!$25.,/!$/.,9ȩH͈ј'XX FMkMɛ0~( [iXȄ(LcQ(XƈLcQ( }}XD Q Q QE &F !ELLLDEHHLEXDYE(HIQB V`$D $K ;R (PLR K KLL#D $K ; ~}R (PLR* K KLLD>%F>:> > .> >LiR>`ԩ آR>0 }>LR)>詛>UT` F0 L DLDERROR #DRIVE #1JL2SD/@ D` gF"/ $K ;R#ѮJ LU "}$%m - FLINCDONDATCHARCKSUCLINCKSUdt}2 +-@@2(XL-DOS CREATORiM(M(BREPLACE YOUR SOURCE DISK WITH A WORK DISK AND THEN PRESS [START].t}j F:B2y,@An((((NOW CHECKING YOUR DATA LINES:x;A,6-6--@t}@" 6-%("AV'6-@( A67B:,%@,.>:, )")6-F:A,%At}V$F:A, 6-%A(LINE # IS OK!(A0))(!DATA ALL OK - CREATING PATCH FIt}LE2 A2@@D:PATCH: B!-@A6*@@:7<,,: (@t}%(PATCH FILE CREATED(!(ERROR IN DATA LINE #!"G#(ERROR IN OPENING PATCH FILED(DISK MAY BE WRITE PROTECTEDt}.G''255,255,122,21,124,21,76,192,2066##23,70,23,137,23,32,85,24,1427''169,0,133,212,133,214,169,29,2079))13t}3,215,169,192,133,213,162,16,2263((32,119,24,169,216,133,213,162,2108""7,32,119,24,32,70,24,96,1454$((169,0,133,21t}2,169,224,133,213,2313.$$160,0,162,3,177,212,72,32,18888%%85,24,104,145,212,32,70,24,1776B))200,208,241,230,213,202,t}16,236,2636L%%96,182,23,251,23,240,73,32,2020V$$70,23,206,158,23,48,65,32,1735`''170,25,32,105,23,169,255,141,2040jt}''158,21,141,157,21,162,16,169,1975t$$47,157,68,3,169,24,157,69,1834~##3,32,164,21,32,85,24,162,1673''21,169,0,13t}3,212,133,214,169,2211((31,133,215,169,228,133,213,32,2324$$119,24,32,70,24,169,0,141,1759##157,21,96,19,24,39,24t},32,1602&&85,24,169,0,133,214,133,212,2170))169,228,133,215,169,31,133,213,2501%%162,21,208,18,58,24,135,24,1870t}%%32,119,24,32,70,24,206,157,1894$$21,76,117,32,32,102,24,88,1732((169,112,141,14,212,165,16,141,2220%%14,210,t}96,120,169,0,141,14,2024&&212,141,14,210,173,1,211,41,2273$$254,76,107,24,173,1,211,9,2135 %%1,141,1,211,96,234,23v}l}MEMTOBUFX3OX2ZYATXUVHSILMQPRFEGMTTTTIDIJJSEDUMMIIDSTSEENDSEDUCNSTAR(}ISTSHERHC (}(} !"#$%&'()*+,(}-./012ss;@,;@,;@,;@,;@,;@,;@(},;@,;@,;@,(<<;@,;@,;@,;@,;@,2_G;@H,;@$(},;@,;@$,;@,;@$,S6-A6_6-BV<7 #A !-@5%"3A6%7 (}F6.0123456789ABCDEFP::6.0PHPCLCPLPSECPHACLIPLASEIDEYTYATAYCLVINYCLDINXSEDZ""6.ORAANDEORADCSTALDACMPSBCd""6.(}ASLROLLSRRORSTXLDXDECINCn 6. 6. 6. x""6.BPLBMIBVCBVSBCCBCSBNEBEQ,6.TXATXSTAXTSXDEX,6. BR(}KJSRRTIRTS! AP A`! Ap6-P:'AV, A# 6.6-&AV$# A67@,.(}$6-%@ 6-F:,+6-P:'@,6-+6.7%@,K67@,."6-&@$36.7%@(},96-H67@,.K$U6-@6-B:,$6-2-@E6.7%@&,U2AAP6-@:,&(}@U A` 6-A:," 6-%$6-@$ "$"( ( (( PRINTER(Y/N)".(TO START HIT (} #.6.4C00((((MAXIMUM NUMBER OF SECTORS=300"!(SECTOR NUMBER START:!'!(SECTOR NUMBER END :!((}AR@)S --@@4(READING SECTOR :A6-?:<<,O6-%A(S ,* 6-B:,*!@(}) @A6 A0@,#6-%+++&,%@,$A(,),E A`J AT7 6.6.6.(}6.!6-'6-70AA^+-@@ 6-F:,+67,.?h!! @2)!A"Ar67,.>:,|(}6-%@  APD06-&@$P:+&@,'@,&@D"A"@Ap!!(}"@ *"@A006-&@$P:+&@,'@,&@6-@$P:'@,Ap(}!!"@*"@ A.$6.7@$'@%@,. AP006-&@$P:+%@,'@,%@(}!A A"A !!"@)"@A"@Ap(}"@A A@&*6-P:'@,*&Ap0//%@A A AA ://(}%@A PAPA AD$$6.7@$'@%@,N&A0X"@A`(}b"@A l"@A v!!"@ )"@A"@AP"@A(} 6.A A@"@A 6.NOP A@67@,.#$ A"67@,.6." (}A@ 6.CPY 6.$ A"67@,.6." A@ 6.CPY Ap67@,.,X (}A@ 6.$ A 67@,.6.$"@A   Ap*67@,.,Y A@4(} A@> APH 6.$ AR 6. A\'67@,.6.'67@,.f6-%@$p(} A@z67@,.,X AP A@67@,.,Y AP 6.( A67@,.(}$6./67@,.%67@,.,X)/ A@ 6.( A67@,.$6./67@,.%67(}@,.),Y/ A@&"AP8$6.7@$'@%@,26-%@86-& 6-F:,!A'(}&6-&AV%6-%%@ A`%6.$*67@,. 6-&@* A` 6- A 6.(} A@!@A$8$6.7@$'@%@,8"@A . A@877'@&@(}AA@AAPB&A`LWW'@%@AAA0A0AA@(}AAPV! 6.BIT!"@A ` A j"@At! 6.JMP!"@A ~ (}6.($ A 6. A' 6.67@,.'67@,.,6-%@"67@,.), AP!!(}"@ *"@A 6.STY"@A "@A  AP 6.LDY6-%@(}&"A"@AP"@A"@A "@A  (}A  6.CPY("A2"@A < A F 6.CPX A PWW'@%@(}AAAAAA@AAZ&6.7@$%@,& A@d 6.LDX AP(}n!@A x&A A!@A6.7@$&@#,6-%@(}4YA4AA((: ( A 4AA(3: (}( Ap3: (:  A 104,169,1,141,1,3,104,1415,3,104,141,4,3,169,82141,2,3(},104,141,11,3,104141,10,3,32,83,228,96,010,3,96,0,0,0,0,0"0,0,0,0,0,0,0,0AAA`++6(}-A7@uA+6-F:,$AV%AV$p: +@-@@:(@ (}--@@-(@ SECTOR /-@@ /(@ DISASSEMBLER-@Au $'(} D:DISKDIS@ SECTOR /-@@ /(@ DISASSEMBLER-@Au $'( ********************** *ATARI SYSTEM MONITOR* ********************** written by Tom Walters ,} This is a 6502 monitor program for all Atari 8 bit computers. This program is much superior to the program found on t,}he ATARI Assembler/Editor cartridge. It is a good program for beginning machine language programmers to have as it i,}s easy to use. THE PROGRAM COMMANDS -------------------- General commands: R = display regs. ,} p = send display to printer. Q = exit and return to DOS. These commands are usually followed by,} a memory address. T = trace through program S = single step. L = list 20 instructions. ,} G = execute program. These are used for hex arithmetic. - = subtract. + = add. ,} In addition, these commands are used in conjunction with others. . < : Mem,}ory moves are done using the M command. M = move Format for memory move: (destination)< (start,}).(end)M Hex dumps are listed like this: (start).(end) Memory is altered like this: (st,}arting point):( ) ( ) ( ) The blanks are 2 diget hex numbers; up to 128 chars. This program uses the s,}ingle command line structure. In other words you can have up to 128 command CHARACTERS on 1 line. These are all leg,}al commands: 600PLLLLLLLLLLLL 2000LR 600: 20 20 60 D0 13 I hope this program is of use to y,}ou. t.w. 600PLLLLLLLLLLLL 2000LR 600: 20 20 60 D0 13 I hope this program is of use to y,3{47L7JJJJ)` k6 T4J jɢ )Jn4 34)) JJJ Ȉ` 3H 6 V4ăȐh0}4 5&*i? 6 T44 64 6`0 6豇 b4Ș 6L6 6`8e` T0 0}"T3 |4w5 T3  T; "D3 D"D3 D"D3 "D3 &1!YMJ,),#($YX$$#]#)i#$S#$S0}[[i$$)|mi)S4i#bZH&bTDThDt(ntJrtttrDh2"&&rr&HDD 3hh6B 0}Y`EL\lYx5s6@5)I 7LhH 0L7( 7hh 3 5L7hhh b4 `4HHHH0} b6 6*5 6= 6 60` b48 78L6L 6AXYPS摥Ō``BD8E`HI 0}V䩛L6 b6 L4t6o7-L6 ) g6 6 6 06`JJJIeH= 6hHJJJJ 6h) 0:i77 BD0}7EHI V BD7EHI V䤆7`ƅLx6 7`:L6`8`` *6` k0}7H 3 _4h8`p7k8` k7 7lL5ƅ k7LO5 7hhcl H(`h`BD7EJK V0}7` b6 V7`PЎ ح7 7 b6] 6 D6 _8 ?80d8 V8L 8 &&8I00} i`7Hs8H`즤l884~55I=Su5530d8 V8L 8 &&8I00@ ORG $3380 ***DISASSEMBLER MODULE***L3380 LDA #$00 STA L3713 JMP L37F4L33884} BCC L338E LSR A LSR A LSR A LSR AL338E AND #$0F RTSL334}91 LDX $87 LDY $88 JSR L366B JSR L3454 LDA ($87,X) TAY 4}LSR A BCC L33AA ROR A BCS L33B4 CMP #$A2 BEQ L33B4 AN4}D #$87L33AA LSR A TAX LDA L346E,X JSR L3388 BNE L33B8L33B4 LDY 4}#$80 LDA #$00L33B8 TAX LDA L34B2,X STA $82 AND #$03 STA $83 4} TYA AND #$8F TAX TYA LDY #$03 CPX #$8A BEQ L33D8L33CD 4} LSR A BCC L33D8 LSR AL33D1 LSR A ORA #$20 DEY BNE L33D14} INYL33D8 DEY BNE L33CD RTSL33DC JSR L3391 PHAL33E0 LDA ($87),Y J4}SR L36AF LDX #$01L33E7 JSR L3456 CPY $83 INY BCC L33E0 LDX 4} #$03 CPY #$04 BCC L33E7 PLA TAY LDA L34CC,Y STA $80 4}LDA L350C,Y STA $81L3401 LDA #$00 LDY #$05L3405 ASL $81 ROL $80 4} ROL A DEY BNE L3405 ADC #$3F JSR L36C2 DEX BNE L3401 4} JSR L3454 LDY $83 LDX #$06L341C CPX #$03 BEQ L343CL3420 ASL $82 4} BCC L3432 LDA L34BF,X JSR L36C2 LDA L34C5,X BEQ L3432 JSR 4} L36C2L3432 DEX BNE L341C RTSL3436 DEY BMI L3420 JSR L36AFL343C LDA 4} $82 CMP #$E8 LDA ($87),Y BCC L3436 JSR L3462 TAX INX 4} BNE L344C INYL344C TYA JSR L36AF TXA JMP L36AFL3454 LDX #$03L3456 4}LDA #$20 JSR L36C2 DEX BNE L3456 RTSL345F SECL3460 LDA $83L3462 LDY 4} $88 TAX BPL L3468 DEYL3468 ADC $87 BCC L346D INYL346D RTSL344}6E DB $4,$20,$54 DB $30,$D DB $80,$4,$90 DB $3,$22 DB $54,$33,$D 4} DB $80,$4 DB $90,$4,$20 DB $54,$33 DB $D,$80,$4 DB $90,$4 4} DB $20,$54,$3B DB $D,$80 DB $4,$90,$0 DB $22,$44 DB $33,$D,$C84} DB $44,$0 DB $11,$22,$44 DB $33,$D DB $C8,$44,$A9 DB $1,$224} DB $44,$33,$D DB $80,$4 DB $90,$1,$22 DB $44,$33 DB $D,$80,$4}4 DB $90 DB $26,$31,$87 DB $9AL34B2 DB $00 DB $21 DB 4} $81 DB $82 DB $00 DB $00 DB $59 DB $4D DB $914} DB $92 DB $86 DB $4A DB $85 DB $9DL34C0 DB ',),#($4}'L34C6 DB 'Y',0,'X$$',0L34CC DB $1C,$8A,$1C DB $23,$5D,$8B DB $1B,$A1,$9D 4}DB $8A,$1D,$23 DB $9D,$8B,$1D DB $A1,$0,$29 DB $19,$AE,$69 DB $A8,$14}9,$23 DB $24,$53,$1B DB $23,$24,$53 DB $19,$A1 DB $0,$1A,$5B DB 4} $5B,$A5,$69 DB $24,$24 DB $AE,$AE,$A8 DB $AD,$29,$0 DB $7C,$0 4} DB $15,$9C,$6D DB $9C,$A5,$69 DB $29,$53 DB $84,$13,$34 DB $11,$A5,4}$69 DB $23,$A0L350C DB $D8,$62,$5A DB $48,$26,$62 DB $94,$88,$54 DB 4} $44,$C8,$54 DB $68,$44,$E8 DB $94,$0,$B4 DB $8,$84,$74 DB $B4,$28,$6E4} DB $74,$F4,$CC DB $4A,$72,$F2 DB $A4,$8A DB $0,$AA,$A2 DB $4}A2,$74,$74 DB $74,$72 DB $44,$68,$B2 DB $32,$B2,$0 DB $22,$0 DB 4} $1A,$1A,$26 DB $26,$72,$72 DB $88,$C8 DB $C4,$CA,$26 DB $48,$44,$44 4} DB $A2,$C8 DB $FF,$FF,$FF ***TRACER MODULE***L354F JSR L33DC PLA STA 4} $80 PLA STA $81 LDX #$08L355A LDA L361C,X STA $8A,X DEX 5}BNE L355A LDA ($87,X) BEQ L35A8 LDY $83 CMP #$20 BEQ L35C5 5} CMP #$60 BEQ L35B5 CMP #$4C BEQ L35D0 CMP #$6C BEQ L35D5}1 CMP #$40 BEQ L35B1 AND #$1F EOR #$14 CMP #$04 BEQ L5}3586L3584 LDA ($87),YL3586 STA $8A,Y DEY BPL L3584 JSR L3794 JMP $85}A STA $94 PLA PHA ASL A ASL A ASL A BMI L359E 5} JMP L37F4L359E PLP JSR L37A1 PLA STA $87 PLA STA $88L35A8 5}JSR L3391 JSR L35E6 JMP L37F4L35B1 CLC PLA STA $97L35B5 PLA STA5} $87 PLAL35B9 STA $88L35BB LDA $83 JSR L3462 STY $88 CLC BC5}C L35D9L35C5 CLC JSR L3460 TAX TYA PHA TXA PHA LDY #$05 }2L35D0 CLCL35D1 LDA ($87),Y TAX DEY LDA ($87),Y STX $88L35D9 STA $875 } BCS L35D0 LDA $81 PHA LDA $80 PHAL35E3 JSR L3662L35E6 LDA 5 }#$94 STA $8E LDA #$00 STA $8F LDX #$FBL35F0 LDA #$20 JSR L5 }36C2 LDA L352A,X JSR L36C2 LDA #$3D JSR L36C2 LDA $99,X J5 }SR L36AF INX BMI L35F0 RTSL3609 CLC LDY #$01 LDA ($87),Y J5}SR L3462 STA $87 TYA SEC BCS L35B9L3617 JSR L379F SEC BCS 5} L35BB NOP NOP JMP L3617 JMP L3609L3625 DB 'AXYPS'L362A INC $90 5} BNE L3630 INC $91L3630 LDA $8A CMP $8C LDA $8B SBC $8D 5} INC $8A BNE L363E INC $8BL363E RTS LDA #$00 STA $97 RTS 5}***INPUT MODULE***L3644 LDX #$00 LDA #$05 STA ICCOM,X LDA #$82 STA IC5}BAL,X LDA #$38 STA ICBAH,X LDA #$60 STA ICBLL,X LDA #$00 5}STA ICBLH,X JSR LE456L3662 LDA #$9B JMP L36C2 ***HEX OUT MODULE***L3667 LDY $85}B LDX $8AL366B JSR L3662 JSR L344C LDY #$00 LDA #$2D JMP L5}36C2L3678 LDA $8A ORA #$07 STA $8C LDA $8B STA $8DL3682 LDA $8A5} AND #$07 BNE L368BL3688 JSR L3667L368B LDA #$20 JSR L36C2 LDA 5}($8A),Y JSR L36AF JSR L3630 BCC L3682 RTSL369B LSR A BCC L36885} LSR A LSR A LDA $8C BCC L36A6 EOR #$FFL36A6 ADC $8A 5} PHA LDA #$3D JSR L36C2 PLAL36AF PHA LSR A LSR A LSR 5} A LSR A JSR L36BA PLA AND #$0FL36BA ORA #$30 CMP #$3A 5} BCC L36C2 ADC #$06 This module falls into the next one. ***OUTPUT MODULE***L36C2 5} STY $86 STX $89 STA L3712 LDA L3713 BEQ L36EC LDX #$10 5} LDA #$0B STA ICCOM,X LDA #$12 STA ICBAL,X LDA #$37 STA ICB5}AH,X LDA #$01 STA ICBLL,X LDA #$00 STA ICBLH,X JSR LE456L36EC 5 }LDX #$ LDA #$0B STA ICCOM,X LDA #$12 STA ICBAL,X LDA #$37 5!} STA ICBAH,X LDA #$01 STA ICBLL,X LDA #$00 STA ICBLH,X JSR 5"} LE456 LDY $86 LDX $89 LDA L3712 RTSL3712 DB 1L3713 DB 1 5#} ***SUBROUTINE MODULE*** This module must all be on the same page!L3714 DEC $85 BNE L371F 5$} JMP L3678 JSR L37AE RTSL371F DEX BNE L373B CMP #$3A BEQ L5%}3729 JMP L369BL3729 STA $84 LDA $8C STA ($8E),Y INC $8E BNE 5&} L3735 INC $8FL3735 RTS LDY $85 LDA L3881,YL373B STA $84 RTS L5'}DX #$01L3740 LDA $8C,X STA $90,X STA $92,X DEX BPL L3740 RTSL5(}374A LDA ($8A),Y STA ($90),Y JSR L362A BCC L374A RTS JSR L376B5)} LDA #$14L3759 PHA JSR L33DC JSR L345F STA $87 STY $88 5*}PLA SEC SBC #$01 BNE L3759 RTSL376B TXA BEQ L3775L376E LDA $8A,5+}X STA $87,X DEX BPL L376EL3775 RTS JSR L376B JSR L3794 JMP5,} ($87)L377F JMP L35E3 DEC $85 JSR L376B JMP L354F JSR L3714 5-} PLA PLA BNE L37F4 JMP (DOSVEC)L3794 LDA $97 PHA LDA $94 5.}LDX $95 LDY $96 PLP RTSL379F STA $94L37A1 STX $95 STY $96 P5/}HP PLA STA $97 TSX STX $98 CLD RTS ***PRINTER CONTROL MODULE***50}L37AE LDX #$10 LDA #$03 STA ICCOM,X LDA #$E2 STA ICBAL,X LDA 51} #$37 STA ICBAH,X LDA #$08 STA ICAX1,X LDA #$00 STA L034B,X 52} JSR LE456 LDX #$01 STX L3713 RTSL37D2 JSR L3662 LDX #$10 L53}DA #$0C JSR LE456 LDX #$00 STX L3713 RTSL37E2 DB 'P',$9B ***COMM54}AND MODULE***L37E4 LDY #$15L37E6 LDX #$7FL37E8 STX LD01F STX LD40A DEX BPL 55} L37E8 DEY BPL L37E6L37F4 CLD LDA L3713L37F8 BEQ L37FD JSR L37D2L3756}FD JSR L3662 LDA #$5D JSR L36C2 JSR L3644 JSR L385FL380B JSR L3857}3F STY $85 LDY #$0FL3812 DEY BMI L37E4 CMP L3864,Y BNE L3812 58} JSR L3856 LDY $85 JMP L380BL3822 LDX #$03 ASL A ASL A 59} ASL A ASL AL3828 ASL A ROL $8C ROL $8D DEX BPL L3828L35:}830 LDA $84 BNE L383A LDA $8D,X STA $8B,X STA $8F,XL383A INX 5;} BEQ L3830 BNE L3845L383F LDX #$00 STX $8C STX $8DL3845 LDA L3882,Y 5<} INY EOR #$30 CMP #$0A BCC L3822 ADC #$88 CMP #$FA BC5=}S L3822 RTSL3856 LDA #$37 PHA LDA L3873,Y PHA LDA $84L385F LDY 5>} #$00 STY $84 RTSL3864 DB $EB,$E9,$EA,$ED,$EC DB $A6,$A4,$06,$95,$05 DB 5?} $00,$93,$A7,$34,$99L3873 DB LOW L377F-1 DB LOW L371B-1 DB LOW L3791-1 DB 5@} LOW L3782-1 DB LOW L3783-1 DB LOW L3735-1 DB LOW L3735-1 DB LOW L3749-15A} DB LOW L373D-1 DB LOW L3753-1 DB LOW L3775-1 DB LOW L3735-1 DB 5B} LOW L3735-1 DB LOW L3789-1 DB LOW L371E-1L3882 DS $80DB LOW L3735-1 DB 4\ RAM-EDIT [130XE] ---------------- RAMEDIT is a BASIC "creator" program, that when run, will create9D} a binary RAMEDIT program IMPORTANT ========= BEFORE RUNNING THE PROGRAM "RAMEDIT.BAS", REMOVE9E} THE SOURCE DISK FROM YOUR DISK DRIVE AND INSERT A BLANK DISK! WHEN YOU RUN "RAMEDIT.BAS" THE PROGRAM WILL FORMAT TH9F}E BLANK DISK AND WRITE THE RAM-EDIT FILE ONTO IT. THE CREATED DISK WILL AUTOBOOT ON POWERUP. RAM-EDIT 9G} -------- This program is for use with the 130XE or 800XL with upgraded memory. It is a Copier/Sector Edit9H}or that will read an entire single density disk into the RAMDISK. When using the disk Editor, each sector is then read9I} instantly into the Editor instead of having to be read from Disk. This utlitiy program is excellent for cracking pr9J}otected program files and/or reviewing disks. SECTOR EDITOR COMMANDS ---------------------- If you sele9K}ct the Sector Editor option from the Menu, experiment with the following commands: [-] or [+] - advance sec display 9L} [M] - disk map [V] - VTOC map [D] - directory [H] - convert [S] - search [E] - edit [W] - write to disk dr9M}ive [X] - exit (YES or NO) WARNING: ALWAYS MAKE A BACKUP !!!!!!! COPY OF YOUR SOURCE DISK !!!!!!! USING THE COPY9N} OPTION; !!!!!!! THEN EDIT YOUR BACKUP !!!!!!! COPY. DON'T TAKE CHANCES !!!!!!! WITH YOUR VALUABLE !!!!!!! SOURCE9O} DISKS!! !!!!!!! THEN EDIT YOUR BACKUP !!!!!!! COPY. DON'T TAKE CHANCES !!!!!!! WITH YOUR VALUABLE !!!!!!! SOURCE8 DEf:,P U 6.67AV,.+67@,.?-@ADC"Q67<,.>:,U A6-@=Z}6-A %#A/ A`A( CHECKING DATA86-%@(LINE:!"8B:,@AF%6-F:A,%=[}AV$F:A,+C(LINE  MISSING!Fe-@@@36-@:7,,&@HO6-@:7%@,,&@H=\}e6-8,$@%8,="@67<,.>:,+6-%@/ 3"= A% 6-%!A %6-&A=]}  ""A A F:A,@A@A`WAi@'Ap=^}@39ArKAs@W6-?:C:,,"Ap@6-C:,,-@@:7@,,6t6-P:'=_}AV,$6-&$AV0Ar<AsHAxZAyf6-?:C:,,t6-%A(@ Ju 6-C:,=`}6-P:'AV,-6-&$AV9ArEAsWAxAiAy@u6-?:C:,,Tz6-%A("6-=a}P:'AV,26-&$AV>ArJAs\AxAnAy@z6-?:C:,,^(( COMPLETED!=b}hX&(INSERT A BLANK DISK IN DRIVE 1>(AND PRESS RETURN >K;@,X@rL(( SECOND PASS"6-@.6=c}-A 8#AB A`L A|(BAD DATA: LINE hh002D0007080718604C951BA9008D0B038588A9018D0A03858720A=d}C074C951BA210A90C9D42034C56E4A210A9039D42,635hh03A9F49D4403A9199D4503A9049D4A034C56E48D48038E44038C4503A90B8D4203A2004C56=e}E4A210A9079D4203A900,831hh9D48039D49034C56E4A9FF8D01D3A9C0856AA200202107A9039D4203A9F29D4403A9199D4503A90C9D4A034C56E4A9,=f}731hh008589858A8D0403A9408D0503A97E8583A91D858460A9098554A902855560A9008582A5803004A9FFD002A900A000,540hh9180A58B8593=g}A58C8594208C07A5958D0103A9528D0203A598F01C20A307A913A246A01A204207A90DA26CA01A2042,252hh07205507C99BD0F9A9028555A9038554A=q}bŠb٠bˠbB%DOS SYSB*)DUP SYSBSAUTORUN SYSB`TITLE SYSB%aMENU B TINTRO SYSB/DISASEMBBASBMONITOR DOCB MONITOR OBJBkMONITOR SRCB CRAMEDIT DOCBzPRAMEDIT BASB2SEARCH OBJB&HEADER BASB +HEXDUMP BASB 7BINDEC BASBCINSPECT BASBJRAMTOP BASB-NTAPEDUMPBASB{SORTOUT BASBRAMXEXL DOCB RAMXL DMOBRAMXL OBJB RAMXE DMOBRAMXE OBJBXLDOS BASBXLDOS DOC907A20CA01A204207C654C654A9028555A907A238A01A2042072042192053,491$hhE4AD04038585AD05038586C940D00FAD0403D00AA582D006AC0140=r}C884CCA000B185D018C810F9A5918593A5928594,130.hh204219A58B8593A58C8594D009203419A000A9019183EE0A03D003EE0B0320581990A9A599F=s}0034C9B09A9008582A5,9258hh803004A9FFD002A900A0009180A598F01C20A307A913A259A01A204207A90DA26CA01A204207205507C99BD0F9A5FE,9=t}57BhhF019A5968D0103A9008D0403A9058D0503A9218D02032053E430FEA58D8593A58E8594208C07A9018554A9028555A9,613Lhh07A2F8A019204=u}207E654E654A9028555A907A23FA01A204207204219A5968D0103A9508D0203A9808D03038D0803A9,772Vhh068D0603A5878D0A03A5888D0B03A5FEF0=v}09203419A000B183F00DA002B9351A918F8810F82059E4E687D002E68820,772`hh5819B0034CEF08A9088554A910A279A01A204207205507C959D03B4=w}8A2008E48038E4903A9098D4203682056E4A903,900jhh8554A9118555A903A21BA01A204207A002A910918D8810FBA9018598A9018587A90085884C73=x}08A915A201A0162042,372thh07205507C959F00160206707A90E8DC5028D17D0A9A28DC6028D18D0A99B850CA909850DA91E8DE702A9238DE80220,18=y}9~hh1F07202907A9008DF002A907A215A04F205CE4A9C08D0ED4A9AB8D3002A9198D3102A900859BA901859AA9148554A9,943hh0285558552A902=z}A204A01820420718A55869508593A55969008594A026B99A1691938810F8204315A91085B6A026B9,640hhC11691938810F8204315C6B6D0EFA026B9E={}81691938810F84CFC0BA9148554A9028555A916A206A018204207A9008D,915hhDC02A9FF8DFC02ADFC02C9FFD008ADDC02F0F44C710BA015D97C15F0=|}068810F84C3A0AC906D02818A59A6901859A90,802hh02E69BA59AC9D1F0034CFC0BA59BC902F0034CFC0BA901859AA900859B4CFC0BC90ED02438A59=}}AE901859AB002C69B,744hhA59AF0034CFC0BA59BF0034CFC0BA9D0859AA902859B4CFC0BC92AD02AA9FF8DFC02A915A21CA018204207205507C9,315=~}gg48D004A900F009C941F0034C3A0AA90185AB20CC0D4CFC0BC916D019A9FF8DFC02A91DA217A019204207205507C959,94hhF0034C3A0A60C925=}D014A90085CDA9B48DD219A9178DD31920B70F4CFE09C92ED006202E114C3A0AC939D006206A11,740hh4C3A0AC93ED00B203112B0034CFC0B4C9B09C=}93AD00620EF134CFE09C910D014A90185CDA9DC8DD219A9178DD31920,644hhB70F4CFE09C966D01AA9FF8DFC02EEF002A936A2E1A018204207205507=}CEF0024C3A0AA200A9058D4203A9D48D4403,771hhA9158D4503A9058D48038E49032056E4ADD415C99BD0034C3A0AC924D02620C10EA203AC480388D=}0034C3A0AB9D415,288hh9D9F15CA88D0F620660FA5B1859AA5B2859B4CE30B20E50E90034C3A0A38A59AE9D1A59BE90230034C3A0AA59BD007,808=}ggA59AD0034C3A0A20240FA002B99C1520CC0E9921168810F438A59AE901859CA59BE900859DA980859EA900859F85A0,26hh85A1A010069C269D26=}A026A138A5A0E59EAAA5A1E59F900686A085A1E69C88D0E3A59C8582A480300EC905F00E38E9,284 hh0130050A0A1869E3A0009180A00606A026A1881=}0F9A5A085A285A4A582A4803008C905D004A980D002A9401865A185,216hhA385A5A59A85BAA59B85BBA5BAC5CCB011A5BBD00DA00CB96616993F1688=}10F73041A5BAC968D013A5BBC901D00DA0,522hh0CB97316993F168810F73028A5BBC901D017A5BAC9699011C971B00DA00CB98016993F168810F7300=}BA00CB98D1699,563(hh3F168810F7A07DB1A24A4A859AA900859B20240FA001B99D1520CC0E992F168810F4A07FB1A2859AA900859B20240F,4912h=}hA002B99C1520CC0E9939168810F4A07EB1A2859A88B1A22903859B20240FA002B99C1520CC0E995C168810F4A5BA85,616<hh9AA5BB859B18A558697=}98593A55969008594A91085A7A90085A9A90085A8A5A920980FA90485A8A90085A6A4A6B1A2,403Fhh20980FE6A8E6A6A5A6C908D0EFA90085A6E6A8A4=}A6B1A220CC0EA4A89193E6A8E6A6A5A6C908D0EBC6A7F02218A5A2,559Phh690885A2A5A3690085A318A5A9690885A9A5AA690085AA204315A2004C580=}DADFC02C906F007C90EF0034C3A0A4C4B,305Zhh0AA93BA231A018204207A5ABD004A905D002A91E8555A9028554A902A204A018204207A9058D4203A9=}DA8D4403A915,579dhh8D4503A5ABD004A91AD002A9258D48032056E4ADDA15C912F04FC911F04BC91AF047C99BF043AD4803F03EA55438E9,285nhh=}040A0A0AAAA5803014A582C905D00E8A1865A085ACA5A1698085ADD00C8A1865A085ACA5A1694085ADA5ABF00EA007,672xhhB9F61591AC8810F820A4=}0E60A90385AEA90085AF20C10EA4AEB9DA158DA115E6AEC8B9DA158DA215E6AEE6AE20660F,736ffA5B1A4AF99A315E6AFA5AFC908D0D9A007B9A3159=}1AC8810F820A40E6038A59AE901AAA59BE900A8188A697E858398,1hh691D8584A000A902918360A003A930999F158810FA6006B30A66B34AC920B005=}1869409007C960B00338E92005B360,699hhA59A85BAA59B85BBA000849A849BB9D415C9309019C93AB015290FA211D005900269094A669B669ACAD0F=}4C8D0E0C9,784hh9BD003189009A5BA859AA5BB859B3860A59A85B4A59B85B5A90085A6A007A23038A5B4F991154888A5B5F993159009,808hh85=}B56885B4E8C8D0E8688A84B6A4A6999A15E6A6A4B68810D6A5B40930A4A6999A1560A20086B186B286B7A4B7B99F,682hh15E6B7C930901EC93A900AC=}9419016C947B012E9360A0A0A0AA2040A26B126B2CAD0F8F0D760484A4A4A4A20A30F68,675hh290FC90AB0040930D002693620CC0EA4A89193E6A860=}A9FF8DFC02A59A85BAA59B85BBA5CDD0034C3A10A003B1A485,381hh9AC8B1A4859B20240FA002B99C1520CC0E99FE178810F418A5A4690A8593A5A56=}9008594A94E8583A9208584A95A85,880hhA6A000B19385B6A208A5B60A85B69004A900F002A9019183E683D002E684CAD0E8E693D002E694C6A6D0D6=}A94E8583,529hhA9208584A900859A859BF010A97E8583A91D8584A901859AA900859BA9018DF002A901A20FA017204207A9CE8D3002,685hhA91=}98D3102A9328DC602A5CDF004A9B2D002A9628D5E15A5588593A5598594A91885A820240FA002B99C1520CC0E91,889hh938810F518A5936905859390=}02E69418A59A691D859A9002E69BA01DB183D004A92ED00AC901D004A914D002A9C520,331hhCC0E91938810E618A583691E85839002E68418A593692=}085939002E69420240FA002B99C1520CC0E91938810F5E69A,657hhD002E69B18A593690385939002E694C6A8F0034C8010205507A9AB8D3002A9198D=}3102A9A28DC602A9D28D5E15A901,847ggA20FA017204207A5BA859AA5BB859BA9008DF00260A9FF8DFC02A918A26CA018204207205507C931F005C93=}2F00160,16hh38E9308D0103A9578D0203A5A48D0403A5A58D0503A59A8D0A03A59B8D0B034C53E4A59A85BCA59B85BDA9FF8DFC02,292"hhA915A=}284A018204207A9058D4203A9D48D4403A9158D4503A9058D48032056E4AC48038884BEADD415C99BD00160C9,154,hh24D04820C10EA4BEF0F4A203B9=}D4159D9F15CA88D0F620660FA5B1859AA5B2859B20240FA904A299A018204207A905,7026hhA29AA015204207205507A901A284A018204207A5BC859AA=}5BD859B6020E50EB0E9A000A59B201712A59A201712A904,361@hhA29DA018204207A904A29FA0152042074CDC11484A4A4A4A20221268290FC90AB004=}0930D0026936999F15C860A9FF,544Jhh8DFC02A91DA2A1A018204207205507C948D004A900F008C941F0023860A90185C2A916A2BEA018204207A5CEC=}5C2D0,734Thh1BADD315A2BBA015204207A9158554A9028555A902A204A018204207A9FF8DFC02ADFC02C9FFF0F9C90CF009A901A2,208^hh06A018=}204207A9058D4203A9DA8D4403A9158D4503A9178D48032056E4ADDA15C99BD0023860AC48038CD31588B9DA,931hhh1599BB158810F7A5C285CEF012A=}C48038884C1B9DA1599A3158810F74C4513AD4803859CA903859EA200869D869F86,580rggA086A1A010069C269D26A026A138A5A0E59EAAA5A1E59F90=}0686A085A1E69C88D0E3A59C85C1A90085C585C620C10E,28|hhA4C5B9DA158DA115E6C5C8B9DA158DA215E6C5E6C520660FA5B1A4C699A315E6C6A5C6=}C5C1D0D9A59A85BFA59B85C0,449hhA5A485C3A5A585C4A000B1C3D9A315D020C8C4C1D0F4A5BF859AA5C0859BA9148554A9028555A902A2D4A018204=}207,896hh1860E6C3D002E6C4A5C3F004C980D006E6BFD002E6C0A5C3D031A5C4C980D02BA5801006E682A5821012A582C904F0,579hh18E682A5=}8238E9010A0A1869E3A0009180A90085C3A94085C44C5513A5BFC9D1F0034C5513A5C0C902F0034C5513A9,937hh148554A9028555A90DA2D4A018204=}2072055073860A9FF8DFC02A901A20FA017204207A59A85BAA59B85BB18A55869,798hh508593A55969008594A04FB9101791938810F818A593695285=}939002E694A5A485C7A5A585C8A90885CBA90085CAA9,790hh0585C9A4C9B1C720CC0EA4CA9193E6C9E6CAA5CAC90BD0EBA90D85CAA001B1C7859AA90=}0859B20240FA4CAA202BD9A,417hh15E820CC0E9193C8C010D0F2A003B1C7859AC8B1C7859B20240FA013A202BD9A15E820CC0E9193C8C016D0F2A91A=}85,516hhCAA000B1C7AA2901F00BA94F20CC0EA4CA9193E6CA8A2902F00BA93220CC0EA4CA9193E6CA8A2920F00BA94C20CC0E,253hhA4CA9193E=}6CA8A2940F00BA95520CC0EA4CA9193E6CA8A2980F009A94420CC0EA4CA919318A5C7691085C79002E6C8,549hh204315C6CBF0034C331418A5936929=}85939002E694A96085C7A91785C8A206A00DB1C791938810F920431518A5C769,891gg0E85C79002E6C8CAD0E6A9F28D5E15A5BA859AA5BB859B20550=}7A9D28D5E156018A593692885939002E69460A95C8D,36hh0002A9158D01024C62E448A9D28D0AD48D18D0A9718D0002A9158D0102684048A9328D0AD=}48D18D06840060E2A1625,204hh2E393E3A1066321F1E1A181D1B333530580A006400E803102730303030303030303000000000000000000000000000=},834gg00000000000000000000002020202020202020202020202020202020202020202020200120202020209B2020202020,78hh202020202020=}202020202020202020202020202020202020202020202020202020209B456E74657220534543544F52,327hh20454449544F523F00332523342F32000=}31A0000000000000026292C2500031A0000000000353325241A0000000000,570&hh0000525252525252525252525252520000002E2538340033252334=}2F321A0000000000000000000000222F2F340033,3560hh2523342F32000036342F230000000000000000002429322523342F323900000000525252525=}2525252525252525251,317:hh52525752525252525252525252525252525252525252525252525252575252525252525252457C00007C0000000000,6=}78Dhh00000000000000000000000000000000000000007C00000000000000007C5A52525852525252525252525252525252,334Nhh5252525252525=}25252525252585252525252525252437D000026292C252E212D25000000000033293A250000333421,898Xhh3234000033342134353300000000000000=}000D0D0D0D0D0D0D0D0D0D0D00000D0D0D0D00000D0D0D0D0D00000D0D0D,591bhh0D0D0D00000000000033342134353300232F2425331A002F001D002=}F30252E00000000000024001D0024252C253425,716lhh2400000035001D00292E00353325000000002C001D002C2F232B25240000000012001D00242F=}3300120026292C2500,736vhh0000002429332B002D213000000000541D2461746100000E1D216C6C007A65726F7300000000000036342F23002D21,61=}3hh300000541D35736564000E1D356E757365640000263225251A000000000000001F1E9C436F6D6D616E64206F722073,294hh6563746F722023=}203E9C4564697420C86578206F7220C17461736369693F9C4D6F766520637572736F7220746F206D,842hh616B65206368616E6765732C20707265737=}320202020D2C5D4D5D2CE206F6E2065616368206C696E659B9C57726974,792hh6520746F20647269766520B1206F7220B2203F9C456E746572202320=}746F20636F6E76657274203E4445433D484558,874hh3D9C53656172636820666F7220C86578206F7220C17461736369693F203E9C456E74657220736=}56172636820737472,482hh696E673A9B9C9C9CA0CECFA0CDC1D4C3C8A19CC564697420CD617020D77269746520C865782D44656320D365617263,603=}hh6820C469726563202020D6544F4320D869742020AB20AD20BF9CC5D8C9D42E2E2E41726520796F7520737572653F20,381hh28592F4E29203E1=}8A97E65898583A91D658A858460A002B193186901C91AD00338A910919390038810ED60E689D002,185hhE68A18AD040369808D0403AD050369008D05=}03C980D027A5801006E682A5821014A582C904F017E682A58238E90130,911hh050A0A1869E3A0009180A9408D0503A589C9D0D009A58AC902D00338B=}0011860707070421616008250420000020202,833gg020202020202020202020202028250020241AB19707000C2B41710420000020202020202020202=}0202020202020202,71hh02020202020241CE19453A4B3A7D9B52454144494E4720534543544F52203030309B9B57524954494E472053454354,290=}hh4F52203030309B9B454D50545920534543544F525320203030309B9B9B101010D2C5C1C4C9CEC7D7D2C9D4C9CEC750,562hh555420D3D2C320444=}9534B20494E2044319B50555420C4D3D4204449534B20494E2044329B505245535320D2C5D4D5,177 hhD2CE9B9C9C9C414E4F5448455220434F50593F=}C1D8CCCFCEB1B3B0D8C57DA0D2C1CDADC5C4C9D4A1A0BCA0A0A0A0A0,307hhBEA0A0D6C5D2D3C9CFCEA0B7AEB0A09B2843293139383520436861726C6=}57320462E204A6F686E736F6E9B9B9B534F,914 gg55524345204452495645203D2044319B444553542044524956452020203D2044329B464F524D4154=}20444553542020,57*hh3D205945539B9BA0D3A0204368616E676520736F757263652064726976659BA0C4A0204368616E6765206465737420,8864h=}h64726976659BA0C6A020466F726D61742064657374206469736B9BA0C3A020426567696E20636F7079696E679BA0C5,161>hhA020536563746F72204=}56469746F729B4E4F20A0CECFA0C5D8D4D2C1A0D2C1CDA0ADADADA0D0D2CFC7D2C1CDA0C1C2,315HhhCFD2D40000D8A9008D4402A9018509A91E8DE702=}A9238DE802A995850AA91B850BA908850CA907850D206707A90E8D,915RhhC502A9128DC602A9FF8D01D38E0040A9E38D01D38D0040A9FF8D01D3AD004=}0C9E3F015A9018580A9D38581A004B98E,846\hh1A99A01A8810F73035A9078DFFCF8D0040A9008DFFCFAD0040C907F015A9FF8580A9CF8581A004B989=}1A99A01A8810,499fggF7300CA91FA274A01B2042074C291C86828695869886998A9D7E1D9D7E1E9D7E1FE8D0F4E886FE8696AD30028D931B,44pgg=}AD31028D941B18A5588DD61969508DB519A5598DD71969008DB61918A5586939858BA5596900858CA935858DA91A85,28zhh8E18A5586989858FA55969=}00859018A55869D98591A55969008592A002A910918D8810FBA9318D571AA9328D6A1A8D,257hhF002A9DEA293A01A204207201F07202907205507C94=}6D028A9068554A9118555A5FE490185FED00CA903A271A01B20,845hh42074CBB1CA903A205A01B2042074CBB1CC953D020A9048554A9128555A59549=}0185951869318D571AA901A257A01A,157hh2042074CBB1CC944D020A9058554A9128555A596490185961869318D6A1AA901A26AA01A2042074CBB1CC=}945D012A9,666hh318D571A8D6A1AA90085958596E699D007C943F0034CBB1CA93FA2F6A019204207E695E696A595C596D004E698D010,544ffA9=}33A246A01A204207205507C99BD0F9A9B28DC6024C0B070000000000000000000000000000000000000000000000,6 D:RDSECB.BAS44ffA9<s&>A8=7>=J&&K&L&ʩ * d5I&&&© 1 -L*I&˜ ' 4&0& 1&& *LA}*& & 1 -& & 1 - - *`RUNTIME ERROR AT LINE &&Lr*+ +L&` 'A}& &L&PROGRAM STOPPED&&Ńł ȱ`iL'HH 1*L/ r* . 1 + '. . . A}1 . ' 1 + . 'hhL.ʥ`HHhh`8L'uA}`Huh` Lr*L' Lr*L' ) . ( . ' r* .Lo* )A} . ' , ( . ' + ' r* ' + 1 , . o*Lr* ) ' ' , ( . ' + ' r* ' + A}1 , . (( . o*Lo* ' 1* '.L/` ) r* .L. ) . . + ' . ' ,L' ) ' ,A} ' . + 'L'J&K&L& ) 1 1,L&eJ&iK&`L&8LM& . '.A}L&`ʔȱȱȱ 1*Șe惠 惨6,*6-* L*HHhh``A}`Lo*ʱ` ** &JL&J *HHl JLw TO BOOT FOR DOSA} TO RERUNp B V8+` +ȱLr*&&8558凅刐SJj)ee`фA}фiiL#+8L#+ LM&uuuLr*8` +Lr*iLr*豂HȱA}h`p +Lr*+H+ BHI+ 4 -h`8` ,L, ,#` ,0 ,0L, ,0A}` ,0L,L,`޵` `Ȕ`ʔ惥u`A}+ BHI DEH 4 -HyhLo* + -`+JJJJ`d-+e- +- c-0 c-Lr* J-Lr*A}` f-H J-h 0 c-`L+8 0ƅ`66&Ln-HH` B VhH)Kh)0 IJD-EB 4hLr*S:+Lr*A}TUVLo* -`++L+ -8ɰɅ +`ʱȱȱ`ȵȵLr*Lr* '. . .ʥA} . . '. .L3 '. . . . 1*uȱuȱu W* 1* .0 @,L3 ȱLr* T,L.ʵA}`eeLM&HHhh`ؐHH 1*L/ r*HH . .6 +i iA} .i i .hh . . 'hh .`HH 1*% r*HH 1L'/ 1* '. LM& .6 + A}. +` 1* '.ޠ . 1 +L/  o*Lr*H+ B Vh` ҵ  o*Lo*H+BHI 4+h+L1 gA}0+KJBD0EH 4h o*Lr* r* '.0Ɔ򩛙0` -H`B 4h`00A}L1Lr*Lr* +`H o*hL11HH eHHƆeiH '.lꦆ 1Օ`0  A}L,`8`|1rd-1e- (- 10|1L1|10|1`1 r* '.1 1`+6-1L180A}1LM& + 1 . 1 1 ++ 1 +Ɔʭ1 +`ʕ`66`HHH66666uA}uuhhhLr* +愵 ' + 'I 1 280/66&&&`A}uuu` 2 2Ј 2 o* +`@32@2 .22222 LM&ȥ2iA}223`L*32 3`LM&2@82ƅ3 ȱ222` w3L?33L?3H3 2h`A}1+ %  88L3 o* o*` o* o*`  o* o*` 3$' 3"0 A}30 !4L, 4L, 4L,L1L14 1 '. .4444`H+? ++HI4D44E4B 4HA}4h` VLM&4` D44 14α44 1L4 D44LM&44, α44ﭯ4 148e44α4 A}11L1  'Lr*hh iLr* (5L2 (5L*42&&ȱ0 5Lw5 555&A}& L5&&`i`J&&K&L&` +ȱ&&%8e慱HȱhױL&A}iJ&iK&Lr*+ BH Vh 1LW*+&BH 4hN 1 W*L 1MLW*+%BNLMH 4hLo*)}*1*NA}*W*v*11+,J2+,a,s,@,/,T,9,H,),**++++,,-------6.c./x///2:3}10000)///0090.444(4!4440&D'@(A}f(()))V)4440T5\5A1+1d5355&(6@6j6S1dA8fA8gG8iV8nd8o8p8q8s9t&9O9U9`99999@9T4:h::rA}>:sY:t~:v:w:x:y:z ;|:;A;x;;;;;888';8@K:7   "ŠΠA}  " ""| PRESS WHEN READY |"A} 86}"ӠΠϠԠ;8h S`AQp98 d9$81,A}88d9%8888 888 @ 8 8 8;8D.J9r88A}4:SECTOR 8 T"OK888)TY:""SECTOR 8 T"ERRORA} S@ 8;8D.J888)R: Π: àA} ; Ġ àҭ  "PRINT TO RINTER OR CREENA} 86 8P; 8S;S:7&USE ̭ TO START AND STOP DISPLAY;>8,B};$;%;$T!<""SECTOR >8 T"*;%" ӠΠϠˠנˠ 8B}64n>888)<ΠҠ+>888)<àĠҠ+>888)<ĠB}Ҡ+>888)=ĠҠ+ àҠ>888)+ ? P:7"STANDBY. PRINTIB}NG;$SECTOR >8.....*;%4n"$TURN ON YOUR PRINTER PRESS RETURN 864>4B}9,1,82,64,96,191,7,0,128,0,0,0&.*;%4n"$TURN ON YOUR PRINTER PRESS RETURN 864>4@']qZZZZZZ1IOCFILERESPONSEDECHEXBLANKCIOSEGMENDECNUMBEFLAGFLAGKHEBYTECECNUMBEMLSTARMLENF}SIZDECNUMEBLOCSUINITINITINILRUHRUGOADDERROF} F} !"#$%&'F }""HEADER.BAS-DOS FILE ANALYZERK6-6-@'6-@36-@?6-@K6-@!6-@!F }AR@00;,;,;A,;@2,;@1,% 6.D1:6-6-6-%6-6.123456789ABCDEF }F$467@,. %67@2,. 467@,.. A%`8 ABCOMMAND ROUTINEL AV(-@F }( PRESS OPTION TO QUIT`)) !PRESS SELECT TO LOOK FOR RUN/INITj$$ PRESS START TO LOAD NEW FILEt2F:B2y,"@F }*AdAU/2%~ F:B2y,"@A p F:B2y,"@A CTRL-R AUTO SCANS FOR INIF}T F:Ad,"AhA p@w A@&AR!AdAU&DECIMAL-F}TO-HEX CONVERTER6-A@ $ "6-6- -6-P:', 7%<%,  6-&$ 6-'F}   ( "6-6-2$< SEGMENT AF FILE APCLEAR THE MESSAGE BOARDZ -F}d n$x= >:A%,-= "HEADER.BAS - DOS 2.0 FILE ANALYZER0-@& ENTER NAME OF FILE0 A`F} -** INPUT ERROR - TRY AGAIN>:AS,-A  Ap-@!@ 7@<@F},-@!@67<,.7@<@, A 110DOS.SYS*0DUP.SYS*0MEM.SAVF}A Ap -'' DO NOT USE DOS FILES>:AS,"-A , A 6""FETCH FIRST TWO HF}EADER BYTES@"@AJ67<,.T^ ))h)Apr Ap| -'' F}THAT IS A BASIC FILE>:AS, A-@  FIRST BYTE =  6-6- A@ SECOND F}BYTE =  6-6- A@$ A""FETCH NEXT FOUR HEADER BYTES )) ))F}6-@COMPUTE START AND END&6-%AV$06-%AV$:.6-P:&,%.!B) A&`F}D-@!@N 7@<@,X-@!@b 7@<@,l-@!@v 7@F}<@,-@ STARTING ADRESS =  6--@(@ A@ ENDING ADDRESS = F} 6--@(@ A@ LENGTH OF FILE =  6--@(@ A@ AF} !!MOVE POINTER TO SEGMENT END- 6-6--!B) A&`  A!@*;%@*+"A$)"F}A&,16-; A!P4'!A%6-&A%' A!>6-?:C:,<,H 6-%6-&A!R A!F}P\5 Ap-+ END OF FILE REACHED5 Af A!@))p-@ z-@ F}1"AU*"AU# A*)1)!!"A$*"@A$!!"A&*"@A"COMPOUNF }D LOAD FILE 6-6-< Ap-4 THIS IS A COMPOUND LOAD FILE<6-%:-@ : "THESE PARAMETERS ARF!}E FOR SEGMENT #%-@ -@  )) A0SIMPLE LOAD FILE ))F"}!!A')@A  )) -@$ -@.  INIT ADDRESS =8 6-B -@F#}(@L -@(@V ) A@AdAU) A'` 6-@ Aj  ))t /F$}"A%*"@%6-/ A$P~ /"A'*"@%6-@/ A$P A  )) F%}6-%AV$ -@ " RUN ADDRESS = "6- -@(@ ) A@AdAU) A'F&} A# %6-6-@% A ""MACHINE LANGUAGE BYTE READER ""DATA FROM DISK IS NOT SAVED. F'}EXECUTED ON FIRST RUN ONLY -@0 " 67<,.>:,  ( $2 104,162,48,169,7,157,66,3< 169,0,1F(}57,68,3,169,224,157F 69,3,104,157,73,3,104,157P 72,3,32,86,228,96Z CHECK FOR END OF FILEd  A&)n <F)} >:A%,"-@@2  FATAL ERROR< Ax F:A,"A6A!@ A&p TONE %%2F*}@P@@ -@@P  (%2($ D:HEADER.BAS %%2DnXHSFPEK A6A`@@@ *** HEX DISK FILE J,}DUMP ***F +d&&;@,;@,;@,n6.0123456789ABCDEF 6.D1:""@@J-}K  ؠŠ ENTER DISK FILE NAME67@<@,.4A A  J.}@@""@@P"2' Ӡ٠٠ϠԠ2 @,I> @J/}>:@,HEX DUMP OF FILE--> >:@,I @.FF @5BYTE# 0 1 2 3 4 5 6 7 8 9 A B C D EJ0} F 6FF @5---------------------------------------------------- @AdAUr6-P:'AV, AJ1}w6-&+$AV, A| @:  6.X$-@@$)@b A @ J2}g467,..(+!@1,*+ A#,467,.>:,l)6-%@ ) @  F:Ad,"AUApJ3})@AR@ ++ #CONTINUE,RESTART, OR STOP (C,R,S) ?$)@$"@gAJ4}"@A @A 9AR @+@6@976-F:A,A6J5}- ERROR # 7 A3 @ " @3 @EOF#@@# A&6-P:J6}'@,&6-&+$@,== @7%@<%@,7%@<%@,$ D:HEXDUMP.BAS&6-P:HtvDECBINPBINBWDEEDAD#+?P.@ @N8}  TYPED BY HOWARD SIEBENROCK 9 +@90@11;@,;@5,;N9}@,;@,1( (1(# DECIMAL to BINARY CONVERSION(Y( (V(H Press to convert from DECIMAL toN:} BINARY or BINARY to DECIMAL.Y(2V#(#(} DECIMAL to BINARYX00((ZN;} (1[( 2 6 3 1\!!(0-255 8 4 2 6 8 4 2 1](  BIT^(7 6 5 4 3 2 1 0_30((N<}3(d( DECIMAL: nB:, @ Ax 6-A:,z?!AU5(  >255  N=} ? A6-A( @ A  A   A( ERRON>}R&,67B:,%@,.1 6# 6-&6-'@# A67B:,%@,.0 6-'@ A(N?} 6. ( A!!(} BINARY to DECIMAL00((N@}( 1  ( 2631  ( 84268421  ##( BIT  DECIMAL( 765432NA}10  (6-6-@( BINARY: 4@L-@B:,Q6-&@V+7NB}<,41+6-%P:@#%?P,` j( o (t AD:BINDECQ6-&@V+7Ld pAADADDVALUTEMCNTENTBN   RD} &&;@ ,;@,;@ ,A' ENTER INSPECTION ADDRESS IN HEX+16.; AA6- 6-F:, A RE}(5/ HEX CONTENTS OF  ARE 7<@ ,2 5 2 @  A6--@B:,6.7RF}<,20A-7<,/9#6-$@%A:,- A2AA$3FA.%%6-$@%@:,&RG}@:A,%@8  BB$!!CONVERT DECIMAL TO HEX ****6-@  6-6-P:'@,6-&$@RH} ' @67<,.=:,' A  67<,.>:&@%@:A,, '6-&@' A @* BRI}$ D:INSPECT7<,.=:,' A  67<,.>:&@%@:A,, '6-&@' A @* BPERAMTOSIXADDSIZAA(B'hA'd6-A 6-F:,(6-$AVVK}"6-AU&F:,(( F:,"6-%@(AU&9( (3(%ŠРƠҠɠӠ 6(9(eVL}( ( ((e(L SUBTRACT THIS NUMBER FROM 40960--THE RESULT IS THE NUMBER YOU SUBTRACT FROMBB(: DISPLAY POKE STATEMVM}ENTS WRITTEN WITH MAXIMUM MEMORY.(48K) D:RAMTOP.MAXESULT IS THE NUMBER YOU SUBTRACT FROMBB(: DISPLAY POKE STATEMT;?@0AAHDHDIADBGINOUSSANEVPOPOPRSCHCHSZO} ZP} TAPEDUMPLLROUTINE TO GET BYTES FROM CASSETTE ANDZQ} PRINT HEX, DECIMAL AND OP CODESWITH PRINTER(11;@,;@,;@,;@,211;@,;@ZR},;@,;@,<AA;@ ,;@ $AV,;@,;@$AV,A1+(#PLEASE WAIT WHILE TABLES ARE ZS}SET UP.(1(FG6-B6-B'6-1 B; B G6-P2(PRINTER (Y/N)2B:,"ZT}@Q4YAR%(Enter skip count%6-U. @6-A:,$ B. @X6-ZU} BZ(Insert Cassette_3#@@C:3OPEN CASSETTEdFOR LABEL REFERENCEnFOR LABEL ZV}REFERENCE A6-&@ 6- 6- 6.$ A)@$ ZW}B 6.7@<@,<6-%@<6.7$@ %@<$@ %@ ,!..6.7$@%@( ҠH @ @JUST IN CASE(( I/O Error@(6-ZZ}((( Type CONT and to continue& @'INPUT CONVERSION ROUTINE' GIVEN A$ (DIM A$(5)), WITH$'!!Z[}LEADING 0 FOR HEX, CONVERTS.'!!ADDRESS TO BINARY (DECIMAL)8'IN D. DESTROYS TRAP, WITHB'D=-1 IF INVALID VALUEL'!Z\}B:,"6-!$V'B:,"@B`'$$7@<@,40B j' B6-A:, Bt'Z]}$~'6-6@ B$'46- -@B:,4 BP'L7<,1A*7<,/FB6-$@%Z^}@:7<,,%@&@:A,L B`'D7<,10*7<,/9:6-$@%@:7<,,&@:0,D B`'6-6@'  Z_} $'OUTPUT CONVERSION ROUTINE'!!GIVEN D (DECIMAL), CONVERTS'!!TO FOUR CHARACTER HEX IN H$'(DIM H$(4)), USES HZ`}I, D1,(D2. D IS NOT DESTROYED (6.0000 $(& 6-&-@@6@($6-P:'@,$6Za}-&$@((6!@ ,67<,.>:@:A,%&@,6 B2(67<,.>:@:0,%,<( 6- $*'-AZb}U'D:OPCODES.LST+'-@@!'(AU&  +2"6-B:,6-$@ 2-@@ +$ !67%Zc}<%,. $ BP +67%<%,.7<,*+   4+$\+AABRK,ORA (I X),NOP,NOP,NOP,ORA Z,ASL Z,NOP,PHP,ORA IMM,ASL AZd}]+CCNOP,NOP,ORA ABS,ASL ABS,NOP,BPL,ORA (I) Y,NOP,NOP,NOP,ORA Z X^+CCASL Z X,NOP,CLC,ORA ABS Y,NOP,NOP,NOP,ORA ABS X,ASL Ze}ABS X,NOP_+EEJSR,AND (I X),NOP,NOP,BIT Z,AND Z,ROL Z,NOP,PLP,AND IMM,ROL ACC`+??NOP,BIT ABS,AND ABS,ROL ABS,NOP,BMI,AND (Zf}I) Y,NOP,NOP,NOPa+==AND Z X,ROL Z X,NOP,SEC,AND ABS Y,NOP,NOP,NOP,AND ABS Xb+AAROL ABS X,NOP,RTI,EOR (I X),NOP,NOP,NOP,EOZg}R Z,LSR Z,NOP,PHAc+CCEOR IMM,LSR ACC,NOP,JMP ABS,EOR ABS,LSR ABS,NOP,BVC,EOR (I) Yd+??NOP,NOP,NOP,EOR Z X,LSR Z X,NOP,CLIZh},EOR ABS Y,NOP,NOP,NOPe+CCEOR ABS X,LSR ABS X,NOP,RTS,ADC (I X),NOP,NOP,NOP,ADC Z,ROR Zf+AANOP,PLA,ADC IMM,ROR ACC,NOP,JMZi}P IND,ADC ABS,ROR ABS,NOP,BVSg+EEADC (I) Y,NOP,NOP,NOP,ADC Z X,ROR Z X,NOP,SEI,ADC ABS Y,NOP,NOPh+CCNOP,ADC ABS X,ROR ABSZj} X,NOP,NOP,STA (I X),NOP,NOP,STY Z,STA Zi+??STX Z,NOP,DEY,NOP,TXA,NOP,STY ABS,STA ABS,STX ABS,NOP,BCCj+EESTA (I) Y,NOP,NOZk}P,STY Z X,STA Z X,STX Z Y,NOP,TYA,STA ABS Y,TXSk+CCNOP,NOP,STA ABS X,NOP,NOP,LDY IMM,LDA (I X),LDX IMM,NOP,LDY Zl+EELDA ZZl},LDX Z,NOP,TAY,LDA IMM,TAX,NOP,LDY ABS,LDA ABS,LDX ABS,NOPm+EEBCS,LDA (I) Y,NOP,NOP,LDY Z X,LDA Z X,LDX Z Y,NOP,CLV,LDA ABSZm} Yn+EETSX,NOP,LDY ABS X,LDA ABS X,LDX ABS Y,NOP,CPY IMM,CMP (I X),NOPo+CCNOP,CPY Z,CMP Z,DEC Z,NOP,INY,CMP IMM,DEX,NOP,CPZn}Y ABS,CMP ABSp+CCDEC ABS,NOP,BNE,CMP (I) Y,NOP,NOP,NOP,CMP Z X,DEC Z X,NOP,CLDq+EECMP ABS Y,NOP,NOP,NOP,CMP ABS X,DEC ABSZo} X,NOP,CPX IMM,SBC (I X)r+??NOP,NOP,CPX Z,SBC Z,INC Z,NOP,INX,SBC IMM,NOP,NOP,CPX ABSs+CCSBC ABS,INC ABS,NOP,BEQ,SBC (I) Zp}Y,NOP,NOP,NOP,SBC Z X,INC Z Xt+;;NOP,SED,SBC ABS Y,NOP,NOP,NOP,SBC ABS X,INC ABS X,NOP.'-AU'D:CHCODES.LZq}ST.'-@@!'(AU& .2"6-B:,6-$@2-@@.$ !67%<%,. $ B PZr}/67%<%,.7<,/  $D/EEHEART,RTINT,RTBAR,ULANG,LFINT,DLANG,RTSLANT,LFSLANT,DRTRI,DRSQRE/BBDLTRI,URSQRZs},ULSQR,UBAR,DBAR,DLSQR,CLUB,DRANG,MBAR,INTRS,BLOTF/CCDHALF,LFBAR,DTEE,UTEE,LHALF,URANG,ESC,UAROW,DAROW,LAROW,RAROWG/KKSPAZt}CE,!,",#,$,%,&,',(,),*,+,COMMA,-,.,/,0,1,2,3,4,5,6,7,8,9,:,;,<,=,>H/CC?,@,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,YZu},Z,[,\,]I/HH^,ULINE,DIAMND,a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,zJ/%%SPADE,VSTROK,CLRSCN,BACKSP,TABFK/FFIHZv}EART,IRTINT,IRTBAR,IULANG,ILFINT,IDLANG,IRTSLNT,ILFSLNT,IDRTRIL/GGIDRSQR,IDLTRI,IURSQR,IULSQR,IUBAR,IDBAR,IDLSQR,ICLUB,IDRAZw}NG,IMBARM/GGIINTRS,IBLOT,IDHALF,ILFBAR,IDTEE,IUTEE,ILHALF,IURANG,RETURN,CSRUPN/FFCSRDN,CSRLF,CSRRT,ISPACE,I!,I",I#,I$,I%,Zx}I&,I',I(,I),I*,I+,ICOMMAO/DDI-,I.,I/,I0,I1,I2,I3,I4,I5,I6,I7,I8,I9,I:,I;,I<,I=,I>,I?,I@,IAP/GGIB,IC,ID,IE,IF,IG,IH,II,IJ,Zy}IK,IL,IM,IN,IO,IP,IQ,IR,IS,IT,IU,IV,IWQ/DDIX,IY,IZ,I[,I\,I],I^,IULINE,IDIAMND,Ia,Ib,Ic,Id,Ie,If,Ig,Ih,IiR/22Ij,Ik,Il,Im,IZz}n,Io,Ip,Iq,Ir,Is,It,Iu,Iv,Iw,IxS///Iy,Iz,ISPADE,IVSTROK,BUZZER,DELCHR,INSCHR D:TAPEDUMP,Ig,Ih,IiR/22Ij,Ik,Il,Im,IXa787 L ABLEN1LIN2LINE1LIN1LINE2NUMFRLINELINEADR@@@^|} oo ^}}場 庠Ԯ°%%*** SORT OUT ***%%*** By GENE KRAJCA 3/26/81 ***^~}EE*** This program will compare a revised program with the ##original.It will separate the ""changes, r^}ecording them in a llfile, e.g. "̮Ȱ" WAS created in this manner. *************************^}* @@1.STORE THE ORIGINAL PROGRAM AS ԠĺǮ̢.@@2.STORE THE REVISED PROGRAM AS ԠĺĮ^}̢``3.LOAD AND RUN "Ԡ". THE CHANGES WILL BE FOUND IN "Ǯ".II*** A$ HOLDS ^}ORIGINAL LINE B$ HOLDS BLENDED LINE ***2%%*** OPEN FILES -- #1 = ORIGINAL3$$*** -- #2 =^} BLENDED4$$*** -- #3 = CHANGES57V;@,-(DO YOU WANT INSTRUCTIONS1A4Y)4YESS^}@V<RR;AU,;AU,9@W,9@W,;@,;@,;@ ,A++@@^} D:ORIG.FILF,,@@ D:BLEND.FILP,,@@ D:CHANG.FILdi*** START LINE^} BY LINEjCOMPARISON. ***kn# A#*** Strip 1st # ***x# A#*** Strip 2nd # *** 6-A:,6-A:^}, " A    A0 ! A@LQ*** SUBROUTINE ***RGET BLENDED LINE #SV" 6^}.  AP"@`-@@j+68,-@:7<,,+8,"@2A`t#6.>:8,,#67B:,%@^},.~ :$:*** LINE1$ HOLDS 1st LINE #. ****** SUBROUTINE ***GET BLENDED LINE #^}" 6.  AP"@-@@+68,-@:7<,,+8,"@2A`#6.>:8,,#67B:^},%@,. :$:*** LINE2$ HOLDS 2nd LINE ". ****** SUBROUTINE ***COMPARE A$ ^}WITH B$ 4 A 0 @ A  *** SUBROUTINE *** DELETE LINE1$, FILE B$ ^} $(@ A$ A0*** SUBROUTINE ***FILE B$, GET NEXT LINE2(@ A^}" 4 (@" A` A0*** SUBROUTINE ***CLOSING ROUTINE4 *4^} A`, 4 (@" B, Ap Bz$@@$@(} SORTING COMPL^}ETE D:SORTOUT.B01@" B, Ap Bz$@@$@(} SORTING COMPL\ _________ RAM XE/XL _________ This is the documentation to RamXE, and RamXL.b} The binary files are "RAMXL.OBJ" and "RAMXE.OBJ". "RAMXL.DMO" and "RAMXE.DMO" are demonstration programs for the b} binary files. "RAMXL.OBJ" and "RAMXE.OBJ" should be (L)oaded from the DOS menu. (they could also be renamed "AUTORUb}N.SYS", which will cause them to automatically load when DOS is booted.) RAMXL.OBJ ---------b} RAM XL is actually an interrupt handler that allows programs to bank the OS out on XL computers without crashing thb}e system. Normally, when the OS is banked, any interrupts will crash the system. RAMXL takes the place of the normab}l OS interrupt code when the OS is out. When an interrupt occurs, RAMXL is called, then it banks the OS back in and calb}ls the OS interrupt routine. This allows VBLANK, keyboard, and DLI interrupts to occur when the OS is banked out.b} The first USR routine in RAMXL is called to init the new interrupt code. This is done by the statement: Ab}=USR(1605) Once the new interrupt routines are installed, you may call the other routine to move data to and from tb}he RAM under the OS. The format of the moveblock call is: A=USR(1577, , , ) There are three RAM blocks under the OS that are usable, they are: $C000 to $CFFF 49152 to 53247 $D8b}00 to $DFFF 55296 to 57343 $E400 to $FFF9 58368 to 65529 This adds 13K to the usable RAM on XL computers. The fileb} XLBAS.XMO is a short BASIC program that shows one use for RAMXL. It reads in a text file from the disk, then storeb}s it in the RAM under the OS. When you press a console key, the screen is loaded from the extra RAM by RAMXL. This alb}lows very fast screen redraws. NOTE: RAMXL will NOT work with ---- OS/A+ DOSXL, since DOSXL also uses the RAMb} under the OS. RAMXE.OBJ --------- "RAMXE.OBJ" is also an USR for Atari BASIC, bub}t it allows access to the 64K of banked RAM in the 130XE. To use RAMXE, first check to see if the computer is a 130b}XE, by the statement: A=USR(1536) If A=0 then the program is run- ning on a 130XE, otherwise it is NOT b}a 130XE. The extra RAM is accessed by the statement: A=USR(1577,, ,,, ) The RAM in the 130XE is organized into 5 banks, numbered 0 to 4. Each bankb} is 16K (16384 bytes) long and is located in the middle 16K of RAM ($4000 to $7FFF, 16384 to 32767). Bank 0 is the "norb}mal" RAM that is available when the machine is turned on, the other 4 banks are accessable by using RAMXE. The file Rb}AMXE.DMO is a short demonstation of how to use RAMXE. It reads in a text file, then saves it into the banked RAM. Wheb}n the console keys are pressed, you page through the text, as it is moved from the banked RAM to the screen RAM. NOb}TE: RAMXE is NOT compatible with ---- Atari DOS 2.5, since both use the banked RAM in the 130XE. . NO`v0KL3IOCDATMEMORYCOSCREE@ Demo RAMXL f}04/02/85Daniel L. Moore;@P, 9@,!-@@""68,-# $66Memoryf} address under the OS. 13 1K memory blocks%GG49152,50176,51200,52224,55296,56320,58368,59392,60416,61140,62464&63488,f}64512(6-B2yConsol keys)$6-B$Screen RAM address26-?:A,Init RAMXL7--Read the file in af}nd store under the OS;KAY'@9AKAR@<..@@f} D:RAMXEXL.DOCF+-@@+Read 6 screens inP (}Z*-@@ *Read 20 lines ind@f}n x 7'?:A<<8,<A `,*&7Call error @ (}AY@4f}**Now copy the data just saved back to11the screen ram to demo the move capablility-@@:'?:Af}<8,<<A `,*&:Calling error A -@@:'?:A<8,<<A `,f}*&:Calling error  A0,<@&F:,"@A<Wait for consol key6&@&f}F:,@A@$ D1:RAMXL.DMOAMXL.d of this REAL fastes OSr consol key6&@&d_H H. /$%H&HXL :.h@H h`H)h`hAx :ԩՠ / :Ԉj}@XLhh:hhh :ԑԑԅL/ԩՠ / :Ԉh`0KLIOCDATMEMORYCOSCREE@ Demo RAMXE n}04/16/85Daniel L. Moore#;A,(6-B2yConsol keys)$6-B$Screen RAM address2,?:n}A6,)(This is not a 130XE.,&7--Read the file in and store under the OS;KAY'@9An}KAR@<..@@ D:RAMXEXL.DOCF+-@@+Read 6 screens inP (n}}Z*-@@ *Read 20 lines ind@n x TD?:Aw<<<Bc%$A `<@n}<A `,G&TCall error @ (}AY@4**Now copy the data just saved backn} to11the screen ram to demo the move capablility-@@WD?:Aw<Bc%A `$<@<<n}<A `,G&WCalling error A -@@WD?:Aw<Bc%A `$<@<<n}<A `,G&WCalling error  A0,<@&F:,"@A<Wait for consol n}key6&@&F:,@A@$ D1:RAMXE.DMO of RAMXL.d of this REAL fastes OS$r consol lth@ʎ@@qqhhehhh H֤=ڠ֎ӱԦڎӑr}֎ӱԦڎӑԅծ`ehhh H֤=ڠ֎ӱԦڎӑp(4,234,2442%%234,32,180,25,96,160,0,177,2204**214,145,212,200,208,249,230,213,2981(''230,215,202,208,242,96,63,25,2v}6012##97,25,32,85,24,169,0,133,1895<))212,133,214,169,29,133,213,169,2612F''192,133,215,162,16,32,119,24,2243P''1v}69,216,133,215,162,7,32,119,2413Z""24,32,70,24,96,50,31,52,1749d31,88,76,32,256,1863 D2:XLDOS.BAS,2243P''1tqLS2 TLdS TLdS $K K K K K K KLLʭQ T>ɛ BDEHI VL"}/0˭1̠˙AUȱ˙AUT>ɛ 8 T>0U1"/ TLD KM0P OMLD-GLRx"})7);)@ T LLSLD΂T֩TL1Tx) LL1T gFBD>"}EJK V` +U ѝD`5ULTw :Uѝ"}` TLDѩw LDNEWENTER LOAD RUN ppBTBA>U!"`33U!"`33