REM > AtomEco148.lst REM Source for Acorn Atom Econet 1.48 REM Econet Version 1: REM 1-byte station numbers (no network numbers) REM frame is stn,port,ctrl,data REM immediates are &01-&04, JMP,HALT,PEEK?,POKE? REM broadcasts are dest=&00 REM NOS Version 1: REM Only CLI, LOAD and SAVE implemented NMIV =&0200:BRKV =&0202:IRQV =&0204:CLIV=&0206 WRCHV=&0208:RDCHV=&020A:LOADV=&020C:SAVEV=&020E RDARV=&0210:STARV=&0212:BGETV=&0214:BPUTV=&0216 FINDV=&0218:SHUTV=&021A:IND1V=&021C:IND2V=&021E load%=&A000 DIM mcode% &1014 FOR P=0 TO 1 P%=load%:O%=mcode% [OPT P*3+4 \ RESET - Called by Atom Kernel at reset \ ====================================== .LA000 TXA :\ A000 8A . PHA :\ A001 48 H TYA :\ A002 98 . PHA :\ A003 48 H LDY #&00 :\ A004 A0 00 . STY &A0 :\ A006 84 A0 . STY &A1 :\ A008 84 A1 .! STY &A2 :\ A00A 84 A2 ." STY &A3 :\ A00C 84 A3 .# STY &A4 :\ A00E 84 A4 .$ DEY :\ A010 88 . STY &C8 :\ A011 84 C8 .H JSR LA089 :\ A013 20 89 A0 . JSR LA094 :\ A016 20 94 A0 . JSR LA0CB :\ A019 20 CB A0 K LDA #&00:BEQ LA03D :\ Skip forward to poke into Atom screen memory .LA020 JSR &F7D1 :\ Print inline text EQUS "SYSTEM/3 ECONET 1.48" EQUB 10:EQUB 13:NOP JMP LA078 .LA03D BIT &B002:BMI LA03D LDX #&0A :\ Poke startup message into screen .LA044 LDA LA07E,X:STA &800B,X DEX:BPL LA044 \ Poke station number into screen memory CLD :\ Ensure binary mode LDA &B404 :\ Get station number LDX #&2F:SEC .LA054 SBC #&64 :\ A054 E9 64 id INY :\ A056 C8 H BCS LA054 :\ A057 B0 FB 0{ ADC #&64 :\ A059 69 64 id CPY #&30 :\ A05B C0 30 @0 BEQ LA062 :\ A05D F0 03 p. STY &801D :\ A05F 8C 1D 80 ... .LA062 LDY #&2F :\ A062 A0 2F / .LA064 SBC #&0A :\ A064 E9 0A i. INY :\ A066 C8 H BCS LA064 :\ A067 B0 FB 0{ ADC #&0A :\ A069 69 0A i. STY &801E :\ A06B 8C 1E 80 ... ADC #&2F :\ A06E 69 2F i/ STA &801F :\ A070 8D 1F 80 ... LDA #&00 :\ A073 A9 00 ). JSR LAEF7 :\ A075 20 F7 AE w. .LA078 PLA :\ A078 68 h TAY :\ A079 A8 ( PLA :\ A07A 68 h TAX :\ A07B AA * PLA :\ A07C 68 h RTI :\ A07D 40 @ \ Econet startup message - bytes poked into screen memory \ ------------------------------------------------------- \ Changes startup message from ACORN ATOM to ACORN ATOM ECONET 1.48 .LA07E EQUB &05:EQUB &03:EQUB &0F :\ "ECO" EQUB &0E:EQUB &05:EQUB &14 :\ "NET" EQUS " 1.48" :\ " 1.48" .LA089 LDA #LA138 AND 255:STA &0204 :\ Hook into IRQV LDA #LA138 DIV 256:STA &0205 RTS .LA094 LDA #&AE:STA &C0 :\ A096 85 C0 .@ LDA #&FF:STA &C1 :\ A09A 85 C1 .A LDA #&01:STA &C4 :\ A09E 85 C4 .D LDA #&F8:STA &C5 :\ A0A2 85 C5 .E RTS .LA0A5 LDA #&C1:STA &B400 :\ A0A7 8D 00 B4 ..4 LDA #&82:STA &B401 :\ A0AC 8D 01 B4 ..4 STA &021E :\ A0AF 8D 1E 02 ... LDA #&1E:STA &B403 :\ A0B4 8D 03 B4 ..4 STA &021F :\ A0B7 8D 1F 02 ... LDA #&00:STA &B400 :\ A0BC 8D 00 B4 ..4 STA &021C :\ A0BF 8D 1C 02 ... LDA #&61:STA &B401 :\ A0C4 8D 01 B4 ..4 STA &021D :\ A0C7 8D 1D 02 ... RTS .LA0CB JSR LA0A5 :\ A0CB 20 A5 A0 % LDA #&02:STA &B400 STA &021C :\ A0D3 8D 1C 02 ... RTS :\ A0D6 60 ` .LA0D7 LDA #&21:STA &B401 RTS :\ A0DC 60 ` .LA0DD JSR LA778 :\ A0DD 20 78 A7 x' TYA :\ A0E0 98 . PHA :\ A0E1 48 H JMP LA0E8 :\ A0E2 4C E8 A0 Lh .LA0E5 JSR LA778 :\ A0E5 20 78 A7 x' .LA0E8 LDA &021D :\ A0E8 AD 1D 02 -.. AND #&FE :\ A0EB 29 FE )~ STA &B401 :\ A0ED 8D 01 B4 ..4 LDA &B400 :\ A0F0 AD 00 B4 -.4 STA &0220 :\ A0F3 8D 20 02 . . LDA &B401 :\ A0F6 AD 01 B4 -.4 STA &0221 :\ A0F9 8D 21 02 .!. LDA &C8 :\ A0FC A5 C8 %H BNE LA125 :\ A0FE D0 25 P% LDA #&21 :\ A100 A9 21 )! JSR &FE52 :\ A102 20 52 FE R~ LDA #&20 :\ A105 A9 20 ) JSR &FE52 :\ A107 20 52 FE R~ LDA &0220 :\ A10A AD 20 02 - . JSR LA74A :\ A10D 20 4A A7 J' LDA #&20 :\ A110 A9 20 ) JSR &FE52 :\ A112 20 52 FE R~ LDA &0221 :\ A115 AD 21 02 -!. JSR LA74A :\ A118 20 4A A7 J' LDA #&0A :\ A11B A9 0A ). JSR &FE52 :\ A11D 20 52 FE R~ LDA #&0D :\ A120 A9 0D ). JSR &FE52 :\ A122 20 52 FE R~ .LA125 JSR LA0CB :\ A125 20 CB A0 K JMP LA12B :\ A128 4C 2B A1 L+! .LA12B PLA :\ A12B 68 h TAY :\ A12C A8 ( .LA12D JSR LA089 :\ A12D 20 89 A0 . JSR LA094 :\ A130 20 94 A0 . PLA :\ A133 68 h RTI :\ A134 40 @ .LA135 JSR LA0DD :\ A135 20 DD A0 ] \ Econet IRQ handler \ ================== .LA138 BIT &B400 :\ A138 2C 00 B4 ,.4 BPL LA135 :\ A13B 10 F8 .x LDA #&01 :\ A13D A9 01 ). BIT &B401 :\ A13F 2C 01 B4 ,.4 BEQ LA1B2 :\ A142 F0 6E pn LDA &B402 :\ Get data byte, ADDRESS byte BEQ LA151 :\ &00 = broadcast, jump to read this frame CMP &B404 :\ Compare with my station number BEQ LA151 :\ Matches, jump to read this frame JMP LA1D1 .LA151 STA &FF :\ Store dest station TYA:PHA LDY &C5 :\ JSR LA344 :\ Get the rest of the frame BEQ LA15F :\ Broken frame? JSR LA0E5 :\ Print something? .LA15F LDA &A7 :\ A15F A5 A7 %' BNE LA166 :\ Port<>0, not immediate(?) JMP LA3A7 :\ A163 4C A7 A3 L'# .LA166 JSR LA1DC :\ A166 20 DC A1 \! BNE LA1A9 :\ A169 D0 3E P> LDA &FF :\ A16B A5 FF %. BEQ LA1A9 :\ A16D F0 3A p: LDY &C5 :\ A16F A4 C5 $E JSR LA2C7 :\ A171 20 C7 A2 G" BNE LA180 :\ A174 D0 0A P. JSR LA5C1 :\ A176 20 C1 A5 A% BNE LA180 :\ A179 D0 05 P. JSR LA2F7 :\ A17B 20 F7 A2 w" BEQ LA183 :\ A17E F0 03 p. .LA180 JSR LA0E5 :\ A180 20 E5 A0 e .LA183 JSR LA2C7 :\ A183 20 C7 A2 G" BNE LA180 :\ A186 D0 F8 Px JSR LA5C1 :\ A188 20 C1 A5 A% BNE LA180 :\ A18B D0 F3 Ps LDY &CC :\ A18D A4 CC $L LDA #&80 :\ A18F A9 80 ). STA (&A0),Y :\ A191 91 A0 . LDA &A6 :\ A193 A5 A6 %& INY :\ A195 C8 H STA (&A0),Y :\ A196 91 A0 . LDA &A7 :\ A198 A5 A7 %' INY :\ A19A C8 H STA (&A0),Y :\ A19B 91 A0 . INY :\ A19D C8 H INY :\ A19E C8 H LDA &C2 :\ A19F A5 C2 %B INY :\ A1A1 C8 H STA (&A0),Y :\ A1A2 91 A0 . LDA &C3 :\ A1A4 A5 C3 %C INY :\ A1A6 C8 H STA (&A0),Y :\ A1A7 91 A0 . .LA1A9 JSR LA0CB :\ A1A9 20 CB A0 K JSR LA094 :\ A1AC 20 94 A0 . JMP LA12B :\ A1AF 4C 2B A1 L+! .LA1B2 LDA #&02 :\ A1B2 A9 02 ). BIT &B400 :\ A1B4 2C 00 B4 ,.4 BEQ LA1CE :\ A1B7 F0 15 p. LDA #&04 :\ A1B9 A9 04 ). BIT &B401 :\ A1BB 2C 01 B4 ,.4 BEQ LA1CE :\ A1BE F0 0E p. JSR LA0D7 :\ A1C0 20 D7 A0 W BIT &B400 :\ A1C3 2C 00 B4 ,.4 BMI LA1CB :\ A1C6 30 03 0. JMP LA12D :\ A1C8 4C 2D A1 L-! .LA1CB JMP LA138 :\ A1CB 4C 38 A1 L8! .LA1CE JSR LA0DD :\ A1CE 20 DD A0 ] .LA1D1 LDA &021C :\ A1D1 AD 1C 02 -.. ORA #&20 :\ A1D4 09 20 . STA &B400 :\ A1D6 8D 00 B4 ..4 JMP LA12D :\ A1D9 4C 2D A1 L-! .LA1DC LDA &A0 :\ A1DC A5 A0 % BNE LA1E4 :\ A1DE D0 04 P. LDA &A1 :\ A1E0 A5 A1 %! BEQ LA22C :\ A1E2 F0 48 pH .LA1E4 LDA &A7 :\ A1E4 A5 A7 %' AND #&F0 :\ A1E6 29 F0 )p BEQ LA22C :\ A1E8 F0 42 pB LDY #&00 :\ A1EA A0 00 . .LA1EC STY &CC :\ A1EC 84 CC .L LDA (&A0),Y :\ A1EE B1 A0 1 BEQ LA20D :\ A1F0 F0 1B p. BMI LA202 :\ A1F2 30 0E 0. INY :\ A1F4 C8 H LDA (&A0),Y :\ A1F5 B1 A0 1 CMP &A6 :\ A1F7 C5 A6 E& BNE LA202 :\ A1F9 D0 07 P. INY :\ A1FB C8 H LDA (&A0),Y :\ A1FC B1 A0 1 CMP &A7 :\ A1FE C5 A7 E' BEQ LA26B :\ A200 F0 69 pi .LA202 LDA &CC :\ A202 A5 CC %L CLC :\ A204 18 . ADC #&07 :\ A205 69 07 i. BCS LA22C :\ A207 B0 23 0# TAY :\ A209 A8 ( JMP LA1EC :\ A20A 4C EC A1 Ll! .LA20D LDY #&00 :\ A20D A0 00 . .LA20F STY &CC :\ A20F 84 CC .L LDA (&A0),Y :\ A211 B1 A0 1 BEQ LA22F :\ A213 F0 1A p. BMI LA223 :\ A215 30 0C 0. INY :\ A217 C8 H LDA (&A0),Y :\ A218 B1 A0 1 BNE LA223 :\ A21A D0 07 P. INY :\ A21C C8 H LDA (&A0),Y :\ A21D B1 A0 1 CMP &A7 :\ A21F C5 A7 E' BEQ LA26B :\ A221 F0 48 pH .LA223 LDA &CC :\ A223 A5 CC %L CLC :\ A225 18 . ADC #&07 :\ A226 69 07 i. TAY :\ A228 A8 ( JMP LA20F :\ A229 4C 0F A2 L." .LA22C JMP LA290 :\ A22C 4C 90 A2 L." .LA22F LDY #&00 :\ A22F A0 00 . .LA231 STY &CC :\ A231 84 CC .L LDA (&A0),Y :\ A233 B1 A0 1 BEQ LA24E :\ A235 F0 17 p. BMI LA245 :\ A237 30 0C 0. INY :\ A239 C8 H LDA (&A0),Y :\ A23A B1 A0 1 CMP &A6 :\ A23C C5 A6 E& BNE LA245 :\ A23E D0 05 P. INY :\ A240 C8 H LDA (&A0),Y :\ A241 B1 A0 1 BEQ LA26B :\ A243 F0 26 p& .LA245 LDA &CC :\ A245 A5 CC %L CLC :\ A247 18 . ADC #&07 :\ A248 69 07 i. TAY :\ A24A A8 ( JMP LA231 :\ A24B 4C 31 A2 L1" .LA24E LDY #&00 :\ A24E A0 00 . .LA250 STY &CC :\ A250 84 CC .L LDA (&A0),Y :\ A252 B1 A0 1 BEQ LA290 :\ A254 F0 3A p: BMI LA262 :\ A256 30 0A 0. INY :\ A258 C8 H LDA (&A0),Y :\ A259 B1 A0 1 BNE LA262 :\ A25B D0 05 P. INY :\ A25D C8 H LDA (&A0),Y :\ A25E B1 A0 1 BEQ LA26B :\ A260 F0 09 p. .LA262 LDA &CC :\ A262 A5 CC %L CLC :\ A264 18 . ADC #&07 :\ A265 69 07 i. TAY :\ A267 A8 ( JMP LA250 :\ A268 4C 50 A2 LP" .LA26B SEC :\ A26B 38 8 LDY &CC :\ A26C A4 CC $L INY :\ A26E C8 H INY :\ A26F C8 H INY :\ A270 C8 H LDA (&A0),Y :\ A271 B1 A0 1 INY :\ A273 C8 H INY :\ A274 C8 H SBC (&A0),Y :\ A275 F1 A0 q STA &C5 :\ A277 85 C5 .E DEY :\ A279 88 . LDA (&A0),Y :\ A27A B1 A0 1 SBC #&00 :\ A27C E9 00 i. STA &C1 :\ A27E 85 C1 .A INY :\ A280 C8 H LDA (&A0),Y :\ A281 B1 A0 1 STA &C0 :\ A283 85 C0 .@ INY :\ A285 C8 H LDA (&A0),Y :\ A286 B1 A0 1 SEC :\ A288 38 8 SBC &C1 :\ A289 E5 C1 eA STA &C4 :\ A28B 85 C4 .D LDA #&00 :\ A28D A9 00 ). RTS :\ A28F 60 ` .LA290 LDA &C8 :\ A290 A5 C8 %H BNE LA2B7 :\ A292 D0 23 P# LDA #&2F :\ A294 A9 2F )/ JSR &FE52 :\ A296 20 52 FE R~ LDA #&20 :\ A299 A9 20 ) JSR &FE52 :\ A29B 20 52 FE R~ LDA &A6 :\ A29E A5 A6 %& JSR LA74A :\ A2A0 20 4A A7 J' LDA #&20 :\ A2A3 A9 20 ) JSR &FE52 :\ A2A5 20 52 FE R~ LDA &A7 :\ A2A8 A5 A7 %' JSR LA74A :\ A2AA 20 4A A7 J' LDA #&0A :\ A2AD A9 0A ). JSR &FE52 :\ A2AF 20 52 FE R~ LDA #&0D :\ A2B2 A9 0D ). JSR &FE52 :\ A2B4 20 52 FE R~ .LA2B7 LDA #&FF :\ A2B7 A9 FF ). RTS :\ A2B9 60 ` .LA2BA LDA #&10 :\ A2BA A9 10 ). .LA2BC BIT &B400 :\ A2BC 2C 00 B4 ,.4 BEQ LA2BC :\ A2BF F0 FB p{ LDA #&E5 :\ A2C1 A9 E5 )e STA &B401 :\ A2C3 8D 01 B4 ..4 RTS :\ A2C6 60 ` .LA2C7 LDA #&44 :\ A2C7 A9 44 )D STA &B400 :\ A2C9 8D 00 B4 ..4 LDA &A6 :\ A2CC A5 A6 %& .LA2CE BIT &B400 :\ A2CE 2C 00 B4 ,.4 BPL LA2CE :\ A2D1 10 FB .{ BVC LA2F4 :\ A2D3 50 1F P. STA &B402 :\ A2D5 8D 02 B4 ..4 LDA &B404 :\ A2D8 AD 04 B4 -.4 .LA2DB BIT &B400 :\ A2DB 2C 00 B4 ,.4 BPL LA2DB :\ A2DE 10 FB .{ BVC LA2F4 :\ A2E0 50 12 P. STA &B402 :\ A2E2 8D 02 B4 ..4 LDA &A7 :\ A2E5 A5 A7 %' .LA2E7 BIT &B400 :\ A2E7 2C 00 B4 ,.4 BPL LA2E7 :\ A2EA 10 FB .{ BVC LA2F4 :\ A2EC 50 06 P. STA &B402 :\ A2EE 8D 02 B4 ..4 LDA #&00 :\ A2F1 A9 00 ). RTS :\ A2F3 60 ` .LA2F4 LDA #&FF :\ A2F4 A9 FF ). RTS :\ A2F6 60 ` .LA2F7 LDA #&02 :\ A2F7 A9 02 ). STA &B400 :\ A2F9 8D 00 B4 ..4 .LA2FC BIT &B400 :\ A2FC 2C 00 B4 ,.4 BPL LA2FC :\ A2FF 10 FB .{ LDA #&02 :\ A301 A9 02 ). BIT &B400 :\ A303 2C 00 B4 ,.4 BEQ LA2F4 :\ A306 F0 EC pl LDA #&08 :\ A308 A9 08 ). BIT &B401 :\ A30A 2C 01 B4 ,.4 BEQ LA315 :\ A30D F0 06 p. JSR LA0D7 :\ A30F 20 D7 A0 W JMP LA2FC :\ A312 4C FC A2 L|" .LA315 LDA #&01 :\ A315 A9 01 ). BIT &B401 :\ A317 2C 01 B4 ,.4 BEQ LA2F4 :\ A31A F0 D8 pX LDA &B402 :\ A31C AD 02 B4 -.4 CMP &B404 :\ A31F CD 04 B4 M.4 BNE LA2F4 :\ A322 D0 D0 PP LDA #&01 :\ A324 A9 01 ). .LA326 BIT &B400 :\ A326 2C 00 B4 ,.4 BPL LA326 :\ A329 10 FB .{ BEQ LA2F4 :\ A32B F0 C7 pG LDA &B402 :\ A32D AD 02 B4 -.4 CMP &A6 :\ A330 C5 A6 E& BNE LA2F4 :\ A332 D0 C0 P@ LDA #&01 :\ A334 A9 01 ). .LA336 BIT &B400 :\ A336 2C 00 B4 ,.4 BPL LA336 :\ A339 10 FB .{ BEQ LA2F4 :\ A33B F0 B7 p7 LDA &B402 :\ A33D AD 02 B4 -.4 CMP &A7 :\ A340 C5 A7 E' BNE LA2F4 :\ A342 D0 B0 P0 .LA344 LDA #&01 :\ A344 A9 01 ). .LA346 BIT &B400 :\ A346 2C 00 B4 ,.4 BPL LA346 :\ A349 10 FB .{ BEQ LA35E :\ A34B F0 11 p. LDA &B402 :\ A34D AD 02 B4 -.4 STA (&C0),Y :\ A350 91 C0 .@ INY :\ A352 C8 H BNE LA344 :\ A353 D0 EF Po INC &C1 :\ A355 E6 C1 fA DEC &C4 :\ A357 C6 C4 FD BNE LA344 :\ A359 D0 E9 Pi JMP LA2F4 :\ A35B 4C F4 A2 Lt" .LA35E LDA #&02 :\ A35E A9 02 ). BIT &B401 :\ A360 2C 01 B4 ,.4 BNE LA386 :\ A363 D0 21 P! LDA #&02 :\ A365 A9 02 ). BIT &B400 :\ A367 2C 00 B4 ,.4 BEQ LA380 :\ A36A F0 14 p. LDA &B401 :\ A36C AD 01 B4 -.4 ROR A :\ A36F 6A j ROR A :\ A370 6A j ROR A :\ A371 6A j BCS LA383 :\ A372 B0 0F 0. ROR A :\ A374 6A j BCS LA383 :\ A375 B0 0C 0. ROR A :\ A377 6A j BCS LA383 :\ A378 B0 09 0. ROR A :\ A37A 6A j BCS LA383 :\ A37B B0 06 0. ROR A :\ A37D 6A j BCS LA383 :\ A37E B0 03 0. .LA380 JMP LA2F4 :\ A380 4C F4 A2 Lt" .LA383 JMP LA2F4 :\ A383 4C F4 A2 Lt" .LA386 JSR LA2BA :\ A386 20 BA A2 :" LDA #&01 :\ A389 A9 01 ). .LA38B BIT &B400 :\ A38B 2C 00 B4 ,.4 BPL LA38B :\ A38E 10 FB .{ BEQ LA383 :\ A390 F0 F1 pq LDA &B402 :\ A392 AD 02 B4 -.4 STA (&C0),Y :\ A395 91 C0 .@ CLD :\ A397 D8 X TYA :\ A398 98 . ADC &C0 :\ A399 65 C0 e@ STA &C2 :\ A39B 85 C2 .B LDY &C1 :\ A39D A4 C1 $A BCC LA3A2 :\ A39F 90 01 .. INY :\ A3A1 C8 H .LA3A2 STY &C3 :\ A3A2 84 C3 .C LDA #&00 :\ A3A4 A9 00 ). RTS :\ A3A6 60 ` \ Do an immediate operation \ ------------------------- \ src.stn port ctrl \ & &A7 &A8 &A9 &AA &AB &AC &AD &AE &AF \ RemoteJMP 4 addlo addhi P A X Y \ RemoteHALT 3 \ .LA3A7 LDA &A8 :\ Get control byte CMP #&01:BEQ LA3F6 :\ CMP #&02:BEQ LA41B :\ CMP #&03:BEQ LA3D9 :\ RemoteHALT CMP #&04:BEQ LA3BC :\ RemoteJMP JMP LA125 :\ Unrecognised, ignore \ Immediate &04 - RemoteJMP .LA3BC JSR LA2C7:BNE LA416 :\ A3BF D0 55 PU JSR LA5C1:BNE LA416 :\ A3C4 D0 50 PP LDX #&FF:TXS :\ A3C8 9A . LDA &AA:PHA :\ A3CB 48 H LDA &A9:PHA :\ A3CE 48 H LDA &AB:PHA :\ A3D1 48 H LDA &AC :\ A3D2 A5 AC %, LDX &AD :\ A3D4 A6 AD &- LDY &AE :\ A3D6 A4 AE $. RTI :\ A3D8 40 @ \ Immediate &03 .LA3D9 JSR LA2C7:BNE LA416 :\ A3DC D0 38 P8 JSR LA5C1:BNE LA416 :\ A3E1 D0 33 P3 LDX #&FF:TXS :\ A3E5 9A . LDA #&A3:PHA :\ Push &A3F3 LDA #&F3:PHA LDA #&00:PHA :\ Push P=&00 PHA :\ Push to balance a PLA JMP LA12D :\ Indirectly jump to &A3F3 to halt .LA3F3 JMP LA3F3 :\ Stall \ Immediate &01 .LA3F6 STX &FF :\ A3F6 86 FF .. LDA &A7:STA &A8 :\ A3FA 85 A8 .( LDA &A6:STA &A7 :\ A3FE 85 A7 .' LDX #&A7 :\ A400 A2 A7 "' JSR LA5D0 :\ A402 20 D0 A5 P% JSR LA58C:BNE LA416 :\ A408 D0 0C P. LDY &C5 :\ A40A A4 C5 $E JSR LA6D6:BNE LA416 :\ A40F D0 05 P. LDX &FF :\ A411 A6 FF &. JMP LA125 :\ A413 4C 25 A1 L%! .LA416 LDX &FF :\ A416 A6 FF &. JSR LA0E5 :\ A418 20 E5 A0 e \ Immediate &02 .LA41B STX &FF :\ A41B 86 FF .. LDA &A7:STA &A8 :\ A41F 85 A8 .( LDA &A6:STA &A7 :\ A423 85 A7 .' LDX #&A7 :\ A425 A2 A7 "' JSR LA5D0 :\ A427 20 D0 A5 P% LDA &A7:STA &A6 :\ A42C 85 A6 .& LDA &A8:STA &A7 :\ A430 85 A7 .' LDA &C2:STA &C0 :\ A434 85 C0 .@ LDA &C3:STA &C1 :\ A438 85 C1 .A JSR LA2C7:BNE LA416 :\ A43D D0 D7 PW JSR LA5C1:BNE LA416 :\ A442 D0 D2 PR LDY &C5 :\ A444 A4 C5 $E JSR LA2F7:BNE LA416 :\ A449 D0 CB PK JSR LA2C7:BNE LA416 :\ A44E D0 C6 PF JSR LA5C1:BNE LA416 :\ A453 D0 C1 PA LDX &FF :\ A455 A6 FF &. JMP LA125 :\ A457 4C 25 A1 L%! .LA45A PHP :\ A45A 08 . CLD :\ A45B D8 X TYA :\ A45C 98 . PHA :\ A45D 48 H SEI :\ A45E 78 x .LA45F LDY #&C5 :\ A45F A0 C5 E LDA #&04 :\ A461 A9 04 ). BIT &B401 :\ A463 2C 01 B4 ,.4 BEQ LA475 :\ A466 F0 0D p. STY &B401 :\ A468 8C 01 B4 ..4 LDA #&10 :\ A46B A9 10 ). BIT &B400 :\ A46D 2C 00 B4 ,.4 BEQ LA48B :\ A470 F0 19 p. .LA472 JSR LA4E4 :\ A472 20 E4 A4 d$ .LA475 LDA #&10 :\ A475 A9 10 ). BIT &B400 :\ A477 2C 00 B4 ,.4 BEQ LA45F :\ A47A F0 E3 pc LDA #&04 :\ A47C A9 04 ). LDY #&FF :\ A47E A0 FF . .LA480 BIT &B401 :\ A480 2C 01 B4 ,.4 BNE LA45F :\ A483 D0 DA PZ DEY :\ A485 88 . BNE LA480 :\ A486 D0 F8 Px JMP LA472 :\ A488 4C 72 A4 Lr$ .LA48B LDA &01,X :\ A48B B5 01 5. BNE LA492 :\ A48D D0 03 P. JMP LA5E9 :\ A48F 4C E9 A5 Li% .LA492 JSR LA5D0 :\ A492 20 D0 A5 P% LDY &C5 :\ A495 A4 C5 $E JSR LA58C :\ A497 20 8C A5 .% BNE LA4A5 :\ A49A D0 09 P. LDA #&00 :\ A49C A9 00 ). .LA49E BIT &B400 :\ A49E 2C 00 B4 ,.4 BPL LA49E :\ A4A1 10 FB .{ BVS LA4A8 :\ A4A3 70 03 p. .LA4A5 JSR LA4E4 :\ A4A5 20 E4 A4 d$ .LA4A8 STA &B402 :\ A4A8 8D 02 B4 ..4 JSR LA5C1 :\ A4AB 20 C1 A5 A% BNE LA4A5 :\ A4AE D0 F5 Pu LDA &00,X :\ A4B0 B5 00 5. BEQ LA4C4 :\ A4B2 F0 10 p. JSR LA526 :\ A4B4 20 26 A5 &% JSR LA58C :\ A4B7 20 8C A5 .% BNE LA4A5 :\ A4BA D0 E9 Pi JSR LA6D6 :\ A4BC 20 D6 A6 V& BNE LA4A5 :\ A4BF D0 E4 Pd JSR LA526 :\ A4C1 20 26 A5 &% .LA4C4 JSR LA4D7 :\ A4C4 20 D7 A4 W$ LDA #&00 :\ A4C7 A9 00 ). STA &C6 :\ A4C9 85 C6 .F .LA4CB JSR LA094 :\ A4CB 20 94 A0 . PLA :\ A4CE 68 h TAY :\ A4CF A8 ( PLP :\ A4D0 28 ( LDA &C6 :\ A4D1 A5 C6 %F STA &A5 :\ A4D3 85 A5 .% CLI :\ A4D5 58 X RTS :\ A4D6 60 ` .LA4D7 LDY &021C :\ A4D7 AC 1C 02 ,.. STY &B400 :\ A4DA 8C 00 B4 ..4 LDY &021D :\ A4DD AC 1D 02 ,.. STY &B401 :\ A4E0 8C 01 B4 ..4 RTS :\ A4E3 60 ` .LA4E4 JSR LA778 :\ A4E4 20 78 A7 x' LDA &021D :\ A4E7 AD 1D 02 -.. AND #&FE :\ A4EA 29 FE )~ STA &B401 :\ A4EC 8D 01 B4 ..4 LDA &B400 :\ A4EF AD 00 B4 -.4 STA &C6 :\ A4F2 85 C6 .F LDA &B401 :\ A4F4 AD 01 B4 -.4 STA &C7 :\ A4F7 85 C7 .G LDA &C8 :\ A4F9 A5 C8 %H BNE LA520 :\ A4FB D0 23 P# LDA #&3F :\ A4FD A9 3F )? JSR &FE52 :\ A4FF 20 52 FE R~ LDA #&20 :\ A502 A9 20 ) JSR &FE52 :\ A504 20 52 FE R~ LDA &C6 :\ A507 A5 C6 %F JSR LA74A :\ A509 20 4A A7 J' LDA #&20 :\ A50C A9 20 ) JSR &FE52 :\ A50E 20 52 FE R~ LDA &C7 :\ A511 A5 C7 %G JSR LA74A :\ A513 20 4A A7 J' LDA #&0A :\ A516 A9 0A ). JSR &FE52 :\ A518 20 52 FE R~ LDA #&0D :\ A51B A9 0D ). JSR &FE52 :\ A51D 20 52 FE R~ .LA520 JSR LA4D7 :\ A520 20 D7 A4 W$ JMP LA4CB :\ A523 4C CB A4 LK$ .LA526 LDA #&02 :\ A526 A9 02 ). STA &B400 :\ A528 8D 00 B4 ..4 .LA52B BIT &B400 :\ A52B 2C 00 B4 ,.4 BPL LA52B :\ A52E 10 FB .{ LDA #&02 :\ A530 A9 02 ). BIT &B400 :\ A532 2C 00 B4 ,.4 BEQ LA544 :\ A535 F0 0D p. LDA #&08 :\ A537 A9 08 ). BIT &B401 :\ A539 2C 01 B4 ,.4 BEQ LA549 :\ A53C F0 0B p. JSR LA0D7 :\ A53E 20 D7 A0 W JMP LA52B :\ A541 4C 2B A5 L+% .LA544 PLA :\ A544 68 h PLA :\ A545 68 h JSR LA4E4 :\ A546 20 E4 A4 d$ .LA549 LDA #&01 :\ A549 A9 01 ). BIT &B401 :\ A54B 2C 01 B4 ,.4 BEQ LA544 :\ A54E F0 F4 pt LDA &B402 :\ A550 AD 02 B4 -.4 CMP &B404 :\ A553 CD 04 B4 M.4 BNE LA544 :\ A556 D0 EC Pl LDA #&01 :\ A558 A9 01 ). .LA55A BIT &B400 :\ A55A 2C 00 B4 ,.4 BPL LA55A :\ A55D 10 FB .{ BEQ LA544 :\ A55F F0 E3 pc LDA &B402 :\ A561 AD 02 B4 -.4 CMP &00,X :\ A564 D5 00 U. BNE LA544 :\ A566 D0 DC P\ LDA #&02 :\ A568 A9 02 ). .LA56A BIT &B400 :\ A56A 2C 00 B4 ,.4 BPL LA56A :\ A56D 10 FB .{ BEQ LA544 :\ A56F F0 D3 pS LDA #&02 :\ A571 A9 02 ). BIT &B401 :\ A573 2C 01 B4 ,.4 BEQ LA544 :\ A576 F0 CC pL JSR LA2BA :\ A578 20 BA A2 :" LDA #&01 :\ A57B A9 01 ). .LA57D BIT &B400 :\ A57D 2C 00 B4 ,.4 BPL LA57D :\ A580 10 FB .{ BEQ LA544 :\ A582 F0 C0 p@ LDA &B402 :\ A584 AD 02 B4 -.4 CMP &01,X :\ A587 D5 01 U. BNE LA544 :\ A589 D0 B9 P9 RTS :\ A58B 60 ` .LA58C LDA #&44 :\ A58C A9 44 )D STA &B400 :\ A58E 8D 00 B4 ..4 LDA #&C5 :\ A591 A9 C5 )E STA &B401 :\ A593 8D 01 B4 ..4 LDA &00,X :\ A596 B5 00 5. .LA598 BIT &B400 :\ A598 2C 00 B4 ,.4 BPL LA598 :\ A59B 10 FB .{ BVC LA5BE :\ A59D 50 1F P. STA &B402 :\ A59F 8D 02 B4 ..4 LDA &B404 :\ A5A2 AD 04 B4 -.4 .LA5A5 BIT &B400 :\ A5A5 2C 00 B4 ,.4 BPL LA5A5 :\ A5A8 10 FB .{ BVC LA5BE :\ A5AA 50 12 P. STA &B402 :\ A5AC 8D 02 B4 ..4 LDA &01,X :\ A5AF B5 01 5. .LA5B1 BIT &B400 :\ A5B1 2C 00 B4 ,.4 BPL LA5B1 :\ A5B4 10 FB .{ BVC LA5BE :\ A5B6 50 06 P. STA &B402 :\ A5B8 8D 02 B4 ..4 LDA #&00 :\ A5BB A9 00 ). RTS :\ A5BD 60 ` .LA5BE LDA #&FF :\ A5BE A9 FF ). RTS :\ A5C0 60 ` .LA5C1 LDA #&39 :\ A5C1 A9 39 )9 STA &B401 :\ A5C3 8D 01 B4 ..4 .LA5C6 BIT &B400 :\ A5C6 2C 00 B4 ,.4 BPL LA5C6 :\ A5C9 10 FB .{ BVC LA5BE :\ A5CB 50 F1 Pq LDA #&00 :\ A5CD A9 00 ). RTS :\ A5CF 60 ` .LA5D0 SEC :\ A5D0 38 8 LDA &02,X :\ A5D1 B5 02 5. SBC &04,X :\ A5D3 F5 04 u. STA &C5 :\ A5D5 85 C5 .E LDA &03,X :\ A5D7 B5 03 5. SBC #&00 :\ A5D9 E9 00 i. STA &C3 :\ A5DB 85 C3 .C LDA &04,X :\ A5DD B5 04 5. STA &C2 :\ A5DF 85 C2 .B LDA &05,X :\ A5E1 B5 05 5. SEC :\ A5E3 38 8 SBC &C3 :\ A5E4 E5 C3 eC STA &C4 :\ A5E6 85 C4 .D RTS :\ A5E8 60 ` .LA5E9 LDA &02,X :\ A5E9 B5 02 5. CMP #&01 :\ A5EB C9 01 I. BEQ LA608 :\ A5ED F0 19 p. CMP #&02 :\ A5EF C9 02 I. BEQ LA669 :\ A5F1 F0 76 pv CMP #&03 :\ A5F3 C9 03 I. BNE LA5FA :\ A5F5 D0 03 P. JMP LA6F9 :\ A5F7 4C F9 A6 Ly& .LA5FA CMP #&04 :\ A5FA C9 04 I. BNE LA601 :\ A5FC D0 03 P. JMP LA71F :\ A5FE 4C 1F A7 L.' .LA601 LDA #&FF :\ A601 A9 FF ). STA &C6 :\ A603 85 C6 .F JMP LA4CB :\ A605 4C CB A4 LK$ .LA608 LDA &00,X :\ A608 B5 00 5. STA &A6 :\ A60A 85 A6 .& BEQ LA601 :\ A60C F0 F3 ps LDA &01,X :\ A60E B5 01 5. STA &A7 :\ A610 85 A7 .' INX :\ A612 E8 h INX :\ A613 E8 h INX :\ A614 E8 h INX :\ A615 E8 h INX :\ A616 E8 h JSR LA5D0 :\ A617 20 D0 A5 P% DEX :\ A61A CA J DEX :\ A61B CA J DEX :\ A61C CA J DEX :\ A61D CA J DEX :\ A61E CA J LDA &C2 :\ A61F A5 C2 %B STA &C0 :\ A621 85 C0 .@ LDA &C3 :\ A623 A5 C3 %C STA &C1 :\ A625 85 C1 .A LDA &C4 :\ A627 A5 C4 %D STA &A8 :\ A629 85 A8 .( LDA &C5 :\ A62B A5 C5 %E STA &A9 :\ A62D 85 A9 .) LDA #&FB :\ A62F A9 FB ){ STA &C5 :\ A631 85 C5 .E LDA #&01 :\ A633 A9 01 ). STA &C4 :\ A635 85 C4 .D LDA #&FF :\ A637 A9 FF ). STA &C3 :\ A639 85 C3 .C TXA :\ A63B 8A . SEC :\ A63C 38 8 SBC #&FB :\ A63D E9 FB i{ CLC :\ A63F 18 . ADC #&02 :\ A640 69 02 i. STA &C2 :\ A642 85 C2 .B JSR LA58C :\ A644 20 8C A5 .% BNE LA662 :\ A647 D0 19 P. LDY &C5 :\ A649 A4 C5 $E JSR LA6D6 :\ A64B 20 D6 A6 V& BNE LA662 :\ A64E D0 12 P. LDA &A8 :\ A650 A5 A8 %( STA &C4 :\ A652 85 C4 .D LDA &A9 :\ A654 A5 A9 %) STA &C5 :\ A656 85 C5 .E LDY &C5 :\ A658 A4 C5 $E JSR LA2F7 :\ A65A 20 F7 A2 w" BNE LA662 :\ A65D D0 03 P. JMP LA4C4 :\ A65F 4C C4 A4 LD$ .LA662 LDA #&FF :\ A662 A9 FF ). STA &C6 :\ A664 85 C6 .F JMP LA520 :\ A666 4C 20 A5 L % .LA669 LDA &00,X :\ A669 B5 00 5. STA &A6 :\ A66B 85 A6 .& BEQ LA601 :\ A66D F0 92 p. LDA &01,X :\ A66F B5 01 5. STA &A7 :\ A671 85 A7 .' INX :\ A673 E8 h INX :\ A674 E8 h INX :\ A675 E8 h INX :\ A676 E8 h INX :\ A677 E8 h JSR LA5D0 :\ A678 20 D0 A5 P% DEX :\ A67B CA J DEX :\ A67C CA J DEX :\ A67D CA J DEX :\ A67E CA J DEX :\ A67F CA J LDA &C2 :\ A680 A5 C2 %B STA &C0 :\ A682 85 C0 .@ LDA &C3 :\ A684 A5 C3 %C STA &C1 :\ A686 85 C1 .A LDA &C4 :\ A688 A5 C4 %D STA &A8 :\ A68A 85 A8 .( LDA &C5 :\ A68C A5 C5 %E STA &A9 :\ A68E 85 A9 .) LDA #&FB :\ A690 A9 FB ){ STA &C5 :\ A692 85 C5 .E LDA #&01 :\ A694 A9 01 ). STA &C4 :\ A696 85 C4 .D LDA #&FF :\ A698 A9 FF ). STA &C3 :\ A69A 85 C3 .C TXA :\ A69C 8A . SEC :\ A69D 38 8 SBC #&FB :\ A69E E9 FB i{ CLC :\ A6A0 18 . ADC #&02 :\ A6A1 69 02 i. STA &C2 :\ A6A3 85 C2 .B JSR LA58C :\ A6A5 20 8C A5 .% BNE LA662 :\ A6A8 D0 B8 P8 LDY &C5 :\ A6AA A4 C5 $E JSR LA6D6 :\ A6AC 20 D6 A6 V& BNE LA662 :\ A6AF D0 B1 P1 JSR LA526 :\ A6B1 20 26 A5 &% LDA &C0 :\ A6B4 A5 C0 %@ STA &C2 :\ A6B6 85 C2 .B LDA &C1 :\ A6B8 A5 C1 %A STA &C3 :\ A6BA 85 C3 .C LDA &A8 :\ A6BC A5 A8 %( STA &C4 :\ A6BE 85 C4 .D LDA &A9 :\ A6C0 A5 A9 %) STA &C5 :\ A6C2 85 C5 .E JSR LA58C :\ A6C4 20 8C A5 .% BNE LA662 :\ A6C7 D0 99 P. LDY &C5 :\ A6C9 A4 C5 $E JSR LA6D6 :\ A6CB 20 D6 A6 V& BNE LA662 :\ A6CE D0 92 P. JSR LA526 :\ A6D0 20 26 A5 &% JMP LA4C4 :\ A6D3 4C C4 A4 LD$ .LA6D6 LDA (&C2),Y :\ A6D6 B1 C2 1B .LA6D8 BIT &B400 :\ A6D8 2C 00 B4 ,.4 BPL LA6D8 :\ A6DB 10 FB .{ BVS LA6E5 :\ A6DD 70 06 p. .LA6DF LDA #&FF :\ A6DF A9 FF ). RTS :\ A6E1 60 ` JSR LA4E4 :\ A6E2 20 E4 A4 d$ .LA6E5 STA &B402 :\ A6E5 8D 02 B4 ..4 INY :\ A6E8 C8 H BNE LA6D6 :\ A6E9 D0 EB Pk INC &C3 :\ A6EB E6 C3 fC DEC &C4 :\ A6ED C6 C4 FD BNE LA6D6 :\ A6EF D0 E5 Pe JSR LA5C1 :\ A6F1 20 C1 A5 A% BNE LA6DF :\ A6F4 D0 E9 Pi LDA #&00 :\ A6F6 A9 00 ). RTS :\ A6F8 60 ` .LA6F9 LDA &00,X :\ A6F9 B5 00 5. BNE LA700 :\ A6FB D0 03 P. .LA6FD JMP LA601 :\ A6FD 4C 01 A6 L.& .LA700 JSR LA58C :\ A700 20 8C A5 .% BEQ LA708 :\ A703 F0 03 p. .LA705 JMP LA662 :\ A705 4C 62 A6 Lb& .LA708 LDA #&03 :\ A708 A9 03 ). .LA70A BIT &B400 :\ A70A 2C 00 B4 ,.4 BPL LA70A :\ A70D 10 FB .{ BVC LA705 :\ A70F 50 F4 Pt STA &B402 :\ A711 8D 02 B4 ..4 JSR LA5C1 :\ A714 20 C1 A5 A% BNE LA705 :\ A717 D0 EC Pl JSR LA526 :\ A719 20 26 A5 &% JMP LA4C4 :\ A71C 4C C4 A4 LD$ .LA71F LDA &00,X :\ A71F B5 00 5. BEQ LA6FD :\ A721 F0 DA pZ LDA #&FB :\ A723 A9 FB ){ STA &C5 :\ A725 85 C5 .E LDA #&01 :\ A727 A9 01 ). STA &C4 :\ A729 85 C4 .D LDA #&FF :\ A72B A9 FF ). STA &C3 :\ A72D 85 C3 .C TXA :\ A72F 8A . SEC :\ A730 38 8 SBC #&FB :\ A731 E9 FB i{ CLC :\ A733 18 . ADC #&02 :\ A734 69 02 i. STA &C2 :\ A736 85 C2 .B JSR LA58C :\ A738 20 8C A5 .% BNE LA705 :\ A73B D0 C8 PH LDY &C5 :\ A73D A4 C5 $E JSR LA6D6 :\ A73F 20 D6 A6 V& BNE LA705 :\ A742 D0 C1 PA JSR LA526 :\ A744 20 26 A5 &% JMP LA4C4 :\ A747 4C C4 A4 LD$ .LA74A PHP :\ A74A 08 . PHA :\ A74B 48 H LSR A :\ A74C 4A J LSR A :\ A74D 4A J LSR A :\ A74E 4A J LSR A :\ A74F 4A J JSR LA75D :\ A750 20 5D A7 ]' PLA :\ A753 68 h PHA :\ A754 48 H AND #&0F :\ A755 29 0F ). JSR LA75D :\ A757 20 5D A7 ]' PLA :\ A75A 68 h PLP :\ A75B 28 ( RTS :\ A75C 60 ` .LA75D CMP #&0A :\ A75D C9 0A I. BMI LA764 :\ A75F 30 03 0. CLC :\ A761 18 . ADC #&07 :\ A762 69 07 i. .LA764 ADC #&30 :\ A764 69 30 i0 JSR &FE52 :\ A766 20 52 FE R~ RTS :\ A769 60 ` SEI :\ A76A 78 x LDA #&A7 :\ A76B A9 A7 )' PHA :\ A76D 48 H LDA #&76 :\ A76E A9 76 )v PHA :\ A770 48 H PHP :\ A771 08 . PHA :\ A772 48 H JMP LA000 :\ A773 4C 00 A0 L. CLI :\ A776 58 X RTS :\ A777 60 ` .LA778 PLA :\ A778 68 h STA &C9 :\ A779 85 C9 .I PLA :\ A77B 68 h STA &CA :\ A77C 85 CA .J LDA &C8 :\ A77E A5 C8 %H BEQ LA78B :\ A780 F0 09 p. PLA :\ A782 68 h PLA :\ A783 68 h LDA &CA :\ A784 A5 CA %J PHA :\ A786 48 H LDA &C9 :\ A787 A5 C9 %I PHA :\ A789 48 H RTS :\ A78A 60 ` .LA78B LDA #&20 :\ A78B A9 20 ) JSR &FE52 :\ A78D 20 52 FE R~ PLA :\ A790 68 h STA &CB :\ A791 85 CB .K PLA :\ A793 68 h JSR LA74A :\ A794 20 4A A7 J' LDA &CB :\ A797 A5 CB %K JSR LA74A :\ A799 20 4A A7 J' LDA #&5D :\ A79C A9 5D )] JSR &FE52 :\ A79E 20 52 FE R~ LDA &CA :\ A7A1 A5 CA %J PHA :\ A7A3 48 H JSR LA74A :\ A7A4 20 4A A7 J' LDA &C9 :\ A7A7 A5 C9 %I PHA :\ A7A9 48 H JSR LA74A :\ A7AA 20 4A A7 J' LDA #&0A :\ A7AD A9 0A ). JSR &FE52 :\ A7AF 20 52 FE R~ LDA #&0D :\ A7B2 A9 0D ). JSR &FE52 :\ A7B4 20 52 FE R~ RTS :\ A7B7 60 ` BRK :\ A7B8 00 . STA &C6 :\ A7B9 85 C6 .F JSR LA094 :\ A7BB 20 94 A0 . PLA :\ A7BE 68 h TAY :\ A7BF A8 ( PLP :\ A7C0 28 ( LDA &C6 :\ A7C1 A5 C6 %F STA &A5 :\ A7C3 85 A5 .% CLI :\ A7C5 58 X RTS :\ A7C6 60 ` LDY &021C :\ A7C7 AC 1C 02 ,.. STY &B400 :\ A7CA 8C 00 B4 ..4 LDY &021D :\ A7CD AC 1D 02 ,.. STY &B401 :\ A7D0 8C 01 B4 ..4 RTS :\ A7D3 60 ` JSR LA778 :\ A7D4 20 78 A7 x' LDA &021D :\ A7D7 AD 1D 02 -.. AND #&FE :\ A7DA 29 FE )~ STA &B401 :\ A7DC 8D 01 B4 ..4 LDA &B400 :\ A7DF AD 00 B4 -.4 STA &C6 :\ A7E2 85 C6 .F LDA &B401 :\ A7E4 AD 01 B4 -.4 STA &C7 :\ A7E7 85 C7 .G LDA &C8 :\ A7E9 A5 C8 %H BNE LA810 :\ A7EB D0 23 P# LDA #&3F :\ A7ED A9 3F )? JSR &FE52 :\ A7EF 20 52 FE R~ LDA #&20 :\ A7F2 A9 20 ) JSR &FE52 :\ A7F4 20 52 FE R~ LDA &C6 :\ A7F7 A5 C6 %F JSR LA74A :\ A7F9 20 4A A7 J' LDA #&20 :\ A7FC A9 20 ) JSR &4852 :\ A7FE 20 52 48 RH LDA #&60 :\ A801 A9 60 )` PHA :\ A803 48 H .LA804 JSR LAFFD :\ A804 20 FD AF }/ BNE LA80E :\ A807 D0 05 P. PLA :\ A809 68 h PLA :\ A80A 68 h LDA #&00 :\ A80B A9 00 ). RTS :\ A80D 60 ` .LA80E PLA :\ A80E 68 h CLC :\ A80F 18 . .LA810 SBC #&00 :\ A810 E9 00 i. BEQ LA81B :\ A812 F0 07 p. PHA :\ A814 48 H JSR LA826 :\ A815 20 26 A8 &( JMP LA804 :\ A818 4C 04 A8 L.( .LA81B PLA :\ A81B 68 h CMP #&EE :\ A81C C9 EE In BNE LA823 :\ A81E D0 03 P. LDA #&F0 :\ A820 A9 F0 )p RTS :\ A822 60 ` .LA823 JMP LA91C :\ A823 4C 1C A9 L.) .LA826 CPY #&00 :\ A826 C0 00 @. BEQ LA83A :\ A828 F0 10 p. PHA :\ A82A 48 H TXA :\ A82B 8A . PHA :\ A82C 48 H LDX #&00 :\ A82D A2 00 ". TYA :\ A82F 98 . .LA830 DEX :\ A830 CA J BNE LA830 :\ A831 D0 FD P} DEY :\ A833 88 . BNE LA830 :\ A834 D0 FA Pz TAY :\ A836 A8 ( PLA :\ A837 68 h TAX :\ A838 AA * PLA :\ A839 68 h .LA83A RTS :\ A83A 60 ` .LA83B JSR LA8FB :\ A83B 20 FB A8 {( JSR LA906 :\ A83E 20 06 A9 .) JSR LA911 :\ A841 20 11 A9 .) JMP LAF00 :\ A844 4C 00 AF L./ RTS :\ A847 60 ` .LA848 LDA #&00 :\ A848 A9 00 ). LDX #&00 :\ A84A A2 00 ". .LA84C PHP :\ A84C 08 . SEI :\ A84D 78 x STA &A0 :\ A84E 85 A0 . STX &A1 :\ A850 86 A1 .! PLP :\ A852 28 ( RTS :\ A853 60 ` .LA854 LDY #&00 :\ A854 A0 00 . .LA856 LDA &00,X :\ A856 B5 00 5. STA &0080,Y :\ A858 99 80 00 ... INX :\ A85B E8 h INY :\ A85C C8 H CPY #&0A :\ A85D C0 0A @. BCC LA856 :\ A85F 90 F5 .u LDA #&20 :\ A861 A9 20 ) LDY #&06 :\ A863 A0 06 . .LA865 STA &008B,Y :\ A865 99 8B 00 ... DEY :\ A868 88 . BPL LA865 :\ A869 10 FA .z .LA86B INY :\ A86B C8 H LDA (&80),Y :\ A86C B1 80 1. CMP #&0D :\ A86E C9 0D I. BEQ LA87B :\ A870 F0 09 p. CPY #&07 :\ A872 C0 07 @. BCS LA87C :\ A874 B0 06 0. STA &008B,Y :\ A876 99 8B 00 ... BNE LA86B :\ A879 D0 F0 Pp .LA87B RTS :\ A87B 60 ` .LA87C JSR &F7D1 :\ A87C 20 D1 F7 Qw LSR &4D41 :\ A87F 4E 41 4D NAM EOR &3F :\ A882 45 3F E? NOP :\ A884 EA j BRK :\ A885 00 . .LA886 STA &02,X :\ A886 95 02 .. LDA #&00 :\ A888 A9 00 ). STA &01,X :\ A88A 95 01 .. STA &00,X :\ A88C 95 00 .. .LA88E LDA &0000,Y :\ A88E B9 00 00 9.. BMI LA8A4 :\ A891 30 11 0. INC &00,X :\ A893 F6 00 v. BNE LA88E :\ A895 D0 F7 Pw INC &01,X :\ A897 F6 01 v. BNE LA88E :\ A899 D0 F3 Ps DEC &02,X :\ A89B D6 02 V. BNE LA88E :\ A89D D0 EF Po LDA #&EF :\ A89F A9 EF )o JSR LA91C :\ A8A1 20 1C A9 .) .LA8A4 RTS :\ A8A4 60 ` .LA8A5 PHP :\ A8A5 08 . PHA :\ A8A6 48 H LSR A :\ A8A7 4A J LSR A :\ A8A8 4A J LSR A :\ A8A9 4A J LSR A :\ A8AA 4A J JSR LA8B8 :\ A8AB 20 B8 A8 8( PLA :\ A8AE 68 h PHA :\ A8AF 48 H AND #&0F :\ A8B0 29 0F ). JSR LA8B8 :\ A8B2 20 B8 A8 8( PLA :\ A8B5 68 h PLP :\ A8B6 28 ( RTS :\ A8B7 60 ` .LA8B8 CMP #&0A :\ A8B8 C9 0A I. BMI LA8BF :\ A8BA 30 03 0. CLC :\ A8BC 18 . ADC #&07 :\ A8BD 69 07 i. .LA8BF ADC #&30 :\ A8BF 69 30 i0 JSR OSBYTE :\ A8C1 20 F4 FF t. RTS :\ A8C4 60 ` .LA8C5 LDX #&00 :\ A8C5 A2 00 ". JSR &F876 :\ A8C7 20 76 F8 vx .LA8CA LDA &0100,Y :\ A8CA B9 00 01 9.. CMP #&30 :\ A8CD C9 30 I0 BCC LA8ED :\ A8CF 90 1C .. CMP #&3A :\ A8D1 C9 3A I: BCS LA8ED :\ A8D3 B0 18 0. AND #&0F :\ A8D5 29 0F ). PHA :\ A8D7 48 H TXA :\ A8D8 8A . ASL A :\ A8D9 0A . ASL A :\ A8DA 0A . STA &80 :\ A8DB 85 80 .. TXA :\ A8DD 8A . CLC :\ A8DE 18 . ADC &80 :\ A8DF 65 80 e. ASL A :\ A8E1 0A . STA &80 :\ A8E2 85 80 .. PLA :\ A8E4 68 h CLC :\ A8E5 18 . ADC &80 :\ A8E6 65 80 e. TAX :\ A8E8 AA * INY :\ A8E9 C8 H JMP LA8CA :\ A8EA 4C CA A8 LJ( .LA8ED CPX #&00 :\ A8ED E0 00 `. RTS :\ A8EF 60 ` .LA8F0 JSR &F876 :\ A8F0 20 76 F8 vx CMP #&0D :\ A8F3 C9 0D I. BEQ LA8FA :\ A8F5 F0 03 p. JMP &FA70 :\ A8F7 4C 70 FA Lpz .LA8FA RTS :\ A8FA 60 ` .LA8FB LDA #&D4:STA &020E :\ Hook into SAVEV LDA #&A9:STA &020F RTS .LA906 LDA #&7A:STA &020C :\ Hook into LOADV LDA #&AA:STA &020D RTS .LA911 LDA #&21:STA &0206 :\ Hook into CLIV LDA #&AD:STA &0207 RTS .LA91C CMP #&E0 :\ A91C C9 E0 I` BCS LA934 :\ A91E B0 14 0. JSR &F7D1 :\ A920 20 D1 F7 Qw LSR &544F :\ A923 4E 4F 54 NOT JSR &494C :\ A926 20 4C 49 LI EQUB &53 :\ A929 53 S EQUB &54 :\ A92A 54 T EOR &4E :\ A92B 45 4E EN EOR #&4E :\ A92D 49 4E IN EQUB &47 :\ A92F 47 G NOP :\ A930 EA j JMP LA9BC :\ A931 4C BC A9 L<) .LA934 CMP #&EF :\ A934 C9 EF Io BNE LA947 :\ A936 D0 0F P. JSR &F7D1 :\ A938 20 D1 F7 Qw LSR &204F :\ A93B 4E 4F 20 NO EOR (&45) :\ A93E 52 45 RE BVC LA98E :\ A940 50 4C PL EOR &4CEA,Y :\ A942 59 EA 4C YjL LDY &C9A9,X :\ A945 BC A9 C9 <)I SBC (&D0,X) :\ A948 E1 D0 aP EQUB &0B :\ A94A 0B . JSR &F7D1 :\ A94B 20 D1 F7 Qw BVC LA9A2 :\ A94E 50 52 PR EQUB &4F :\ A950 4F O EQUB &54 :\ A951 54 T NOP :\ A952 EA j JMP LA9BC :\ A953 4C BC A9 L<) CMP #&E2 :\ A956 C9 E2 Ib BNE LA96F :\ A958 D0 15 P. JSR &F7D1 :\ A95A 20 D1 F7 Qw LSR &49 :\ A95D 46 49 FI JMP &2045 :\ A95F 4C 45 20 LE LSR &544F :\ A962 4E 4F 54 NOT JSR &4F46 :\ A965 20 46 4F FO EOR &4E,X :\ A968 55 4E UN EQUB &44 :\ A96A 44 D NOP :\ A96B EA j JMP LA9BC :\ A96C 4C BC A9 L<) .LA96F CMP #&E3 :\ A96F C9 E3 Ic BNE LA988 :\ A971 D0 15 P. JSR &F7D1 :\ A973 20 D1 F7 Qw LSR &49 :\ A976 46 49 FI JMP &2045 :\ A978 4C 45 20 LE EQUB &54 :\ A97B 54 T EQUB &4F :\ A97C 4F O EQUB &4F :\ A97D 4F O JSR &414C :\ A97E 20 4C 41 LA EOR (&47) :\ A981 52 47 RG EOR &EA :\ A983 45 EA Ej JMP LA9BC :\ A985 4C BC A9 L<) .LA988 CMP #&E4 :\ A988 C9 E4 Id BNE LA9A5 :\ A98A D0 19 P. JSR &F7D1 :\ A98C 20 D1 F7 Qw LSR &49 :\ A98F 46 49 FI JMP &2045 :\ A991 4C 45 20 LE EOR (&55),Y :\ A994 51 55 QU EQUB &4F :\ A996 4F O EQUB &54 :\ A997 54 T EOR (&20,X) :\ A998 41 20 A EOR &53,X :\ A99A 55 53 US EOR &44 :\ A99C 45 44 ED JSR &5055 :\ A99E 20 55 50 UP NOP :\ A9A1 EA j .LA9A2 JMP LA9BC :\ A9A2 4C BC A9 L<) .LA9A5 PHA :\ A9A5 48 H JSR &F7D1 :\ A9A6 20 D1 F7 Qw LSR &5445 :\ A9A9 4E 45 54 NET EQUB &57 :\ A9AC 57 W EQUB &4F :\ A9AD 4F O EOR (&4B) :\ A9AE 52 4B RK JSR &5245 :\ A9B0 20 45 52 ER EOR (&4F) :\ A9B3 52 4F RO EOR (&20) :\ A9B5 52 20 R NOP :\ A9B7 EA j PLA :\ A9B8 68 h JSR LA8A5 :\ A9B9 20 A5 A8 %( .LA9BC PHA :\ A9BC 48 H JSR LA848 :\ A9BD 20 48 A8 H( BRK :\ A9C0 00 . .LA9C1 LDY #&01 :\ A9C1 A0 01 . STY &01,X :\ A9C3 94 01 .. CLC :\ A9C5 18 . ADC #&00 :\ A9C6 69 00 i. STA &02,X :\ A9C8 95 02 .. BCC LA9CD :\ A9CA 90 01 .. INY :\ A9CC C8 H .LA9CD STY &03,X :\ A9CD 94 03 .. LDA #&00 :\ A9CF A9 00 ). STA &00,X :\ A9D1 95 00 .. RTS :\ A9D3 60 ` PHP :\ A9D4 08 . CLD :\ A9D5 D8 X JSR LA854 :\ A9D6 20 54 A8 T( LDX #&03 :\ A9D9 A2 03 ". .LA9DB LDA &82,X :\ A9DB B5 82 5. STA &0109,X :\ A9DD 9D 09 01 ... DEX :\ A9E0 CA J BPL LA9DB :\ A9E1 10 F8 .x LDX #&06 :\ A9E3 A2 06 ". .LA9E5 LDA &8B,X :\ A9E5 B5 8B 5. STA &0100,X :\ A9E7 9D 00 01 ... DEX :\ A9EA CA J BPL LA9E5 :\ A9EB 10 F8 .x SEC :\ A9ED 38 8 LDA &88 :\ A9EE A5 88 %. SBC &86 :\ A9F0 E5 86 e. STA &0107 :\ A9F2 8D 07 01 ... LDA &89 :\ A9F5 A5 89 %. SBC &87 :\ A9F7 E5 87 e. STA &0108 :\ A9F9 8D 08 01 ... LDX #&82 :\ A9FC A2 82 ". LDA #&0D :\ A9FE A9 0D ). JSR LA9C1 :\ AA00 20 C1 A9 A) LDX #&FF :\ AA03 A2 FF ". STX &80 :\ AA05 86 80 .. LDY #&20 :\ AA07 A0 20 STY &81 :\ AA09 84 81 .. LDA #&40 :\ AA0B A9 40 )@ STA &8A :\ AA0D 85 8A .. STX &8B :\ AA0F 86 8B .. LDA #&21 :\ AA11 A9 21 )! STA &8C :\ AA13 85 8C .. LDX #&E8 :\ AA15 A2 E8 "h STX &8D :\ AA17 86 8D .. LDA #&00 :\ AA19 A9 00 ). STA &8E :\ AA1B 85 8E .. INX :\ AA1D E8 h STX &8F :\ AA1E 86 8F .. STA &90 :\ AA20 85 90 .. STA &91 :\ AA22 85 91 .. LDX #&00 :\ AA24 A2 00 ". LDA #&8A :\ AA26 A9 8A ). JSR LA84C :\ AA28 20 4C A8 L( LDX #&80 :\ AA2B A2 80 ". LDY #&30 :\ AA2D A0 30 0 LDA #&20 :\ AA2F A9 20 ) JSR LA800 :\ AA31 20 00 A8 .( LDA #&09 :\ AA34 A9 09 ). LDX #&80 :\ AA36 A2 80 ". LDY #&8A :\ AA38 A0 8A . JSR LA886 :\ AA3A 20 86 A8 .( LDA &E8 :\ AA3D A5 E8 %h BEQ LAA44 :\ AA3F F0 03 p. JSR LA91C :\ AA41 20 1C A9 .) .LAA44 LDA #&23 :\ AA44 A9 23 )# STA &8C :\ AA46 85 8C .. LDX #&8D :\ AA48 A2 8D ". LDA #&40 :\ AA4A A9 40 )@ JSR LA9C1 :\ AA4C 20 C1 A9 A) LDA #&40 :\ AA4F A9 40 )@ STA &8A :\ AA51 85 8A .. LDA #&FF :\ AA53 A9 FF ). STA &84 :\ AA55 85 84 .. LDA #&22 :\ AA57 A9 22 )" STA &85 :\ AA59 85 85 .. LDY #&30 :\ AA5B A0 30 0 LDX #&84 :\ AA5D A2 84 ". LDA #&21 :\ AA5F A9 21 )! JSR LA800 :\ AA61 20 00 A8 .( LDX #&80 :\ AA64 A2 80 ". LDY #&8A :\ AA66 A0 8A . LDA #&09 :\ AA68 A9 09 ). JSR LA886 :\ AA6A 20 86 A8 .( LDA &0100 :\ AA6D AD 00 01 -.. BEQ LAA75 :\ AA70 F0 03 p. JSR LA91C :\ AA72 20 1C A9 .) .LAA75 JSR LA848 :\ AA75 20 48 A8 H( PLP :\ AA78 28 ( RTS :\ AA79 60 ` PHP :\ AA7A 08 . CLD :\ AA7B D8 X JSR LA854 :\ AA7C 20 54 A8 T( LDX #&06 :\ AA7F A2 06 ". .LAA81 LDA &8B,X :\ AA81 B5 8B 5. STA &0100,X :\ AA83 9D 00 01 ... DEX :\ AA86 CA J BPL LAA81 :\ AA87 10 F8 .x LDX #&02 :\ AA89 A2 02 ". .LAA8B LDA &82,X :\ AA8B B5 82 5. STA &0107,X :\ AA8D 9D 07 01 ... DEX :\ AA90 CA J BPL LAA8B :\ AA91 10 F8 .x LDA #&FF :\ AA93 A9 FF ). STA &84 :\ AA95 85 84 .. LDA #&10 :\ AA97 A9 10 ). STA &85 :\ AA99 85 85 .. LDX #&86 :\ AA9B A2 86 ". LDA #&07 :\ AA9D A9 07 ). JSR LA9C1 :\ AA9F 20 C1 A9 A) LDA #&40 :\ AAA2 A9 40 )@ STA &8A :\ AAA4 85 8A .. LDA #&FF :\ AAA6 A9 FF ). STA &8B :\ AAA8 85 8B .. LDA #&11 :\ AAAA A9 11 ). STA &8C :\ AAAC 85 8C .. LDX #&8D :\ AAAE A2 8D ". LDA #&07 :\ AAB0 A9 07 ). JSR LA9C1 :\ AAB2 20 C1 A9 A) LDA #&00 :\ AAB5 A9 00 ). STA &91 :\ AAB7 85 91 .. LDX #&00 :\ AAB9 A2 00 ". LDA #&8A :\ AABB A9 8A ). JSR LA84C :\ AABD 20 4C A8 L( LDY #&30 :\ AAC0 A0 30 0 LDX #&84 :\ AAC2 A2 84 ". LDA #&10 :\ AAC4 A9 10 ). JSR LA800 :\ AAC6 20 00 A8 .( LDA #&09 :\ AAC9 A9 09 ). LDX #&80 :\ AACB A2 80 ". LDY #&8A :\ AACD A0 8A . JSR LA886 :\ AACF 20 86 A8 .( LDA &0100 :\ AAD2 AD 00 01 -.. BEQ LAADA :\ AAD5 F0 03 p. JSR LA91C :\ AAD7 20 1C A9 .) .LAADA LDY #&01 :\ AADA A0 01 . LDA &0109 :\ AADC AD 09 01 -.. BPL LAAE3 :\ AADF 10 02 .. LDY #&07 :\ AAE1 A0 07 . .LAAE3 CLC :\ AAE3 18 . LDA &0100,Y :\ AAE4 B9 00 01 9.. STA &8D :\ AAE7 85 8D .. ADC &0105 :\ AAE9 6D 05 01 m.. STA &8F :\ AAEC 85 8F .. LDA &0101,Y :\ AAEE B9 01 01 9.. STA &8E :\ AAF1 85 8E .. ADC &0106 :\ AAF3 6D 06 01 m.. STA &90 :\ AAF6 85 90 .. LDA #&13 :\ AAF8 A9 13 ). STA &8C :\ AAFA 85 8C .. LDA #&40 :\ AAFC A9 40 )@ STA &8A :\ AAFE 85 8A .. LDA #&12 :\ AB00 A9 12 ). STA &85 :\ AB02 85 85 .. LDX #&86 :\ AB04 A2 86 ". LDA #&01 :\ AB06 A9 01 ). JSR LA9C1 :\ AB08 20 C1 A9 A) LDX #&84 :\ AB0B A2 84 ". LDY #&30 :\ AB0D A0 30 0 LDA #&12 :\ AB0F A9 12 ). JSR LA800 :\ AB11 20 00 A8 .( LDA #&09 :\ AB14 A9 09 ). LDX #&80 :\ AB16 A2 80 ". LDY #&8A :\ AB18 A0 8A . JSR LA886 :\ AB1A 20 86 A8 .( LDA &8D :\ AB1D A5 8D %. STA &82 :\ AB1F 85 82 .. LDA &8E :\ AB21 A5 8E %. STA &83 :\ AB23 85 83 .. LDA &0103 :\ AB25 AD 03 01 -.. STA &84 :\ AB28 85 84 .. LDA &0104 :\ AB2A AD 04 01 -.. STA &85 :\ AB2D 85 85 .. JSR LA848 :\ AB2F 20 48 A8 H( PLP :\ AB32 28 ( RTS :\ AB33 60 ` .LAB34 LDA #&52:STA &0208 :\ Reset WRCHV to point to kernel LDA #&FE:STA &0209 RTS .LAB3F LDA #&94:STA &020A :\ Reset RDCH to point to kernel LDA #&FE:STA &020B RTS .LAB4A LDX #&1F :\ AB4A A2 1F ". .LAB4C STA &F1 :\ AB4C 85 F1 .q STX &F2 :\ AB4E 86 F2 .r .LAB50 LDY #&F9 :\ AB50 A0 F9 y STY &F3 :\ AB52 84 F3 .s LDX #&00 :\ AB54 A2 00 ". STX &F4 :\ AB56 86 F4 .t INY :\ AB58 C8 H BNE LAB5C :\ AB59 D0 01 P. INX :\ AB5B E8 h .LAB5C STY &F5 :\ AB5C 84 F5 .u STX &F6 :\ AB5E 86 F6 .v RTS :\ AB60 60 ` .LAB61 LDY #&02 :\ AB61 A0 02 . LDA #&07 :\ AB63 A9 07 ). PHA :\ AB65 48 H .LAB66 LDA #&EE :\ AB66 A9 EE )n JSR LA800 :\ AB68 20 00 A8 .( BEQ LAB8F :\ AB6B F0 22 p" PLA :\ AB6D 68 h SEC :\ AB6E 38 8 SBC #&01 :\ AB6F E9 01 i. BEQ LAB77 :\ AB71 F0 04 p. PHA :\ AB73 48 H JMP LAB66 :\ AB74 4C 66 AB Lf+ .LAB77 JSR LAB3F :\ AB77 20 3F AB ?+ JSR LAF00 :\ AB7A 20 00 AF ./ JSR LA848 :\ AB7D 20 48 A8 H( JSR &F7D1 :\ AB80 20 D1 F7 Qw ORA &540A :\ AB83 0D 0A 54 ..T EOR #&4D :\ AB86 49 4D IM EOR &20 :\ AB88 45 20 E EQUB &4F :\ AB8A 4F O EOR &54,X :\ AB8B 55 54 UT NOP :\ AB8D EA j BRK :\ AB8E 00 . .LAB8F PLA :\ AB8F 68 h RTS :\ AB90 60 ` .LAB91 JSR LAB4A :\ AB91 20 4A AB J+ LDA #&40 :\ AB94 A9 40 )@ STA &F0 :\ AB96 85 F0 .p LDA #&00 :\ AB98 A9 00 ). STA &F7 :\ AB9A 85 F7 .w LDA #&F9:STA &020A :\ Hook into RDCHV LDA #&AB:STA &020B LDA #&2B:STA &0208 :\ Hook into WRCHV LDA #&AC:STA &0209 LDA #&00:STA &B000 LDA #&DD CMP #&80:BNE LABBF LDA #&CC :\ ABBB A9 CC )L PHA :\ ABBD 48 H BRK :\ ABBE 00 . .LABBF JMP &C2C2 :\ ABBF 4C C2 C2 LBB .LABC2 LDA &020A :\ ABC2 AD 0A 02 -.. CMP #&F9 :\ ABC5 C9 F9 Iy BEQ LABDD :\ ABC7 F0 14 p. JSR &F7D1 :\ ABC9 20 D1 F7 Qw EOR (&45) :\ ABCC 52 45 RE EOR &544F :\ ABCE 4D 4F 54 MOT EOR &20 :\ ABD1 45 20 E LSR &544F :\ ABD3 4E 4F 54 NOT JSR &4E4F :\ ABD6 20 4F 4E ON ORA &EA0A :\ ABD9 0D 0A EA ..j RTS :\ ABDC 60 ` .LABDD LDA #&1C :\ ABDD A9 1C ). STA &F2 :\ ABDF 85 F2 .r LDX #&F1 :\ ABE1 A2 F1 "q LDA #&52 :\ ABE3 A9 52 )R LDY #&02 :\ ABE5 A0 02 . JSR LA800 :\ ABE7 20 00 A8 .( JSR LAB3F :\ ABEA 20 3F AB ?+ JSR LAF00 :\ ABED 20 00 AF ./ JSR LA848 :\ ABF0 20 48 A8 H( LDA #&00 :\ ABF3 A9 00 ). STA &B000 :\ ABF5 8D 00 B0 ..0 RTS :\ ABF8 60 ` TXA :\ ABF9 8A . PHA :\ ABFA 48 H TYA :\ ABFB 98 . PHA :\ ABFC 48 H .LABFD LDA #&1E :\ ABFD A9 1E ). STA &F2 :\ ABFF 85 F2 .r LDA #&F0 :\ AC01 A9 F0 )p LDX #&00 :\ AC03 A2 00 ". JSR LA84C :\ AC05 20 4C A8 L( LDX #&F1 :\ AC08 A2 F1 "q JSR LAB61 :\ AC0A 20 61 AB a+ .LAC0D LDA &F0 :\ AC0D A5 F0 %p BPL LAC0D :\ AC0F 10 FC .| JSR LA848 :\ AC11 20 48 A8 H( LDA #&40 :\ AC14 A9 40 )@ STA &F0 :\ AC16 85 F0 .p LDA &F3 :\ AC18 A5 F3 %s CMP &F5 :\ AC1A C5 F5 Eu BMI LAC24 :\ AC1C 30 06 0. JSR LAB50 :\ AC1E 20 50 AB P+ JMP LABFD :\ AC21 4C FD AB L}+ .LAC24 PLA :\ AC24 68 h TAY :\ AC25 A8 ( PLA :\ AC26 68 h TAX :\ AC27 AA * LDA &F9 :\ AC28 A5 F9 %y RTS :\ AC2A 60 ` STA &F9 :\ AC2B 85 F9 .y TXA :\ AC2D 8A . PHA :\ AC2E 48 H TYA :\ AC2F 98 . PHA :\ AC30 48 H LDA #&1D :\ AC31 A9 1D ). STA &F2 :\ AC33 85 F2 .r LDX #&F1 :\ AC35 A2 F1 "q JSR LAB61 :\ AC37 20 61 AB a+ PLA :\ AC3A 68 h TAY :\ AC3B A8 ( PLA :\ AC3C 68 h TAX :\ AC3D AA * LDA &F9 :\ AC3E A5 F9 %y JMP &FE55 :\ AC40 4C 55 FE LU~ PHP :\ AC43 08 . JSR LA8C5 :\ AC44 20 C5 A8 E( BNE LAC4C :\ AC47 D0 03 P. JMP &FA70 :\ AC49 4C 70 FA Lpz .LAC4C CPX #&FF :\ AC4C E0 FF `. BNE LAC65 :\ AC4E D0 15 P. JSR &F7D1 :\ AC50 20 D1 F7 Qw LSR &214F :\ AC53 4E 4F 21 NO! JSR &4946 :\ AC56 20 46 49 FI JMP &2045 :\ AC59 4C 45 20 LE EQUB &53 :\ AC5C 53 S EOR &52 :\ AC5D 45 52 ER LSR &45,X :\ AC5F 56 45 VE EOR (&EA) :\ AC61 52 EA Rj PLP :\ AC63 28 ( BRK :\ AC64 00 . .LAC65 STX &80 :\ AC65 86 80 .. JSR LA8F0 :\ AC67 20 F0 A8 p( LDA &020A :\ AC6A AD 0A 02 -.. CMP #&F9 :\ AC6D C9 F9 Iy BNE LAC76 :\ AC6F D0 05 P. LDA #&EC :\ AC71 A9 EC )l JSR LA91C :\ AC73 20 1C A9 .) .LAC76 LDA #&00 :\ AC76 A9 00 ). STA &81 :\ AC78 85 81 .. STA &85 :\ AC7A 85 85 .. LDA #&04 :\ AC7C A9 04 ). STA &82 :\ AC7E 85 82 .. LDA #&F1 :\ AC80 A9 F1 )q STA &83 :\ AC82 85 83 .. LDA #&AE :\ AC84 A9 AE ). STA &84 :\ AC86 85 84 .. LDA &B404 :\ AC88 AD 04 B4 -.4 STA &86 :\ AC8B 85 86 .. LDA #&50 :\ AC8D A9 50 )P LDX #&80 :\ AC8F A2 80 ". LDY #&60 :\ AC91 A0 60 ` JSR LA800 :\ AC93 20 00 A8 .( .LAC96 LDA &80 :\ AC96 A5 80 %. PHA :\ AC98 48 H LDA #&00 :\ AC99 A9 00 ). STA &F7 :\ AC9B 85 F7 .w LDA #&80 :\ AC9D A9 80 ). STA &F0 :\ AC9F 85 F0 .p LDA #&F0 :\ ACA1 A9 F0 )p LDX #&00 :\ ACA3 A2 00 ". JSR LA84C :\ ACA5 20 4C A8 L( .LACA8 LDX #&00 :\ ACA8 A2 00 ". PLA :\ ACAA 68 h PHA :\ ACAB 48 H JSR LAB4C :\ ACAC 20 4C AB L+ LDA #&40 :\ ACAF A9 40 )@ STA &F0 :\ ACB1 85 F0 .p .LACB3 LDA &B001 :\ ACB3 AD 01 B0 -.0 AND #&20 :\ ACB6 29 20 ) BEQ LACEE :\ ACB8 F0 34 p4 LDA &F0 :\ ACBA A5 F0 %p BPL LACB3 :\ ACBC 10 F5 .u LDA &F2 :\ ACBE A5 F2 %r CMP #&1E :\ ACC0 C9 1E I. BEQ LACDA :\ ACC2 F0 16 p. CMP #&1C :\ ACC4 C9 1C I. BEQ LACF4 :\ ACC6 F0 2C p, LDA &F3 :\ ACC8 A5 F3 %s CMP &F5 :\ ACCA C5 F5 Eu BPL LACA8 :\ ACCC 10 DA .Z LDA &F9 :\ ACCE A5 F9 %y JSR OSBYTE :\ ACD0 20 F4 FF t. .LACD3 PLA :\ ACD3 68 h LDA &F1 :\ ACD4 A5 F1 %q PHA :\ ACD6 48 H JMP LACA8 :\ ACD7 4C A8 AC L(, .LACDA CMP #&1E :\ ACDA C9 1E I. BNE LACA8 :\ ACDC D0 CA PJ JSR &FE94 :\ ACDE 20 94 FE .~ STA &F9 :\ ACE1 85 F9 .y JSR LAB50 :\ ACE3 20 50 AB P+ LDX #&F1 :\ ACE6 A2 F1 "q JSR LAB61 :\ ACE8 20 61 AB a+ JMP LACD3 :\ ACEB 4C D3 AC LS, .LACEE PLA :\ ACEE 68 h STA &80 :\ ACEF 85 80 .. JMP LAC76 :\ ACF1 4C 76 AC Lv, .LACF4 PLA :\ ACF4 68 h PLP :\ ACF5 28 ( JSR LA848 :\ ACF6 20 48 A8 H( RTS :\ ACF9 60 ` .LACFA EQUB &43 :\ ACFA 43 C .LACFB EOR (&54,X) :\ ACFB 41 54 AT LDA &5667 :\ ACFD AD 67 56 -gV EOR #&45 :\ AD00 49 45 IE EQUB &57 :\ AD02 57 W LDA &52E9 :\ AD03 AD E9 52 -iR EOR &4D :\ AD06 45 4D EM EQUB &4F :\ AD08 4F O EQUB &54 :\ AD09 54 T EOR &AC :\ AD0A 45 AC E, EQUB &43 :\ AD0C 43 C EOR (&4F) :\ AD0D 52 4F RO LSR &46 :\ AD0F 46 46 FF EQUB &AB :\ AD11 AB + EQUB &C2 :\ AD12 C2 B EQUB &44 :\ AD13 44 D EOR &4C :\ AD14 45 4C EL EOR &54 :\ AD16 45 54 ET EOR &AE :\ AD18 45 AE E. PLY :\ AD1A 7A z EQUB &3F :\ AD1B 3F ? EQUB &3F :\ AD1C 3F ? LDA &F856 :\ AD1D AD 56 F8 -Vx EQUB &EF :\ AD20 EF o LDX #&FF :\ AD21 A2 FF ". CLD :\ AD23 D8 X .LAD24 LDY #&00 :\ AD24 A0 00 . JSR &F876 :\ AD26 20 76 F8 vx DEY :\ AD29 88 . .LAD2A INY :\ AD2A C8 H INX :\ AD2B E8 h .LAD2C LDA LACFA,X :\ AD2C BD FA AC =z, BMI LAD49 :\ AD2F 30 18 0. CMP &0100,Y :\ AD31 D9 00 01 Y.. BEQ LAD2A :\ AD34 F0 F4 pt DEX :\ AD36 CA J .LAD37 INX :\ AD37 E8 h LDA LACFA,X :\ AD38 BD FA AC =z, BPL LAD37 :\ AD3B 10 FA .z INX :\ AD3D E8 h LDA &0100,Y :\ AD3E B9 00 01 9.. CMP #&2E :\ AD41 C9 2E I. BNE LAD24 :\ AD43 D0 DF P_ INY :\ AD45 C8 H DEX :\ AD46 CA J BCS LAD2C :\ AD47 B0 E3 0c .LAD49 STA &81 :\ AD49 85 81 .. LDA LACFB,X :\ AD4B BD FB AC ={, STA &80 :\ AD4E 85 80 .. CLC :\ AD50 18 . LDX #&00 :\ AD51 A2 00 ". JMP (&0080) :\ AD53 6C 80 00 l.. JSR &F7D1 :\ AD56 20 D1 F7 Qw EQUB &43 :\ AD59 43 C JMP &2049 :\ AD5A 4C 49 20 LI EQUB &54 :\ AD5D 54 T ADC (&61) :\ AD5E 72 61 ra BVS LADD2 :\ AD60 70 70 pp BVS LADC9 :\ AD62 70 65 pe STZ &EA :\ AD64 64 EA dj RTS :\ AD66 60 ` JMP LAD72 :\ AD67 4C 72 AD Lr- RTI :\ AD6A 40 @ EQUB &FF :\ AD6B FF . AND (&00),Y :\ AD6C 31 00 1. BCC LAD90 :\ AD6E 90 20 . STA (&00) :\ AD70 92 00 .. .LAD72 PHP :\ AD72 08 . CLD :\ AD73 D8 X JSR LA8C5 :\ AD74 20 C5 A8 E( DEX :\ AD77 CA J STX &0100 :\ AD78 8E 00 01 ... LDA #&FF :\ AD7B A9 FF ). STA &80 :\ AD7D 85 80 .. LDA #&30 :\ AD7F A9 30 )0 STA &81 :\ AD81 85 81 .. LDA #&01 :\ AD83 A9 01 ). LDX #&82 :\ AD85 A2 82 ". JSR LA9C1 :\ AD87 20 C1 A9 A) LDX #&08 :\ AD8A A2 08 ". .LAD8C LDA LAD69,X :\ AD8C BD 69 AD =i- STA &89,X :\ AD8F 95 89 .. DEX :\ AD91 CA J BNE LAD8C :\ AD92 D0 F8 Px LDA #&8A :\ AD94 A9 8A ). BNE LAD98 :\ AD96 D0 00 P. .LAD98 JSR LA84C :\ AD98 20 4C A8 L( LDX #&80 :\ AD9B A2 80 ". LDA #&30 :\ AD9D A9 30 )0 LDY #&30 :\ AD9F A0 30 0 JSR LA800 :\ ADA1 20 00 A8 .( LDA #&09 :\ ADA4 A9 09 ). LDX #&80 :\ ADA6 A2 80 ". LDY #&8A :\ ADA8 A0 8A . JSR LA886 :\ ADAA 20 86 A8 .( JSR LA848 :\ ADAD 20 48 A8 H( LDA #&00 :\ ADB0 A9 00 ). STA &80 :\ ADB2 85 80 .. LDA #&90 :\ ADB4 A9 90 ). STA &81 :\ ADB6 85 81 .. SEC :\ ADB8 38 8 LDA &8F :\ ADB9 A5 8F %. SBC &8D :\ ADBB E5 8D e. STA &82 :\ ADBD 85 82 .. LDA &90 :\ ADBF A5 90 %. SBC &8E :\ ADC1 E5 8E e. LDY #&00 :\ ADC3 A0 00 . TAX :\ ADC5 AA * BEQ LADD5 :\ ADC6 F0 0D p. .LADC8 LDA (&80),Y :\ ADC8 B1 80 1. JSR &FFF4 :\ ADCA 20 F4 FF t. INY :\ ADCD C8 H BNE LADC8 :\ ADCE D0 F8 Px INC &81 :\ ADD0 E6 81 f. .LADD2 DEX :\ ADD2 CA J BNE LADC8 :\ ADD3 D0 F3 Ps .LADD5 LDA (&80),Y :\ ADD5 B1 80 1. JSR &FFF4 :\ ADD7 20 F4 FF t. INY :\ ADDA C8 H CPY &82 :\ ADDB C4 82 D. BNE LADD5 :\ ADDD D0 F6 Pv PLP :\ ADDF 28 ( RTS :\ ADE0 60 ` .LADE1 STY &84 :\ ADE1 84 84 .. DEY :\ ADE3 88 . STX &8C :\ ADE4 86 8C .. STY &9898 :\ ADE6 8C 98 98 ... PHP :\ ADE9 08 . JSR LA8C5 :\ ADEA 20 C5 A8 E( BNE LADF2 :\ ADED D0 03 P. JMP &FA70 :\ ADEF 4C 70 FA Lpz .LADF2 STX &80 :\ ADF2 86 80 .. JSR LA8F0 :\ ADF4 20 F0 A8 p( LDX #&00 :\ ADF7 A2 00 ". STX &81 :\ ADF9 86 81 .. STX &83 :\ ADFB 86 83 .. STX &88 :\ ADFD 86 88 .. STX &8A :\ ADFF 86 8A .. INX :\ AE01 E8 h STX &82 :\ AE02 86 82 .. STX &85 :\ AE04 86 85 .. LDA #&B0 :\ AE06 A9 B0 )0 STA &84 :\ AE08 85 84 .. STA &86 :\ AE0A 85 86 .. LDA #&8B :\ AE0C A9 8B ). STA &87 :\ AE0E 85 87 .. LDA #&8C :\ AE10 A9 8C ). STA &89 :\ AE12 85 89 .. LDX #&80 :\ AE14 A2 80 ". LDY #&20 :\ AE16 A0 20 .LAE18 JSR LAFFD :\ AE18 20 FD AF }/ BEQ LAE2C :\ AE1B F0 0F p. TYA :\ AE1D 98 . LDY #&14 :\ AE1E A0 14 . JSR LA826 :\ AE20 20 26 A8 &( TAY :\ AE23 A8 ( DEY :\ AE24 88 . BPL LAE18 :\ AE25 10 F1 .q LDA #&40 :\ AE27 A9 40 )@ JSR LA91C :\ AE29 20 1C A9 .) .LAE2C LDA &8B :\ AE2C A5 8B %. AND #&F0 :\ AE2E 29 F0 )p BNE LAE37 :\ AE30 D0 05 P. LDA #&82 :\ AE32 A9 82 ). JMP LAE40 :\ AE34 4C 40 AE L@. .LAE37 LSR A :\ AE37 4A J LSR A :\ AE38 4A J LSR A :\ AE39 4A J LSR A :\ AE3A 4A J LSR A :\ AE3B 4A J TAX :\ AE3C AA * LDA LADE1,X :\ AE3D BD E1 AD =a- .LAE40 LDX #&00 :\ AE40 A2 00 ". STX &83 :\ AE42 86 83 .. STX &85 :\ AE44 86 85 .. STX &87 :\ AE46 86 87 .. STX &89 :\ AE48 86 89 .. STA &86 :\ AE4A 85 86 .. STA &8A :\ AE4C 85 8A .. LDA #&80 :\ AE4E A9 80 ). STA &88 :\ AE50 85 88 .. STA &84 :\ AE52 85 84 .. LDX #&80 :\ AE54 A2 80 ". LDY #&20 :\ AE56 A0 20 .LAE58 JSR LAFFD :\ AE58 20 FD AF }/ BEQ LAE6C :\ AE5B F0 0F p. TYA :\ AE5D 98 . LDY #&14 :\ AE5E A0 14 . JSR LA826 :\ AE60 20 26 A8 &( TAY :\ AE63 A8 ( DEY :\ AE64 88 . BPL LAE58 :\ AE65 10 F1 .q LDA #&41 :\ AE67 A9 41 )A JSR LA91C :\ AE69 20 1C A9 .) .LAE6C LDA #&F0 :\ AE6C A9 F0 )p AND &8B :\ AE6E 25 8B %. STA &B000 :\ AE70 8D 00 B0 ..0 LDY #&D0 :\ AE73 A0 D0 P JSR LA826 :\ AE75 20 26 A8 &( PLP :\ AE78 28 ( RTS :\ AE79 60 ` PHP :\ AE7A 08 . LDX #&00 :\ AE7B A2 00 ". JSR &F818 :\ AE7D 20 18 F8 .x LDX #&07 :\ AE80 A2 07 ". .LAE82 LDA &0140,X :\ AE82 BD 40 01 =@. CMP #&0D :\ AE85 C9 0D I. BEQ LAE8F :\ AE87 F0 06 p. DEX :\ AE89 CA J BNE LAE82 :\ AE8A D0 F6 Pv JMP LA87C :\ AE8C 4C 7C A8 L|( .LAE8F LDA #&FF :\ AE8F A9 FF ). STA &81 :\ AE91 85 81 .. STA &88 :\ AE93 85 88 .. LDA #&40 :\ AE95 A9 40 )@ STA &82 :\ AE97 85 82 .. LDA #&01 :\ AE99 A9 01 ). STA &84 :\ AE9B 85 84 .. STA &86 :\ AE9D 85 86 .. LDA #&40 :\ AE9F A9 40 )@ STA &83 :\ AEA1 85 83 .. LDA #&48 :\ AEA3 A9 48 )H STA &85 :\ AEA5 85 85 .. LDA #&40 :\ AEA7 A9 40 )@ STA &87 :\ AEA9 85 87 .. LDA #&41 :\ AEAB A9 41 )A STA &89 :\ AEAD 85 89 .. LDA #&40 :\ AEAF A9 40 )@ LDX #&8A :\ AEB1 A2 8A ". JSR LA9C1 :\ AEB3 20 C1 A9 A) LDA #&00 :\ AEB6 A9 00 ). STA &8E :\ AEB8 85 8E .. LDA #&87 :\ AEBA A9 87 ). LDX #&00 :\ AEBC A2 00 ". JSR LA84C :\ AEBE 20 4C A8 L( LDA #&60 :\ AEC1 A9 60 )` LDY #&30 :\ AEC3 A0 30 0 LDX #&81 :\ AEC5 A2 81 ". JSR LA800 :\ AEC7 20 00 A8 .( LDX #&8F :\ AECA A2 8F ". LDY #&87 :\ AECC A0 87 . LDA #&09 :\ AECE A9 09 ). JSR LA886 :\ AED0 20 86 A8 .( LDA &0100 :\ AED3 AD 00 01 -.. BEQ LAEDB :\ AED6 F0 03 p. JMP LA91C :\ AED8 4C 1C A9 L.) .LAEDB JSR LA848 :\ AEDB 20 48 A8 H( PLP :\ AEDE 28 ( RTS :\ AEDF 60 ` EQUB &87 :\ AEE0 87 . STX &89 :\ AEE1 86 89 .. STA &86 :\ AEE3 85 86 .. STA &8A :\ AEE5 85 8A .. LDA #&80 :\ AEE7 A9 80 ). STA &88 :\ AEE9 85 88 .. JMP LA800 :\ AEEB 4C 00 A8 L.( JMP LAC96 :\ AEEE 4C 96 AC L., JMP LAB91 :\ AEF1 4C 91 AB L.+ JMP LA84C :\ AEF4 4C 4C A8 LL( .LAEF7 JMP LA83B :\ AEF7 4C 3B A8 L;( JMP LAB34 :\ AEFA 4C 34 AB L4+ .LAEFD JMP LA826 :\ AEFD 4C 26 A8 L&( .LAF00 LDA #&0F:STA &0208 :\ Hook into WRCHV LDA #&AF:STA &0209 LDA #&00 :\ AF0A A9 00 ). STA &FE :\ AF0C 85 FE .~ RTS :\ AF0E 60 ` .LAF0F STA &D0 :\ AF0F 85 D0 .P TXA :\ AF11 8A . PHA :\ AF12 48 H TYA :\ AF13 98 . PHA :\ AF14 48 H BIT &FE :\ AF15 24 FE $~ BPL LAF55 :\ AF17 10 3C .< .LAF19 LDA #&7F :\ AF19 A9 7F ). STA &CF :\ AF1B 85 CF .O .LAF1D LDX #&05 :\ AF1D A2 05 ". .LAF1F LDA LAF60,X :\ AF1F BD 60 AF =`/ STA &C9,X :\ AF22 95 C9 .I DEX :\ AF24 CA J BPL LAF1F :\ AF25 10 F8 .x LDX #&C9 :\ AF27 A2 C9 "I LDY #&20 :\ AF29 A0 20 JSR LAFFD :\ AF2B 20 FD AF }/ BEQ LAF44 :\ AF2E F0 14 p. JSR LAEFD :\ AF30 20 FD AE }. DEC &CF :\ AF33 C6 CF FO BNE LAF1D :\ AF35 D0 E6 Pf LSR &FE :\ AF37 46 FE F~ JSR &F7D1 :\ AF39 20 D1 F7 Qw ORA &420A :\ AF3C 0D 0A 42 ..B EOR &53,X :\ AF3F 55 53 US EOR &0A0D,Y :\ AF41 59 0D 0A Y.. .LAF44 LDA &D0 :\ AF44 A5 D0 %P CMP #&03 :\ AF46 C9 03 I. BNE LAF4C :\ AF48 D0 02 P. LSR &FE :\ AF4A 46 FE F~ .LAF4C PLA :\ AF4C 68 h TAY :\ AF4D A8 ( PLA :\ AF4E 68 h TAX :\ AF4F AA * LDA &D0 :\ AF50 A5 D0 %P JMP &FE55 :\ AF52 4C 55 FE LU~ .LAF55 LDA &D0 :\ AF55 A5 D0 %P CMP #&02 :\ AF57 C9 02 I. BNE LAF4C :\ AF59 D0 F1 Pq ROR &FE :\ AF5B 66 FE f~ JMP LAF19 :\ AF5D 4C 19 AF L./ .LAF60 EQUB &EB :\ AF60 EB k EQUB &FF :\ AF61 FF . BNE LAF64 :\ AF62 D0 00 P. .LAF64 CMP (&00),Y :\ AF64 D1 00 Q. LDA #&05 :\ AF66 A9 05 ). STY &88DA :\ AF68 8C DA 88 .Z. PLA :\ AF6B 68 h ORA &C4 :\ AF6C 05 C4 .D EOR &45 :\ AF6E 45 45 EE LSR A :\ AF70 4A J PHP :\ AF71 08 . PHP :\ AF72 08 . ASL A :\ AF73 0A . ORA &05 :\ AF74 05 05 .. ORA &05 :\ AF76 05 05 .. ASL A :\ AF78 0A . ROL A :\ AF79 2A * ASL A :\ AF7A 0A . LSR A :\ AF7B 4A J ORA &05 :\ AF7C 05 05 .. ORA &07 :\ AF7E 05 07 .. EQUB &4B :\ AF80 4B K EQUB &C2 :\ AF81 C2 B LDY #&CA :\ AF82 A0 CA J ORA (&94) :\ AF84 12 94 .. BPL LAFB8 :\ AF86 10 30 .0 PHY :\ AF88 5A Z EQUB &E2 :\ AF89 E2 b EQUB &02 :\ AF8A 02 . PHP :\ AF8B 08 . TRB &64 :\ AF8C 14 64 .d TSB &41 :\ AF8E 04 41 .A BRA LAF9A :\ AF90 80 08 .. PHP :\ AF92 08 . PHP :\ AF93 08 . ORA (&00,X) :\ AF94 01 00 .. TSB &00 :\ AF96 04 00 .. CLC :\ AF98 18 . RTI :\ AF99 40 @ .LAF9A TXA :\ AF9A 8A . EQUB &02 :\ AF9B 02 . TSB &04 :\ AF9C 04 04 .. TRB &44 :\ AF9E 14 44 .D PHP :\ AFA0 08 . PHP :\ AFA1 08 . BRK :\ AFA2 00 . BRK :\ AFA3 00 . CPY &60 :\ AFA4 C4 60 D` JSR &52F0 :\ AFA6 20 F0 52 pR EQUB &62 :\ AFA9 62 b PHP :\ AFAA 08 . BRK :\ AFAB 00 . JSR &0035 :\ AFAC 20 35 00 5. CPY #&02 :\ AFAF C0 02 @. PHP :\ AFB1 08 . ASL A :\ AFB2 0A . EQUB &02 :\ AFB3 02 . EQUB &07 :\ AFB4 07 . ORA (&03,X) :\ AFB5 01 03 .. AND (&82),Y :\ AFB7 31 82 1. BRK :\ AFB9 00 . RTI :\ AFBA 40 @ ASL A :\ AFBB 0A . BRK :\ AFBC 00 . BIT &04 :\ AFBD 24 04 $. EQUB &02 :\ AFBF 02 . ORA (&52) :\ AFC0 12 52 .R EQUB &93 :\ AFC2 93 . EQUB &62 :\ AFC3 62 b SBC (&36),Y :\ AFC4 F1 36 q6 AND &05 :\ AFC6 25 05 %. RTS :\ AFC8 60 ` ORA (&78) :\ AFC9 12 78 .x INX :\ AFCB E8 h ORA &91 :\ AFCC 05 91 .. CMP (&10,X) :\ AFCE C1 10 A. BRK :\ AFD0 00 . CLI :\ AFD1 58 X EQUB &02 :\ AFD2 02 . RTI :\ AFD3 40 @ ORA (&00,X) :\ AFD4 01 00 .. ORA (&04,X) :\ AFD6 01 04 .. EQUB &02 :\ AFD8 02 . EQUB &02 :\ AFD9 02 . INC A :\ AFDA 1A . BRK :\ AFDB 00 . CPY &00 :\ AFDC C4 00 D. ORA &41 :\ AFDE 05 41 .A EQUB &82 :\ AFE0 82 . STA (&38) :\ AFE1 92 38 .8 BVS LAFF9 :\ AFE3 70 14 p. LDY &D0 :\ AFE5 A4 D0 $P CPX #&60 :\ AFE7 E0 60 `` BRA &B05E :\ AFE9 80 73 .s EQUB &E2 :\ AFEB E2 b AND &A0 :\ AFEC 25 A0 % BEQ LAFE4 :\ AFEE F0 F4 pt PLP :\ AFF0 28 ( BRK :\ AFF1 00 . BRK :\ AFF2 00 . BRK :\ AFF3 00 . ORA (&04,X) :\ AFF4 01 04 .. EOR (&4C,X) :\ AFF6 41 4C AL ROR A :\ AFF8 6A j .LAFF9 EQUB &A7 :\ AFF9 A7 ' JMP &0000 :\ AFFA 4C 00 00 L.. .LAFFD JMP LA45A :\ AFFD 4C 5A A4 LZ$ ]NEXT SAVE "*SAVE ";~mcode%;" ";~O%;" ";~exec%;" ";~load%