US Home
Automation

(Last updated: Friday October 7 2016)
Google
 

Omnimon XL source code

As I understand it, Wes Newell, founder of Newell Industries (known for Omnimon and many other upgrades) sent ANTIC (the Atari Podcast) hundreds of pages of documentation and source code to scan, and put online. And Wes put it in the public domain! Antic announced this in Massive trove of Newll Engineering ... (June 2016, Atariage)

I'm sharing this because I've needed to figure out a way to get omnimon to work in the Atari800 emulator under Curses. The curses version doesn't allow for simultaneous keys. I may have to add support to Omnimon but I'm not sure how to yet. Also I've added a few lines. Mostly to help me with lining things up properly (or at least close). I also know about the names and number being mixed with 0, O, 1, I, | and !. Those will be worked on later when I actually attempt to assemble the code with atasm (and maybe even MAC/65).

Note: This is a work in progress. I have roughly 7 or 8 pages done (out of about 57 pages). I'm working on about a page a day. So there is a lot of junk.

Omnimon XL MAC65 Source

Grab the actual text file: omnimon-src.txt

; Incomplete Atari Omnimon XL listing (A Work in Progress) ; The OSNXL Operating System ; ROM Address Computer Address Function ; 0000-0FFF C000-CFFF Omnimon (XL/XE) ; 1000-17FF 5000-57FF Omnimon (See note) ; 1800-1FFF D800-DFFF Fastchip Floating Point Routines ; 2000-3FFF E000-FFFF OS ; Note: This portion of the rom is only visible to the computer when ; bit 7 of address $D301 is 0. When this occurs, the portion of the OS ; is mapped over the RAM at location $5000. -------------------------------------------------------------------------------- Page 1 D2:0SNXLV2,M65 0000 10 * = *E400 ; =7000 15 .set 6,-$9000 =D01F 16 CONSOL = $D01F ; njc =E459 20 SIOV = $E459 =E45C 25 SETVBV = $E450 =E468 30 SENDEV = $E46S ; 5400 FBF3 35 EDITOR .WORD $F3FC-1 5402 33F6 40 .WORD $F634-1 5404 3DF6 45 .WORD $F63E-1 5406 A3F6 50 .WORD $F6A4-1 5408 33FC 55 .WORD $F634~1 540A 3CF6 60 .WORD $F63D-1 540C 4CDOF3 65 JMP $F3D0 ; PWRONA 54OF 70 .BYTE 0 ; 5410 F5FE 75 DISPLA .WORD $F3F6-1 5412 33F6 80 .WORD $F634~1 5414 92F5 85 .WORD $F593~1 5416 B6F5 90 .WORD $F5B7-1 5418 33F6 95 .WORD $F634-1 541A DCFC 0100 .WORD $FCDD~1 541C 4CDOF3 0105 JMP $F3D0 541F 00 0110 .BYTE 0 ; 5420 33F6 0115 KBDHND .WORD $F634-1 5422 33F6 0120 .WORD $F634-1 5424 E1F6 0125 .WORD $F6E2-1 5426 3CF6 0130 .WORD $F63D~1 5428 33F6 0135 .WORD $F634~i 542A 3CF6 0140 .WORD $F63D-1 542C 4CD0F3 0145 JMP $F3D0 542F 00 0150 .BYTE 0 ; 5430 9EEE 0155 PTRHND .WORD PHOPEN-1 5432 DBEE 0160 .WORD PHCLOS-1 5434 9DEE 0165 .WORD BADST-1 5436 A6EE 0170 .WORD PHWRIT-1 5438 80EE 0175 .WORD PHSTAT~1 543A 9DEE 0180 .WORD BADST-1 543C 4C78EE 0185 JMP PHINIT 543F 00 0190 .byte 0 ; 5440 4BEF 0195 CASHND .WORD OPENC-1 5442 2AF0 0200 .WORD $F02B-1 5444 D5EF 0205 .WORD GBYTE-1 5446 OFFO 0210 .WORD $F010-1 5448 27F0 0215 .WORD $F028-1 544A 4AEF 0220 .WORD SPECIA—1 544C 4C41EF 0225 JMP INIT 544F 00 0230 .BYTE 0 ; 5450 4CEAED 0235 JMP DINIT 5453 4CF0ED 0240 JMP DSKIF 5456 4CC4E4 0245 JMP CIO 5459 4C59E9 0250 JMP 810 545C 4CEDE8 0255 JMP SETVBL 545F 4CAEE7 0260 JMP SYSVBL 5462 4COSE9 0265 JMP XITVBL 5465 4C44E9 0270 JMP SIOINT 5468 4CF2EB 0275 JMP SENDEN 546B 4CD5E6 0280 JMP IHINIT 546E 4CA6E4 0285 JMP CIOINT 5471 4CC9F2 0290 JMP BLACKB Page 2 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5474 4C1BF1 0295 JMP RESET 5477 4C25F1 0300 JMP PWRUP 547A 4CE9EF 0305 JMP RBLOK 547D 4C50EF 0310 JMP OPIMP 5480 90E7 0315 .WORD SYRTI 5482 8FE7 0320 .WORD SYIRQB 5484 8FE7 0325 .WORD SYIRQB 5486 8FE7 0330 .WORD SYIRQB 5488 BEFF 0335 .WORD $FFBE 548A OFEB 0340 .WORD ISRSIR 548C 90EA 0345 .WORD ISRODN 548E CFEA 0350 .WORD ISRTD 5490 8F37 0355 .WORD SYIRQB 5492 8FE7 0360 .WORD SYIRQB 5494 8FE7 0365 .WORD SYIRQB 5496 06E7 0370 .WORD SYIRQ 5498 00000000 0375 .BYTE 0,0,0,0,0,0,0,0,0,0 549C 00000000 5490 0000 54A2 AEE7 0380 .WORD SYSVBL 54A4 05E9 0385 .WORD XITVBL ; 54A6 A200 0390 CIOINT LDX #0 54A8 A9FF 0395 CI0I1 LDA #$FF 54AA 904003 0400 STA $0340,X 54AD A9C0 0405 LDA #$C0 54AF 904603 0410 STA $0346,X 54B2 A9E4 0415 LDA #$E4 54B4 9D4703 0420 STA $0347,X 54B7 8A 0425 TXA 54B8 18 0430 CLC 54B9 6910 0435 ADC #$10 54BB AA 0440 TAX 54BC C980 0445 CMP #$80 54BE 90E8 0450 BCC CI0I1 54C0 60 0455 RTS ; =E4C0 0460 ERRTN = $E4C0 =00E4 0465 ERRTNH = $E4 =00C0 0470 ERRTNL = $C0 ; 54C1 A085 0475 LDY #$85 54C3 60 0480 RTS 54C4 852F 0485 CIO STA $2F 54C6 862E 0490 STX $2E 54C8 8A 0495 TXA 54C9 290F 0500 AND #$0F 54CB D004 0505 BNE CIERR1 54CD E080 0510 CPX #$80 54CF 9005 0515 BCC IOC1 54D1 A086 0520 CIERR1 LDY #$86 54D3 4C1BE6 0525 JMP CIRTN1 54D6 A000 0530 IOC1 LDY #0 54D8 B04003 0535 IOC1A LDA $0340,X 54DB 992000 0540 STA $20,Y 54DE ES 0545 INX 54DF C8 0550 INY 54E0 COOC 0555 CPY #12 54E2 90F4 0560 BCC IOC1A 54E4 A084 0565 LDY #$84 54E6 A522 0570 LDA $22 Page 3 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 54ES C903 0575 CMP #3 54EA 9025 0580 BCC CIERR4 54EC AS 0585 TAY 54ED C00E 0590 CPY #$0E 54EF 9002 0595 BCC IOC2 54F1 A00E 0600 LDY #$0E 54F3 8417 0605 IOC2 STY $17 54F5 B9C6E6 0610 LDA COMTAB-3,Y 54F8 FOOF 0615 BEG CIOPEN 54FA C902 0620 CMP #2 54FC F035 0625 BEG CICLOS 54FE C908 0630 CMP #8 5500 B04C 0635 BCS CISTSP 54FR C904 0640 CMP #4 5504 F063 0645 BEG CIREAD 5506 4CC9E5 0650 JMP CIWRIT ; 5509 A520 0655 CIOPEN1 LDA $20 550B C9FF 0660 CMP #$FF 550D F005 0665 BEG IOC6 55OF AO81 0670 CIERR3 LDY #$81 5511 4C1BE6 0675 CIERR4 JMP CIRTN1 5514 209EE6 0680 IOC6 JSR DEVSRC 5517 B0F8 0685 BCS CIERR4 5519 203DE6 069O IOC7 JSR COMENT 551C B0F3 0695 BCS CIERR4 551E 2089E6 0700 JSR GOHAND 5521 A90B 0705 LDA #$0B 5523 8517 0710 STA $17 5525 203DE6 0715 JSR COMENT 5528 A52C 0720 LDA $2C 552A 8526 0725 STA $26 552C A52D 0730 LDA $2D 552E 8527 0735 STA $27 5530 4C1DE6 0740 JMP CIRTN2 5533 A001 0745 CICLOS LDY #1 5535 8423 0750 STY $23 5537 203DE6 0755 JSR COMENT 553A B003 0760 BCS CICL02 553C 2089E6 O765 JSR GOHAND 553F A9FF 0770 CICLO2 LDA #$FF 5541 8520 0775 STA $20 5543 A9E4 0780 LDA #ERRTNH 5545 8527 0785 STA $27 5547 A9C0 0790 LDA #ERRTNL 5549 8526 0795 STA $26 5548 4C1DE6 0800 JMP CIRTN2 554E A520 0805 CISTSP LDA $20 5550 C9FF 0810 CMP #$FF 5552 D005 0815 BNE CIST1 5554 209EE6 0820 JSR DEVSRC 5557 B0B8 0825 BCS CIERR4 5559 203DE6 0830 CIST1 JSR COMENT 555C 2089E6 0835 JSR GOHAND 555F A62E 0840 LDX $2E 5561 BD4003 0845 LDA $0340,X 5564 8520 0850 STA $20 5566 4C1DE6 0855 JMP CIRTN2 5569 A522 0860 CIREAD LDA $22 Page 4 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 556B 256A 0865 AND $2A 556D 0005 0870 BNE RC I 1 A 556F A 083 0875 LDY #$83 5571 4C 1 BE 6 0880 RCI1B JMP CIRTN1 cr cr ***>• n U U / H 203DE6 0885 RCI1A JSR COMENT 5577 B0F8 0890 BCS RCI IB 5579 A 5 28 0895 L D A $28 557B 0529 0900 DR A $29 557D 0008 0905 BNE RC 1 3 557F 2089 E 6 09 1 0 JSR BOH AND bb 82 85 2F 09 1 5 ST A $2F 5584 4C1DE6 0920 JMP CIRTN2 5587 ( ) 0 {••• A 0925 RC I 3 JSR ' GO HAND 558 A 852F 0930 STA $ 2 F cr cr q p* ;J wJ CD a rt* c* oU oj 0935 Blii RC 1 4 558 E A 000 0940 LDY #0 5590 9124 0945 STA ($24) , Y cr cr q r> ww 7 X- 207 0E 6 0950 JSR INCBFF* 5595 /\ cr 1 7 M •. J x- xL 0955 LDA $22 5597 2902 0960 AND #2 5599 D00C 0965 BNE RC I 1 CT lm % J • l,J w U 7 L l AKOC 0970 LDA $ 2 F 559D C99B 0975 CMP #$9B 559F DO 06 0980 BNE RCI 1 55A 1 2063E6 0985 JSR DECBPL 55A4 drr^FS “ W W W W 0990 JMP RCI 4 55A7 206 3E 6 O 995 RC I 1 JSR DECBFL 55AA 00 0B 1 000 BNE RC 1 3 55 AT w w n w cr ■**i p> ri ui .a a. i 005 RC I 2 LDA $22 55 A E ■™: O /•, O 1 0 1 0 AND #2 5 5 BO 0011 1 0 1 5 BNE RC 1 4 cr cr r;. '*•> vJ 'J JlD jA. 2089E6 1 020 RC I 6 JSR : BOH AND cr cr tj cr nir r>cr O \J I 1 025 STA $2F 55 B 7 3 00 A 1 030 BMI RC I 4 55B9 A52F 1 035 LDA $2F 55 BB C99B 1 040 CMP #$9B 55BD DOF 3 1045 BNE RCI 6 55BF A989 1 050 RC 111 LDA #$89 55C 1 8523 •» cr cr X U %J vJ STA it T 4- x~. ■_.* 55 C 3 207 7 E6 1 060 RC I 4 JSR : SUBBFL 55C6 4C10E6 1 065 JMP CIRTN 2 55 C 9 /\ cr 0 1 * *»i w ■!«»« «<»♦« 1070 Cl WRIT LDA $22 55CB 7* S 7‘ A *Ua W .W I ” 1075 AND $2 A 55CD 0005 1 080 BNE WC I 1 A 55CF A 08 7 1 085 LDY #$87 55 D1 4 C 1 B E 6 1 090 WCI IB JMP CIRTN1 5504 203DE6 1 095 WCIi A JSR COMENT 5507 B0F8 1 1 00 BCS WCI IB 5509 A528 1 1 05 LDA $28 55 DB 0529 1110 ORA $29 5500 0006 1115 BNE WC 1 3 55 OF A52F 1 1 20 LDA $2F 55E 1 HIT jL 7 O U, O 4 ^* C.' 1 1 25 I NC $28 55 E 3 0006 1 1 30 BNE WCI 4 cr nr- cr %J A 000 1135 WC 13 LDY #0 cr cr r* -7 tJ vJ u. / B124 1 1 40 LDA ($24) , Y 55E9 85 2F 1 1 45 STA $2F 5SEB 2089E6 1 1 50 WC I 4 JSR BOH AND Page 5 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 55EE 3025 1155 BMI WCI5 55F0 2070E6 1 1 60 JSR I NCBFP cr cr r- ~r- jur ■„* A «C‘ o M -...J a‘„ aU 1165 LDA $22 cr cr cr cr •».♦* r --J ^ Q () ^ 1170 AND #2 55 F 7 D00C 1175 BNE we 1 1 55 F 9 n w jm i 1 1 80 LDA $2F 55FB C99B 1185 CMP #$9B 55FD DO 06 1 1 90 BNE WC I 1 55FF 2063E6 1195 JSR DECBFL 5602 4C15E6 1 200 JM P WC 1 5 5605 ^Uov'bo 1 205 WCI1 JSR DECBFL 5608 D0DB 121 0 BNE WC 1 3 560 A /■% cr r“! vj a8 aL •{ -~r. h cr WC I 2 LDA , <r “t> 7 1 4. oL 56 0C r-orr”' i r j. -> t T . ,f,,t * - .* AND #2 560E DO 05 1225 BNE WC I 5 56 1 0 A99B i o T X d d* LDA #$9B 56 1 2 2089E6 . ^ ~r .L d vJ JSR GQHAND 56 1 5 2077E6 1240 WCI5 JSR : SUBBFL 56 1 8 4C1DE6 1245 JMP CIRTN2 56 1 B 8423 1 250 CIRTNl STY $23 56 ID A42E 1255 CIRTN2 LDY $2E cr / i cr x r B94403 1 260 LDA $0344 , Y nr / o Or O ,c.. O cr /i o v j d n 1265 8 1 H $24 5624 B94503 1 270 LDA $0345 , Y cr j “7 ‘..J W 4~ J p cr r> e; Q w .u*. •{ •? **?' cr im >in> > \i»r STA $25 cr / no I™ 1 jT. A 2 00 1280 LDX #0 562 B B520 1285 CIRT3 LDA $20, X 562D 994003 1290 STA $0340, Y 5630 MM M. r: q C.O 1295 I NX 5631 C8 1 300 I NY cr / t ■ r *i E00C 1305 CPX #12 5634 90 F 5 1 3 1 0 BCC CIRT3 5636 A cr •“?. rr m „.i .c. r 1 3 1 5 L D A $2F 5638 A62E 1 320 LDX $2E 5 63 A /! “?■ M*f d X* 1 325 L D Y $23 56c-C 60 1 330 RTS 563D A 4 20 .y 1 •.:> *j C0MENT LDY $20 nr; / -?• c* O *„■ r r~- , ”.'i *M* .!•»« <t*M 1 3 4 0 CRY #$214-1 5641 9004 1345 eee COM 1 5643 A 08 5 i -^crr*. X •-.* %•* LDY #$85 5645 B0 1 B 1 355 BCS COM2 5647 B9 1 B0 3 1 0*60 COM 1 LDA $03 1 B , 564 A S52C 1 365 STA $2C 56 4 C B9 1 C03 1370 LDA $03 1 0 ? Y 564F 852D 1375 STA $ 2 D cr / cr -i w -~J J. A4 1 7 1 380 LDY $ 1 7 cwct 1 v* B9C6E6 1385 LDA C0MTAB-: cr / c r / • ^ , t « Jt| i * 1 1 f l A8 1 390 TAY 5657 B 1 2C 1395 LDA ( $20 , Y 5659 A A 1 400 TAX cr / cr a J cJti C8 1 405 I NY 565B p i op 1 4 1 0 LDA ( $20 , Y cr / cr r\ O U 8520 1415 STA $2D 56 5F 86 2 C 1420 S T X $2C 5 6 6 1 18 1 425 CLC 5662 60 1 430 COM2 RTS 5663 C628 1 435 DECBFL. DEC $28 5665 A528 1440 LDA $28 Page 6 D2:0SNXLV2,M66 ;--- -------- ---- -------- ----------------- ------------------ 5667 C9FF 1445 CMP #$FF 5669 D002 1450 BNE 0ECBF1 566B C629 i n f.“ i™ 1 i. «t -A u DEC $29 566D 0529 146 V DECBF1 ORA $29 566F 60 1465 RTS 5670 E624 1470 INCBFP INC $24 5672 0002 1475 BNE INCBFi 5674 E *5 2 h 1 480 INC $25 5676 60 1485 INCBFI RTS 5677 A62E 1 490 SUBBFL LDX $2E 5679 38 1495 SEC 56 7 A B 04 80 3 1500 LDA $0348 ? X 56? D E528 1 505 SBC $28 56 7 F 8528 1 5 1 0 STA $28 5681 BD4903 1515 LDA $0349 ? X 5684 E529 1520 SBC $29 5686 o«;9Q -j cr •“> er 4m* STA $29 5688 60 1 530 RTS 5689 A092 j nr r? cr GOHANO LOY #$92 56 8 B 2093E6 1540 JSR Cl JUMP 5 68 E 8423 1545 STY $23 5690 coco 1550 CRY #0 5692 60 i crcrcr iL ttv* %•*»’ ’mv RTS 5693 AA 1 560 Cl JUMP TAX 5694 A52D 1 565 LDA $20 5696 48 1 570 PH A 5697 A cr f*' hi -A 4 ^. W 1 5 7 5 L Da $ 2 C 5699 48 1580 PH A 569 A 8A 1 5 8 5 T X A 56 9B A62E 1590 LDX $2E 5690 60 1595 RTS 569E A 000 1 600 DEV SRC LDY #0 56 AO B 1 24 1 605 LDA ($24) , Y JOHa FOOC 161 0 BEQ CIERR2 56A4 A02 1 1 6 1 5 LDY #$21 56A6 09 1 AO 3 1620 DEVS 1 CMP $031 A ? Y 56A9 FOOA 1 APS *L ’.J 4m. W BEQ DEVS2 56 AB 88 1 630 DEY 56 AC 88 1635 DEY 5 6 AD 88 1 640 DEY 56AE 1 OF 6 1645 BPL DEVS1 56 BO A082 1650 CIEPP2 LDY #$82 56B2 TO o 1655 SEC 56 B3 B0 1 3 1660 BCS DEVS4 56B5 98 1 665 DEVS 2 TYA 56B6 8520 1 670 STA $20 56B8 70 •_>o 1675 a cr n w 1 Cm L/ 56B9 A 00 1 1 680 LDY #1 56 BB B 124 1 685 LDA ($24) , Y 56 BD E930 1 690 SBC #$30 jobr C90A 1695 CMP #$0A cr AP 1 **♦*•* U*« J. 9002 1 700 BCC DEVS 3 56C3 A90 1 1 705 LDA #1 56 C 5 8521 1 7 1 0 DEVS3 STA $21 56C7 18 1715 CLC 56 CS 60 1 720 DEVS4 RTS 56C9 00040404 •{ “7 -**7 c.- •it f 4m- *wvJ COMTAB BYTE 0 , 4 , 4 , 4 , 4 , 6 56CD 0406 Page 7 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 56CF 06060602 1730 .byte 6,6,6,2,8,10 56D3 080A 56D5 A940 1735 IHINIT LDA #$40 56D7 8D0ED4 1740 ST A $D40E 56 DA AD13D0 1745 LDA $D013 56DD 8DFA03 1 750 ST A $03FA 56E0 60 1755 RTS 56E 1 1760 **i* .*♦*- *f. ***** $E6F3 E~* / I*— jor o 6C1602 1765 P IRQ 3 MR ($0216) 56F6 80400402 1770 CMPTAB - bYTE $80 56FA 0 1081 020 *m» f p*»* ***** Dor c. 36081412 1775 ADRTAB - BYTE $36 5702 1 00E0C0A 5706 48 1 780 SYIRQ PH A 5707 AD0ED2 1 785 LDA $D20E 570 A ■—< 0 |f T . / 1790 AND #$20 570C D00D 1795 BNE SY I RQ2 57 0E A9DF 1800 LDA #$DF 5710 8D0ED2 1805 ST A *D20E 57 1 3 A5 1 0 1810 LDA $ 1 0 C7i e wi t X wi 8D0ED2 1815 ST A $D20E 5718 6C0A02 1 Q O j. JMP ( $020 A ) 57 IB 8 A 1825 SYIRQ2 TX A 57 1 C 48 1830 PH A 57 ID A 2 06 i O T cr. X Q 'nJ LDX #6 57 IF BDF6E6 1 840 LOOPM LDA CMPTAB j vJ / .li.. .In E005 1845 CPX #5 5724 D004 1850 E-iNE L00PM2 cr “7 * 7 * l. ***** * J**» »«*^ 25 1 0 1855 AND $ 1 0 cr ~7 o O *n». / .In. F005 1 860 BEQ LL 572A 2C0ED2 1865 L0QPM2 BIT $D20E 572D F 006 1 870 BEQ JMPP c;7?c W / .1.** i CA Q~y tr- X L4 / nJ LL DEX nr 7 7* 1 0ED 1 880 BPL LOOPM j-*-. »**y **»j* '..J ' .ll„ 4C62E7 1885 JMP S Y I RQ8 cr -*7 •*?* cr w / 49PP 1 890 JMPF EOR #$FF jn.. ...„ n.J. 8D0ED2 1895 STA $02OE 5 / -I'H A 5 1 0 1900 LDA $ 1 0 573C 8D0ED2 1 905 STA $D20E 57 3 F BDFEE6 1 9 1 0 LDA ADRTAB, X 5742 A A 1915 TAX 5743 B DO 002 1 920 LDA $0200, X 5746 8 DSC 02 1925 STA $028C 5749 BD0 1 02 1 930 LDA $0200+ 1 , 574C 8D8D02 1 935 STA $028D 57 4F 68 1940 PL A 5750 AA 1945 TAX C7C i J / -nJ X 6C8CO2 1950 JMP ($0280) ;--- -------- ---- -------- ----------------- ------------------ 5754 A900 1955 BRKKY2 LDA #0 5756 8511 1960 STA $11 5758 8DFF02 1965 STA $02FF 575B 8DF002 1970 STA $02F0 575E 854D 1975 STA $4D 5760 68 1980 PLA 5761 40 1985 RTI ; 5762 68 1990 SYIRQ8 PLA 5763 AA 1995 TAX 5764 2C02D3 2000 BIT $D302 Page 8 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5767 1006 2005 BPL SVIRQ9 5769 AD00D3 20 1 0 LDA *D300 576C 6C0202 20 1 5 JMP ( SO 20 2 ) 57 6F 2C03D3 2020 SYIRQ9 BIT *D30 •_i f / XL 1 006 cr xl. 4 ~ Q BPL SYIRQA 5774 AD01D3 2030 LDA *D301 nr- ~r ”7 7 -.J / / / 6Cu4u2 •*~i t\ T cr oCU - 2 *_J JMP < 'TO 204 ) 57 7 A 68 2040 SYIRQA PL A 577B 80 SCO 2 2045 STA *028C 577E 68 2050 PL A 577F 48 2055 PH A 5780 29 1 0 2060 AND #*10 CC 7 O P •_J / O ..U. F007 2065 BEQ SYRTI2 57S4 A DSC 02 2070 LDA *028C 5787 40 •*n **7 cr .nl. '-J / %.J PH A 5788 6C0602 2080 JMP (*0206) 578B A DSC 02 2085 SYRTI2 LDA *028 578E 48 2090 PH A 578F 68 2095 SYIRQB PL A 5790 40 2 1 00 SYRTI RTI 5791 2C0FD4 2 i 05 PNMI BIT *D40F 5794 1 003 211 0 BPL PNMI 1 5796 6 COO 02 -s cr »!»»■ »V- •*» *•«»* JMP (*0200) 5799 48 1 Of) »!•*• fit flttt **• PNMI 1 PH A 579A A DOF 04 • f i 'j b*. •Imp fL tint *»» ft LDA *D40F 579D 9920 4m / 4**» M 2 1 30 AND #*20 579F F003 «| *7- cr ■Ittt ait *aat* tttJ BEQ *+5 57 A 1 4C74E4 2 1 40 JMP *E474 57A4 8 A 2145 T X A 57 A5 48 2150 PHA 57A6 98 n c cr I w 5 ‘.J TV A 57A7 48 2160 PH A 5 7 AS 8D0F04 2165 STA *D40F 57AB 6C2202 2170 JMP (*0222) 57AE E614 XX. X t vJ SYSVBL INC *14 57 BO DO 08 2180 BNE SYSVBl 57B2 E64D *~y -1 pc •Uk i L . 1 w INC *4D 57B4 E 6 1 3 2 1 90 INC *13 57B6 DO 02 i Q r.=; aW -1* / W BNE SYSVBl 57BS E6 1 2 2200 ■it** »it*» INC *12 57BA A9FE P P f) nr; 4 **> 4*m V •**• SYSVBl LDA #*FE 57BC A 200 22 1 0 LDX #0 57BE A44D Pp 1 nr .1— 4m. it W LDY * 4 D 57 CO i 006 2220 BPL VBATRA r* w y %j / L .iL 854D P P p nr- liut tlttt tltn «t*» STA *4D 57 C 4 A 6 1 3 ..Ji LDX *13 57C6 A9F6 p r~, -*t- cr •l*t* »>**« *t*»* ***** LDA #*F6 57C8 854E 2240 VBATRA STA *4E 57CA 864F p ■'= A cr •C. 4-1 *+ %J STX *4F erppp f W w A200 p p cr ■Ittt 'l»»t ‘it/ ’ft’ LDX #0 57CE 20 DOE 8 •*7< ”Vi ir: ir* ■ittt alaat M*i ***** JSR DCTIMR 57D1 0003 2260 BNE SYSVB2 cr ** 7 * r\ “r 1 vJ / 20C AES P P A ^ tint tlit* ^t *« t* JSR JTIMR1 57D6 /\cr n •*“. 2270 SYSVB2 LDA *42 57D8 DO 08 P p “7 1C- ti»«f 4u> ** '«*J BNE XX IT 57DA BA 2280 TSX 57 DB BD040 1 2285 LDA *0104 , X 57DE 2904 PPQA til. 4*** / AND #4 Page 9 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 57E0 F003 2295 BEQ SYSVB3 57E2 4C05E9 2300 XXIT JMP XITVBL 57E5 AD0DD4 2305 SYSVB3 LDA $D40 57 EB SD3502 2310 STA $0235 57EB A DOC D 4 •< cr a- 1 LDA $D40C 57EE SD3402 t n ■Jin *...* a*** .♦* STA $0234 57F1 AD3102 T ■— l cr »* *j •• 1 'h*« L. D A $023 1 57F4 8D03D4 '*** -n* ,Ji .Ji STA $D403 57F 7 AD 3 002 /•**, **t -*7 f .u vJ LDA $0230 57 FA SD02D4 2340 STA $0402 57 FD AD 2 F 02 •-n T /i cr all. - 2 ' 4 --J LDA $ 022 F 5800 8D00D4 O '” 5 ' cr all. v* U STA $D400 5803 AD6F02 **;i- ir cr all - 2 * %J LDA $026F 5806 8 D 1 b‘ D O r> T 2 . STA $D0 1 B 5809 A 2 08 ■'“i T cr all - 2 ' O vJ LDX #8 cr q lj w O -J O 8 E 1 FDD a 2 - 2 ' / O STX $ DO IF 5QOE 58 i;* **7 cr all. * 2 ' / v* SCGLLP i CL I 58 OF B DC 002 2380 LDA $0280, X 58 i 2 454F O “i; Q cr; EQR ■$4F 5814 25 4 E 2390 AND $4E 5816 VD12DU “ 7 * *T Q cr »l— '»**^ / *•••/ STA $D 0 1 2 ? X 58 1 9 CA 2400 DEX 581 A 1 0F2 2405 BPL SCO LLP 58 1C AD F 4 02 24 1 0 LDA $02F 4 58 1 F 8D09D4 2415 STA $ D 4 O 9 irr q -™i o •-J .c.. ai_ ADF302 n yi -****. { '\ all. ^7 all. LDA *02F3 5825 8 DO 1 D4 '? 4. ^ S STA $0401 cr q r> O u o a.:, o A 20 2 2430 LDX #2 5S2A 20 D 0 E 8 2435 J SR DCTI MR 582D D003 2440 BNE SYSVB4 5S2F 20CDE8 2445 J SR JT I MR 2 cr n t n *.J C5 • J* -c. A O r*i al.. al„ 2450 SYSVB4 i LDX #2 5834 E 8 •~i /| cr cr all *7 vj -~J SYSVBB I N X 5835 E 8 2460 I NX 5836 BD 1 802 2465 LDA $02 18, X 5839 1 D 1 902 2470 ORA $02 19, X 563C F 006 J ~~i /j “7 cr aU. *7 / %J BEQ SYS VBA 583E 20 DOE 8 2480 JSR DCTI MR 5841 9 D 260 2 2485 STA $0226, X 5844 E008 2490 SYS VBA i CPX #8 5846 D0EC 2495 BNE SYSVBB 5848 AD0FD2 2500 L D A $D20F 58 4 B 2904 2 DUD AND #4 58 4 D F008 25 1 0 BEQ SYVB 6 A 58 4 F ADF 1 02 •“■ur -j cr L D A $02F 1 cr o cr r> *■»»♦ F 003 rim+m W» 4m» BEQ S Y V B 6 A 5854 CEF102 ” 7 i lh 4 -’y cr DEC $02F 1 cr o cr; “7 JwJ / AD2B02 O cr* **r SYVB 6 A LDA $022 585A F0 1 7 n c~ “7* cr* ,i*, - • , , •j* » 1 1 BEQ SYSVB7 585C AD0FD2 all %J 4 < J LDtt $D20F 58 5 F 2904 •-*> cr /j cr all-J^O AND #4 5861 DO 60 ncrcr.A f*, . « ,* » )t / BNE SYSVB 6 5863 CE2B02 •-“i cr cr- cr «*.* M*i *». j DEC $ 0 2 lB 5 8 6 6 D00B 2560 BNE SYSVB7 5868 A 90 3 7 > cr /_ cr .«*... *.rr* «,, / LDA #3 536A 8D2B02 2570 STA $ 02 2 B 586D AD09D2 “j cr ( “7 cr al~ w / O LDA $D209 5870 8DFC02 al.. 2 G . 1 v STA $02FC Page 10 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5873 A000 2585 SYSVB7 LDY #0 5875 A201 2590 LDX #1 5877 B900D3 2595 STLOOP LDA $0300 , Y 587A 4A 2600 L 8 R A 587B 4A 2605 L 8 R A 587C 4A 26 i 0 LSR A 587D ACu t r~f 2615 LSR A 587E 9D7S02 jL U X- V STA $0278 , X 5*88 1 CA / -•“« CT .«•«, O jL vJ DEX 5882 B900D3 2630 LDA $D3UU, Y 5885 290F n T cr .ii.. O •«.* U AND #$0F 5887 9D7802 2640 STA $0278, X 588A CA 2645 DEX 538B 88 2650 DEY 5S8C 1 0E9 2655 BPL STL OOP 588E A •■*« < \ 'T r*f jU -J 2660 LDX #3 5890 BD 1 0 D 0 2665 STRL LDA $D0 1 0 , X 5893 9D8402 2670 STA $0284, X 5896 BD 00 D 2 / *7 cr •»L O i LDA $ 0200 , X 5899 9 D 70 02 2680 STA $0270, X 589C BD04D2 2685 LDA $0204, X 589F 9D7402 2690 q r a o i m $0274, X 58A2 CA 2695 DEX 58 A3 i 0EB 2700 BPL STRL 58 A 5 SD 0 BD 2 2705 Si A $D20B 58 A 8 A 20 6 2710 LDX #6 58AA A 00 3 ^ / 1 u LDY #3 58AC B97802 7 Jw / jJ. V PTRLP LDA $0278, Y 58 AF 4 A 7 *7 “j cr »1— / >t(W '-»** LSR A 58 BO 4 A 2730 i CD L -~j r\ n H 58 B 1 4. A ri w»|< -..j LSR A cr o D *“> vJ t? jL 9D7D02 2740 STA $027D , X 58B5 A 900 2745 LDA #0 58B7 2 A 2750 R0L A 5SB8 9D7C02 ”7 cr cr all. / w w STA $02 7 C , X 58BB CA 2760 DEX 58BC CA 2765 DEX 5SBD 88 2770 DEY 58BE 1 0EC ••*7 ~7 cr »ln / 1 J BPL PTRLP 58C0 6C2402 97pn JMP ($0224) : 00 E 8 2785 SV7H ^ SYSVB7 / 256 — =0073 2790 SV7L ^ SYSVB7&255 58C3 A 9 00 2795 SYSVB 6 i LDA #0 nr o f*' r -‘ •~J O w *-J 3D 2 B0 2 2800 STA $022B 58 C 8 F0A9 2805 BEQ SYSVB7 58 C A 6C2602 28 1 0 JTIMR1 JMP ($0226) 58CD 6 C 280 2 P O -j cr 4«r mu aft* an/ J T I MR 2 , JMP ($0228) 58 DO BC 1 802 2020 DCTItiR ! LDY $0218, X 5803 DO 08 •~7 o ”7 1™ 1MI W U*M *•••• BNE DCT I M 1 58D5 BC 1 902 2830 LDY $02 1 9 , X 58D8 F 0 1 0 2835 BEQ DCTXF 58 DA DEI 902 2840 DEC $02 1 9 , X 58 DD DEI 802 ?Q4‘=; tUw Wi I MM DCT I M 1 ] DEC $0218, X 58 E0 D008 ,m l Q CT c! 'J BNE DCTXF !=;qp? BC 1 902 •**? p cr; cr V..* W vJ LDY $0219, X 58 E 5 D003 2860 BNE DCTXF 58E7 A 900 2865 LDA #0 58 E 9 60 2870 RTS Page 11 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 58EA A9FF 2875 DCTXF LDA #$FF 58EC 60 288O RTS ; 58ED 0A 2885 SETVBL ASL A 58EE 8D2D02 2890 ST A T-022D 58F 1 8A 9PQ c i ♦w w / w TXA cr r;) p- A 205 2900 LDX. #5 58F4 SD0AD4 2905 STA $D4QA 58 F 7 CA 29 1 0 SETLOP DEX 58F8 D0FD •~>0 *! cr. a*.. .* X *«J BNE SETLOP 58FA AE2D02 2920 LDX $022D 58FD 9D1702 7 i Q cr; • 1 — . • 4m. *»*./ STA $0217, X 5900 98 2930 TV A 5901 9D1602 m t cr .iU- '7 O U STA $0216, X 5904 60 2940 RTS 5905 68 A Q 4 F X I TVBL F LA 5906 AS 2950 TAY 5907 68 ™ Q cr; cr; 4u. / W W PL A 5908 A A 2960 TAX 5909 68 2965 PL A 590A 40 2970 RT I 5908 66667 E66 2975 « BYTE ‘£66 ? $ 66 „ $ 7 E , $66 „ 0 0 * $7C 5 9 OF 0000 7 C er.p 1 o W / 1 4... 4CEDES 2980 JMP $ESED 5915 A22D A Q Q cr ; .u / W TSTCTL LDX #45 5917 BDCEFE 2990 TSTCT1 LDA $FECE.,X 591 A CDF BO 2 O Q Q cr; CMP $02FB 59 ID F005 3000 BEQ TSTCT2 59 1 F CA 3005 DEX 5920 CA 30 1 0 DEX 5921 CA 30 1 5 DEX cr o ■O U / j.’.. 4. 1 OF 3 3020 BPL TSTCT1 5924 60 ~r s\ cr U ^ %J TSTCT2 RTS cr q *“■' «=• W w 3030 $E925 cr; q T* <=:; A03F 3035 HOWMCH LDY #$3F ; TEST MY WAY Q •“ 7 W / 4m. / 8405 3040 STY $05 5929 8406 3045 STY $06 5928 BIOS 3050 HWhICH LDA ($05) „ Y 592D 49FF 3055 ESP #$FF 59 2 F 9 1 05 3060 STA ( $05 ) , Y 593 1 D 1 05 3065 CMP ($05) , Y 5933 DO 08 3070 BNE ENDRAM cr i“* , t t c: •..J V -2* O 49FF 3075 EOR #$FF cr c> T “7 J70 / 9 1 05 3080 STA ($05) , Y 5939 E 6 O 6 3085 INC $06 59 3 B DoEE 3090 BNE HWMCH ;--- -------- ---- -------- ----------------- ------------------ 593D 60 3095 ENDRAM RTS ; 593E 3100 * = $E944 5944 A93C 3105 SI0INT LDA #$3C 5946 cm a on? 3 1 1 0 STA $D302 5949 A93C 31 15 LDA #$3C 594B 8D03D3 T i •****» •.-* J. jT. ’ STA $D303 594E A903 -j -“71 cr LDA #3 5950 8D3202 3 1 30 STA $0232 cr; o err -r vJ 7 ‘.J ■«.' 8541 -| ~?cr ■2* X STA $41 5955 8D0FD2 3 1 40 STA $D20F 5958 60 3145 RTS 5959 8A 3 1 50 SIO TSX 595A 8E1S03 -...j ‘.J STX $0318 Page 12 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 595D A901 3160 LDA #1 595F 8542 3 1 65 STA $42 5961 AD0003 3 1 70 LDA $0300 5964 C960 4 ~y cr* O 1 / vJ CMP #$60 5966 D003 3 1 80 BNE NOTCST 5968 4C80EB 3 1 85 JMP CASE NT 596B A 9 00 3 1 90 NOTCST LDA #0 59 6 D 8 D U b U-3 3 1 95 b I A 3 >U 2>Ur 5970 A90 1 3200 LDA #i cr o “7 O 8537 3205 STA $37 5974 A90D 32 1 0 COliMND LDA #$0D 5976 P, 5 3 6 •m -i cr ■2- .2. 1 U STA $36 5978 A928 ■m* 4 m. 4 ^. V COMFRM LDA #$28 59 7 A 8D04D2 •7* *-^ cr* '«• 1 dm 4 **» 'wJ STA $D204 597D A 900 •7’ . ,Ht , 71* O aL • J* V LDA #0 59 7 F 8 006 02 •~.f ■“* rr cr - 2 ' 42 - 2 '^J STA $D206 5982 18 3240 CLC 5983 A 000 03 “?• J “i ,1 cr • 2 * j 2 T •__* LDA $0300 5986 6D0103 CT /-•, ^•2 DO ADC $030 1 5939 671 r cr cr; ***** 4 «M *i«.J ADC #$FF 598B 803 A 02 3260 STA $02 3 A 598E A 002 03 **n* *• ic:’ -2‘ 42 O L.DA $0302 5991 8D3B02 -n- -T**y •2» j2 / STA $023 B 5994 ADO A0 3 t n 7 cr. ,1:.. / %2 LDA $030 A 5997 8D3C02 TOO A ■2* a2 O U STA $023C 59 9 A AD0B03 3285 LDA $030B 5990 803002 3290 STA $023 D 59 AO 18 T O Q CT *•■• * 4 nt * *i»»r CLC 59 A 1 A 93 A 3300 LDA #$3A 59 A 3 q cr t 0 •«.* jl 3305 S f A $32 59A5 6904 33 1 0 ADC #4 59A7 8534 •*?*“#*-» cr •2* -™ 1 I vJ STA $34 59A9 A 90 2 t *\* r « M 7i •«!* •— 1 al*. •..* L. D A a r> Tr a**- 59 A B 0 cr. T T *7* 7’ 0 cr •*•.* *«.• jT w S 1 M $33 59AD O ^ 7 ' O wf •«.' w? *I«J* W|» * 1*1 • f *t .^1 STA $35 59 A F A934 .*■•> lUJI IM|> #*•** O'O'O'J LDA #$34 59B 1 800303 3340 STA $030 3 59B4 208 AEC *r -*t* /| rr* •J*0 %J J SR SEND I N 59 B 7 AD3F02 3350 LDA $023F 599A DO 03 - t cr cr •2* *2' ■— J w BNE BADCOM 59BC 98 3360 TV A 59BD D007 3365 BNE ACKREC 59BF C636 T T *7 A BA DCOM : DEC $36 59C 1 1 0B 5 **n* *7* nr* *->-> / xJ BPL COMFRM 59C3 4C06EA 3380 JMP DERR 1 nr* o f* 6. w/ 7 w 6 ADO 303 T T O c:* v 1 •«.' O U ACKREC LDA $0303 59C9 1 ooc 3390 BPL WATCQM 59CB A900 3395 LDA #$0D 59CD 8536 3400 STA $36 59 CF 206 AEB 3405 JSR LDPNTR 59D2 208AEC 3410 J SR SEND IN 59 D5 FOES 3415 be a BADCOM 5907 20 7 SEC 3420 WATCGM ■ JSR STTMOT 59DA A 900 T /» •***> cr LDA #0 5 9 DC 8D3F02 3430 STA $023F 59 OF 20 9 BE C T /I T CT *T -.2 JSR WAITER c;gc9 W * 4 ««p 59E2 FO12 3440 BEQ DERR 59E4 200303 3445 BIT $0303 Page 13 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 59E7 7007 3450 BVS MODATA cr C/ y AD3F02 3455 L.DA *023F 59EC DO 1 8 3460 BNE DERR 1 cropp '■*>* • «>*♦* >*«»» F01D T/li. cr -».• H O \J BEQ RETURN c;OCT J7r U 206AEB 3470 MGDATA JSR LDPNT 59F3 20E0EA *7* ”7 CI‘ •:«4 / u JSR RECEIV 59F6 AD3F02 3480 DERR LDA $023F 59 F 9 F005 3485 BEQ NOTERR 59FB AD 1903 3490 LDA $0319 59FE 8530 3495 ST A $30 5 A 00 A 5 30 3500 N0TERR I LDA $30 5 A 02 C90 1 3505 CMP #1 5 AO 4 F007 35 1 0 BEQ RETURN 5 A 06 C637 7* cr •« cr; '- 1 -,J J. DERR 1 DEC $37 5A08 3003 “7 CT BMI RETURN 5 AO A 4C74E9 7 cr cr •-.* pi -ib. w JMP COMMND 5A0D 205FEC ••7' cr t , j. vJ P U RETURN . JSR SENDD 5 A 1 0 A 900 mjt |int i •••■ jwt ■m. 1 \J LDA #0 5A12 8542 3540 ST A *42 5A14 A 4 30 3545 LDY *30 5A16 8C0303 C‘55o STY *0303 5A19 60 ••r; cr c:; cr RTS 5A 1 A A 9 00 3560 WAIT LDi 4 #U 5A 1 C 8D3F02 -7* cr jL cr •,„* » „j t, * STA *023F 5 A 1 F 10 3570 CLC 5 A 20 A93E 7* cr 7 cr; t , „.. 1 LDA #*3E «=; /\ p v O 1** O v.J •_> xl 3580 STA *32 5A24 6901 3585 ADC #i b A 26 8534 3590 STA $34 5 A 28 A 9 02 “ 7 j sc* p cr LDA #2 5 A2A 8533 3600 STA jt* jr :x/ .ji cr a n p vJ M 4.C w p «=r T cr W W V' w 3605 STA *35 cr a ■'“* CT A9FF 36 1 0 LDA #*FF 5 A 30 Q cr * 7 * - OO I -J STA *3C CT A T vj H 4^. 20E0EA T A “7 A •- 1 0 x- -J JSR RECE I V CT /\ t cr A OFF t / n ic* • J* P X- ■„.< LDY #$FF w‘ hi •-:» / A 5 30 ?■ / 7- y\ •j'bv' O LDA $30 5A39 C90 1 08 pb CMP #1 5A3B DO 19 3640 BNE NWOK 5A3D AD3E02 3645 WOK LDA *02 3E 5 A 40 C94 1 3650 CMP #$41 w n 1 4. n F02 1 ” 7 * / cr cr »„,* O 'n.j *nJ BEQ GOOD 5A44 C943 3660 CMP #$43 5A46 F0 1 D 3665 BEQ GOOD 5A48 C945 3670 CMP #$45 5A4A DO 06 3675 BNE NQTDER 5A4C A 9 9 0 3680 LDA #$90 5A4E 8530 3685 STA $30 5A50 D004 3690 BNE NWOK IC' /\ 1C* •' , i ■-j H _J xl. A98B 3695 NOT DEE LDA #$8B 5A54 8530 3700 STA $30 5A56 A 530 3705 NWOK LDA $30 5 A 58 C98A 37 1 0 CMP #$8A 5A5A F 007 3715 BEQ BAD 5A5C A9FF T “7 “i ■ J* / x_ LDA #$FF 5A5E 8D3F02 '7' ”7 cr; ***** ?' ■!■»* Vwt STA *02 3 F 5A6 1 DO 02 “7‘ *“> BNE GOOD 5A63 A 000 ”7 - 7 “7' cr BAD LDY #0 PAGE 14 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5A65 A530 3740 GOOD LDA $30 5A67 BD1903 3745 STA $0319 5A6A 60 3750 RTS ; 5A6B A 90 1 •s»* -7 er cr SEND LDA #1 5A6D 8530 3760 ST A *30 5A6F VOjT?Cp c* / 65 JSR SENDEN cr /-•. -*? o A 000 • «f« <ny mmi c* / / (J L.DY #0 5 A 74 8431 <it|« my r»y •-« / / --J STY *31 5A76 843B 3780 STY *3B 5 A 78 84 3 A 3785 STY *3 A CL A A Jh / H B 1 32 3790 LDA <*32) , Y 5 A / L 8D0DD2 *T “7 0 W* / / W STA *D20D 5A7F 8531 3800 ST A *31 5A8 1 AS 1 1 3805 NOTDON LDA * 1 1 5A83 DO03 3810 BNE NTBRKO 5A85 4CA0ED TO i cr •«.' w J. w JMP BROKE 5 ABB a c :: 1 *”.«• a H M 3820 NTBRKO LDA $3 A 5 ABA F0F5 t 0 rv* ‘“i BEQ NOTDON 5 ABC ^-Ac-rpr 4* '.** W I U. W 3830 JSR SENDDS 5 ASF 60 3835 RTS 5 A 90 98 3840 ISRQDN TV A 5A91 48 3845 P HA 5 A 92 E63^‘ L» W a mm* 3850 INC $32 5 A 94 D002 3855 BNE NQWRPO 5A96 L. Q ■«.' v* 3860 INC $33 5 A 98 a cr ~rr r*1 •«' oil 7,865 NOWRPO LDA $32 5A9A C534 TO **** f ' \ ■J'O / U CNR $34 5A9C a c:; t t r**i J 3875 LDA $33 5A9E r~ is: t cr L. w O ul 3880 SBC $35 5 A AO 90 1 C 3885 BCC NOTEND 5AA2 A53B 3890 LDA $3B 5AA4 D00B 3895 BNE RE LONE 5AA6 a ir t -i M 1 3900 LDA $31 5AA8 8 DODD 2 3905 STA $D20D 5AAB A9FF 39 1 0 LDA #$FF 5AAD 853 B 3915 STA $3B 5AAF DO 09 T Q O f\ O 7 os. *• J BNE CHKDOH 5AB1 A5 1 0 r;; - • J* 7 -i-. RELONE LDA $10 5AB3 0908 3930 ORA #8 5AB5 85 1 0 T 9 T £7 STA $10 5AB7 o n n nr n •”> 3940 STA $D20E SABA 68 3945 C HKD ON PL A 5 ABB AS 3950 TAY 5ABC 68 3955 PL A 5ABD 40 3960 RTI 5 A BE A 000 3965 NOTEND LDY #0 SACO B 1 32 3970 LDA ($32) „ Y !£' A «— • •-J ri L_r xL 8D0DD2 t 0 *«.' f / V-J STA $D20D cc s\ r~ c: jmL j 18 3980 CLC 5AC6 653 1 t 0 0 7 '_7 ADC $31 SACS 6900 3990 ADC #0 5ACA 853 1 3995 STA $31 5ACC 4CBAEA 4000 JMP CHKDON 5ACF A53B 4005 ISRTD LDA $3B SAD 1 FOOD 40 1 0 BEQ FOOEY 5AD3 8 53 A 40 1 5 STA $3 A CL- A T*\ CT ■JHUJ AS 10 4020 LDA $10 5AD7 r’ r xL'i r / 4025 AND #$F 7 Page 15 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5AD9 8510 4030 STA $10 5ADB 8DOED2 4035 STA $D20E 5ADE 68 4040 FOOEY PLA 5ADF 40 4045 RTI 5AE0 A900 4050 RECEIV LDA #0 5AE2 AC OF 03 4055 LDY $030F 5AE5 DO 02 4060 BNE NOCLR 5AE7 8531 4065 STA $31 5AE9 8538 4070 NOCLR STA $38 5AEB 8539 4075 STA $39 5AED A90 1 4080 LDA #1 5AEF 8530 4085 STA $30 SAFI 20 1 BEC 4090 J SR RECVEN 5AF4 A93C 4095 LDA #$3C 5AF6 8D03D3 4 1 00 STA $0303 5AF9 A 5 1 1 4 1 05 CHKTIM LDA $11 5AFB D003 4110 BNE NTBRK1 5AFD 4CA0ED 4115 JMP BROKE 5 BOO AD 1 703 4 1 20 NTBRK1 LDA $03 5B03 F005 4125 BE a TOUT •_J b* V vJ A 5 39 4 1 30 LDA $39 =r r*. i “7 O V / FOFO 4 1 35 BEQ CHKTIM 5B09 60 4140 GO BACK RTS 5B0A A98A 4145 TOUT LDA #$8A 5B0C 8530 4 1 50 STA $30 5B0E 60 4155 SRETRN RTS 5B0F 98 4 1 60 ISRSIR TYA ctj i □ D 1 O 48 4 1 65 PH A SB 1 1 AD0FD2 4170 LDA $D20F 5B 1 4 8 DO AD 2 4 1 75 STA $D20A SB 1 7 3004 4 1 80 BMI NTFRAM 5B19 A08C 4 1 85 LDY #$8C SB IB 8430 4 1 90 STY $30 5B 1 D •”> o r> {'i 4195 NTFRAM AND #$2 5B1F DO 04 4200 BNE NTOVRN 5B21 A08E 4205 LDY #$8E c;D97 w L* tL* *«w* 8430 42 1 0 STY $30 w i.. 1 j. M vJ A538 4215 NTOVRN LDA $38 5B27 FO 1 3 4220 BEG NOT YET 5B29 AD0DD2 « / m j r**| *t jL LDA $D20D 5B2C C53 1 4230 CMP $31 er p -***;« IT •,,J XL* x». r,„ F004 A T cr *T V»* BEQ SRETRN D2s 0SNXLV2. M65 5B30 cr r» -tr J D J* xi 5B34 5B36 5B38 5B39 5B3F 5B4i AOSF 8430 A9FF 8539 68 A8 68 40 AD0DD2 A 000 □ 1 to / I •J**- 18 6531 6900 pc:T I FAT,? ‘ ♦I* » V*M *•** 4 /~v*?cr 4i. / vJ 4240 4245 4250 255 4260 4265 4270 4 /“^-?cr 4*** / W 1 4280 4285 4290 T *’ W/ 4300 4305 4310 4315 ;--- -------- ---- -------- ----------------- ------------------ 5B30 A08F 4240 LDY #$8F 5B32 8430 4245 STY $30 5B34 A9FF 4250 SRETRN LDA #$FF 5836 8539 4255 STA $39 5838 68 4260 SUSUAL PLA 5839 A8 4265 TAY 583A 68 4270 PLA 583B 40 4275 8RTI ; NOTYET LDA $020D LDY #0 STA ($32),Y CLS ADC $31 ADC #0 STA $31 INC $32 Page 16 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5B4C D002 4320 BNE NTWRPi 5B4E E633 4325 INC $33 5B50 A ^ “7 *T -2' U NTWRP1 LDA $32 c;; r\i cr ™ ImJ JD vj .|L C534 4335 CMP *34 5BS4 A533 4340 LDA .± “T P • J* cr p er aE •~t £> E535 4345 cpr >»••* •**/ *35 5B58 9 ODE 4350 BCC 8 USUAL 5B5A A53C 4355 LDA *3C 5B5C F 006 4360 BE a GOON cr r> cr r- vJ *..* %»J CL A900 4365 LDA #0 5B60 clj v*L 4370 ST A *30 5B62 F0D0 4375 BEQ SRETRN 5B64 A9FF 4380 GOON LDA #$FF 5B66 d-Jv'd 4385 STA $38 5B68 DOCE 4390 BNE SUSUAL 5B6A 18 4395 LDPNTR CL_C 5B6B A DO 4 03 4400 LDA *0304 5B6E O CJ! '“!* '**? O -_J uL 4405 STA *32 5B70 6D0803 44 1 0 ADC *0308 5B73 8534 44 1 5 STA *34 5B75 A DOS 03 4420 LDA *0305 5B7S 8533 4425 STA *33 5B7A 6 DO 90 3 4430 ADC *0309 5B7D cr “t cr O -~J --J 4435 STA *35 5B7F 60 4440 RTS 5B80 ADO 303 4445 CASENT LDA $0303 5BS3 1 02E 4450 BPL CASRED 5B85 20A3EC 4455 JSR COMPUT 5B88 4C8FEB 4460 JMP NEW 1 5BSB 04 4465 . BYTE 4 cr nor « T _ i* JB ‘ T * ^ n ■ 8D06D2 4470 STA *D206 ^.pocr w/iP'Jr 20F2EB 4475 NEW 1 JSR SENDEN 5B92 A OOF 4480 LDY #*0F 5B94 AD0B03 4485 LDA *030B 5B97 3002 4490 BMI SRT I RO 5B99 A0B4 4495 LDY #*B4 5B9B A 2 00 4500 SRTIRO LDX #0 5B9D 20B9ED 4505 JSR SETVBX 5 BAG A 93 4 4510 LDA #*34 5BA2 8D02D3 4515 STA *D302 5BA5 AD 1 703 4520 TIMIT LC >A *0317 5 BAB DOFB 4525 BNE T I M I T 5BAA 206AEB 4530 JSR LDPNTR 5BAD 206 BE A 4535 JSR SEND 5 BBC 4CDFEB 4 5 4 0 JMP CRETRN 5BB3 A9F F 4545 CASRED LDA #*FF cr P p cr; *— J fc? Jt* vj 8 DOF 03 4550 STA *030F 5BB8 AGO A 4555 LDY #*0A 5BBA A DO BO 3 4560 L 1 J M *030 B 5BBD 3002 4565 BMI SRT I R 1 5BBF A 078 4570 LDY #*78 cr r* n 1 \*t ]D w A A 200 4575 SRTIR1 L .DX #0 5BC3 20B9ED 4580 JSR SETVBX 5BC6 A934 4585 LDA #*34 5 BOS 8D02D3 4590 STA $D302 5BCB AD 1703 4595 TIMIT1 LDA *0317 5BCE DOFB 4600 BNE T I M I T 1 5 EDO 206AEB 4605 JSR LDPNTR Page 17 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5BD3 2075EC 4610 JSR STTMOT 5BD6 20B9ED 4615 JSR SETVBX 5BD9 201EED 4620 JSR BEGIN 5BDC 20E0EA 4625 JSR RECE I V 5BDF A DOB 03 4630 CRETRN LDA $030B %J b b. xL 3005 4635 BMI SRTIR2 5 BE 4 A93C 4640 LDA #$3C 5BE6 unoonT O L L- ^ L 4645 STA $0302 5 BE 9 4C0DEA 4650 SRTIR2 JMP RETURN 5BEC A 900 4655 JTIMER LDA #0 5BEE SD 1 703 4660 STA $03 1 7 5BF 1 60 4665 RTS 5BF2 A 90 7 4670 SENDEN LDA #7 5BF4 ***;. ip. -3* •”> •I*** i*/ *«♦* 4 >«i ^ 4 »** 4675 AND $0232 5BF7 0920 4680 ORA #$20 5BF9 AC 0003 4685 LDY $0300 5BFC CO 60 4690 CRY #$60 5BFE DOOC 4695 BNE NOT CAS 5C00 0908 4700 ORA #8 SCO 2 AO 07 4705 LDY #7 SCO 4 8C02D2 4710 STY $0202 SCO? A005 4715 LDY #5 SC 09 8C00D2 4720 STY $D200 5C0C 8D3202 ft “7 /~i t izi* H* / xL *-J NO TO AS STA $0232 5C0F 8 DOF D 2 4730 O 1 hi $D20F cr j “‘ rp A9C7 4735 LDA #$C7 5C 1 4 2510 4740 AND $ 1 0 5C 1 6 09 1 0 4745 ORA #$ 1 0 5C 1 8 T W *m' X 1mm W 4750 J MR CONT I N 5C1B A 90 7 4755 RECVEN 1 LDA #7 5C 1 D •**•> r\ *7f x* -*n 4 _ U Xm V Xm 4 7 60 AND $0232 5C20 0910 4765 ORA #$ 1 0 CT • **? '■2 *»»- » ■ - 4 >«. q n ?* r> O 17 *m-‘ X Li Xm 4770 STA ±. *v .w ‘♦h 1 X*. cr •--> cr wi n4 4m mi 8D0FD2 4775 STA $D20F cr r* % rr« jLxio 8D0AD2 4780 STA $D20A cr -~y r> 'mi L/ X.. D A9C7 4785 LDA #$C7 cr r~- 't r\ •mJ W XL Li •••ter h /•••. x J i Li 4790 AND $10 5C2F 0920 4795 URrt #$20 5C3 1 85 1 0 4800 CONTIN ! STA $10 p*. -n* -*r 8D0ED2 4805 ST H $D20E 5C36 A 9 28 48 1 0 LDA #$28 cr i“- -rr o ‘•J w •«,’ w 8D08D2 4815 STA $D20S ;r~ {““• “T r*j •«J w v 1 Ju> A 2 06 4820 LDX #6 5C3D A9A8 4825 LDA #$AS 5C3F Cu&A 1 “ r 4, 4830 LDY $41 5C4 1 D002 4835 BNE NO I SE 1 5C43 A9A0 4 8 4 O LDA #$A0 5C45 9D01D2 4845 N0ISE1 STA $D20 1 , 5C48 CA 4850 DEX 5C49 CA 4855 DEX 5C4A 1 OF 9 4860 BPL NO I SE 1 5C4C A 9 AO 4865 LDA #$A0 cr /j rr 'mi ^ f* Cm 8 DOS D 2 4870 STA $D205 cr r -• cr -j W W 'mi X AC 0003 4875 LDY $0300 cr !“**• ic‘ xj wi L, wi '4 CO 60 4880 CRY #$60 5C56 F006 4885 BEQ CAS31 5C58 8DO1D2 4890 STA $D20 1 5C5B 8 DO 3D 2 4895 STA $D203 Page 18 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5C5E 60 4900 CAS31 RTS 5C5F EA 4905 SENDDS NOP 5C60 A9C7 4910 RECVD5 LDA #$C7 5C62 ET p* / p. u L.' o ii 25 1 0 4915 AND *10 5C64 8510 4920 STA $10 5C66 8 DO ED 2 4925 STA $D20E 5C69 A 206 4930 LDX #6 50 6 B A 900 4935 LDA #0 5C6D 9D01D2 4940 ZERIT STA $D20 1 , X SC 70 CA 4945 DEX 5071 CA 4950 DEX cr j— • -7 1 OF 9 4955 BPL ZERIT 5074 60 4960 RTS CT p. ~7 n;- AD 0603 4965 ST T MOT LDA *0306 5C78 6A 4970 ROR A 5C79 6 A 4975 ROR A 5C7A A8 4980 TAY 5C7B 293 F 4985 AND #*3F 5 C 7 D AA 4990 TAX ***J (**/ /* L»-» 98 4995 TYA 50 7F 6 A 5000 ROR A 5CS0 2900 5005 AND #*C0 5082 A8 50 i 0 TAY 5083 60 50 1 5 RTS 5084 OFEB rc* y\ s\ •uj L* 4 « V INTTBL .WORD ISRS IR 5086 90EA 5025 .WORD ISRODN 5088 CFEA 5030 -WORD ISRTD 50 8 A A20 1 5035 SEND IN LDX #1 5080 A OFF 5040 DELAYO LDY #$FF 5C8E OQ OO 5045 DELAY 1 DEY 5C8F DoF D 5050 BNE DELAY 1 5C9 1 CA 5 055 DEX CT f* Q O w / aL DOF 8 5060 BNE DELAYO 5094 206 BE A 5065 JSR SEND 5097 A 00 2 5070 LDY #2 5099 A 200 5075 LDX #0 50 9 B 20B9ED 5080 WAITER JSR SETVBX 5C9E 20 1 AEA 5085 JSR WAIT 5CA1 98 5090 TYA SPA? 60 5095 RTS c: r-. T JUrtO' ADEE02 5 1 00 COMPUT LDA $02EE 50 A 6 8D04D2 5 1 05 STA $D204 5CA9 ADEF02 5 1 1 0 LDA $02EF 50 AC q n a n *“> 5115 STA *D206 5CAP 60 5 1 20 RTS crpn cr 4 pi er J. >Im« *»»«« * = $ECBO ; HARD I 50 BO A 9 00 5 1 30 HARD I LDA #0 5082 AA 5 1 35 TAX 50 B 3 8D03D3 5 1 40 STA $D303 50B6 9D00D0 5145 CLRCHF STA *0000 ? X 5CB9 9D00D4 5150 STA *0400, X 5CBC 9D00D2 cr j crer STA $0200, X 5CBF 0901 5 1 60 CMP #1 5001 F003 5165 BEQ SKIP i ;;’ 1 . ,m . r ~v W J W W ’«!' 9D00D3 5 1 70 STA *0300, X 5006 E8 5175 SKIP I NX cr 0 0 7 DO ED 5 1 80 BNE CLRCHP 5009 A 930 5 1 85 LDA #*3C ; i □SNXL POWER Page 19 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5CCB 8D03D3 5190 STA $D303 5CCE A9FF 5195 LDA #$FF 5CD0 8D01D3 5200 STA $030 1 5CD3 A938 5205 LDA #$38 cr r\ d‘ L- L/ -_J 8D02D3 52 1 0 STA $D302 5CD8 8D03D3 cr---. h cr ’*•*•* 4*** «!• STA $D303 5CDB A 9 00 5220 LDA #0 5CDB SB00D3 cr p cr STA $0300 5CE0 A9FF cr 'V •• J 1 J LDA #$FF cr p rr W W 1 * 1 ** 4«f 3 DO 1 D3 cr p t cr *»**« 4«— ’m* STA $0301 5CE5 A93C 5240 LDA #$3C 5CE7 8D02D3 5245 STA $0302 5CEA 8D03D3 cr cr p wJ .U. \.J V STA $0303 5CED AD01D3 d •“;« d' cr 4*** *!*♦* LDA $D30 1 5CF0 AD00D3 5 2 6 O L.DA $0300 5CF3 aq?'? PH / 4^* 4^. cr '***1 f cr CD jC O 5 LDA +j. .± p:> • 5CF5 8 DOF D 2 ...1 .u. / *«' STA $D20F 5CF 8 A 9 AO d' 7 d’ C / vJ LDA #$A0 5CFA 8D05D2 5280 STA $D205 5CFD 8D07D2 5285 STA $0207 5 DOG A928 5290 L D A #$28 5002 8D0SD2 id o cr J*17J STA $0208 5 DO 5 A9FF *.4 •-* V LDA #$FF 5 DO 7 8D0DD2 d* 'T /•, cr w.' O U vJ STA $D20D 5 DO A 60 d- -j •Jv‘ i U RTS 5 DOB Cl’ T *4 d' U ■ J* j. wf % = $ED 1 0 5D i 0 A51 1 cr •..J •.„* j2 BEGIN LDA $11 5D12 DOG 3 cr ~r - 7 cr wJ , — 1 4m U BNE NTBRK2 5D14 4CA0ED A . i ._)» ._ji CJ J MR BROKE 5D17 78 cr r T cr ■„J •_.* -_J NTBRK2 SEI 5D18 AD i 703 5340 LDA $03 1 7 5D 1 B DO 02 5345 BNE 0KT I M 1 5D i D r~ a •***« cr r U -*j d- d- •jw'jU BEQ TOUT 1 5D 1 F AD0FD2 cr-r-cr cr -.J *«.* w U 0KTIM1 L „DA $D20F cr r\ r> o *wn <m* ti«r< itwi 291 0 5360 AND #$ 1 0 5D24 D0EA cr ~V / d; w ‘ w w BNE BEG I N cr r\ / '■J L.- .u- : ..L : SD1603 cr -?• -7 pi O*-.* / ^ STA $U3 1 6 cr n Q AEOBD4 d‘ T “‘7 d' ij ‘m* / **J LDX $D40B d p. .“••• * 1(J f » * y* . ‘ IW ' A4 1 4 5380 LDY $14 IC' •«“. '•“i c* JU j;.. u. 8E0C03 cr -r o cr w •— 1 Q vJ STX $030C SD3 1 SCO DO 3 5390 STY $0300 5D34 A201 5395 LDX #1 cr pi c*‘ / %J JL/ * 2 » O BE i 503 5400 STX $03 1 5 5D39 A 00 A 5405 LDY # 1 0 5D3B A51 1 5410 COUNT LDA $11 5D3D F06 1 «~.A 1 5 vJ ! 4. W BEQ BROKE 5D3F AD 1 703 5420 LDA $03 1 7 5D42 DO 04 ic; /i o cr •«J * r 4 m* BNE OKT I MR 5D44 58 5430 TOUT 1 CL. I 5D45 4C0AEB 5435 JMP TOUT 5D48 AD0FD2 5440 □KTIMR L .DA $D20F 5D4B 2910 5445 AND #$ 1 0 5D4D CD 1 603 5450 CNR $03 1 6 5D50 F O E 9 5455 BEQ COUNT 5D52 8D 1 603 546 U STA $03 1 6 cr n cr. cr %»**’ i»/ 88 cr .-I cr •..J O DEY 5D56 DOE 3 5470 BNE COUNT 5D58 CE1503 5475 DEC $0315 Page 20 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5D5B 3012 5480 BMI GOREAD 5D5D AD0BD4 5485 LDA TD40B 5D60 A4 1 4 5490 LDY $14 5D62 20A3EC 5495 t a c« J bh COMPUT 5D65 EA 5500 NOP 5D66 EA cr cn* ,•“% cr uuVu NOP 5D67 EA 55 1 0 NOP 5D6S E A crcr i cr •J J 4. --J NOP 5D69 EA j«.. 55 2 U NOP 5D6A EA cr cr 4 w w w NOP 5D6B A 009 5530 LDY #9 5D6D DOCC i*!!' >!**• i:;r JJOJ BNE COUNT 5D6F A DEE 02 5540 G0READ LDA $02E 5D72 8D04D2 5545 ST A *0204 5D75 ADEF02 5550 LDA *02EF 5D7S 8 D 0 . 6 D 2 In* ' CT InT In* n»*‘ 'mJ **n nn STA *0206 5D7B A 9 00 cr cr / ui %J Q v LDA #0 5D7D 8D0FD2 c:r cr / cr STA *D20F 5D80 AD 3202 cr cr U U / U LDA *0232 5D83 8 D 0 FD 2 cr cr “7 cr Wf *n»J ¥ 'nJ STA *D20F 5D86 A 9 55 5580 LDA #*55 5D33 9132 5585 STA < *32) „ Y 5D8A CS 5590 INY 5DBB Q i T '7* cr cr n cr U U 7 u STA (*32> , Y 5D8D A9AA 5600 LDA rht !T HI n 5D8F 853 1 5605 STA *31 5D9 1 18 56 1 0 CL C 5D92 AC’7 •-> ri U ‘m 1 5615 LDA *32 5D94 6902 5620 ADC #2 5D96 ncT-) nn ’nit ***** »!**♦ 5625 STA Hr rr HP 'J* .lln 5D98 A CT F H -..2 -2' 5630 LDA . .HJ. ...|. -2* O 5D9A 6900 cr / ”T|' cr O •«.* ADC #0 5D9C 8533 5640 STA •± T T *+*■ -m 1 V 1 5D9E 58 5645 CLI 5D9F 60 5650 RTS 5DA0 205FEC cr L. £• U U U 'mi BROKE J SR SENDD 5DA3 A93C 5 6 8 0 LDA #*3C 5DA5 8D02D3 5665 STA *0302 5DA8 8D03D3 5670 STA *0303 5DAB A 980 5675 L D A #*80 5DAD 8530 5680 STA *30 5DAF AE 1 803 5685 LDX *03 1 8 cr r\ r:« r> ‘mi L.J L* 4L 9 A 5690 T X S 5DB3 C61 1 5695 DEC *11 5 DBS 58 5700 CLI 5DB6 4C0DEA 5705 JMP RETURN 5DB9 A9EC 5710 SETVBX L DA #*EC 5DBB 8 D 2 6 U 2 cr*7 i c wi / 1 w/ STA *0226 SDBE A9EB 5 7 O LDA #*EB 5DC0 8D2702 cr ” 7 cr \n* 2 ■!«** %■■■ STA *0227 5 DC 3 A90 1 CT *7 *m.‘ / * 2 «U LDA #1 5DC5 78 cr -7 “tf cr •mm* / *m' W op: t w L* J* 5DC6 2 OSCE 4 5740 JSR *E45C 5DC9 A 90 1 5745 LDA #1 5DCB 8D 1 703 5750 STA *03 1 7 5DCE 58 5755 CLI 5 DCF 60 5760 RTS 5DD0 E803 5765 PGKTAB . WORD *o: : NOT USED Page 21 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5DD2 4304 5770 .WORD $0443 5DD4 9E04 cr “7 -7 cr •-J / / -u J • WORD $049E 5DD6 F904 5780 .WORD $04F9 5DD8 5405 5785 » WORD $0554 5DDA AF05 5790 * WORD $05AF 5DDC 0A06 5795 .WORD $060 A 5 DDE 6508 5800 .WORD $0665 5DE0 COO 6 5805 .WORD $06 CO 5DE2 1 AO 7 58 1 0 .WORD $071A 5DE4 7507 irn h cr •jO J. -_j .WORD $0775 5DE6 D007 5820 .WORD $07 DO 5DE8 2485 nr- q cr '- 1 j— ■ U .BYTE $24, $85 5DEA A9A0 5830 DINIT LDA #$A0 5DEC 8D4602 5835 ST A $0246 5DEF 60 5840 RTS 5DF0 A 93 1 5845 DSKIF LDA #$31 5DF2 8 D 000 3 5850 ST A $0300 5DF5 AD4602 5855 LDA $0246 5DF8 AE0203 5860 LDX $0302 5DFB E021 5865 CPX #$21 5DFD F 002 5870 BEQ PUTDTO 5DFF A 90 7 cr o “7 cr uj L . 1 / v...* LDA #7 5E0 1 8 D 06 03 cr; o Q ,-i O o U PUTDTO ST A $0306 5E04 A 240 5885 LDX #$40 5E06 A 080 5890 LDY #$80 5 E: 08 A DO 203 5895 LDA $0302 5E0B C957 5900 CMP #$57 5E0D DO 02 5905 BNE CKSTC 5EOh A280 5910 LDX #$80 5E1 1 C953 5915 CKSTC CMP #$53 5E i 3 DOOC 5920 BNE PUTCNT 5E 1 5 A9EA 5925 LDA #$EA 5E i 7 8 DO 4 03 5930 ST A $0304 5E i A A902 5935 LDA #2 5E1C 8 DOS 03 5940 ST A $0305 5E 1 F A 00 4 5945 LDY #4 5E21 BE 030 3 5950 PUTCNT STX $0303 5E24 SCO 80 3 5955 STY $0308 5E27 A 9 00 5960 LDA #0 cr p q w CL .fc.. 7 8D0903 5965 ST A $0309 W l.... W 2059E4 5970 JSR SIOV 5E2F 1 00 1 5975 BPL GOODS' T nr E 3 1 6 U 5980 RTS nr EL T ,- 7« •— ? CL •„* A DO 20 3 5985 GOODS' T LDA $0302 cr r— ~r •..J L •— 1 ..J C953 5990 CMP #$53 5E37 DOOA 5995 BNE PUTBC 5E39 20 6 DEE 6000 JSR PUT ADR C* r~* -n* p. ci •-> L, A 00 2 6005 LDY #2 b. O' E BUS 60 1 0 LDA ($15) , Y 5 El 40 8D4602 60 1 5 STA $0246 5E43 A DO 2 03 6020 PUTBC LDA $0302 5E46 P Q P 1 W / 4^* 4* 6025 CMP #$21 5E48 DO IF 6030 BNE ENDDIF 5E4A POADEE ■t»»r wm **** A?/ l»n- wm 6035 FMTD JSR PUT ADR 5E4D AOFE 6040 LDY #$FE 5E4F C 8 6045 TWICE I NY 5E50 C 8 6050 I NY GT ™ ™- J Lm '».i J. B115 6055 RDBAD LDA ($15),Y Page 22 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5E53 C9FF 6060 CMP #$FF 5E55 DOF8 6065 BNE TW1CE 5E57 a: r~‘ cr -*? JCJ/ CS 6070 INY 5E58 bus 6075 L D A ($15), Y 5E5A CS 6080 INY 5E5B C9FF 6085 CMP #$F I- 5E5D DOF 2 6090 BNE RDBAD 5E5F 88 6095 DEY 5E60 88 6 1 00 DEY 5E61 SC 080 3 6 1 05 STY $0308 5E64 A 900 611 0 L D A #0 «=; L7 i. i_ 8D0903 6115 ST A $0309 5E69 AC0303 6 1 20 ENDDIF LDY $0303 5E6C 60 6 1 25 RTS 5E6D AD0403 6130 PUT ADR LDA $0304 5E70 85 1 5 6135 ST A $15 ir W l.... t .ll.. A DO 50 3 6 1 40 LDA $0305 5E75 85 1 6 61 45 STA $16 5E77 60 6150 RTS 5E78 A91E 6 i 55 PHINIT L ..DA #30 5E7A 851C 6 1 6 O STA $1C SE7C 60 6165 RTS 5E7D EA02 6 1 70 PHSTLO . WORD $02 5E7F C003 6175 PHCHLQ . WORD $03 5ES 1 A 9 04 6 1 80 PHSTAT L .DA #4 SFR1 **H Imt t»r* * m 85 IE 6185 STA $ 1 E 5E85 AE7DEE 6 1 90 LDX PHSTLO cr r~ O O JC.OO Af7CCC r“f w / w u** 6195 LDY PHS T L0+ 1 5E8B A953 6200 LDA #$53 5E8D 8D0203 6205 STA $0302 5E90 8 DO AO 3 62 1 0 STA $030 A 5E93 2UE6EE A 1 S >Um J. %«• JSR SETDCB 5E96 2059E4 , ..... .. •»M 4*«» 3 SR S I ov 5E99 3003 . f-y ^ j~ ; O X. 4!h •uJ BMI BADST cr; r;- q r> w 1 fc2 7 JD 2014EF 6230 JSR PHPUT 5E9E 60 / c:; O x.. •-* ■_* BAD ST RTS 5E9F 208 1 EE 6240 P HO PEN JSR PHST A SEA 2 A 900 6245 LDA #0 5EA4 85 ID / r>GZf-\ O 4A *w/ S 1 A $ 1 D SEA6 60 / ^icrcr *™> .2. -_J _J RTS 5EA7 85 IF 6 2 6 U PHWRIT STA $ 1 F SEA 9 201AEF 6265 J S K PRMODE SEAC A61D 6270 LDX $ 1 D 5EAE AS IF 6275 LDA $ 1 F 5EB0 9 DC 00 3 6280 STA $03C0 , X SEB3 E8 6285 I N X 5EB4 E41E 6290 CPX $ IE cr r~ rj / JCDO FO 1 3 6295 BEQ BUFFUL 5EB8 8 6 1 D 6300 STX $ 1 D 5EBA C99B 6305 CMP #$9B 5EBC F 003 63 1 0 BEQ BLF I LL 5 EEC A00 1 63 1 5 LDY #1 S ECO 60 6 3 2 O RTS SEC 1 A920 /TOC Q -2 1 _2- uJ BLFILL LDA #$20 SEC3 9 D COO 3 6330 FILL.BF STA $03C0 SEC 6 E8 jL t t I NX cr 1***^ ■™* 1::. L- / E4 I E 6340 CPX $ 1 E cr r~ r* # * t~~x •->EL 7 DoF 8 6345 BNE FILLBF Page 23 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5ECB A900 6350 BUFFUL LDA #0 5ECD 851 D / T C IT U C 1 \*J STA $1D 5ECF AE7FEE 6360 LDX PHCHLO 5ED2 AC80EE 6365 LDY PHCHL0+ 1 -.j hr, D -_j POP App 6370 JSR SETDCB 5ED8 2059E4 6375 JSR SIOV 5EDB 60 6380 RTS 5EDC 201AEF 6385 F’HCLGS JSR PR MODE 5EDF A61D 6390 LDX *1D SEE 1 DODE 6395 BNE BLFILL 5 EE 3 A 00 1 6400 LDY #1 crrr rrcr •™‘ u. 1™ —J 60 6405 RT8 5EE6 8E0403 6 4 1 O SETDCB STX *0304 5EE9 SCO 50 3 64 1 5 STY $0305 ct.ppp A940 6420 LDA #$40 cr cr ircr w L_. l... L\. 8D0003 6425 ST A $0300 5EF 1 A 90 i 6430 LDA #1 C.- r* 1 ” “T JCi *J« 8 DO 1 03 6435 ST A *0301 SEE 6 A 9 80 6440 LDA #$80 SEES AE0203 6445 LDX *0302 5EFB tUuo 6450 CPX #*53 SEFD D002 6455 BNE PSIGC 5EFF A940 6 4 6 O LDA #$40 5F01 8 DO 3 03 6465 PSIGC ST A $0303 5F04 A51E 6470 LDA $ IE 5F06 8 DO 80 3 6475 ST A *0308 5F09 A 9 00 6480 LDA #0 5F0B 8D0903 6485 ST A *0309 5F0E A 5 1 C 6490 LDA *1C 5F 1 0 8D0603 6495 ST A *0306 SF 1 3 60 6500 RTS 5F i 4 ADEC02 6505 PHPUT LDA *02EC SF 1 7 85 1C 65 1 0 ST A $1C 5F 1 9 60 65 1 5 RTS 5F 1 A A057 6520 PR NODE LDY #$57 SF 1C A52B 6 -a 2 'O LDA *2B 5F 1 E C94E 6530 CMODE CMP #*4E SF 20 DO 04 A cr, *T cr w -A BNE CDUBL cr p p I »I— ■ itm /VTJOQ ri .iu. O 6540 LDX #$28 5F24 DOOE 6545 BNE SETBSZ ur, cr r> a C944 6550 CDUBL CMP #$44 5F28 D004 / cr cr cr O \J BNE CSIDE 5F2A A 2 1 4 6560 LDX #$14 |U*I } -u • ***\ *» i *■ i tiu* ***** DO 06 6565 BNE SETBSZ 5F2E C953 6570 CSIDE CMP #$53 5F30 DO OB 6575 BNE GOERR C“* T *•** I *»♦•* *!»»■ A21D 6580 LDX #$ 1 D 5F34 8 6 1 E 6585 SETBSZ STX *1E 5F36 8C0203 6590 STY *0302 5F39 8D0A03 x cr o cr 0-A V A ST A *030 A t::* r**‘ ?* r*» uJ r •*#♦* U 60 6600 RTS 5F3D A94E 6605 GOERR LDA #$4E 5F3F DODD 66 1 0 BNE CMODE 5F4 1 A9CC 66 1 5 I NIT LDA #*CC 5F43 8 DEE 02 6620 i ST A *02 EE 5F46 A905 A A. LDA #5 5F48 8DEF02 6630 ST A $02EF 5F4B 60 A AT S *...j SPECIA RTS Page 24 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5F4C A52B 6640 OPENC LDA $2B 5F4E 853E 6645 STA *3E 5F50 ac;?a n w .u. ri 6650 LDA $2A cr r~ tsr i \.J X.. 290 C / £ C CT O vJ w AND #$0C 5F54 C904 6660 CMP #4 5F56 F005 6665 BEQ OP INF 5F5S C908 6 6 7 0 CMP #8 5F5A F039 6675 BEQ OPOUT 5F5C 60 6680 RTS 5F5D A 900 6685 W w w w OP INF LDA #0 5F5F 8D8902 6 6 V 0 STA $0289 2* r in* xL 853F 6695 STA $3F 5F64 A90 1 6700 SFH LDA #1 5F66 205 8F0 6705 JSR *F058 ; BEEP 5F69 3024 6710 BMI OPNRTN 5F6B A 93 4 6715 LDA #$34 5F6D 8 DO 2D 3 6720 STA $D302 5F70 A 040 6725 LDY #$40 {*“- “» •.J 1 / X. A 202 6730 LDX #2 5F74 A 90 3 6735 LDA #3 5F76 8D2A02 6740 STA $022A 5F79 205 CE 4 6745 JSR SETVBV 5F7C AD2A02 6750 WAITTM LDA $022A 5F7F DOFB 6755 BNE WAITTM 5F8 1 A 9 SO 6 / tt O LDA #$80 5F83 85c*D 6765 STA $3D 5F85 8D8A02 - £> / / U STA $028A 5F88 4CD3EF 6775 JMP OF OK 5F8B A 080 6780 PBRK LDY #$30 5FSD C6 i 1 6785 DEC $11 5F8F A 9 00 6790 OPNRTN LDA #0 5F91 8D8902 6795 STA $0289 5F94 60 6800 RTS cr p pi er A 980 6805 OPOUT LDA #$S0 5F97 8D8902 68 1 0 STA $0289 5F9A A902 68 1 5 LDA #2 5F9C 2058F0 6820 JSR $F05S 5F9F 30EE 6825 BMI OPNRTN 5FA1 •C~ M *2* t. w 6830 JSR COMPUT 5FA4 4CABEF 6835 JMP EFAB 5FA7 04 6840 . BYTE 4 5FA8 8D06D2 6845 STA $D206 5FAB A 960 6850 EFAB LDA #$60 5FAD E) DO 00 3 l. q O O -_J STA $0300 5FB0 2 068 E 4 6 8 6 O JSR SENDEV 5FB3 A 93 4 6865 LDA #$34 5FB5 8D02D3 6870 STA $D302 5FB8 A 90 3 6875 LDA #3 5F BA A 20 2 6880 LDX #2 5FBC A 080 6885 LDY #$80 5FBE 2 OSCE 4 6890 JSR SETVBV 5FC 1 A9FF APQS w .* LDA # $ P F 5FC3 8D2A02 6900 STA $022 A 5FC6 A51 1 6905 WDLR LDA $11 5FC8 FOC 1 69 1 0 BEQ PBRK 5FCA AD2A02 6 9 1 5 LDA $022A 5FCD DOF 7 6920 BNE WDLR 5FCF A 900 6925 LDA #0 Page 25 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 5FD1 853D 6930 STA $3D 5FD3 A001 6935 OPOK LDY #1 5FD5 60 6940 RTS 5FD6 A53F 6945 GBYTE EDA $3F 5FDS 3033 6950 Blil I SEOF 5FDA A63D 6955 LDX *3D 5FDC ECSA02 6960 CPX *02 8 A 5FDF P008 6965 BEQ RBLOK 5FE 1 B 000 04 6970 EDA *0400 5 X 5FE4 E63D 6975 INC *3D 5FE6 A 00 1 6980 LDY #1 5FES 60 6985 GBX RTS 5FE9 A952 6990 RBLOK L.DA #$52 5FEB 2095F0 6995 J SR S 1 OSB 5FEE 88 7000 TYA 5FEF 3 OF 7 7005 BMI GBX 5FF 1 A 900 7010 LDA #0 r*“ r l*** '*?’ '-J 1 I’*’ 853 D 70 1 5 ST A *3D 5FF5 A 2 80 7020 LDX #*80 5FF7 ADFF03 7025 LDA *0 3FF =; pp^ C9FE 7030 CMP #*FE 5FFC FOOD 7 rr /Uoj BEQ ATEOF 5FFE C9FA 7040 CMP #*FA 6000 0003 7045 BNE NLR 6002 AE7F04 7050 LDX *04 7 F 6005 8E8A02 7055 NLR STX *028 A 6008 4CD6EF 7060 JMP GBYTE 60 OB r,4TL7 7065 ATEOF DEC $3F 6000 A 088 7070 ISEOF LDY #$88 6 OOF 60 7075 RTS 60 i 0 A63D 7080 PBYTE LDX $3D 60 1 2 9D0004 7035 STA *0400 * X 60 1 5 E63D 7090 INC *3D 60 1 7 A 00 1 7095 LDY #1 6 0 1 V E07F 7 1 00 CPX #127 60 1 B F001 7 1 05 BEQ * •+* 3 6U 1 D 60 7 1 1 0 RTS 6o i E A9FC 7115 LDA #*FC 6020 20D2F0 7 1 20 J SR WS I OSB 6023 A 900 4 isr / LDA #0 6025 o -uj ■ j> D 7 1 30 STA *3D 6027 60 7 1 35 RTS 6028 A 00 1 7 1 40 STATU LDY #1 60 2 A 60 7 1 45 RTS 60 2 B AD 890 2 7 1 50 CLOSEC LDA $0289 602E 3008 “7 -j er nr.; * «L ■...*■ ****** BMI CLWRT 6030 AOO 1 7 1 60 LDY #1 6032 n, /n A. H Y _• Lr 7165 PC AX LDA #*3C 6034 8D02D3 7 1 70 STA *D3 02 6037 60 7 1 75 RTS 6038 A63D 7 1 80 CLWRT LDX $3D 60 3 A FOOA 7 1 85 BEQ WTLR 603C 8E7F04 7 1 90 STX $047F 60 3 F A9FA 7195 LDA # * h A 604 1 20D2F0 -y t~\ J SR NS I OSB 6044 30EC 7 o ,••••. cr. BMI FCAX 6046 A27F 72 1 0 WTLR LDX #127 60 48 A 900 70 -i cr / .in. Js *..J LDA #0 Page 26 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 604A 9DO004 7220 ZTBUF STA $0400,X 604D CA 7225 DEX 604E 1OFA 7230 BPL ZTBUF 6050 A9FE “7 T KT f X.. L.DA # $ r El 6052 20D2F0 7240 JSR WSIOSB 6055 4C32F0 7245 JMP FCAX 6058 8540 7 { ‘“i / tit*. BEEP STA $40 605 A A 5 1 4 ~7 cr *' 4»M 'til/ BEEP! LBA $14 605 C IS 7260 CLC 6 OSD 6 9 1 E “7 r> /. cs; / j~. u . 1 ‘«J ADC #30 60 5 F AA 7270 TAX 6060 A9F F *-7 / 4m / WFL_ LDA #$FF 6062 3D i FDO 7280 STA $D0 IF 6065 A 900 7 O / 4h w ■._* LDA #0 6067 AOFO 7290 LDY #$F0 6069 88 7295 DEY 6 O 6 A DOFD 7300 BNE % 1 606C 3D 1 FDO 7305 STA $D 0 1 F 606P AOFO 73 1 0 LDY #$F0 607 1 88 •■7 4 cr / •-> 1 -,J DEY 6072 DOFD ■~y t a / •— * xx v' BNE £ - 1 6074 E414 ••7 -n- (“i [;• / lint nt/ CPX $ 1 4 607 6 DOES ”7 T *‘T / -joU BNE W F L 6078 C640 7 7* T C' DEC $40 60 7 A F V U .B 7340 BEG) WFAK 60 7C 8 A 7345 TXA 607 D 18 “7 “?• ur / \»*vJ Pi P w l.». w 60 7 E 690 A •**? 7 * cr cr / ADC # 1 0 6080 Ami 7360 TAX 6 V 8 1 E414 CPX $ 1 4 6083 DOFC **#- **7 / BNE vL- -'“I 6085 F0D3 “7 tr *7 cr BEQ BEEP 1 6087 203CF0 7380 WFAK JSF < WF A K 1 60 8 A 98 7385 TYA 6088 60 7390 RTS 608C AD25E4 -7 rr «•-*, cr / •-» 7 O WFAK 1 LDA $E425 608 F 48 7400 PH A 6090 AD24E4 7405 LDA $E424 6093 43 74 1 0 PH A 6094 60 7415 RTS 6095 8 DO 203 7420 SIOSB STA $0302 6u98 A 900 7425 LDA #0 609 A 8D0903 7430 STA $0309 60 9 D A 98 3 7435 LDA #131 609F 8 D 030 3 7440 STA $0308 60 A 2 A 90 3 7445 LDA #3 60 A 4 3 DO 50 3 7450 STA $0305 60 A 7 A9FD 7455 L D At #$FD 60 A 9 8D0403 7460 STA $0304 60 AC A 960 7465 CSIO LDA #$60 60AE 8 D 0003 7470 r> ‘T’ At w* 1 hi $0300 60 B 1 A 9 00 7475 LDA #0 6 OB 3 8 DO 1 03 7480 STA $030 1 60 B 6 A923 7435 LDA ^j. tv cr 6 oB 8 8D0603 7490 STA $0306 6 V B B ADO 203 7495 LDA $0302 60 BE A 040 7500 LDY #$40 60 CO p o cr i L- .■ U 2 . 7505 CMP #$52 Page 27 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 60C2 F002 7510 BEQ *+4 60C4 A080 7515 LDY #$80 60C6 8C0303 7520 STY $0303 60C9 A53E 7525 LDA $3E 60CB 8DOB03 7530 STA $030B 60CE 2059E4 7535 JSR $E459 60D1 60 7540 RTS 60D2 8DFF03 7545 WSIOSB STA $03FF 60D5 A955 7550 LDA #$55 60D7 8DFD03 7555 STA $03FD 60DA 8DFE03 7560 STA $03FE 60DD A957 7565 LDA #$57 60DF 2095F0 7570 JSR SIOSB 60E2 60 7575 RTS 60E3 50 7580 TBLENT .BYTE ’P ’ 60E4 30E4 7585 .BYTE $30,$E4 60E6 43 7590 .BYTE ’C ' 60E7 40E4 7595 .BYTE $40,$E4 60E9 45 7600 .BYTE ’E ' 60EA 00E4 7605 .BYTE $00,$E4 60EC 53 7610 .BYTE ’S ' 60ED 10E4 7615 .BYTE $10,$E4 60EF 4B 7620 ,BYTE 'K ' 60F0 2OE4 7625 .BYTE $20,$E4 =000E 7630 TBLLEN = 14 60F2 A23F 7635 CLICK LDX #$3F 60F4 8 E 1 EDO 7640 CLICK1 STX $D0 1 F 60 F 7 SE0AD4 7645 STX $D40A 6 O F A CA 7650 DEX 60 FB 1 OF 7 7655 BPL CL I CK 1 6 OF D 60 7660 RTS 60 FE A 9 00 7665 COLCR LDA #0 6100 A67B 7 6 7 O LDX $7B 6 1 02 DO 04 7675 BNE COLCR 1 6 1 0 4 A657 7680 LDX $57 6 1 06 D002 7 685 BNE CQLCR2 6 i oQ H •. J J aE 7690 COLCR 1 LDA $52 6 1 OA O CS', cr cr U..' -_j -.J 7695 C0LCR2 STA $55 6 IOC 60 7700 RTS 6 1 OD 424F4F54 7705 DERRS .BYTE BOOT ERROR, $9B 61 1 1 20455252 61 15 4F529B =00F 1 7710 DERRH = DERRS 7256 MM **M =0000 ••7 T 1 cr / / 1 DERRL = DERRS &: 255 611B 453 A 9B *7 -7 '*•> / f xL V ORNEDT .BYTE E:,$9B nr OOF 1 *y**7 '7«cr ** ** »rti OPNH - OPNEDT/256 •*M =0018 7 “?• / / -J'U OPNL = 0PNEDT&255 61 IB 78 7735 RESET SEI 61 1C H 0 4 4 O an! 7740 LDA $0244 6 1 1 F DO 04 7745 BNE PWRUP 6121 A9FF 7 750 L. D A # $ F F 6123 DO 38 “7 **7 cr cr / / V_J BNE PWRUP 1 6125 o / Q 7760 PWRUP SEI 5 POWER UP VECTOR 6 126 48 7 / e>5 PHA . ; SAVE A.X,Y FOR OMNI MON 6127 8 A 7770 T X A 6128 48 »*••/ •“« r*»V ***»• / / / vJ PH A 6129 98 7780 TYA 6 1 2 A 48 7785 PH A PAGE 28 Page 28 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 612B 20B0EC 7790 JSR HARDI 612E AD1FD0 7795 LDA CONSOL ; Console = $D01F 6131 2907 7800 AND #7 ; TEST 3 BITS 6133 C905 7805 CMP #5 ; SELECT KEY 6135 D018 7810 BNE CONTPU 6137 8642 7815 STX $42 6139 8EFE02 7820 STX $02FE ; DSPFLG 613C 8EFF02 7825 STX $02FF ; SSFLAG (Stop/Start Screen Scroll) 613F ADF803 7830 LDA $03F8 ; CHK BASIC FLAG 6142 D005 7835 BNE TRTOP ; NOT THERE 6144 A9FD 7840 LDA #$FD ; WAS THERE 6146 8D01D3 7845 STA $D301 ; TURN BACK ON 6149 2025E9 7850 TRTOP JSR HOWMCH 614C 4CD9F1 7855 JMP ESTSCM 614F AD4402 7860 CONTPU LDA $0244 ; IS IT RESET 6152 D007 7865 BNE PWRUP3 6154 AD3D03 7870 LDA $033D 6157 C95C 7875 CMP #$5C 6159 FOCO 7880 BEQ RESET 615B A900 7885 PWRUP3 LDA #0 615D 8508 7890 PWRUP1 STA $08 615F D8 7895 CLD 6160 A2FF 7900 LDX #$FF 6162 9A 7905 TXS ; STACK POINTER 6163 AD1FDO 7910 LDA CONSOL ; Console $D01F 6166 2906 7915 AND #6 ; SELECT & OPTION 6168 FO13 7920 BEG ENSPEC 616A ADI3DO 7925 SPECL LDA $D013 616D 6A 7930 ROR A 616E 900D 7935 BCC ENSPEC 6170 ADFCBF 7940 LDA $BFFC 6173 D008 7945 BNE ENSPEC 6175 ADFDBF 7950 LDA $BFFD 6178 1003 7955 BPL ENSPEC 617A 6CFEBF ?960 CAINIT JMP ($BFFE) 617D A508 7965 ENSPEC LDA $08 617F F007 7970 BEG TESTB 6181 ADF803 7975 LDA $03F8 6184 D011 7980 BNE ENSPE2 6186 F007 7985 BEG TRNONB 6188 AD1FDO 7990 TESTB LDA CONSOL ; Console $D01F 618B 2904 7995 AND #4 ; OPTION PUSHED 618D F008 8000 BEG ENSPE2 618F AD01D3 8005 TRNONB LDA $D301 6192 29FD 8010 AND #$FD ; TURN ON BASIC ROM 6194 8D01D3 8015 STA $D301 6197 2025E9 8020 ENSPE2 JSR HOWMCH ; GO CHK RAM 619A A508 8025 LDA $08 619C DO24 8030 BNE ZOSRAM 619E A008 8035 ZERORM LDY #8 61AO 8504 8040 STA $04 61A2 8505 8045 STA $05 61A4 9104 8050 CLRRAM STA ($04),Y 61A6 C8 8055 INY 61A7 DOFB 3060 BNE CLRRAM 61A9 E605 8065 INC $05 61AB A605 8070 LDX $05 61AD E406 8075 CPX $06 Page 29 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 61AF DOF3 8080 BNE CLRRAM 61B1 AD72E4 3085 LDA SE472 . 61B4 850 A 8090 ST A $0A 61B6 AD73E4 8095 LDA SE473 6 1 B 9 850B 8 1 00 ST A SOB 61 BB A9FF 8 1 05 LDA #$FF 6 1 B D 8D4402 8 1 1 0 ST A $0244 6 1 CO DO 1 7 81 15 BNE ESTSCM 6 1 C2 A 2 00 8 1 20 Z0SRAM LDX #0 61C4 3A ^ nc* Oii U TX A 6 1 C5 9 D 000 2 8130 Z 0 S R M 2 S T A $ 0 2 0 0 , X 61C8 E0ED o 1 *~r cr CPX #$ED 6 1 CA BOO 3 8 1 40 BCS ZQSRM4 61 CC 9 D 00 03 8145 ST A $0300 ? X 6 1 CF CA 8 1 50 Z0SRM4 DEX 6 1 DO DOF 3 oi CC d 1 BNE Z0SRM2 61D2 A 2 1 0 8 1 60 LDX #*10 61D4 9500 3165 Z0SRM3 ST A *00, X 6 1 D6 E8 8 1 70 I NX 61D7 1 OFB 3175 BPL Z0SRM3 61D9 A 200 8 1 80 ESTSCM LDX #0 61DB AD01D3 8 1 85 LDA $D301 ; IS BASIC ROM THERE 6 IDE 2902 8 1 90 AND #2 61 EO F001 8195 BEQ EST 1 6 1 E2 cr o CIO 8200 I NX 6 1 E 3 8EFS03 O c; ‘ o - j W EST 1 STX S03F8 61E6 A95C 821 0 LDA #S5C 61E8 8D3D03 q o i cr STA S033D 61EB A902 8220 LDA #2 61 ED qct cr/-> O w w jI** q ™ D cr Q XL X.. v.—’ STA $52 6 1 EF A 92 7 8230 L.DA #39 6 1 F 1 O crcrT Q -wJ 1 Q T cr 4*M '.*** STA $53 6 1 F 3 A225 8240 OPSYS LDX #$25 6 1 F 5 BD80E4 8245 M0WEC LDA $E480,X 61F8 9D0002 8250 STA $0200 ? X 61 FB CA O cr cr O A-- V..J U DEX 6 1 FC 1 0F7 826 O BPL M0WEC 61 FE A20E 8265 LDX #$0E 6200 BDE3F0 ■™* .w / V NX TENT LDA $F0E3, X 6203 9D1A03 O 7 cr di. / u STA $031 A, X 6206 CA 8280 DEX 6207 10F7 8285 BPL NX TENT 6209 C611 8290 OSRAM DEC $11 620B A954 8295 LDA #$54 620D 8D3602 8300 STA $0236 6210 A9E7 8305 LDA #$E7 6212 8D3702 8310 STA $0237 6215 A506 8315 LDA $06 6217 8DE402 8320 STA $02E4 621A 8DE602 8325 STA $02E6 621D A900 8330 LDA #0 621F 8DE502 8335 STA $02E5 6222 8506 8340 STA $06 ; 6224 200CE4 8345 JSR $E40C 6227 201CE4 8350 JSR $E41C 622A 202CE4 8355 JSR $E42C 622D 203CE4 8360 JSR $E43C 6230 204CE4 8365 JSR $E44C Page 30 D2:0SNXLV2,M65 6233 206EE4 8370 JSR $E46E 6236 2065E4 8375 JSR $E465 6239 206BE4 8380 JSR $E46B ; ; |Key Value 0 1 2 3 4 5 6 7 | ; | | ; +------------------------------------------------------------+ ; | | ; |OPTION X X X X | ; |SELECT X X X X | ; |START X X X X | ; | | ; +------------------------------------------------------------+ ; Bits 2 0 0 0 0 1 1 1 1 ; 1 0 0 1 1 0 0 1 1 ; 0 0 1 0 1 0 1 0 1 ; ; Where zero means all keys have been pressed, one means ; OPTION and SELECT have been pressed, etc., to seven, which ; means no keys have been pressed. CONSOL is updated every ; stage two VBLANK procedure with the value eight. ; ;--- -------- ---- -------------------------- ------------------ 623C AD1FD0 8385 LDA CONSOL ; Console $D01F 623F AA 8390 TAX 6240 2901 8395 AND #1 ; START KEY 6242 D002 8400 BNE NOSTRT ; ;* ;* Start key ;* ; Cassette boot request flag on coldstart. Checks to see if the ; START key is pressed and, if so, CKEY is set. Autoboot cassettes ; are loaded by pressing the START console key while turning the ; power on. In response to the beep, press the PLAY button on the ; recorder. 6244 E64A 8405 INC CKEY ; CKEY =$4A ;* ;* Start key ;* 6246 58 8410 NOSTRT CLI 6247 8A 8415 TXA 6248 2906 8420 AND #6 ; SELECT & OPTION 624A D010 8425 BNE OMNI2 624C 2001CO 8430 JSR $C001 ; Jump to Omnimon 624F A200 8435 LDX #0 6231 A90C 8440 LDA #$0C 6233 9D4203 8445 STA $0342, X 6256 2056E4 8450 JSR $E456 6259 4C6EF2 8455 JMP ENDBCK ; 625C 8A 8460 OMNI2 TXA 625D 2902 8465 AND #2 ; SELECT KEY 625F D003 8470 BNE CPU2 6261 4C15C0 8475 JMP $C015 ; GOT IT 6264 A200 8480 CPU2 LDX #0 6266 8EE702 8485 STX $02E7 6269 A907 8490 LDA #7 626B 8DE802 8495 STA $02E8 ;--- -------- ---- ------ ------------------- ------------------ 626E AEE402 8500 ENDBCK LDX $02E4 6271 EOBO 8505 CPX #$B0 6273 B00A 8510 BCS ENDACK 6275 AEFCBF 8515 LDX $BFFC 6278 D005 8520 BNE ENDACK 627A E606 8525 INC $06 627C 207AF1 8530 JSR CAINIT ; INIT CART. 627F A903 8535 ENDACK LDA #3 ; OPEN SCREEN 6281 A200 8540 LDX #0 6283 9D4203 8545 STA $0342, X 6286 A918 8550 LDA #$18 6288 9D4403 8555 STA $0344, X 628B A9F1 8560 LDA #$F1 628D 9D4503 8565 STA $0345, X 6290 A90C 8570 LDA #$0C A292 9D4A03 8575 STA $034A, X 6295 2056E4 8580 JSR $E456 6298 1003 8585 BPL SCRNOK 629A 4C25F1 8590 JMP PWRUP ; 629D E8 8595 INX 629E DOF D 8600 BNE SCRNOK 62 AO 08 8605 INY 62A 1 10 FA 86 1 0 BPL SCRNOK AHAT O 4.** M %.* 209EF3 86 1 5 JSR ■± IT T O IT r • 7 It tt CSBOOT 62A6 A506 8620 L D A $06 62A8 F006 8625 BEQ NOCART 62AA ADFDBF 8630 LDA $BFFD 62 AD 6 A 8635 ROR A 62AE 9003 8640 p r' r- NOBOOT 62 BO 20CFF2 3645 NOCART J SR $F2CF ; BOOT . >“ t r -i - 7 * 0 jui 0 ■»> A 900 8650 NO BOOT LDA #0 A 90 s 'hm iLft #*•** \mm* 8D4402 8655 b 1 A $0244 sa Page 31 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 62B8 A506 8660 LDA $06 62BA F00A 8665 BEQ NOCAR2 62BC ADFDBF 8670 LDA $BFFD 62BF 2904 8675 AND #4 6201 F003 8680 BEQ NOCAR2 62C3 6CFABF 8685 JMP ($BFFA) 62C6 6C0A00 8690 N0CAR2 JMP ($0A) ; DOSVEC 62C9 203EF6 8695 BLACKB JSR $F63E ; EGETCH 62CC 4CC9F2 8700 JMP BLACKB A9fF •nt tint »tt«* ( A508 8705 BOOT LDA S08 62D1 FOOA 87 1 0 BEQ NO WARM . p ~r A509 8715 LDA $09 62D5 2901 8720 AND #1 62D7 F003 O 7 cr W / .i«*. W BEQ NO I N I T 6209 207EF3 Q *7 T H O / >JV JSR DINI 62DC 60 P7TC r NO I NIT ! RTS 62DD A90 1 8740 NOWARM 1 l, Da 4 1 62DF 8 DO 1 03 8745 STA $030 1 jl r> cr o w al~ till A 953 8750 LDA #$53 62E4 8 DO 20 3 0 7 cr cr C? / U '2 STA $0302 62E7 2053E4 8 7 6 0 JSR $E453 62EA 1 00 1 8765 BPL DOBOOT z r> cr r' U* .iL L.. w 60 8770 RTS 62ED A900 8775 DO BOOT ! LDA #0 62EF 8 DOB 03 8780 STA $030B A?F? W Ju. I 8D0403 8785 STA $0304 62F5 A 90 1 8790 LDa #1 62F7 SD0A03 8795 STA $030 A 62FA A 904 8800 LDA #4 62 FC 8 DO 50 3 8805 STA $0305 62FF EA 88 1 0 NOP 6300 EA 8815 NOP 630 1 0 ft r Ci p p 8820 SECT1 JSR 6ETSEC 6304 1 008 8825 BF’L ALL SEC 6306 208 1 F3 8830 BADDSK , JSR DSKRDE 6309 A54B 8835 LDA $4B 630 B FOEO 8840 BEQ DOBOOT 63 0D 60 8845 RTS 630E A 20 3 8850 ALLSEC LDX #3 63 1 0 B DO 00 4 8855 RDBYTE 1 LDA $0400 , J T 4 T 0 -2* i *2« 9D4002 8860 STA $0240 , X 63 1 6 CA 8865 DEX 63 1 7 1 OF 7 8870 BPL RDBYTE 63 1 9 AD 4 202 8875 LDA $0242 63 1 C 8504 8880 STA $04 63 1 E AD4302 8885 «v*4 m« LDA $0243 L. T 7‘ 1 O •-.* jc~ a 8505 8890 STA $05 . ~y Q -2* *2* ADO 4 04 8895 LDA *0404 / / w ♦!* O S50C 8900 STA $00 JL T r> Q ADO 50 4 8905 LDA $0405 632 B 85 OD 89 1 0 STA $0D 63 2D A07F 8915 MVBUFF LDY #$7F O t B 9 00 04 8920 MVNXB LDA *0400, Y / *“t* **n* /n 6-:-:-2 9 1 04 r*j 0 07 2 2 STA ($04) , Y / **n* /j O -2* -2' *T 88 8930 DEY , «♦,. c;* fcj -2* -2* %2 1 OF 8 0 0 7 * «r 0 7 BPL MVNXB / «T *!■ «T O -2* -2* / 18 8940 CLC 2. “!* T O 2? *_» ‘-J A 50 4 8945 LDA $04 DOS'VEC EGETCH 63 3 A 6980 8950 ADC #$80 / ‘T p 8504 8955 ST A $04 1 IHJI *•••■ £}-j‘-X«L A 5 05 8960 LDA $05 6340 6900 8965 ADC #0 6342 8505 8970 ST A $05 6344 CE4 1 02 8975 DEC $0241 6347 F011 8980 BEQ ENBOOT 6349 EE0A03 3985 INC $030 A 63 4 C 20C0FC 8990 SECTX J: BR 6ETSEC 63 4 F 10DC 0995 BPL MV BUFF O •-> I 2081 F3 9000 JSR DSKRDE 6354 A54B 9005 LDA $4B 6356 DOAE 90 1 0 BNE BADDSK 6358 POP2 90 1 5 BEQ SECTX 6ojh A54B 9020 ENBOOT I _DA $4B 635C F003 9025 BEQ XBOOT 635E 20C0FC 9030 JSR 6ETSEC 636 1 206CF3 9035 XBGQT J: BR BLOAD 6 3 d> 4 BO AO 9040 BCS BADDSK 6 • j» 6 6 207EF3 9045 JSR DINI 6369 E 6 O 9 9050 I NC $09 63 6 B 60 9055 RTS 636 C 18 9060 BLOAD CLC 636 D AD 4 202 9065 LDA $0242 6370 6906 9070 ADC #6 6372 8504 9075 ST A $04 6374 AD4302 9080 LDA $0243 6377 6900 9085 ADC #0 6379 8505 9090 ST A $05 637B 6 CO 4 00 9095 JMP ( $04 ) 63 7 E 6C0C00 9 1 00 DIN I JMP (TOC) 6381 A20D 9 1 05 DSKRDE LDX #DER RL 6383 A OF 1 9110 LDY #Di:::.RRH 6385 8A 9115 PUTLIN ' TXA 6386 A200 9 1 20 LDX #0 6388 9D4403 O 1 ^ ; X jU ’~i ST A $0344, X 638 B 98 9 1 30 TYA 63 8C 9D4503 Q i t «=: 7 X v 1 i STA $0345, X 638F A 90 9 9 1 40 LDA #9 6391 9D4203 9145 STA $0342, X 6394 A9FF 9 1 50 LDA #$FF 6396 9D4803 9 1 55 STA $0348 3 X 6399 4C56E4 9 1 6U JMP $E456 639C EA 9165 NOP 63 8 D EA 9 1 70 NOP 63 9E A 50 8 9175 CSBOOT LDA $08 63 AO FOOA 9 1 80 BEQ CSB0T2 63A2 A 50 9 9185 LDA $09 63 A 4 9QA? T « ... / * M * 9 1 90 AND #2 63 A 6 F003 9 1 95 BEQ k } n r o o r> j 4 U X./ w/L'A. 63A8 20CDF3 9200 JSR CINI 63 A B 60 9205 N0CSB2 1 rrs 6 3 AC A54A 9210 CSB0T2 LDA $4A 63 A E F01C 9215 BEQ NOCSBT 63 BO A9SO 9220 LDA #$80 L TDO O jD 853 E O “0 cr STA $3E 63 B 4 E64B 9230 INC $4B 63B6 207DE4 9235 JSR $E47D Page 32 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 63B9 2001F3 9240 JSR SECT1 63BC A900 9245 LDA #0 63BE 854B 9250 STA $4B 63CO 854A O KT KT 7 ol w* ST A $ 4 A / 7-r-n ***** >m«* itw 0609 9 2 6 O ASL $09 63 C 4 A50C Q r> ^ 7 4.4 '_.F LDA $0C 63C6 8502 9270 ST A $02 63C8 A 500 9 2 7 5 LDA $0D 63CA 8503 9280 STA $03 63 CC 60 9285 N0CSBT RTS 63CD 6 C 0200 9290 CINI JMF 5 ($ 02 ) 63 DO A9FF 9295 RWR0NA LDA #$FF 63 D 2 8DFC02 9300 STA $02FC 63D5 ADE602 9305 LDA $02E6 6308 29F0 93 1 0 AND #$F 0 63 DA 856A 93 1 5 STA $6 A 6 3 DC A 9 40 QT?n / ***** 4~- LDA #$40 63 DE 80 BE 02 • “J* ^*a* *•*•» / O -C* U STA $02BE 63E 1 60 9330 RTS 63 E 2 A205 C) T T er 7 •«.* •— * wj D0PEN0 LDX #5 63E4 B0C8FE 9340 0 OPENS L .DA COLR ( B-l >1 X 63 E 7 9DC302 9345 STA $02C3,X e>j*EA C A 9350 OEX JL T il tj o ti. £.« DOF 7 Q7s c ; BNE D0PEN8 63ED 8664 9360 STX $ 6 4 63 EF A46A 9365 LDY $ 6 A 63F 1 88 9370 DEY 63 F 2 8C9502 9375 STY $0295 63F5 60 9380 RTS 63 F 6 A52B O T Q 7 - J* O DOPEN LDA $2B 5 OLD DOPEN 63F8 2 9 OF 9390 AND #$ 0 F 63 FA 0008 o 7' O 7 O 7 BNE OPNCOM 63FC A -..J jL. A 9400 EOPEN L.0A $2A 6-lr fc. 29 OF 9405 AND #$0F 6400 852A 94 1 0 STA $2A 6402 A 900 9415 LDA #0 6 4 0 4 8557 9420 OPNCQM STA $57 64 06 c* ■'“> p t 9425 JSR DOPE NO 6409 8E9302 9430 STX $0293 64 0C 86 7 B 9435 STX $7B 64uE 8EF002 9440 STX $ 02 F 0 6411 A9E0 9445 LDA #$E0 6413 8 OF 402 9450 STA $02F4 64 1 6 A 90 2 9455 LDA #2 64 1 8 8 OF 30 2 9460 STA $02F3 64 IB 802F02 9465 STA $022F 64 IE A 90 1 9470 LDA #1 6420 854 C 9475 STA $4C ,l a ™ r> O !' al2 atw A00E 9480 LDY #14 6424 99 A 3 02 9485 CLP TBS STA $02 A3, Y 6427 88 9490 DEY 6428 1 OF A 9495 BPL CLRTBS 642A A 9 CO 9500 LDA #$C0 i/inr- La’ A* 4L La‘ 05 1 0 9505 ORA $ 1 0 642E 85 1 0 95 1 0 STA $ 1 0 6430 8D0ED2 O ui” •{ i:::; 7 '—J 1 \..i STA $D20E 6433 A 9 6 O O c- O f) 7 .c, w LDA #$60 6435 809402 q «■-. r> / w jL w STA $0294 PAGE D2s OSNXL V2 . M65 6438 M O %J / 9530 L D X $57 643 A BD55FE Q kt. *T cr LDA ANCON V, X 64 3D DOG 4 9540 BNE DOPENA 64 3F A99 1 9545 OFNERR LDA #$91 6441 85 4C 9550 STA $4C 6443 8551 9555 DOPE N A STA $51 6445 A56A 9560 LDA $6 A 6447 8565 9565 STA $ 6 5 6449 BC25FE 9570 LDY ALOCAT , X 644C A92S 9575 D0PEN1 LDA #40 644E 202 1F9 9530 JSR DBSUB 645 1 88 9585 DEY 6452 DOF 8 9590 BNE DOPEN 1 6454 AD6F02 9595 L. D A $026F 6457 293F 9600 AND #$3F 6459 3567 9605 STA $67 64 5 B A 8 96 1 0 TAY 645C E008 96 1 5 CPX #8 64 5E 90 1 F 9620 BCC NOT 8 64 6 U EOOF 9625 CPX #15 6462 FOOD 9630 BEQ MODE 1 5 6464 EOOC 9635 CPX #12 6466 BO 1 7 9640 BCS NOT 8 6468 8A 9645 T X A 6469 6 A 9650 ROR A 64 6 A 6 A 9655 ROR A 6 4 6 B 6 A 9660 ROR M 64 6 C 29 CO 9665 AND #$C0 6 4 6 E 0567 9670 URA $67 6470 A8 9675 TAY 6471 A 9 1 0 9680 MODE 15 i -DA #16 6473 202 1 F9 9685 JSR DBSUB 6476 EDGE 9 6 9 0 CPX #11 6478 DO 05 9695 BNE NOT 8 o4/h A 9 06 9700 L D A #6 64 7 C 8DC802 9705 STA $02C8 647F 8C6F02 9710 NOT 8 ST' Y $026F 6482 h 564 9715 LDA $64 6404 Q £=; cr Q uJ O 9720 STA $58 6436 A565 O c. ft LDA $65 64 8B 8559 O **7 t r\ 7 / STA $59 6 4 Q A AD0BD4 9735 VBWAIT I LDA $D40B 648D C97A 9740 CMP #$7A 64 8F DOF 9 9745 BNE VBWA I T 6 4 9 1 201FF9 9750 JSR DBDEC 6494 BD65FE 9755 L 0 A PAGE TBp X 6497 F006 9760 BEQ NOMOD 6499 A9FF 9765 LDA #$FF 649B 8564 9770 STA $ 6 4 649D C665 Cp 7 7 ESj DEC $65 649F A 5 64 9780 NOMOD LDA $64 64A1 8568 9785 STA $68 6 4 A3 A 5 65 9790 LDA $65 64A5 8569 Q7QC; STA $69 64A7 20 1 3F9 9800 J SR DBDDEC 64 A A A 94 1 9805 LDA #$41 6 4 AC 20 1 7F9 93 1 0 J SR STORE 64 A F 8666 9815 STX $ 6 6 P A G E 6 4 B 1 A918 9820 E D A #24 64 B3 8 DBF 02 QP7CT / W W ST A $02BF 64B6 A557 9830 LDA $57 64 B 8 C90C O p T cr CMP #12 64 B A BO 04 9840 BCS MODE 12 64 BC C909 9845 CMP #9 64BE B02D 9850 BCS NOTMXD 64 CO AS 2 A 9855 MODE 12 LDA $ 2 A 6402 2910 9860 AND #$ 1 0 64C4 F027 9865 BEQ NOTMXD 64C6 A 90 4 9870 LDA #4 64 CS 8 DBF 02 9875 STA $U2BF 64CB A202 9880 LDX #2 64CD A 90 2 9885 DOPE N 2 L ..DA #2 64CF 2017F9 9890 J SR STORE 64D2 t~* /\ UM 9895 DEX 6403 1 OF 8 9900 BPL D OPEN 2 64D5 A 4 6 A 9905 LDY $6 A 6407 QQ DO 99 1 0 DEY 6408 98 99 1 5 TYA 6409 20 1 7F9 9920 J SR STORE 64 DC A96o Q Q P 5 LDA #$60 640E 2017F9 9930 JSR STORE 64 E 1 A942 9935 LDA #$42 64E3 20 1 7F9 9940 JSR STORE 64 E 6 18 9945 Q L> L 64E7 A 9 1 0 9950 L D A #MXDMDE-NUMDLE 64 E 9 6566 9955 ADC $66 64EB 8566 9960 STA $66 64 EO A466 9965 N0TMXD L .DY $66 64EF BE35FE 9970 LDX NUMDLE , Y 64F2 ASS 1 9975 D0PEN3 LDA *51 64 F 4 20 i 7F9 9980 JSR STORE 64F7 CA 9985 DEX 64F8 DOFS 9990 BNE DOPE N 3 64 F A A 55 7 9995 LDA $57 64FC C908 0 1 0000 CMP #8 64 h E 9026 0 1 0005 ■q n p JmO »,*«.■ itn* D0PEN5 6500 C90F 0 1 00 1 0 CMP #15 6502 F 004 0 1 00 1 5 BEQ MDE 1 5 6504 C90C 0 1 0020 CMP # 1 2 6506 B 0 1 E 0 1 0025 BCS D OPENS 6508 /% o a- pi PI ou, kJ 0 i 0030 MDE15 LDX #93 650 A A 5 6 A 0 1 0035 LDA $6 A 650C 38 0 1 0040 SEC 6500 E9 1 0 0 1 0045 SBC #$ 1 0 65 OF 20 1 7F9 0 1 0050 JSR STORE 65 1 2 A 9 00 010055 LDA #0 6514 20 1 7F9 0 1 0060 JSR STORE 6517 ASS 1 0 1 0065 L D A $51 6519 0940 0 1 0070 OR A #$40 65 1 B 20 1 7F9 0 1 0075 JSR STORE 65 1 E ASS 1 0 1 0080 DOPE N 4 LDA $51 6520 2017F9 0 1 0085 JSR STORE / cr •**-» O U ■_> CA 0 1 0090 DEX 6524 DOFS 0 1 0095 BNE DQPEN4 w xL w A559 0 1 0 1 00 D OPEN 5 LDA $59 6528 20 1 7F9 0 1 0 1 05 JSR STORE 652B A558 0 1011 0 LDA $58 6b 2D 20 I 7F9 0 1 0 1 1 5 JSR STORE 6530 A55 1 0 1 0 1 20 LDA $51 jl t •“ W •»' 4L 0940 010125 ORA #$40 6534 A 20 3 0 1 0 1 30 LDX #3 6536 2017F9 010135 DO PEN* > JSR STORE 6539 A 9 70 0 1 0 1 40 LDA #$70 65 3 B CA 0 1 0 145 DEX 6j.jL DOF 8 0 1 0 1 50 BNE D0PEN6 653E A 56 4 0 1 0 1 55 L D A $64 6540 8D3002 0 1 0 1 60 ST A $0230 6543 A 56 5 0 1 0 1 65 LDA $65 6545 8D3102 010170 STA $023 1 6548 A 970 0 1 0 1 75 LDA #$70 654A 2017F9 0 1 0 1 80 JSR STORE 654D A564 0 1 0 1 35 LDA $64 654F 8DE502 0 1 0 1 90 STA $02E5 6552 A565 0 1 0 1 95 LDA $65 6554 8DE602 0 1 0200 STA $02E6 • <■*«* ***** ■ »**» «* i++* Um QJJ / A568 0 1 0205 LDA $68 8564 0 1 02 1 0 STA $64 65 5 B A569 010215 LDA $ 6 V 655 D 8565 0 1 0220 STA $65 655F AD 3 1 02 0 1 0225 LDA $0231 6562 2017F9 0 1 0230 JSR STORE / c:; / er Q A 03 00 2 0 1 0235 LDA $0230 6 5 6 8 2017F9 0 1 0240 JSR STORE 6 b 6 B A54C 010245 LDA $4C 656 D 1 007 0 1 0250 BPL D0PEN9 6 b 6 F 48 0 1 0255 PH A 6570 20FCF3 0 1 0260 JSR EGPEN 6573 68 0 1 0265 F‘LA 6574 AS 0 1 0270 TAY 6575 60 0 1 0275 RTS 6576 A cr A ri jL m 0 1 0280 D OPEN 9 LDA $2A 6578 »!»*• * «4>* • *»♦ 0 10285 AND #$20 657 A DO OB 0 1 0290 BNE D0PEN7 6570 20B9F7 0 1 0295 JSR CLRSCR i, i=; t pr o -.j / r 80 9 002 0 1 0300 STA $0290 z_ q r> W O jL A i- O rl -*J \J .c.. 0 1 0305 LDA $52 6584 8D9102 0 1 03 1 0 STA $029 1 6587 A922 0 1 03 1 5 DO PEN 7 ' LDA #$22 6589 0D2F02 0 1 0320 ORA $022F 658C 8D2F02 0 1 0325 STA $022F 6 5 OF 4C2 1 F6 0 1 0330 JliF* RETUR2 6592 EA 0 1 0335 NOP ; F I L 6593 2096 FA 0 1 0340 GETCH JSR RANGE 6 5 9 6 20A2F5 010345 JSR GETPLT 6599 •**0 “7 •*;. cr D 0 1 0350 JSR I NAT AC 659C 20D4F9 ji i A T UIT 1ST O 1 «._) . j, Hi 7j JSR INCRSB 65 9 F 4C34F6 0 1 0360 J MR RET UR 1 65 A 2 204 7 F9 010365 GETPLT ' JSR CONVRT 65 A 5 B 1 64 0 1 0370 LDA ($64) , v 65A7 2D A 002 010375 AND $02 AO 65AA 466F 010380 SHIFT'D LbR $6F 65 AC BOO 3 0 1 0385 L><* SH I FT 1 6 b A L 4 A 0 1 0390 LSR A 65 A F 1 0 F 9 0 1 0395 BPL SHIFT'D Page 37 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 65B1 8DFA02 010400 SHIFT1 STA $02FA 65B4 C900 010405 CMP #0 65B6 60 010410 RTS 65B7 8DFB02 010415 OUTCH STA $02FB 65BA 2096FA 010420 JSR RANGE 65BD ADFB02 010425 OUTCHA LDA $O2FB 65CO C97D 010430 CMP #$7D 65C2 0006 010435 BNE OUTCHE 65C4 20B9F7 010440 JSR CLRSCR 65C7 4C21F6 010445 JMP RETUR2 65CA ADFB02 010450 OUTCHE LDA $02FB 65CD C99B 010455 CMP #$9B 65CF DO06 010460 BNE OUTCHB 65D1 2030FA 010465 JSR DOCRWS ; Do CR WARMSTART 65D4 4C21F6 010470 JMP RETUR2 ;* ;* ;* 6507 20E0F5 010475 OUTCHB JSR OUTPUT 65DA 20D8F9 010480 JSR INCRSR 65DO 4C21F6 010485 JMP RETUR2 ;* ;* ;* 65E0 ADFF02 010490 OUTPUT LDA $02FF ; SSFLAG (Start/Stop Flag) 65E3 DOFB 010495 BNE OUTPUT ; tight loop ! 65E5 A202 010500 LDX #2 65E7 B554 010505 CRLOOP LDA $54,X 65E9 955A 010510 STA $5A,X 65EB CA 010515 DEX 65EC 10F9 010520 BPL CRLOOP 65EE ADFB02 010525 LDA $02FB 65F1 A8 010530 TAY 65F2 2A 010535 ROL A 65F3 2A 010540 ROL A 65F4 2A 010545 ROL A 65F5 2A 010550 ROL A 65F6 2903 010555 AND #3 65F8 AA 010560 TAX 65F9 98 010565 TYA 65FA 299F 010570 AND #$9F 65FC 1DF0FF 010575 ORA ATAINT,X 65FF 8DFA02 010580 0UTCH2 STA $02FA 6602 2047F9 010585 JSR CONVRT 6605 ADFA02 010590 LDA $02FA 6608 466F 010595 SHIFTU LSR $6F 660A B004 010600 BCS SHIFT2 66OC OA 010605 ASL A 660D 4C00F6 010610 JMP SHIFTU 6610 2DA002 010615 SHIFT2 AND $02AO 6613 8550 010620 STA $50 6615 ADA002 010625 LDA $02AO 6610 49FF 010630 EOR #$FF 661A 3164 010635 AND ($64),Y 661C 0550 010640 ORA $50 661E 9164 010645 STA ($64),Y 6620 60 010650 RTS 6621 20A2F5 010655 RETUR2 JSR GETPUT 6624 855D 010660 STA $5D 6626 A657 010665 LDX $57 6628 D00A 010670 BNE RETUR1 662A AEF002 010675 LDX $02F0 662D D005 010680 BNE RETUR1 662F 4980 010685 EOR #$80 Page 38 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 6631 20FFF5 010690 JSR OUTCH2 6634 A44C 010695 RETUR1 LDY $4C 6636 A901 010700 LDA #1 6638 854C 010705 STA $4C 663A ADFB02 010710 LDA $02FB 663D 60 010715 NOFUNC RTS 663E 209BFC 010720 EGETCH JSR SWAP 6641 20SSFA 010725 JSR ERANGE 6644 A56B 010730 LDA $6B 6646 D034 010735 BNE EGETC3 6648 A554 010740 LDA $54 664A 856C 010745 STA $6C 664C A555 010750 LDA $55 664E 856D 010755 STA $6D 6650 20E2F6 010760 E6ETC1 JSR KGETCH 6653 844C 010765 STY $4C 6655 ADFB02 010770 LDA $02FB 6658 C99B 010775 CMP #$9B ; CR? 665A F012 010780 BEQ EGETC2 665C 20ADF6 010785 JSR DOSS 66 5 F 209 BFC 0 1 0790 JSR SWAP 6662 A563 0 1 0795 LDA $ 6 3 6664 C97 1 0 1 0800 CMP # 1 1 3 i i i i O O O £) D003 O 1 0805 BNE EGETC6 o o o o 200 AF 9 0 1 08 1 0 J SR BELL 66 6 B 4C50F6 0 1 08 1 5 EGETC6 JMP E6ETC1 666E 20E4FA 0 1 0820 EGETC2 JSR GFFCRS 66 7 1 20F8FB 0 1 0825 JSR D0BUFC 66 7 4 A56C 0 1 0830 LDA $6C 66 7 6 8554 0 1 0835 STA $54 66 7 8 A56D 0 1 0340 LDA $6 D 66 7 A 8555 0 1 0845 STA $55 6 6 7 C A56B 0 1 0850 EGETC3 LDA $6B 66 7 E F01 i 0 1 0855 BEQ EGETC5 668U C66B 0 1 0860 EGETC7 DEC $6B 6682 FOOD 010865 BEQ EGETC5 6684 A54C 0 1 0870 LDA $4C 6686 30F8 010875 BMI EGETC7 6668 2093F5 010880 JSR GETCH 668B 8DFB02 0 1 0885 STA $02FB L. i l q r: OuuC. 4C9BFC 0 i 0890 JMP SWAP 6691 2030FA 010895 EGETCS JSR DOCRWS 6694 A99B 010900 LDA #$9B 6696 8DFB02 010905 STA $02FB 6699 2021F6 010910 JSR RETUR2 669C 844C 0 1 09 1 5 STY $4C 66 9 E 4C9BFC 0 1 0920 JMP SWAP 66 A 1 6 C 6 4 O O 0 i 0925 JSR I ND JMP ($64) 66A4 8DFB02 0 i 0930 E DUTCH STA $02FB 66A7 209 BFC 0 1 0935 JSR SWAP 66 A A 2 088 FA 0 1 0940 JSR ERANGE 66 AD 20E4FA 010945 DOSS JSR QFFCRS 66B0 2015E9 010950 JSR TSTCTL 66B3 F009 010955 BEQ EOUTC5 66B5 0EA202 010960 E0UTC6 ASL $02A2 66B8 20CAF5 010965 JSR OUTCHE 66BB 4C9BFC 010970 ERETN JMP SWAP ;--- -------- ---- -------- ----------------- ------------------ 66BE ADFE02 010975 E0UTC5 LDA $02FE Page 39 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 66C1 0DA202 010980 ORA $02A2 66C4 D0EF 010985 BNEE EOUTC6 66C6 0EA202 010990 ASL $02A2 66 0 9 Ed 0 1 0995 I N X 66CA BDCEFE 0 1 1 000 LDA CNTRLS, X 66 CD 8564 0 1 1 005 STA $64 66CF bdcffe 0 1 1 C) 1 0 LDA CNTRLS+1,X 6 6 D 2 O cr / c* OJOJ 011015 STA $65 6 6 D 4 20A1F6 0 1 1 020 JSR J GRIND 66 D7 202 1 F6 0 1 1 025 JSR RETUR2 66 DA 4C9BFC 0 1 1 030 JMP SWAP 66 DD A9F F 0 1 1 035 K6ETC2 LDA #$FF 66 DF 8DFC02 0 1 1 040 STA $02FC 66 E 2 A52A 0 1 1 045 KSETCH LDA $2A 66E4 4 A 0 1 1 050 LSR A 66 E 5 B062 u 1 1 odd ppq ppini IT JU7 w U 144 1 U W f t / r*- •••y / A980 011060 LDA #$80 66 E 9 A61 1 0 1 1 065 LDX $11 66EB F058 0 1 1 070 BE 0 K7 66ED ADFC02 0 1 1 075 LDA $02FC 66F0 C9FF 0 1 1 080 CMP #$FF 66 F 2 F0EE 0 1 1 085 BEQ KGETCH 66 F 4 85 7C 0 1 1 090 STA $7C 66 F 6 A2FF 0 1 1 095 LDX #$FF 66F 8 8EFC02 0 1 1 1 00 SIX $02 FC 66 F B 20F2F0 0 1 1 1 05 JSR CLICK 6tor E A A 0 1111 0 K6ETC3 TAX 66 FF E0C0 0 11115 CPX #$C0 670 1 9002 0 111 20 BCC ASCC01 6703 A 20 3 0111 25 LDX #3 ;--- -------- ---- -------- ----------------- ------------------ 6705 BDFEFE 011130 ASCC01 LDA ATASCI,X 6703 8DFB02 011135 STA $02FB 670B C980 011140 CMP #$80 670D F0CE 0 1 1 1 45 BEQ KGETC2 67 OF C98 1 0 1 1 1 50 CMF : ‘ #$81 6711 D00B 0 1 1 1 55 B N E k L? E T C 1 67 1 3 ADB6U2 0111 60 LDA $02B6 67 1 6 4980 0111 65 FOR #$80 6718 8DB602 01 1 170 STA $02B6 67 IB 4CDDF6 0111 75 JMP KGETC2 67 IE C9S2 0111 80 K6ETC1 CMP #$82 6720 D007 0 11185 BNE K 1 y ”7 o o O / .U.. .!« A 900 01 1190 LDA #0 6724 8 D BE 02 0 1 1 1 95 STA $02 BE / ~y C> / jL. / F0B4 0 1 1 200 BEQ KGETC2 672? C983 0 1 1 205 K 1 CMP #$83 .6. *7 p D007 0 1121 0 BNE l<2 6 7 2D A 940 0 11215 LE>A # $ 4 O , p V-> / 46,! 8DBE02 0 1 1 220 STA $02 BE / 7 “T iii^ / *<» * ifi n DO A 9 0 1 1 225 BNE KGETC2 6734 0984 0 1 1 230 l<2 CMP #$84 6736 D007 0 1 1 235 BNE K3 6738 A 980 01 1240 LDA #$80 67 3 A 8DBE02 01 1245 STA $02BE 67 3D D09E 0 1 1 250 BNE KGETC2 O / 0*1“ C985 a ■» j I™ ur V j. J. .U.. ‘..J K3 CMP #$85 6741 DOOA 0 1 1 260 BNE K6 6743 A988 01 1265 LDA #$88 PAGE 40 D2: 0SNXLV2. M65 6745 8540 0 1 1 270 K7 ST A $4C 6747 851 1 0 1 1 275 STA $11 6749 A99B 0 1 1 280 GETOUT LDA #$9B 674B DO 2 6 0 1 1 285 BNE K8 674 D A57C 0 1 1 290 K6 LDA $7C 674F 0940 01 1295 CMP #$40 675 1 B0 1 5 0 1 1 300 BCS K5 6753 ABFB02 0 1 1 305 LDA $02FB 6756 0961 0 1 1 3 1 0 CMP #$61 6758 900 E 0 1 1 3 1 5 BCC K5 675 A 09 7 B 0 1 1 320 CMP #$7B 6750 BOO A 0 1 1 325 BCS K5 6 7 5E AD BE 02 0 1 1 330 LDA $02BE 6 7 6 1 F005 0 1 1 335 BEG K5 / -y / “i* o / oo Uj / w 011340 ORA $7C 6765 4CFEF6 0 1 1 345 JMP KGETC3 6 / 60 2015E9 0 1 1 350 K5 J SR TSTCTL 67 6 B F009 0 1 1 355 BEQ K4 6 7 6 D A OF BO 2 0 1 1 360 LDA $02FB 6770 4DB602 0 1 1 365 EOR $02B6 6773 8DFB02 0 1 1 370 KS STA $02FB 6776 4C34F6 0 1 1 375 K4 JMP EETUR1 6779 A 980 0 1 1 380 ESCAPE LDA #$30 677B 80 A 202 0 1 1 385 STA $02A2 677E 60 0 1 1 390 RTS 677F □65 4 0 1 1 395 CRSRUP DEC $54 678 i 1 006 0 1 1 400 BPL COMRET 6783 AEBF02 0 1 1 405 LDX $02BF 6786 CA 01141 0 DEX 6787 8654 0 1 1 4 1 5 UPDNCM STX $54 6789 4C54FC 0 1 1 420 COMRET JMP STRBEG 678C E654 01 1425 CRSRDN INC $54 6 7 8E A554 0 1 1 430 LDA $54 6790 □DBF 02 0 1 1 435 CMP $02BF 6793 9 OF 4 0 1 1 440 BCC COMRET 6795 A 2 00 011445 LDX #0 6797 FOEE 0 1 1 450 BEQ UPDNCM 6799 □655 0 1 1 455 CRSRLF DEC $55 6798 A cr c: ri o w 0 1 1 460 LDA $55 6790 3004 0 1 1 465 BMI CRSRL1 67 9 F !• i-: n:: \«»i »i»». 0 1 1470 CMP $52 67 A 1 BOO 4 0 1 1 475 BCS CQMRE1 67 A3 c:;- nr- t M wi vJ 0 1 1 480 CRSRL1 LDA $53 67A5 8555 0 1 1 485 LFRTCM STA $55 67 A 7 4CD5FB 0 1 1 490 C0MRE1 JMP DOLCOL 67 A A E655 01 1495 CRSRRT INC $55 6 7 AC /\ u;: c:: e;:: hi U U 0 1 1 500 LDA $55 67AE r •• er cr “y w w w 0 1 1 505 . CMP $53 6 7 BO 90F5 0 1151 0 BCC C0MRE1 A t ft F0F3 011515 BEQ C0MRE1 67 B4 a fz; c: H j_. 0 1 1 520 LDA $52 67B6 4CA5F7 0 1 1 525 JMP LFRTCM 67 B9 20D4FC 0 1 1 530 CLRSCR J SR PUTMSC 678C A 000 01 1535 LDY #0 67 BE 98 0 1 1 540 TYA 67BF 9 164 01 1545 CLRSC2 STA ($64), 67C 1 C8 0 1 1 550 INY i.7pn C : *** DOFB 0 1 1 555 BNE CL.RSC2 PAGE 41 D2: 0SNXLV2. M65 67C4 E665 0 1 1 560 INC $65 67C6 A 66 5 0 1 1 565 LDX $65 67C8 E 4 6 A 0 1 1 570 CPX $6 A A7PA u / un 90F3 011575 tj n n r* i o c r** ^ Jd L./ 1...* Lv Lu r\ -.j L./ .1 m. 67CC A9FF 0 1 1 580 LDA #$FF 67CE 99B 202 0 1 1 585 CLRSC3 8TA $0282, Y 67D1 C8 0 1 1 590 I NY 67 D 2 COO 4 0 1 1 595 CF’Y #4 67D4 9 OF 8 0 1 1 600 BCC CLRSC3 67D6 20FEF0 0 1 1 605 HOME JSR COLOR 67 D 9 8563 0 1 1 6 1 0 STA $63 67DB 856 D 011615 UTA $6D 67DD A 900 0 1 1 620 LDA #0 67DF 8554 0 1 1 625 STA $54 67E 1 8556 0 1 1 630 STA $56 67 E 3 35 6 C 0 1 1 635 STA $6C 67E5 60 0 1 1 640 RTS 6 7 E 6 A563 0 1 1 645 BS LDA $63 67 E8 i™ cr cr -’™i W ul 0 1 1 650 CMP $52 67 E A F02 1 0 1 1 655 BEQ BS 1 6 7 EC /\ cr c: cr M •. J \ J -_J 0 1 1 660 BSA LDA $55 67 EE f” cr cr -“'i •mV ( <mJ 'imV >t*M 0 1 1 665 CMP $52 67F0 DG03 0 1 1 670 BNE BS3 67F2 206BFC 01 1675 JSR DELTIM 67F5 20' 99 F 7 0 1 1 680 BS3 JSR CRSRL.F 671-8 a cr cr cr M _J -~J sJ U 1 1 685 LDA $55 O T1 C553 0 1 1 690 CMP $53 67FC D007 011695 BNE BS2 6 / F E ASS 4 0 1 1 700 LDA $54 6800 F003 0 1 1 705 BEQ BS2 6802 207FF7 0 1 1 7 1 0 JSR CRSRUP 6805 A 9 20 0 1 1 7 1 5 BS2 LDA #$20 6807 8DFB02 0 1 1 720 STA $02FB 68 U A 20 EOF 5 A 1 1 “7 'J .1.4./ -*C w JSR OUT PL r 680 D 4CD5FB 0 1 1 730 B S 1 J M P D 0 L U 0 L 68 1 0 20AAF7 0 1 1 735 TAB JSR CRSRRT 68 1 3 /\ cr cr cr rn vJ v_i 011740 LDA $55 68 1 5 ■ ic; cr » > •' 'ht.i* '.-n' 0 1 1 745 CMP $52 68 1 7 D00A 0 1 1 750 BNE TAB 1 681A 2034FA 011755 JSR DOCR 681C 2020FB 011760 JSR LOGGET 681F 9002 0 1 1 765 BCC TAB 1 682 1 BOO 7 0 1 1 770 BCS TAB2 / o O 7 O .c. A 56 3 01 1775 TAB 1 LDA $63 / q o cr w O u O -p* cr; C* ID ■U V -C V..* ! L) 0 1 1 780 JSR BITGET i. Q O Q 90E6 0 1 1 785 BCC TAB 68 2 A 4CD5FB 0 1 1 790 TAB2 JMP DOLCQL 68 2D A563 0 1 1 795 SET TAB LDA $63 6 8 2 F 4C06FB 0 1 1 800 JMP BITSET L Q T r? ■-.* u.. 1 •„< j:.. A563 0 1 1 805 CLRTAB LDA $63 6834 4C12FB 0 1 1 8 1 0 JMP BITCLR 6837 2085FC 0 1 1 8 1 5 I N S C H R J S R P H A C R 8 68 3 A 20A2F5 0 1 1 820 JSR GETPLT 68 3D 857D 011825 STA $7D 8 8 3 F A 900 0 1 1 830 LDA #0 684 i 8DBBU2 0 1 1 835 STA $02BB 6844 20FFF5 0 1 1 840 INSCH4 JSR DUTCH 2 6847 A 56 3 0 1 1 845 LDA $63 PAGE 68 4 V 48 0 1 1 850 PH A 684 A 20DCF9 0 1 1 855 JSR I NCRSA 684D 6S 0 1 1 860 PLA 68 4 E C563 V 1 1 865 CMP $63 6850 B00C 0 1 1 870 BCS INSCH3 l o r? 1 1*J .L-. A57D 0 1 1 875 INSCH1 LDA $7D 6854 48 0 1 1 880 PHA 6855 20A2F5 0 1 1 885 JSR GETPLT 6858 857D 01 1890 ST A $7D 68 5 A 68 0 1 1 895 PLA 685B 4C44F8 0 1 1 900 J MR I NSCH4 685E 20 9 OF C 0 1 1 905 I NSCH3 i JSR PLACRS 686 1 CEB BO 2 0 1 1 9 1 0 I NSCH6 . DEC $0288 6864 3004 011915 SMI INSCH5 6 8 6 6 C654 0 1 1 920 pi f $54 l c::* jl o o o o o DOF 7 0 1 1 925 BNE I NSCH6 686 A 4CD5FB 0 1 1 930 I NSCH5 1 JMP DDL COL 68 6 D 2035FC 0 1 1 935 DEL CHE JSR PHACRS 6870 204 7F9 0 1 1 940 DELCH 1 JSR CONOR T 6873 A564 0 1 1 945 LDA $64 6875 8568 0 1 1 950 ST A $68 6877 A 565 0 1 1 955 LDA $65 6879 8569 0 1 1 960 ST A $69 687B A 56 3 0 1 1 965 LDA $63 68 7D 48 0 1 1 970 PHA 68 7E 20D4F9 011975 JSR INCRSB 6881 68 0 1 1 980 PLA 6882 C563 0 1 1 985 CMP $ 6 3 6884 B0 i 0 0 i 1 990 BCS DELCH2 6886 A554 0 1 1 995 LDA $54 6888 CDBF02 0 1 2000 CMP $02BF 688B BOO 9 0 1 2005 BCS DELCH2 68 8 D 20A2F5 0 1 20 1 0 JSR GETPLT 68 9 U A 000 0 1 20 1 5 LDY #0 6892 9 X 6 8 0 1 2020 ST A ( $68 ) * Y 6894 F0DA 0 1 2025 BEG DELCH 1 6896 A 000 0 1 2030 DELCH2 LDY #0 6898 98 0 1 2035 TYA 6899 9168 0 1 2040 ST A ($68) „ Y 6898 20 6 OF C 0 1 2045 JSR DELT I A 689E 2090FC 0 1 2050 JSR P L A C R 6 68 A 1 4CD5FB y\ •} “i .-s er w x 2v J J JMP DOLCOL 68 A 4 •2*0 0 1 2060 I NSL I N SEC 68 A 5 207BFB 0 1 2065 I NSL I A i JSR EXTEND 68 A 8 ASS 2 0 1 2070 LDA $52 68 A A 8555 0 1 2075 ST A $55 68AC 2047F9 0 1 2080 JSR CONOR T 68 A F A564 0 1 2085 LDA $64 6881 8568 0 1 2090 ST A $68 jL q d O w £.» 18 0 1 2095 CLC 68B4 6928 0121 00 ADC #40 6886 8566 0 121 05 ST A $66 68B8 A565 01211 0 L. D Ai $65 68 BA 8569 0 12115 STA $69 68 BC 6900 0 1 2 1 20 ADC #0 z. ini* tj tr O O A..* £2 8567 0 1 2 1 25 STA $67 68C0 A 6 5 4 0 1 2 1 30 L D X $54 68C2 EG 1 7 0 1 2 1 35 CPX #23 PAGE 43 6 SC 4 F008 0 121 40 BEQ I NSL I 2 68 C 6 204EFB 012145 I NSL I 1 JSR MOV LIN 68C9 E 8 0 1 2150 I NX 63CA E0 1 7 /**•, i '“h cr cr U 1 46 . j. u ij CPX 12 «« -n- tr x* • J* 6SCC DOF 8 0 1 2 1 60 BNE I NSL I 1 68 CE 209BFB 012165 I NSL 1 2 J SR CLRLIN 68 D 1 4CD5FB 0 1 2 1 70 •J MR DQLC0L 68D4 20D5FB 0 1 2 1 75 DELL IN JSR D0LC0L 68 D 7 A451 0 1 2 1 80 DELL I A i LDY $51 68D9 8454 012185 STY $54 68DB A454 0121 90 DELL IE : LDY $54 68DD 98 0121 95 DELL I 1 T Y A 68 DE 38 0 1 2200 CD r“ r*' OC.L- 68DF HAQT jl Tj 46. •-.* < JD -i • / \ cr •* *L 4<»« M *•*♦* JSR LQ2GET 4.DCO O O C. .i- 08 0 1 22 1 0 PHF’ / o cr ?■ o o b. _ ■ oo V o f ) 1 *7 v 1 •* 4i Jtw rim wtt T Y A 68E4 18 V* •*» 4— 4m« CLC « , * * lt .» i 1 , 6978 X ,i,, t «7u ill mi ADC # 1 20 6SE7 28 0 1 2230 PER 68E8 2004FB /■■■. i i .-7, vy cr J. 46 4 . 1 ■.»/ J SF< BIT PUT 68EEi C8 0 1 2240 I NY 68 EC CO 1 8 012245 CPY #24 6 f ( D0ED 0 1 2250 BNE DELL I 1 6 8h u ADB402 -j '’D^crcr V 1 46. 46 w LDA $02B4 68F3 090 1 0 1 2260 □RA #1 68F5 8DB402 • 1 y| l( _|* M STA $02B4 68F 8 A 55 2 0 1 2270 DELL 1 2 : LDA $52 68b A 8555 012275 STA $55 68F C 2047 F 9 012280 JSR CONOR T 68FF 20B2FB v .L 46 46 U. 1 w JSR SCR0L1 6902 2020FB 0 1 2290 JSR L0GGET 6905 90 D 4 012295 BCC DELL IB 6 VO 7 4CD5FB 0 1 2300 JMP DDL COL 690 A A 020 0 1 2305 BELL L .DY #$20 690C 20F2F0 0 1 23 1 0 BELLI JSR CLICK 690F 83 .*•. . j cr X 4m* *M4* X BEY 69 1 0 1 OF A 012320 BPL BELLI 6912 60 A -j •“> cr RTS 6913 A902 0 1 2330 DBDDEC LDA #2 69 1 5 D00A •■v .. -?• cr •** X* 4*** ‘ 4 *** *M* S *»fX BNE DBSUB 6917 A44C 0 1 2340 STORE LDY $4C 6919 302 B 012345 BMI STROK 69 1 B A 000 V 1 ac - J* u U LDY #0 69 ID 9164 0 1 2355 STORE 1 STA ($64) , 69 IF A 90 1 012360 DBDEC MM Ml* wn Imm Vm/ LDA #1 6921 3D9E02 0 1 2365 DBSUB STA $029E 6924 A54C 0 1 2370 LDA $4C 6926 30 1 E 0 1 2375 Bli I STROK 6928 A564 0 1 2380 LDA $64 692A 38 0 1 2385 SEC 692B ED9E02 0 1 2390 SBC $029E 692E 8564 0 1 2395 STA $64 6930 BO 02 0 1 2400 BCS DBSUB 1 L. O T O 7 x. CS65 0 1 2405 DEC $65 6934 A5oF 0 1241 0 DBSUB 1 LDA $0F 6936 f cr / cr L/ u u 0 1 24 1 5 CMP $65 6938 900C 0 1 2420 prp MM* Lr* ini' STROK 69 3 A DO 06 012425 BNE STRERR PAGE 44 D2s 0SNXLV2. M65 / o t r- O / V 1 W A50E 012430 LDA 693E C564 0 1 2435 CMF* $64 6 V 4 U 9004 012440 BCC STROK 6942 A 99 3 012445 STRERR LDA #$93 6944 85 4 C 0 1 2450 STA $4C 6 9 4 6 60 0 1 2455 STROK RTS 6947 A 5 54 0 1 2460 CON OR T ' LDA $54 6949 48 012465 PHA 694A A555 012470 LDA A. »MI ‘ »*»*< <V* kn Ini ul J 694C 48 012475 PHA 69 4 D A 5 56 0 1 2480 LDA $56 69 4 F 48 012485 PHA 6950 200 4 FC 0 1 2490 JSR PUTMSC 6953 A 55 4 012495 LDA $54 6955 8566 0 1 2500 STA $66 6957 A 900 0 1 2505 LDA #0 6959 8567 0 1 25 1 0 STA $67 695B A 56 6 0 1 25 1 5 LDA $ 6 6 6950 0A 0 1 2520 ASL A 695E 2667 012525 R0L $67 6960 8551 0 1 2530 STA $51 6962 A 46 7 0 1 2535 LDY $67 6 9 6 4 8C9F02 0 1 2540 STY $029F 6967 0A 012545 ASL M 6968 2667 0 1 2550 R0L $67 69 6 A 0A -1 ■•-JCC'C 1 J. luL ;J ASL Hi kd 9 6 B 2667 0 1 2560 ROL $67 696D 18 0 1 2565 CLC 696E 6551 0 1 2570 ADC $51 6970 dj66 y\ *4 o 7 c:’ JL 4m W / W STA $66 A C3 T O u 3 / 4«** A567 012530 LDA $67 6974 6D9F02 V X 4m W. 1 Qj ■„} ADC $029F 6977 8567 0 1 2590 STA $67 6979 A657 0 1 2595 L..DX $57 69 7 B BC75FE 0 1 2600 LDY DHL I NE . X 69 7 E 88 0 1 2605 CONOR i de y 69 7 F 3007 0 1 26 1 0 BMI CONOR 2 6981 O 666 012615 ASL $66 6983 2667 0 1 2620 ROL $67 6985 4C7EF9 0 1 2625 JMP CONOR 1 6988 BCA5FE 0 1 2630 C0NVR2 LDY D I 02TB, 698B A555 0 1 2635 LDA $55 698 D A 20 7 012640 LDX #7 698F 88 0 1 2645 CONOR 3 ; DEY 6990 3 00 A 0 1 2650 BMI CONOR 4 6992 CA X jE. O U DEX 6993 4656 O 1 2660 LSR $56 6995 6A 0 1 2665 ROR A 6 9 9 6 6EA 1 02 0 1 2670 ROR $02 A 1 6999 4C8FF9 012675 JMP CONORS 699C C8 0 1 2680 CO NOR 4 I NY 699D 18 0 1 2685 CLC 699E 6566 0 1 2690 ADC $66 6 9 AO 8566 0 1 2695 STA $66 69 A 2 9002 0 1 2700 BCC CONORS 69 A 4 L66 7 0 1 2705 INC $67 69A6 38 012710 CONORS RFC 69 A 7 6EA 1 02 r~\ i 7 -j is:- J. 4 ... / J. CONORS ROR $02 A 1 Page 45 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 69AA 18 012720 CLC 69AB CA 012725 DEX 69AC 1 0F9 U I / •_< U BPL CGNVR6 6 9 A b AEA102 0 1 2735 L.DX $02 A 1 69B 1 A566 012740 LDA $66 69 B 3 18 012745 CLC 69B4 6 5 6 4 012750 ADC $ 6 4 69B6 8564 -f “7 cr cr ST A $ 6 4 69B8 855E 012760 ST A $5E 69 BA MJO / 0 1 2765 LD A $67 69BC f i is: 0 1 2770 ADC $65 69BE o «=: jL «=; u u 0 1 2775 STA $65 69C0 855F 0 1 2780 ST A $5F 69C2 BDB5FE 0 1 2785 LDA DM ASK 7 , X 69C5 8DA002 0 1 2790 STA $02 AO 69C8 856 F .. . rj-jrQq STA $ 6 F 69CA 68 0 1 2800 PLA 69CB 8556 0 1 2805 STA $56 69CD 68 0 1 28 1 0 PLA 69CE 8555 0 1 28 1 5 STA $55 6 9 DO 6 8 0 1 2820 PLA 69 D 1 8554 0 1 2825 STA $54 69D3 60 0 1 2830 RTS 69D4 A 900 0 1 2835 INCRSB LDA #0 69 D6 F002 0 1 2840 BEQ INCRSC 69D8 A99B 0 1 2845 INCRSF ; LDA #$9B 69DA 85 7 D 0 1 2850 I NCR SC : STA $7D 69 DC ***** # .* *«»«« CL O O •-*■ 012855 INCRSA INC $63 69 DE E655 0 1 2860 I NC $55 69 EO D002 0 1 2865 BNE I NC SR 2 69E2 E656 012870 INC $56 69E4 A 5 55 0 1 2875 I NCSR2 ! LDA $55 69E6 A657 0 1 2880 LDX $57 69 E 8 DD85FE 0 12385 CMP COLUMN, X 69EB FOOD 0 1 2890 BEQ I NC2A 6 9 ED E000 0 1 2895 CPX #0 69EF DO 06 0 1 2900 BNE I NCR'S 3 69 F 1 r> cr er **r W VJ W 1 0 1 2905 CMP $53 69F3 F002 0 1 29 1 0 BEQ I NCR'S 3 69 F 5 BOO 1 012915 BCS XNC2A 69F7 60 0 1 2920 I NCR S3 : RTS 69F8 EOOS ( ■) h o cr •• •!*»• ’ il»>* *■ »» * INC2A CPX #8 ;--- -------- ---- -------- ----------------- ------------------ 69FA 9004 012930 BCC DOCR 69FC A556 012935 LDA $56 69FE F0F7 012940 BEQ INCRS3 6A00 A557 012945 DOCR1 LDA $57 6A02 DO30 012950 BNE DOCR 6A04 A563 012955 LDA $63 6A06 C951 012960 CMP #81 6A08 900A 012965 BCC DOCR1B 6AOA A57D 012970 LDA $7D 6A0C F026 012975 BEQ DOCR 6A0E 2030FA 012980 JSR DOCRNS ; Do CR No Start 6A11 4C77FA 012985 JMP INCRS1 6A14 2034FA 012990 DOCR1B JSR DOCR 6A17 A554 012995 LDA $54 6A19 18 013000 CLC 6A1A 6978 013005 ADC #120 Page 46 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 6A1C 2025FB 013010 JSR BITGET 6A1F 9008 013015 BCC D0CR1A 6A21 A57D 013020 LDA $7D 6A23 F004 013025 BEQ D0CR1A 6A25 18 013030 CLC 6A26 20ASF8 013035 JSR INSLIA 6A29 4CD5FB 013040 D0CR1A JMP DOLCOL 6A2C A900 013045 NOSCRL LDA #0 6A2E F002 013050 BEQ N0SCR1 ;* ;* Do CR WARMSTART ;* ;* 6A30 = FA30 6A30 A99B 013055 DOCRWS LDA #$9B 6A32 8570 0i3060 NQSCR1 STA $7D ; INSDAT - tmp storage but used by the display for the character under the cursor 6A34 20FEF0 013065 DOCR JSR COLOR 6A37 A900 013070 LDA #0 6A39 8556 013075 STA $56 6A3B E654 013080 INC $54 6A3D A657 013085 DOCR2 LDX $57 6A3F AO18 013090 LDY #24 6A41 247B 013095 BIT $7B 6A43 1005 013100 BPL DOCR2A 6A45 A004 013105 LDY #4 6A47 98 013110 TYA 6A48 DO03 013115 BNE DOCR2B 6A4A BD95FE 013120 D0CR2A LDA NOROWS,X 6A4D C554 013125 D0CR2B CMP $54 6A4F 0026 013130 BNE INCRS1 6A51 8C9D02 013135 STY $029D 6A54 8A 013140 TXA 6A55 DO20 013145 BNE INCRS1 6A57 A570 013150 LDA $7D 6A59 FO1C 013155 BEQ INCRS1 6A5B C99B 013160 CMP #$9B 6A5D 38 013165 SEC 6A5E F001 013170 BEQ D0CR4B 6A60 18 013175 CLC 6A61 20ACFB 013180 DOCR4B JSR SCROLL 6A64 EEBB02 013185 INC $02BB 6A67 C66C 013190 DEC $6C 6A69 CE9D02 013195 DEC $029D 6A6C ADB202 013200 LDA $02B2 6A6F 38 013205 SEC 6A70 10EF 0132i0 BPL DOCR4B 6A72 AD9D02 013215 LDA $029D 6A75 8554 013220 STA $54 6A77 4CD5FB 013225 INCRS1 JMP DOLCOL 6A7A 38 013230 SUBEND SEC 6A7B 8570 013235 LDA $70,X 6A7D E574 013240 SBC $74 6A7F 9570 013245 STA $70,X 6A81 B571 013250 LDA $71,X 6A83 E575 013255 SBC $75 6A85 9571 013260 STA $71, X 6A87 60 013265 RTS ;* ;* ;* 6A88 A0BF02 013270 ERANGE LDA *02BF 6ABB C904 013275 CMP #4 6A8D F007 013280 BEQ RANGE 6ABF A557 013285 LDA $57 6A91 F003 013290 BEQ RANGE 6A93 20FCF3 013295 JSR EOPEN Page 47 D2:0SNXLV2,M65 ;--- -------- ---- -------- ----------------- ------------------ 6A96 A927 013300 RANGE LDA #39 6A98 0553 013305 CMP $53 6A9A BO 02 0 1 33 1 0 BCG RANGE 3 6A9C q cr k r “T O --J ■. J 013315 ST A $53 6A9E A657 0 1 3320 RANGE.! > LDX $57 6 A AO BD95FE HI TT^cr V 4. •-.* •«' n LDA NOROWS , X 6 A A3 C554 0 1 3330 CMP $54 6AA5 90 2 A /■\ i t “7* ~r cr v X •~ 1 BCC RNGERR 6AA7 F028 0 1 3340 BEG RNGERR 6AA9 E008 013345 CPX #8 6AAB D00A 0 1 3350 BNE RANGE 1 6AAD A 556 .. . --t- ~r £;• £;■ ■7 .1. v* ‘-J \J LDA $56 6AAF FO i 3 0 1 3360 BEG RNGOK 6AB1 C90 1 0 1 3365 CMP #1 6AB3 DO 1C 0 1 3370 BNE RNGERR 6AB5 F004 013375 BEQ RANGE2 6AB7 A556 0 1 3380 RANGE 1 LDA $56 6AB9 DO 1 6 0 1 3385 BNE RNGERR 6ABB BD85FE 0 1 3390 RANGE 2 ! LDA COLUI* 6ABE !**♦* rr* *»««* *km 'mi *m* 0 1 3395 CMP $55 6 AGO 9 OOF 013400 BCC RNGERR 6AC2 FOOD 0 1 3405 BEG RNbERR 6AL-4 A90 1 0 1341 0 RNGOK LDA #1 6AC6 854 C 0 1 34 1 5 STA $4C 6AC8 A 900 0 1 3420 LDA #$80 6ACA A6 1 1 013425 LDX $11 6ACC 8511 0 1 3430 STA $ 1 1 6 ACE F 006 013435 BEQ RNGER2 6 A Do 60 0 1 3440 RTS 6AD 1 20D6F7 0 1 3445 RNGERR JSR HOME 6AD4 A98D 0 1 3450 LDA #$8D 6AD6 854 C 0 1 3455 RNGER2 STA $4C 6AD8 68 0 1 3460 FINGER 1 PL A 6AD9 68 0 1 3465 PL A 6 A D A A57B 013470 L D A $78 6ADC 1 003 0 1 3475 BPL RET UR 3 6ADE 20 A 1 FC 0 1 3480 J SR SWAPA 6AL 1 4C34F6 0 1 3485 RETUR3 JMP RET UR 6AE4 A 000 0 1 3490 OFF CRB LDY #0 6 Ah. 6 A55D 013495 LDA $5D 6AE8 9 1 5E 0 1 3500 STA <$5E) j, Y 6AEA 60 0 1 3505 RTS 6AEB 48 0 1 35 1 0 B I TCQN PH A 6AEC 2907 0 1 35 1 5 AND #7 oRtt. A A rn r~* J~\ 4 7CTOA v X ■»' wi X- V TAX 6AEF BDBDFE { \ -i -Tcr-~>cr 'w* Ji 'm* 4m W* LDA MASKTB, X 6AF 2 S56E 0 1 3530 STA $6E 6AF4 68 i rcrT cr, J. . m l PL A 6AF5 4 A 0 1 3540 LSR A 6 A F 6 4 A 0 1 3545 LSR A 6AF7 4A 0 1 3550 LSR A 6AF8 A A n ri 0 1 3555 TAX 6AF9 60 0 1 3560 RTS 6AF A 2EB402 0 1 3565 B I TROL RGL $0284 6AFD r;- p 0 X 3570 ROL $02 83 6 BOO 7FR70 ^ •J«M (Mil mt* il*a* 4 «m n 1 **T GT “7 KJT ■J X / -W7 RGL $0282 6803 60 0 1 3580 RTS 6Bo4 90 0C 0 1 3585 B I TPUT BCC BITCL PAGE 48 6 BO 6 20EBFA 0 1 3590 BITSET JSR BIT CON 6 9 0 V BDA302 013595 LDA *02 A3, X 6BOC 056E 0 1 3600 OKA *&E 6B0E 9DA302 0 i 3605 ST A *02 A3, X 691 i 60 0 1 36 1 0 RTS 6912 20EBFA 013615 BITCLR JSR BITC0N / n i cr O i ■;.} A56E 0 1 3620 LDA *<bE 6B17 49FF 0 1 3625 E0R #*FF 6B19 3DA302 0 1 3630 AND *02A3, X 6B1C 9 D A3 02 0 i 3635 ST A *02 A3, X 6B1F 60 0 1 3640 RTS 6B20 A 4 013645 L0GGET LDA *54 6B22 IS 0 1 3650 L01GET CLC / DO? Q JuT* rll %*. 3 6978 013655 L02GET ADC #120 6 9 2 5 20EBFA 0 i 3660 BITGET JSR BITC0N 6928 18 0 1 3665 CLC 6B29 BDA302 0 1 3670 LDA *02 A3, X 6B2C r> aL tr uii •_.< o c. 0 1 3675 AND *6E 6B2E F00 1 0 1 3680 BEG) Bl'TSEl 6930 TO •„* O 0 1 3685 cprr U(i Inn Vu* 6B3 1 60 0 i 3690 BIT6E1 RTS . O £> •-,« ji. A DF A0 2 0 1 3695 I NAT AC LDA $02FA y r‘t T t=- W L ! \J A457 0 1 3700 LDY $57 6937 COO 3 013705 CRY #3 6939 B0 OF 0 1 37 1 0 BCS I MATA 1 69 3 B 2 A 0 1 37 1 5 RQL A 6B3C 2A 0 1 3720 RGL A 6B3D A ri 0 1 3725 RQL A 6B3E 2 A 0 1 3730 RGL A 6B3F 2903 013735 AND #3 6B4 1 A A 013740 TAX 6942 ADFA02 013745 LDA $02FA 6945 299F 0 1 3750 AND #$9F 6947 1DF4FF 013755 ORA INTATAu X 6 94 A 8DFB02 0 1 3760 INATA1 ST A $02FB 6B4D 60 0 1 3765 RTS 6B4E A 90 2 0 1 3770 NO VL 1 N LDA #2 6950 8565 0 1 3775 ST A $65 6952 A 94 7 0 1 3780 LDA #$47 6954 8564 013785 8TA $64 6956 A 027 0 i 3790 LDY #39 6958 9 1 6 6 013795 M0VLI1 LDA ($66) , 6B5A 8550 0 1 3800 ST A $50 6 BSC B 1 6 8 0 1 3805 LDA <$68>,Y 6 9 5 E 9 166 0 1 38 1 0 ST A ( $66 ) ,Y 6B60 A550 0 1 38 1 5 LDA $50 6B&2 9164 0 1 3820 STA ($64) M Y 6964 88 0 1 3825 DEY 6 B 6 3 1 OF 1 0 i 3830 BPL NOVL I 1 6967 A565 0 1 3835 LDA $65 6B69 8569 0 1 3840 STA $69 6969 A564 013845 LDA $64 6 9 6 D 8568 0 1 3850 h> T A $ 6 8 696F I o 0 1 3855 CLC 6B70 A 5 66 0 1 3860 LDA $66 6972 6928 0 1 3865 ADC #40 6974 Q GSr Z. L. ‘ vJ O Q 0 1 3870 6 1 A $66 69 76 9002 013875 9CC NOVL I 2 49 D2: QSNXLV2. M6! cr 6B78 E667 0 i 3880 INC $67 6B7A 60 013885 M0 v‘L 1 2 RTS 6B7B 08 0 1 3890 EXTEND PHP 6B7C AO 1 7 013895 LDY #23 6B7E 98 0 1 3900 EXTEN1 TYA 6B7F 2022FB 0 1 3905 JSR LO 1 GET 6B82 08 0 1 39 1 0 PHP 6B83 98 0 1 39 1 5 TYA 6B84 18 0 1 3920 CLC 6B85 6979 0 1 3925 ADC #121 6B87 nn .i*-. O 0 1 3930 PLP 6B88 2004 FB 0 1 3935 JSR BITPUT 4 DQ p SB 0 1 3940 EXTEN3 DEY 6 BSC 3004 013945 BMI EXTEN4 6B8E C454 0 1 3950 CRY $54 6B90 B0 EC 0 1 3955 BCS EX TEN 1 6B92 A554 0 1 3960 EXTEN4 LDA $54 6B94 IS 013965 CL.C 6B95 6978 0 1 3970 ADC #120 6 B 9 7 28 013975 PLP 6B98 4C04FB 0 1 3980 JMP BITPUT 6B9B /\ cr ur —t hi w aL 0 1 3985 CLRLIN LDA $52 6B9D 8555 0 1 3990 ST A $55 6B9F 2047F9 0 1 3995 JSR CONOR T 6BA2 A “ ~7 iiUi / 0 1 4000 LDY #39 6BA4 A 900 014005 LDA #0 6BA6 9 1 64 0 1 40 1 0 CLRLI1 ST A ($64), 6 BAB 88 0 1 40 1 5 DEY 6BA9 1 0FB 0 1 4020 BPL CLRLI1 6BAB 60 0 1 4025 RTS 6 BAG 20FAFA 0 1 4030 SCROLL JSR BITROL 6BAF 20D4FC 0 1 4035 JSR PUTMSC 6BB2 A 028 0 1 4040 SCROL 1 LDY #40 6BB4 B 1 64 0 1 4045 LDA ($64) ,Y 6BB6 A66A 0 1 4050 LDX $6 A o xr« jd o CA 0 1 4055 DEX 6BB9 E465 0 1 4060 CPX $65 68BB DO 08 0 1 4065 BNE SCROL 2 6BBD A2D7 0 1 4070 LDX #$D7 6BBF E464 0 1 4075 CPX $64 BBC 1 BOO 2 0 1 4080 BCS SCRGL..2 O D W ‘m 1 A 900 0 1 4085 LDA # O 6 BCS A 000 0 1 4090 SCR0L2 LDY #0 6BC7 9 1 6 4 0 1 4095 STA ($64) , Y 6BC9 E664 0 1 4 1 00 INC $64 6BCB DOE 5 0141 05 BNE SCROL 1 6 BCD E66>5 0 1 4 1 1 0 INC $65 6BCF A 5 1, 5 0 14115 LDA $65 6BD 1 C-66M 0141 20 CMP $6A 6BD3 DODD 0 1 4 1 25 BNE SCROL 1 6BD5 A 900 0 1 4 1 30 DOLCOL LDA #0 6BD7 8563 014135 STA $63 6BD9 A 55 4 0141 40 LDA $54 6BDB 855 1 0 14145 STA $51 6BDD A 5 C; i 1 I I w X 0 1 4 1 50 D0LC01 LDA $51 6 B D F 2022FB 0 1 4 1 55 JSR L01GET 6BE2 B00C 0 1 4 1 6 0 BCS D0LC02 6BE4 A cr / •-?' h-JO-j 0 141 65 LDA $63 6BE6 18 0 1 4 1 70 CLC 6BE7 6928 0 1 4 1 75 ADC #40 6BE9 8563 0 1 4 1 80 ST A $63 6BEB C651 0 1 4 1 85 nerr $51 6BED 4CDDFB 0 1 4 i 90 J MR DOLCO 1 6BF0 18 0141 95 D0LCQ2 : clc 6BF 1 A563 0 1 4200 LDA $63 6BF3 6bb5 014205 ADC •4* w w 6BF5 8583 0 1 42 1 0 ST A $63 6BF 7 80 0 1 42 1 5 RTS 6BF8 2085FC 0 1 4220 D0BUFC JSR PH ACES r Q Li LJ o£?r £5 A563 014225 LDA .A. / “T O 6BFD 48 014230 PH A / ‘O *r“ r** ubr A58C 0 1 4235 LDA $6C 6 COO 8554 014240 ST A $54 6C02 A 560 014245 LDA $6D 6CU4 r.wc cr □ UJJ 0 1 4250 ST A $55 6CU6 A 901 014255 EDA # 1 6C08 856B 014280 ST A $6B 60 0 A A217 014265 DOBUF 1 LDX #23 6C0C A57B 014270 LDA $7B 6 COE 1002 014275 BPL D0B1 60 1 0 A203 0 1 4280 LDX #3 6C12 E454 0 1 4285 DOB 1 CPX $54 6C 1 4 DO 0B 0 1 4290 BNE D0BU1A 6C 1 8 /\ inr i™ - cn - M -_J --J -._.i 014295 LDA * ere; 6C 1 8 in: c: T W vJ •«* 014300 CMP f± cr T -L< 6C 1 A D005 0 1 4305 BNE D0BU1A 6C 1 C E 8 v2 B 0 1 43 1 0 I NC $ 6 B 6C IE 4C3 1 FC 0 1 43 1 5 JMP DOBUF 2 6C2 1 20D4F9 0 1 4320 DGBU 1 A 1 JSR I NCR SB 6 La::! 4 E 6 6 B 014325 I NC $6B 6C26 0 1 4330 LDA $63 6028 r~‘ ccn m* ’*»** •»»» • 0 1 4335 CMP $52 6C2A D0DE 0 1 4340 BNE DOBUF 1 & Lr w C654 0 1 4345 DEC $54 6C2E 2099F7 0 1 4350 JSR CRSRLF 6C3 1 20A2F5 0 1 4355 D0BUF2 ! JSR GETPLT 6C34 DO 1 7 0 i 4360 BNE D0BUF4 6C36 C88B 0 1 4365 DEC $6B 6C38 A 5 63 0 1 4370 LDA $63 6C3A p*- cr cr pi mM* \nf *w iliM 014375 CMP $52 6 CSC F00F 0 1 4380 BEQ DOBUF 4 6C3E 2099F7 014385 JSR CRSRLF 6C41 cr cr in: h J J J 0 1 4390 L D A it cr cr T- v*J '..J 6C43 cr cr -t L.' •— 1 ‘..j •«.' 0 1 4395 CMP .-*• cr -nr 4 *' •_.< •_* 6C45 D002 0 1 4400 BNE DOBUF 3 6C47 C654 0 1 4405 DEC $54 6C49 A58B 0 1441 0 DOBUF 3 LDA $6B 6C4B DOE 4 014415 BNE DOBUF 2 6C4D 88 014420 DOBUF 4 PL A 6C4E 0 A T w w w -2 014425 ST A $63 8 U 5 O 2090FC 014430 J S R PLACRS ^ P' 1ST-?- '.m/ U 80 0 1 4435 RTS 8C54 20D5FB („) 1 4 4 4 O S 1 RBEb J S R D 0 L u 0 L 6C5 7 . er lit -j MJJ 1 0 1 4445 L D A $51 6C59 S56C 014450 ST A $ 6 C 8C5B A552 0 1 4455 L D A $52 PAGE 51 D2; 0SNXLV2. M65 6C5D B56D 0 1 4460 ST A $6 D 6C5F 60 0 1 4465 RTS 6U6U /\ cr x t ii-JO'j 014470 CELT I A LDA $63 6C62 C552 014475 CMP $52 6064 DOG 2 0 1 4480 BNE DELTIB 6'J6q C654 014485 DEC $54 6C60 20D5FB 0 1 4490 DELTIB JSR DDL COL 6C6B A563 014495 DELTIM LDA $63 6C6D r - e;- cr w \..J ui .u. 014500 CMP $52 6C6F F 0 1 3 014505 BEQ BELT I 3 6C7 1 2047F9 014510 JSR CONOR T 6C74 /\ cr cr t M -n..i _< 0 1 45 1 5 LDA $53 60?' 6 38 0 1 4520 err ***** 6077 p cr cr p> 014525 SBC $52 6C79 AS 0 1 4530 TAY 6C7A B164 014535 DELTJ1 LDA ($6*4), OL / DO 06 014540 BNE DELTI3 6C7E 88 014545 DEY 6C7F 1 OF 9 0 1 4550 BPL DELHI 60S 1 4CDBF8 O * 4555 DELTI2 JMP DELL IB 6C84 60 0 1 4560 DELI I 3 RTS 6C85 A 20 2 014565 PHACRS LDX #2 6C87 B554 0 1 4570 PHACRl LDA *54, X 6C89 9 DBG 02 0 1 4575 STA *02BS,X 6C8C CA 0 1 4580 DEX 6C8D 1 OF 3 014585 BPL PHACRl 6C8F 60 0 1 4590 RTS 6090 A 202 014595 PLACE'S LDX #2 6C92 BDB802 0 1 4600 PLACE 1 LDA *0288., 6C95 9554 0 1 4605 STA *54, X 6C97 CA 0 1 46 1 0 DEX 6C98 10F8 014615 BPL PLACE 1 6C9A 60 0 1 4620 RTS 6C9B 20 A 1 FC 014625 SWAP JSR SWAP A *•»/ » »♦**■ 4C34F6 0 1 4630 JMP RET UR 1 6CA1 A DBF 02 014635 SWAPA LDA $02BF 6CA4 C9 1 8 0 1 4640 CMP #24 6CA6 F017 014645 BEQ SWAP3 6CA8 A20B 0 1 4650 LDX #11 £‘L-Mh1 B554 0 1 4655 SWAP1 LDA *54, X 6CAC 48 0 1 4660 PHA 6CAD BD9002 014665 LDA *0290, X 6CB0 9554 0 1 4670 STA *54 , X 6GB2 68 014675 PLA 6CB3 909002 0 1 4680 STA *0290, X 6CB6 CA 0 1 4685 DEX 6CB7 1 OF 1 0 1 4690 BPL SWAP 1 6 C B 9 A57B 0 1 4695 LDA *7B 6CBB 49FF 0 1 4700 EOF; #*FF 6CBD 857 B 014705 STA *78 6CBF 60 014710 SWAP3 RTS 6CC0 A54B 0 1 47 1 5 GETSEC LDA $4B 6CC2 F 003 0 1 4720 BEQ DISKM 6CC4 4C7AE4 0 1 4725 JMP $E47A 6007 A 952 0 1 4730 DISKM LDA #$52 6009 8D0203 014735 STA $0302 O in* * ' Lr A 901 0 1 4740 LDA # 1 6CCE 8 DO 1 03 0 1 4745 STA $0301 P A G E ui .iU. D2s QSNXLV2. M65 6CD 1 4C53E4 014750 JiiP * /| is: ’.t E 4 -.j •_> 6CD4 A558 014755 PUTIiSC L.DA $58 6CD6 8564 014760 ST A $64 6CD8 A 55 9 014765 LDA $59 6CDA 8565 014770 ST A $65 6CDC 60 014775 RTS 6CDD A 2 00 0 1 4780 DRAW L 0 X #0 . p p p. /v cr M -_J 2- jL 014785 LDA ±09 4 »h 6CE 1 C91 1 0 1 4790 CMP #$11 6CE3 F008 0 1 4795 BEG DRAWA 6CE5 C912 0 1 4800 CMP #$12 6CE7 F 003 0 1 4805 BEG DRAWS 6CE9 A 08 4 0 1 48 1 0 LDY #$84 6CEB 6U 0 1 48 1 5 RTs 6CEC E8 0 i 4320 DRAWS INX 6CED BE B “7 02 014825 DRAWA STX $02B7 6CF0 A554 0 1 4830 LDA $54 l . r' cr r> U W I 8560 0 1 4835 ST A $60 6CF4 a c;- in:' m. Hi J -..J 0 1 4840 LOA $55 6CF6 856 1 014845 S 1 A $61 6CF8 A 556 0 1 4850 LDA $56 6CFA 8562 014855 ST A $62 6 CFG A 90 1 0 1 4860 LDA #1 6CFE 8579 0 1 4865 MJff »1 Cj 1 H $79 6000 85 7 A 0 1 4870 ST A $ 7 A 6002 •L* o 0 1 4875 SEC 6 Do 3 A 560 0 1 4880 LDA $60 6 DOS ESS A 0 1 4885 SBC $5 A 6007 8576 0 1 4890 ST A $ 7 6 6 D U 9 B000 014895 B C 6 DRAW 1 600B A9FF 0 1 4900 LDA #$FF 6000 8579 0 1 4905 ST A $79 6 OOF AS 7 6 014910 LDA $ 7 6 60 1 1 49FF 0 14915 EOR #$FF 6013 18 0 1 4920 CLC 6014 690 1 0 1 4925 ADC #1 6 D 1 6 8576 0 1 4930 STA $76 6018 38 014935 DRAW! SEC 6 0 1 V A561 0 1 4940 LDA $6 1 60 1 B r: cr *n:; r> L... '~J '~i I..* 0 1 4945 SBC $ 5 B 60 1 0 j-- —j- — }• QU / / 0 1 4950 STA $77 60 IF A562 014955 LDA $62 602 1 E55C 0 1 4960 SBC $5C 6023 8578 014965 STA $ / 8 l, n v <=; «w il»n *‘M« BO 1 6 014970 BCS DRAW2 6027 A9FF 0 1 4975 LDA #$FF 6029 857A 0 1 4980 STA $7A 6D2B A577 014985 LDA 4 ; * / / 6020 49 FF 0 1 4990 EOR #$FF 602F O mr “7 — y w %J / / 014995 STA $77 6031 AS 7 8 0 1 5000 LDA $78 6033 49FF 0 1 5005 EOR #$FF 6035 8578 0 1501 0 O 1 hi $78 6037 E677 0 1 50 1 5 I NC $77 6039 0002 0 1 5020 BME DRAW2 60 3 B E 6 7 8 015025 I NC $78 6 D 3 D A 202 0 1 5030 DRAW2 LDX #2 6D3F A 000 0 1 5035 LDY #0 PAGE D2s QSNXLV2. M65 6D41 8473 0 1 5040 STY . ..... 6D43 98 0 1 5045 DRAW3A TV A 6D44 9570 0 1 5050 STA $70, X 6D46 B55A 0 1 5055 LDA $5 A, X 6D48 9554 0 1 5060 STA $54, X £) D 4 A CA 0 1 5065 DEX 6D4B 10F6 0 1 5070 BPL DRAW3A 6D4D A577 0 1 5075 LDA $77 6D4F E8 015080 I N X 6D50 A 8 015085 TAY 605 1 A578 0 1 5090 LDA $78 6D53 85 7 F 0 1 5095 STA $ 7 F 6055 i'“'i cr: ”? err CD w/ / 0151 00 STA *75 6D57 D00A 0151 05 BNE DRAW3 6D59 A 57 7 0 1511 0 LDA $77 6D5B C576 0 15115 CMP $ 7 6 6 DSD BO 04 0151 20 BCS DRAW3 6D5F A476 -i err; 'nerr **•* 4. 1 4t*« LDY $76 6D6 1 >•“1 uL U ^2 0 151 30 LDX 4+ “V* “H* .iL 6063 98 0 1 5 1 35 DRAW3 TV A 6064 857E 015140 STA $7E 6066 8574 0151 45 STA $74 6D6S 48 0 1 5 1 50 PH A 6 s 0 6 9 A cr 7 cr Hu / 0151 55 LDA $75 6D6B 4 A 015160 LSR A H 6D6C 68 0 151 65 FLA 60 £tU 6 Hi 0 1 5 1 70 ROR A 608b. 9570 0151 75 STA $70, X 6070 a **7 i — Hi %J / L 0151 80 D R A W 4 Pi 1 LDA $7E 6072 057 F 0 15185 ORA $ 7 F 6D74 D003 0 1 5 1 90 BNE DRAWl 1 6076 4C22FE 0 1 5 1 95 JMP DRAW 10 6079 18 0 1 5200 DRAW 1 1 CLC 6D7A A570 0 1 5205 LDA $70 6D7C 6576 015210 ADC $ 7 6 6D7E 8570 0 1521 5 STA $70 6 DSO 9002 0 1 5220 BCC DRAWS 6082 E67 1 0 1 5225 I NC $71 6084 /\ err 7 i Hi vJ / 1 0 1 5230 DRAWS LDA $71 6086 err “7 ire*, w U / ' /% -t cr •—« *7* cr '-• f 4, ’..2 - ,J CMP $ 7 5 6088 9014 015240 BCC DRAWS 6D8A DC) 06 015245 BNE DRAWS A 6D8C A 5 70 0 1 5250 LDA $70 6D8E C574 Ss h err - merrier J. jL. -_J CMP $ 7 4 6D90 900C 0 1 5260 BCC DRAWS 6092 18 015265 DRAWS A 1 CLC 6093 A554 015270 LDA $54 6D95 6579 0 1 5275 ADC $79 6097 8554 0 1 5280 STA $ 5 4 6D99 A 200 015235 LDX #0 609B 207 AF A 015290 J SR SUBEND 6D9E IS 015295 DRAWS CLC 6D9F s\ trrr; -7 HivJ / 0 1 5300 LDA $72 6 i) A 1 / cr 7 *7 6 -..J / / 0 1 5305 ADC $77 60 A 3 O err ”7 *71 Cm* •*••* / «U*i 0 1 53 1 0 STA ■± *7 O •V / jL 60 A 5 A cr “7 0 1 53 1 5 LDA *-y “>• / 6 0 A / 6 5 78 0 1 5320 ADC $78 60A9 8573 .-“•k 4 trrr: 7 * er r *-2 J. u •.»' x~ U STA $73 PAGE 54 D2: 0SNXLV2 . M65 6DAB p c 7 cr w U / %J 0 1 5330 CMP $75 6DAD 9027 0 1 5335 BCC DRAWS 6DAF D006 015340 BNE DRAW6A 6DB1 A 57 2 0 1 5345 LDA *72 6DB3 C574 0 1 5350 CMP $74 6DB5 90 1 F 0 1 5355 BCC DRAWS 6 D B 7 4 / H 015360 DRAW6A BIT *7A 6DB9 i 0 1 0 0 1 5365 BPL DRAW6B 6 D B B p / cr i.; I-.’ U w 0 i 5370 DEC *55 6DBD « lTf l‘H* l»»t< ■ » nn H -_J *_J -.J 0 1 5375 LDA $55 6 DBF C9FF 0 i 5380 CMF* #$FF 6DC1 D00E 0 1 5385 BME DRAW7 6 DC 3 A 5 56 0 i 5390 LDA $56 l n n a: - W iJ L~> J F00 A 0 1 5395 BEQ DRAW7 6 DC 7 C656 0 1 5400 DEC $56 6 DC 9 1 006 0 1 5405 BPL DRAW7 6DCB E655 015410 DRAW6B INC *55 6DCD D00 2 0 1 54 I 5 BNE DRAW? 6DCF E656 015420 INC $56 6DD 1 A2G2 015425 DRAW? LDX #2 6DD3 2G7AFA 0 1 5430 J SR SUBEND 6DD6 2096FA 015435 DRAWS JSR RANGE 6DD9 2GEGF5 0 1 5440 J SR QUTPLT 6 DDC ADB702 015445 LDA *02B7 6DDF F02F 0 1 5450 BEQ DRAW9 6DE1 2085FC 0 1 5455 JSR PHACRS 6DE4 ADFBG2 0 1 5460 LDA *02FB 6DE7 SDBCG2 015465 ST A $02BC 6DEA /\ cr er /\ hJOH 0 1 5470 DRAWS A LDA $54 6 DEC 48 015475 PH A 6DED 20 DCF 9 0 1 5480 JSR I NCR S A 6DF0 68 0 1 5485 PL A 6DF 1 8554 015490 STA *54 6 D r 2G96FA 0 1 5495 DRAW8C JSR RANGE 6 D F 6 20A2F5 0 1 5500 JSR GETPLT 6DF9 D00C 0 1 5505 BNE DRAWSB 6DFB ADFD02 0 1 55 1 0 LDA $02FD 6DFE 8DFB02 U I -J -J I •_> STA $02FB 6EO 1 2GE0F5 0 1 5520 JSR OUTPLT 6E04 4CEAFD 0 1 5525 JMP DRAWS A 6E07 ADBC02 f) i cr k; *7* ( DRAWSB LDA *02BC 6E0A 8DFB02 y\ •( cr **?• «r‘ U x -..j u •„.* STA *02FB 6E0D 2 09 OF C 0 1 5540 J S R P L A C R 3 6E 1 0 •~r /*•*, ■2* O 015545 DRAWS’ SEC 6E1 1 A57E 0 1 5550 LDA $7E 6E 1 3 E90 1 / -> -{ cr ik* cr U I U SBC #1 6E 1 5 857E 0 1 5560 STA $ 7E 6E 1 7 A57F 015565 LDA $7 F 6E 1 9 E900 0 1 5570 SBC #0 6E 1 B 85 7 F y\ IZL' 1ST ,r *7 U 1 %J%J / --J STA *7F 6E1D 3003 0 1 5580 BMI DRAW 10 6& 1 F 4C70FD 0 1 5585 JMP DRAW4A / p* /*♦*, vD 4t»* 4C34F6 015590 DRAW 10 JMP RET UR 1 L p *-} ^ 1 8 1 00 A0 A 0 1 5595 ALOCAT „ BYTE 24 , 1 6 ? 1 0 ? 1 0 , 1 6 , 28 , 52 ? 1 00 , 1 96 , 1 96 ? 1 96 , 1 96 6E29 101C3464 6E2D 6E3 1 C4C4C4C4 1 C 1 064C4 0 1 5600 n B Y I E 2 8 if 1 6 q 1 O O t, i 9 6 / rr ‘7' c:; O •-.* w 1 7 1 70 B 1 7 0 1 5605 NUMDLE . BYTE 23 , 23 , 11,23,47,47, 95 , 95 , 97 , 97 ,97, 97 PAGE cr c:; t I . [t< ; D2 n 0SNXLV2. M65 6E39 ?P9P SPSP •Sh# ! ! w > w I 6E3D & 1 6 1 6 1 b 1 6E41 1 70BBF6 1 0 1561 0 . BYTE 23, 11,191, 97 6E4-D i 3 1 309 1 3 0 15615 liXDMDE * BYTE 19,1 9 ,9,19, 39 , 39 , 79 , 79 , 65 , 65 ,, 65 , O 6E49 27274F4F 6E4D 41414141 6E5 1 1 3099F4 1 0 1 5620 . BYTE 1 9 , 9 =, 1 59 , 65 *M» IWU *« — / • • ** 02060708 0 1 5625 ANCON V . BYTE 2 , 6 , 7 , 8 , 9 , 10, 11, 13, 15, •i iz: -f c: j. c x u n 15 6E59 090 AO BOD 6E5D OF OF OF OF 6E6 1 04050C0E 0 1 5630 • BYTE 4,5,12,1 4 6E65 00000000 0 1 5635 PAGET'S . BYTE 0 , 0 , 0 , 0 , 0 , 0 , 0 , 1 , 1 , 1 , 1 , 1 6E69 0000000 1 6E6D 0 i 0 1 0 1 0 1 6E71 00000 1 0 1 015640 - BYTE 0 , 0 ,1,1 6E75 020 1 0 1 00 0 1 5645 DHL I NE . dvtf o i i (') {) i •{ r> r> U 1 $ L. jL t? X if a- t| u it X i| X if aL. if aL tz aU. q aL if •■•i 6E79 000 1 0 1 02 6E7D 02020202 6E8 i 02020 1 02 0 1 5650 . BYTE .•••*, .****, a / ,m j tit** fj *C»*» tt .»• tl Jim 6E85 28141428 O 1 5655 COLUMN . BYTE 40 , 20 , 20 , 40 , 80 , 80 , 1 60 , 1 60 ,64 , 80 , 80 u 80 6E89 5 050 A0 A0 6E8D 40505050 6E91 2828A0A0 0 1 5660 . BYTE 40, 40, 160, 160 / r- o OC. 7 U 181 800 1 8 0 1 5665 NOROWS . BYTE 24 , 24 ,12, 24 , 48 , 48 , 96 , 96 , 1 92 , 192 •i Qv •{ , 4. -C. IJ 4- -lL 6E99 30306060 6E9D cocococo 6EA 1 1 80CC0C0 0 1 5670 » BYTE D A j O 1 Q9 | Q9 a... n 1 j m ;i J. / a... if .1. .* a.- 6EA5 00000002 0 1 5675 DIV2TB „ n \ / -r r* ,-'R *v • p - i ”?• -i -j •» C* T 1 EL -J 0 -J II -J 1) .r_. , -..I' 0 .iL u If XL If ■_> t; .1. II J. i; 1 6EA9 03020302 6EAD 030 1 0 1 0 1 6EB 1 00000302 0 1 5680 . BYTE 0 , 0 ,3,2 6EB5 00FFF00F 015685 DMASKT . BYTE 0 , *FF , $F0 , *0F , f-CO , $30 , SOC , 3 L LT D Q W t... A..' 7 C0300C03 6EBD 804020 1 0 0 1 5690 MASKTB . B Y i E $ E> U , '$ 4 O , 2 *’ J , T- 1 0 ,8,4,2, 1 , l --- 1 , j. , -Mf* MM. *-• , / 6EC1 08040201 6EC5 000 1 0307 6EC9 28 C A 904 6 0 1 5695 COLRTB - B Y T E % 2 8 ,, $ C A , $ 9 0 , * 4 6 , 0 6ECD 00 6ECE IB 0 1 5700 CNTRLS . BYTE $1B / r- /•“. /“*• &>t:Lr 79F7 0 1 5705 0 WORD ESCAPE 6ED1 1C 0 1 57 1 0 ■ BYTE $ 1 0 6ED2 7 p p 7 - 0 1 57 1 5 . WORD CRSRUP 6ED4 ID 015720 . BYTE $ 1 D 6ED5 8CF7 ^ l*:: “? •••> cr V i Vi / •>'» e WORD CRSRDN 6ED7 IE 0 1 5730 . BYTE $ i E 6ED8 99F7 0 1 5735 0 WORD CRSRLF 6 h. DA IF 015740 . BYTE 1 F 6EDB AAF7 015745 0 WORD CRSRRT 6LDD 7D 0 1 5750 . BYTE *7D 6EDE B9F7 y\ i cm; ”*>* in: cr v 1 X w / *.J U 0 WORD CLRSCR 6EE0 7E 015760 0 BYTE *7E 6EE 1 E6F7 015765 0 WORD BS 6EE3 7F 0 1 5770 , BYTE ^7F 6EE4 1 OF 8 /-% i cr cr 4- W / / rJj . WORD TAB 6EE6 9B 0 1 5780 . BYTE S9B 6 EE 7 3 OF A 015785 0 WORD DOCRWS L. C' f' O o c::, c:. 7 9C 0 1 5790 0 BYTE 1>9C 6EEA D4F8 015795 . WORD DELL IN F* A Li E. **•*« * b 6 D 2 : 0 S N X L V 2 . M 6 5 6 EEC 9D 0 i 5800 n BYTE $9D 6 EED A4F8 0 1 5805 . WORD I NSL I N 6 EEF 9E 0 1 58 1 0 . BYTE $9E 6 EF 0 32F8 015815 , WORD CLRTAB 6EF2 9F 0 1 5820 . BYTE $ 9 F 6EF3 2DF8 0 1 5825 . WORD SET TAB 6EF5 FD 0 1 5830 * B Y 7 E $FD 6 EP £> OAF 9 0 1 5835 . WORD BELL 6 EF 8 FE 015840 . BYTE $FE 6EF9 6 DF 8 0 1 5845 . WORD DELCHR 6 EFB pp 0 1 5850 . BYTE $FF 6 EFC ■V '7 p Q 0 1 5855 . WORD INSCHR 6 EFE 6C6A3B80 0 1 5860 ATASCI . BYTE $ 6 C ■ , $ 6 A , $3B , $ 80 , $80 ! , $ 6 E A $2B , $2A 6 F 02 806B2B2A 6F06 6F SO 7075 0 1 5865 . BYTE $ 6 F , $BO, $70, $75, $9B, $69, $2D, $3D 6F0A 7 L 1 w ; 4^ U v : kJ 6 FOE 76806380 0 1 5870 . BYTE $ 76 , $ 8 O , $63, $80, $80, $62, $78, $7 A 6 F 12 8062787 A 6 F 1 6 34803336 0 1 5875 - BYTE *34, *80, $33, $36, $1B, $35, •± t r> H j... ij $3 1 6 F 1 A 1 B 35323 1 6 F 1 E 2 C 202 F 6 F 0 1 5880 . BYTE $ 20 , $ 20 , $ 2 E , $ 6 E , $ 8 O , $ 6 1 ) , $ 2 F , $81 jL cr o o or 4 ^.«c 806D2F81 6F26 *7 '“k r“i , “v / CT “7 O / 4£Ov , w%J / / 1 crOQC v* i %. J O C5 v ., 1 . BYTE $72, $80, $65, $79, $7 F, $74, $77 , $71 6F2A 7P74777 x 6 F 2 E 39803037 0 1 5890 O V T P « JU* ! 1 C.. $39 , $80 , $30, $37, $7E, $38, <i: T p $3E 6F32 7E383C3E 6 F‘ 36 66686480 0 1 5895 » BYTE $ 66 , $ 68 , $64 , $80 , $82 , $67 , $73, $61 6F3A O ■ r *> L. 7 3* L 1 0 42.0 / / %oo 1 6F3E 4C4A3A80 0 1 5900 . BYTE $4C , $4A , $3 A, $80, $80, $4B, $5C , $5E 6F42 804B5C5E 6 F 46 4F 805055 0 1 5905 . BYTE $4F , $80 , $50, $55, $9B, $49, $5F , $ 7C 6F4A 9B495F7C 6 F 4L 56804380 0 1 59 1 0 . BYTE $56 , $80 , $43 , $80 , $80 , $42 , cr r‘\ i-ja , $5 A 6F52 8042585A 6 F b 6 24802326 0 1591 5 - BYTE $24, $80, $23, $26, $15, $25, •± O O •r Jm Jim t| $21 6F5A 1 p ~ cr 7. 7 7 -j r** »!»■« rtn • itm »U*» >ii 6F5E 5B205D4E 015920 . BYTE $59, $20, $5D, $4E, $80, $4D, $3F , $8 1 6F62 804D3F8 1 6 F 66 52804559 O 1 5925 . BYTE $52, $80, $45 , $59 , $9F , $54 , $5 7 , $51 6 F 6 A 9F 545751 6 F 6 E 28802927 0 1 5930 . BYTE $28 , $80 , $29, $27, $9C, $40, $7D, $9D 6F72 9C407D9D 6 F 76 46484480 { ‘\ i cr 0 T v X U 7 vJ . BYTE $46, $48, $44, $80, $83, $47, $53 , $4 1 or / H 83475341 6F7E 0C0A7B80 0 1 5940 . BYTE $ 00 , $ 0 A , $7B , $80 , $80 , $0B , $ 1 E , $ 1 F 6FS2 800B1E1F 6 F“ 36 0F801015 015945 , BYTE $0F , $80 , $ 1 0 , $ 1 5 , $9B , $09 , $ 1 c , $ 1 D 6 F 8 A 9B091C1D 6 F 8 E 1 6800380 0 1 5950 . BYTE $ 16, $ 8 O , $03 , $80 , $80 , $02 , $ 1 8 , $ 1 A 6F92 8002 1 8 i A 6F96 80808580 0 1 5955 . BYTE $80 , $80 , $85 , $80 , $ 1 B , $80 , $FD , $80 6F9A 1 B80FD80 6F9E OO 2 0600 E 0 1 5960 . BYTE $ 00 , $ 20 , $60, $0E, $80, $0D , $80 , $81 6 F A 2 6 F A 6 800 0808 1 1 28005 1 9 015965 . BYTE $12, $80 , $05, $19, $9E, $14, $ 1 7 , $11 6 FA A 9E 1 4 1 7 1 1 6 F AE 80803080 0 15970 . BYTE $80, $80, $80 , $80 , $FE , $80 , $7D, $FF 6FB2 FE807DFF Page 57 D2:0SNXLV2,M65 6FB6 06080480 015975 .BYTE $06,$08,$04,$80,$84,$07,$13,$01 6FBA 94071301 6FBE AD09D2 015980 PIRQ5 LDA $D209 6FC1 CDF202 015985 CMP $02F2 6FC4 D005 015990 BNE PIRQ3 6FC6 ADF102 015995 LDA $02F1 6FC9 D01E 016000 BNE PIRQ4 6FCB AD09D2 016005 PIRQ3 LDA $D209 6FCE C99F 016010 CMP #$9F 6FDD DOOA 016015 BNE PIRQ1 6FD2 ADFF02 O16O2O LDA $02FF 6FD5 49PF 016025 EOR #$FT 6FD7 8DFF02 016030 STA $02FF 6FDA BOOD 016035 BCS PIRQ4 6FDC 8DFC02 016040 PIRQ1 STA $02FC 6FDF 8DF202 016045 STA $02F2 6FE2 A901 016050 LDA #1 6FE4 8DF102 016055 STA $02F1 6FE7 854D 016060 STA $4D 6FE9 A910 016065 PIRQ4 LDA #$10 6FEB 8D2B02 016070 STA $022B 6FEE 68 016075 PIRQ2 PLA 6FEF 40 016080 RTI ; 6FF0 40002060 016085 ATAINT .BYTE $40,0,$20,$60 6FF4 20400060 016090 INTATA .BYTE $20,$40,0,$60 6FF8 F3E691E7 016095 .BYTE $F3,$E6,$91,$E7,$25,$F1,$F3,$E6 6FFC 25F1F3E6 ASSEMBLY ERRORS: 0 21135 BYTES FREE