Home » Personal collection » Commodore disks » disk12b2_driving_games_3.d64 » edit 26.7.95
edit 26.7.95
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Commodore disks » disk12b2_driving_games_3.d64 |
Filename: | edit 26.7.95 |
Read OK: | ✔ |
File size: | 11D0 bytes |
Load address: | 0801 |
Exec address: | 0000 |
File contents
10 ; CRYSTALS OF OLYMPIA 20 ; EDITOR PROGRAM 30 ; 26/5/95 - 1000 ; VARIABLES 1010 XP=$CF40 1020 YP=$CF41 1030 XPB=$CF42 1040 CLICK=$CF43 1050 BUTNO=$CF44 1060 HOUR=$CF45 1990 *=$C000 2000 ; WIMP ROUTINES 2003 ; 2006 ; WIMP - MOUSE 2010 IRQ LDA $C5 2020 CMP #$01 2030 BNE CONCHECK 2040 STA CLICK 2050 CONCHECK CMP #$0C 2060 BEQ LEFTK 2070 LKC CMP #$17 2080 BEQ RIGHTK 2090 RKC CMP #$32 2100 BEQ UPK 2110 UPKC CMP #$37 2120 BEQ DOWNK 2130 DKC LDA $DC00 2140 TAX 2150 AND #$01 2160 BEQ UPJ 2170 UJC TXA 2180 AND #$02 2190 BEQ DOWNJ 2200 DJC TXA 2210 AND #$04 2220 BEQ LEFTJ 2230 LJC TXA 2240 AND #$08 2250 BEQ RIGHTJ 2260 RJC TXA 2270 AND #$10 2275 EOR #$10 2280 BEQ CJCH 2290 STA CLICK 2300 CJCH JMP $EA31 2310 LEFTK JSR LEFT 2320 JMP LKC 2330 RIGHTK JSR RIGHT 2340 JMP RKC 2350 UPK JSR UP 2360 JMP UPKC 2370 DOWNK JSR DOWN 2380 JMP DKC 2390 UPJ JSR UP 2400 JMP UJC 2410 DOWNJ JSR DOWN 2420 JMP DJC 2430 LEFTJ JSR LEFT 2440 JMP LJC 2450 RIGHTJ JSR RIGHT 2460 JMP RJC 2470 LEFT DEC XP 2480 LDA XP 2490 CMP #$FF 2500 BNE NOTFF 2510 LDY #$00 2520 STY XPB 2530 NOTFF LDY XPB 2540 BNE FIN 2550 CMP #$18 2560 BNE FIN 2570 INC XP 2580 FIN JMP CONTROL 2590 RIGHT INC XP 2600 LDA XP 2610 BNE NOT00 2620 LDY #$01 2630 STY XPB 2640 NOT00 LDY XPB 2650 BEQ FIN 2660 CMP #$58 2670 BNE FIN 2680 DEC XP 2690 JMP CONTROL 2700 UP DEC YP 2705 LDA YP 2710 CMP #$32 2715 BNE FIN 2720 INC YP 2730 JMP CONTROL 2740 DOWN INC YP 2750 LDA YP 2760 CMP #$F8 2770 BNE FIN 2780 DEC YP 2790 JMP CONTROL 2800 ; WIMP - POINTER 2810 CONTROL LDA XP 2820 CMP #$28 2830 BCC NSQUP 2840 CMP #$F8 2850 BCS NSQUP 2860 LDA XPB 2870 BNE NSQUP 2880 LDA YP 2890 CMP #$42 2900 BCC NSQUP 2910 CMP #$C1 2920 BCS NSQUP 2930 LDA XP 2940 AND #$F8 2950 STA $D000 2970 LDA YP 2980 AND #$F8 2985 ORA #$02 3000 STA $D001 3001 LDA $D010 3002 AND #$FC 3004 STA $D010 3005 LDA #$92 3006 STA $63F8 3007 LDA $D015 3008 AND #$FC 3009 ORA #$01 3010 STA $D015 3018 LDA #$01 3019 STA $D027 3020 RTS 3030 NSQUP LDA XP 3040 STA $D000 3050 STA $D002 3060 LDA YP 3070 STA $D001 3080 STA $D003 3090 LDA $D010 3100 AND #$FC 3110 LSR A 3120 CLC 3130 ADC XPB 3140 ASL A 3150 CLC 3160 ADC XPB 3170 STA $D010 3180 LDA #$90 3190 STA $63F8 3200 LDA #$91 3210 STA $63F9 3220 LDA $D015 3230 ORA #$03 3240 STA $D015 3250 LDA #$00 3260 STA $D027 3270 LDA #$01 3280 STA $D028 3290 RTS 3300 ; STARTUP ROUTINES 3302 SR LDA #$8B 3306 STA $D011 3310 LDA $DD02 3312 ORA #$02 3314 STA $DD02 3316 LDA $DD00 3320 AND #$FE 3330 ORA #$02 3340 STA $DD00 3343 LDA #$00 3346 STA $D020 3348 STA $D021 3350 LDA #$86 3360 STA $D018 3362 LDA #$00 3365 STA $D000 3366 LDA #$0B 3368 STA $D001 3370 LDA #$01 3380 LDX #$08 3390 TAY 3400 JSR $FFBA 3410 LDA #$0C 3420 LDX #<EGRTXT 3430 LDY #>EGRTXT 3450 JSR $FFBD 3460 LDA #$00 3470 JSR $FFD5 3471 LDA #$01 3472 LDX #$08 3473 TAY 3474 JSR $FFBA 3475 LDA #$08 3476 LDX #<ECTXT 3477 LDY #>ECTXT 3478 JSR $FFBD 3479 LDA #$00 3480 JSR $FFD5 3481 LDA #$9B 3482 STA $D011 3483 LDA #$00 3490 STA BUTNO 3500 SEI 3510 LDA #$00 3520 STA $0314 3530 LDA #$C0 3540 STA $0315 3550 CLI 3560 LDA #$00 3570 STA XP 3580 STA HOUR 3590 LDA #$80 3600 STA YP 3610 LDA #$01 3620 STA XPB 3621 LDA #$0C 3622 STA $D015 3623 JSR LEFT 3624 LDA #$00 3625 STA $D005 3626 STA $D007 3627 LDA #$DA 3628 STA $D004 3629 STA $D006 3630 LDA #$85 3632 STA $5BFA 3634 LDA #$04 3635 STA $D01C 3637 BUT0 JSR BUTCHECK 3640 JMP BUT0 3650 EGRTXT TXT "EDITGRAPHICS" 3655 BCQU RTS 3660 BUTCHECK LDA YP 3670 CMP #$D9 3680 BCC BCQU 3690 LDA XP 3700 CMP #$28 3710 BCC BCQU 3720 LDA XPB 3730 BNE BCOK 3740 LDA XP 3750 CMP #$48 3760 BCS BCQU 3770 BCOK LDA XP 3772 LDX XPB 3775 BNE BCTC 3780 SEC 3790 SBC #$28 3800 BCTC LDX #$00 3810 BCLPA INX 3820 SEC 3830 SBC #$18 3840 CMP #$E8 3850 BCC BCLPA 3860 TXA 3870 LDY XPB 3880 BEQ NAO 3890 CLC 3900 ADC #$09 3910 NAO STA BUTNO 3920 ASL A 3930 ASL A 3940 ASL A 3950 STA $02 3960 CLC 3970 ADC $02 3980 ADC $02 3990 STA $D005 4000 STA $D007 4010 LDA #$85 4012 CLC 4016 ADC BUTNO 4020 STA $5BFB 4030 PLA 4040 PLA 4050 LDA #$CF 4060 STA VE+2 4070 LDA BUTNO 4080 ASL A 4083 CLC 4086 ADC #$80 4090 STA VE+1 4092 LDA #<VEC 4094 PHA 4096 LDA #>VEC 4098 PHA 4100 VE JMP ($0000) 4110 VEC LDA VE+1 4120 CLC 4130 ADC #$20 4140 STA PH+1 4150 LDA VE+2 4160 STA PH+2 4170 PH JMP ($0000) 10000 BI1 RTS 10001 BI2 RTS 10002 BI3 RTS 10003 BI4 RTS 10004 BI5 RTS 10005 BI6 RTS 10006 BI7 RTS 10007 BI8 RTS 10008 BI9 RTS 10009 BIA RTS 10010 BIB RTS 10011 BIC RTS 10020 BT1 NOP 10021 BT2 NOP 10022 BT3 NOP 10023 BT4 NOP 10024 BT5 NOP 10025 BT6 NOP 10026 BT7 NOP 10027 BT8 NOP 10028 BT9 NOP 10029 BTA NOP 10030 BTB NOP 10031 BTC NOP 10032 JMP BUT0 63000 ; VECTOR TABLE 63010 *=$CF80 63020 TXT <BI1,>BI1,<BI2,>BI2,<BI3,>BI3 63030 TXT <BI4,>BI4,<BI5,>BI5,<BI6,>BI6 63040 TXT <BI7,>BI7,<BI8,>BI8,<BI9,>BI9 63050 TXT <BIA,>BIA,<BIB,>BIB,<BIC,>BIC 63060 ; 63070 TXT <BT1,>BT1,<BT2,>BT2,<BT3,>BT3 63080 TXT <BT4,>BT4,<BT5,>BT5,<BT6,>BT6 63090 TXT <BT7,>BT7,<BT8,>BT8,<BT9,>BT9 63100 TXT <BTA,>BTA,<BTB,>BTB,<BTC,>BTC
; CRYSTALS OF OLYMPIA/; EDI�R PROGRAM?; 26�5�95 �O�; VARIABLES\�XP�$CF40i�YP�$CF41wXPB�$CF42�CLICK�$CF43�BUTNO�$CF44�$HOUR�$CF45����$C000��; WIMP ROUTINES��; �; WIMP � MOUSE �IRQ LDA $C5* �CMP #$01: �BNE C�CHECKH �STA CLICK] C�CHECK CMP #$0Ck BEQ LEFTK| LKC CMP #$17� BEQ RIGHTK� *RKC CMP #$32� 4BEQ UPK� >UPKC CMP #$37� HBEQ DOWNK� RDKC LDA $DC00� \TAX� f� #$01� pBEQ UPJ zUJC TXA �� #$02 �BEQ DOWNJ* �DJC TXA5 �� #$04C �BEQ LEFTJO �LJC TXAZ �� #$08i �BEQ RIGHTJu �RJC TXA� �� #$10� �E� #$10� �BEQ CJCH� �STA CLICK� �CJCH JMP $EA31� LEFTK JSR LEFT� JMP LKC� RIGHTK JSR RIGHT� $ JMP RKC . UPK JSR UP8 JMP UPKC)B DOWNK JSR DOWN5L JMP DKCDV UPJ JSR UPP` JMP UJCcj DOWNJ JSR DOWNot JMP DJC�~ LEFTJ JSR LEFT�� JMP LJC�� RIGHTJ JSR RIGHT�� JMP RJC�� LEFT DEC XP�� LDA XP�� CMP #$FF�� BNE �FF�� LDY #$00�� STY XPB� �FF LDY XPB� BNE FIN%� CMP #$181 BNE FIN< INC XPM FIN JMP �ROL^ RIGHT INC XPi( LDA XPu2 BNE �00�< LDY #$01�F STY XPB�P �00 LDY XPB�Z BEQ FIN�d CMP #$58�n BNE FIN�x DEC XP�� JMP �ROL�� UP DEC YP�� LDA YP � CMP #$32 � BNE FIN � INC YP% � JMP �ROL5 � DOWN INC YP@ � LDA YPM � CMP #$F8Y � BNE FINd � DEC YPq � JMP �ROL� � ; WIMP - POINTER� � �ROL LDA XP� CMP #$28� BCC NSQUP� CMP #$F8� "BCS NSQUP� ,LDA XPB� 6BNE NSQUP� @LDA YP� JCMP #$42TBCC NSQUP^CMP #$C1'hBCS NSQUP2rLDA XP=|� #$F8K�STA $D000V�LDA YPa�� #$F8m��A #$02{�STA $D001��LDA $D010��� #$FC��STA $D010��LDA #$92��STA $63F8��LDA $D015��� #$FC���A #$01��STA $D015��LDA #$01�STA $D027�RTS$�NSQUP LDA XP2�STA $D000@�STA $D002K�LDA YPY�STA $D001gSTA $D003uLDA $D010�� #$FC�&LSR A�0CLC�:ADC XPB�DASL A�NCLC�XADC XPB�bSTA $D010�lLDA #$90�vSTA $63F8��LDA #$91�STA $63F9�LDA $D015��A #$03(�STA $D0155�LDA #$00C�STA $D027P�LDA #$01^�STA $D028f�RTS}�; STARTUP ROUTINES��SR LDA #$8B��STA $D011��LDA $DD02���A #$02��STA $DD02��LDA $DD00��� #$FE� �A #$02� STA $DD00 LDA #$00 STA $D020 STA $D021, LDA #$86: STA $D018G" LDA #$00U% STA $D000b& LDA #$0Bp( STA $D001}* LDA #$01�4 LDX #$08�> TAY�H JSR $FFBA�R LDA #$0C�\ LDX #�EGRTXT�f LDY #�EGRTXT�z JSR $FFBD�� LDA #$00�� JSR $FFD5� LDA #$01� LDX #$08� TAY(� JSR $FFBA5� LDA #$08E� LDX #�ECTXTU� LDY #�ECTXTc� JSR $FFBDp� LDA #$00~� JSR $FFD5�� LDA #$9B�� STA $D011�� LDA #$00�� STA BUTNO�� SEI�� LDA #$00�� STA $0314�� LDA #$C0�� STA $0315�� CLI� LDA #$00� STA XP� STA HOUR,LDA #$807STA YPDLDA #$01P$STA XPB]%LDA #$0Ck&STA $D015x'JSR LEFT�(LDA #$00�)STA $D005�*STA $D007�+LDA #$DA�,STA $D004�-STA $D006�.LDA #$85�0STA $5BFA�2LDA #$043STA $D01C5BUT0 JSR BUTCHECK#8JMP BUT0ABEGRTXT TXT "EDITGRAPHICS"NGBCQU RTSbLBUTCHECK LDA YPoVCMP #$D9|`BCC BCQU�jLDA XP�tCMP #$28�~BCC BCQU��LDA XPB��BNE BCOK��LDA XP��CMP #$48��BCS BCQU��BCOK LDA XP��LDX XPB�BNE BCTC�SEC�SBC #$28/�BCTC LDX #$00=�BCLPA INXE�SECR�SBC #$18_CMP #$E8m BCC BCLPAuTXA�LDY XPB�(BEQ NAO�2CLC�<ADC #$09�FNAO STA BUTNO�PASL A�ZASL A�dASL A�nSTA $02�xCLC��ADC $02��ADC $02�STA $D005�STA $D007'�LDA #$85/�CLC=�ADC BUTNOK�STA $5BFBS�PLA[�PLAh�LDA #$CFu�STA VE�2��LDA BUTNO��ASL A��CLC��ADC #$80��STA VE�1��LDA #�VEC��PHA�LDA #�VEC�PHA�VE JMP ($0000)�VEC LDA VE�1CLC"ADC #$20!,STA PH�1.6LDA VE�2;@STA PH�2NJPH JMP ($0000)Z'BI1 RTSf'BI2 RTSr'BI3 RTS~'BI4 RTS�'BI5 RTS�'BI6 RTS�'BI7 RTS�'BI8 RTS�'BI9 RTS�'BIA RTS�'BIB RTS�'BIC RTS�$'BT1 NOP�%'BT2 NOP&'BT3 NOP''BT4 NOP('BT5 NOP&)'BT6 NOP2*'BT7 NOP>+'BT8 NOPJ,'BT9 NOPV-'BTA NOPb.'BTB NOPn/'BTC NOP{0'JMP BUT0��; VEC�R TABLE�"���$CF80�,�TXT �BI1,�BI1,�BI2,�BI2,�BI3,�BI3�6�TXT �BI4,�BI4,�BI5,�BI5,�BI6,�BI6@�TXT �BI7,�BI7,�BI8,�BI8,�BI9,�BI91J�TXT �BIA,�BIA,�BIB,�BIB,�BIC,�BIC7T�;]^�TXT �BT1,�BT1,�BT2,�BT2,�BT3,�BT3�h�TXT �BT4,�BT4,�BT5,�BT5,�BT6,�BT6�r�TXT �BT7,�BT7,�BT8,�BT8,�BT9,�BT9�|�TXT �BTA,�BTA,�BTB,�BTB,�BTC,�BTC
[HJ@; crystals of olympia@/HT@; edi.r program@?H.@; 26.5.95 .@oH.C; variables@£H.Cxp.$cf40@IH.Cyp.$cf41@WHFDxpb.$cf42@.HPDclick.$cf43@.HZDbutno.$cf44@.H$Dhour.$cf45@.H.G..$c000@.H.G; wimp routines@.H.G;@MI.G; wimp . mouse@]I.Girq lda $c5@*I.Gcmp #$01@:I.Gbne c.check@hI.Gsta click@]IBHc.check cmp #$0c@KILHbeq leftk@.IVHlkc cmp #$17@.I Hbeq rightk@.I*Hrkc cmp #$32@.I4Hbeq upk@.I>Hupkc cmp #$37@.IhHbeq downk@.IrHdkc lda $dc00@.I£Htax@.IFH. #$01@.IPHbeq upj@EJZHujc txa@PJ.H. #$02@.J.Hbeq downj@*J.Hdjc txa@5J.H. #$04@cJ.Hbeq leftj@oJ.Hljc txa@zJ.H. #$08@IJ.Hbeq rightj@UJ.Hrjc txa@.J.H. #$10@.J.He. #$10@.J.Hbeq cjch@.J.Hsta click@.J.Hcjch jmp $ea31@.JFIleftk jsr left@.JPIjmp lkc@.JZIrightk jsr right@.J$Ijmp rkc@IK.Iupk jsr up@VK8Ijmp upkc@)KbIdownk jsr down@5KlIjmp dkc@dKvIupj jsr up@pK.Ijmp ujc@CKJIdownj jsr down@OKTIjmp djc@.K.Ileftj jsr left@.K.Ijmp ljc@.K.Irightj jsr right@.K.Ijmp rjc@.K.Ileft dec xp@.K.Ilda xp@.K.Icmp #$ff@.K.Ibne .ff@.K.Ildy #$00@.K.Isty xpb@LL.I.ff ldy xpb@XL.Ibne fin@%L.Icmp #$18@1L@Jbne fin@<LJJinc xp@mLTJfin jmp .rol@.L.Jright inc xp@IL(Jlda xp@UL2Jbne .00@.L<Jldy #$01@.LfJsty xpb@.LpJ.00 ldy xpb@.LzJbeq fin@.LDJcmp #$58@.LNJbne fin@.LXJdec xp@.L.Jjmp .rol@.L.Jup dec yp@.L.Jlda yp@AM.Jcmp #$32@MM.Jbne fin@XM.Jinc yp@%M.Jjmp .rol@5M.Jdown inc yp@@M.Jlda yp@mM.Jcmp #$f8@yM.Jbne fin@DM.Jdec yp@QM.Jjmp .rol@.M.J; wimp - pointer@.M.J.rol lda xp@.MDKcmp #$28@.MNKbcc nsqup@.MXKcmp #$f8@.M"Kbcs nsqup@.M,Klda xpb@.M6Kbne nsqup@.M@Klda yp@.MjKcmp #$42@LNtKbcc nsqup@YN.Kcmp #$c1@'NHKbcs nsqup@2NRKlda xp@=N.K. #$f8@kN.Ksta $d000@vN.Klda yp@AN.K. #$f8@MN.K.a #$02@.N.Ksta $d001@.N.Klda $d010@.N.K. #$fc@.N.Ksta $d010@.N.Klda #$92@.N.Ksta $63f8@.N.Klda $d015@.N.K. #$fc@.N.K.a #$01@.N.Ksta $d015@.N.Klda #$01@KO.Ksta $d027@SO.Krts@$O.Knsqup lda xp@2O.Ksta $d000@@O.Ksta $d002@kO.Klda yp@yO.Ksta $d001@GOHLsta $d003@UORLlda $d010@.O£L. #$fc@.O&Llsr a@.O0Lclc@.O:Ladc xpb@.OdLasl a@.OnLclc@.OxLadc xpb@.OBLsta $d010@.OLLlda #$90@.OVLsta $63f8@.O.Llda #$91@@P.Lsta $63f9@NP.Llda $d015@ZP.L.a #$03@(P.Lsta $d015@5P.Llda #$00@cP.Lsta $d027@pP.Llda #$01@.P.Lsta $d028@FP.Lrts@.P.L; startup routines@.P.Lsr lda #$8b@.P.Lsta $d011@.P.Llda $dd02@.P.L.a #$02@.P.Lsta $dd02@.P.Llda $dd00@.P.L. #$fe@.PBM.a #$02@.PLMsta $dd00@CQOMlda #$00@QQRMsta $d020@.QTMsta $d021@,QVMlda #$86@:Q Msta $d018@gQ"Mlda #$00@uQ%Msta $d000@BQ&Mlda #$0b@PQ(Msta $d001@.Q*Mlda #$01@.Q4Mldx #$08@.Q>Mtay@.QhMjsr $ffba@.QrMlda #$0c@.Q£Mldx #.egrtxt@.QFMldy #.egrtxt@.QZMjsr $ffbd@.Q.Mlda #$00@.Q.Mjsr $ffd5@ER.Mlda #$01@RR.Mldx #$08@ZR.Mtay@(R.Mjsr $ffba@5R.Mlda #$08@eR.Mldx #.ectxt@uR.Mldy #.ectxt@CR.Mjsr $ffbd@PR.Mlda #$00@.R.Mjsr $ffd5@.R.Mlda #$9b@.R.Msta $d011@.R.Mlda #$00@.R.Msta butno@.R.Msei@.R.Mlda #$00@.R.Msta $0314@.R.Mlda #$c0@.R.Msta $0315@.R.Mcli@GS.Mlda #$00@RS.Msta xp@.S.Msta hour@,SFNlda #$80@7SPNsta yp@dSZNlda #$01@pS$Nsta xpb@]S%Nlda #$0c@KS&Nsta $d015@XS'Njsr left@.S(Nlda #$00@.S)Nsta $d005@.S*Nsta $d007@.S+Nlda #$da@.S,Nsta $d004@.S-Nsta $d006@.S.Nlda #$85@.S0Nsta $5bfa@.S2Nlda #$04@@T3Nsta $d01c@VT5Nbut0 jsr butcheck@#T8Njmp but0@aTbNegrtxt txt "editgraphics"@nTgNbcqu rts@BTlNbutcheck lda yp@OTvNcmp #$d9@.T.Nbcc bcqu@.TJNlda xp@.TTNcmp #$28@.T.Nbcc bcqu@.T.Nlda xpb@.T.Nbne bcok@.T.Nlda xp@.T.Ncmp #$48@.T.Nbcs bcqu@.T.Nbcok lda xp@.T.Nldx xpb@HU.Nbne bctc@PU.Nsec@]U.Nsbc #$28@/U.Nbctc ldx #$00@=U.Nbclpa inx@eU.Nsec@rU.Nsbc #$18@.U@Ocmp #$e8@MUJObcc bclpa@UUTOtxa@.U.Oldy xpb@.U(Obeq nao@.U2Oclc@.U<Oadc #$09@.UfOnao sta butno@.UpOasl a@.UzOasl a@.UDOasl a@.UNOsta $02@.UXOclc@.U.Oadc $02@.U.Oadc $02@LV.Osta $d005@ZV.Osta $d007@'V.Olda #$85@/V.Oclc@=V.Oadc butno@kV.Osta $5bfb@sV.Opla@[V.Opla@HV.Olda #$cf@UV.Osta ve.2@.V.Olda butno@.V.Oasl a@.V.Oclc@.V.Oadc #$80@.V.Osta ve.1@.V.Olda #.vec@.V.Opha@.V@Plda #.vec@.VBPpha@.VDPve jmp ($0000)@.VNPvec lda ve.1@GWXPclc@TW"Padc #$20@!W,Psta ph.1@.W6Plda ve.2@;W@Psta ph.2@nWjPph jmp ($0000)@zWP'bi1 rts@FWQ'bi2 rts@RWR'bi3 rts@.WS'bi4 rts@.WT'bi5 rts@.WU'bi6 rts@.WV'bi7 rts@.WW'bi8 rts@.WX'bi9 rts@.WY'bia rts@.WZ'bib rts@.W['bic rts@.W$'bt1 nop@.W%'bt2 nop@BX&'bt3 nop@NX''bt4 nop@ZX('bt5 nop@&X)'bt6 nop@2X*'bt7 nop@>X+'bt8 nop@jX,'bt9 nop@vX-'bta nop@BX.'btb nop@NX/'btc nop@.X0'jmp but0@.XX.; vec.r table@.X"...$cf80@.X,.txt .bi1,.bi1,.bi2,.bi2,.bi3,.bi3@.X6.txt .bi4,.bi4,.bi5,.bi5,.bi6,.bi6@KY@.txt .bi7,.bi7,.bi8,.bi8,.bi9,.bi9@1Yj.txt .bia,.bia,.bib,.bib,.bic,.bic@7Yt.;@]Y..txt .bt1,.bt1,.bt2,.bt2,.bt3,.bt3@.YH.txt .bt4,.bt4,.bt5,.bt5,.bt6,.bt6@.YR.txt .bt7,.bt7,.bt8,.bt8,.bt9,.bt9@.Y..txt .bta,.bta,.btb,.btb,.btc,.btc@@@
00000000 1b 08 0a 00 3b 20 43 52 59 53 54 41 4c 53 20 4f |....; CRYSTALS O| 00000010 46 20 4f 4c 59 4d 50 49 41 00 2f 08 14 00 3b 20 |F OLYMPIA./...; | 00000020 45 44 49 a4 52 20 50 52 4f 47 52 41 4d 00 3f 08 |EDI.R PROGRAM.?.| 00000030 1e 00 3b 20 32 36 ad 35 ad 39 35 20 ab 00 4f 08 |..; 26.5.95 ..O.| 00000040 e8 03 3b 20 56 41 52 49 41 42 4c 45 53 00 5c 08 |..; VARIABLES.\.| 00000050 f2 03 58 50 b2 24 43 46 34 30 00 69 08 fc 03 59 |..XP.$CF40.i...Y| 00000060 50 b2 24 43 46 34 31 00 77 08 06 04 58 50 42 b2 |P.$CF41.w...XPB.| 00000070 24 43 46 34 32 00 87 08 10 04 43 4c 49 43 4b b2 |$CF42.....CLICK.| 00000080 24 43 46 34 33 00 97 08 1a 04 42 55 54 4e 4f b2 |$CF43.....BUTNO.| 00000090 24 43 46 34 34 00 a6 08 24 04 48 4f 55 52 b2 24 |$CF44...$.HOUR.$| 000000a0 43 46 34 35 00 b2 08 c6 07 ac b2 24 43 30 30 30 |CF45.......$C000| 000000b0 00 f4 08 d0 07 3b 20 20 20 20 20 20 20 20 20 20 |.....; | 000000c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | * 000000e0 20 20 20 20 20 57 49 4d 50 20 52 4f 55 54 49 4e | WIMP ROUTIN| 000000f0 45 53 00 fa 08 d3 07 3b 00 0d 09 d6 07 3b 20 57 |ES.....;.....; W| 00000100 49 4d 50 20 ab 20 4d 4f 55 53 45 00 1d 09 da 07 |IMP . MOUSE.....| 00000110 49 52 51 20 4c 44 41 20 24 43 35 00 2a 09 e4 07 |IRQ LDA $C5.*...| 00000120 43 4d 50 20 23 24 30 31 00 3a 09 ee 07 42 4e 45 |CMP #$01.:...BNE| 00000130 20 43 91 43 48 45 43 4b 00 48 09 f8 07 53 54 41 | C.CHECK.H...STA| 00000140 20 43 4c 49 43 4b 00 5d 09 02 08 43 91 43 48 45 | CLICK.]...C.CHE| 00000150 43 4b 20 43 4d 50 20 23 24 30 43 00 6b 09 0c 08 |CK CMP #$0C.k...| 00000160 42 45 51 20 4c 45 46 54 4b 00 7c 09 16 08 4c 4b |BEQ LEFTK.|...LK| 00000170 43 20 43 4d 50 20 23 24 31 37 00 8b 09 20 08 42 |C CMP #$17... .B| 00000180 45 51 20 52 49 47 48 54 4b 00 9c 09 2a 08 52 4b |EQ RIGHTK...*.RK| 00000190 43 20 43 4d 50 20 23 24 33 32 00 a8 09 34 08 42 |C CMP #$32...4.B| 000001a0 45 51 20 55 50 4b 00 ba 09 3e 08 55 50 4b 43 20 |EQ UPK...>.UPKC | 000001b0 43 4d 50 20 23 24 33 37 00 c8 09 48 08 42 45 51 |CMP #$37...H.BEQ| 000001c0 20 44 4f 57 4e 4b 00 da 09 52 08 44 4b 43 20 4c | DOWNK...R.DKC L| 000001d0 44 41 20 24 44 43 30 30 00 e2 09 5c 08 54 41 58 |DA $DC00...\.TAX| 000001e0 00 ed 09 66 08 af 20 23 24 30 31 00 f9 09 70 08 |...f.. #$01...p.| 000001f0 42 45 51 20 55 50 4a 00 05 0a 7a 08 55 4a 43 20 |BEQ UPJ...z.UJC | 00000200 54 58 41 00 10 0a 84 08 af 20 23 24 30 32 00 1e |TXA...... #$02..| 00000210 0a 8e 08 42 45 51 20 44 4f 57 4e 4a 00 2a 0a 98 |...BEQ DOWNJ.*..| 00000220 08 44 4a 43 20 54 58 41 00 35 0a a2 08 af 20 23 |.DJC TXA.5.... #| 00000230 24 30 34 00 43 0a ac 08 42 45 51 20 4c 45 46 54 |$04.C...BEQ LEFT| 00000240 4a 00 4f 0a b6 08 4c 4a 43 20 54 58 41 00 5a 0a |J.O...LJC TXA.Z.| 00000250 c0 08 af 20 23 24 30 38 00 69 0a ca 08 42 45 51 |... #$08.i...BEQ| 00000260 20 52 49 47 48 54 4a 00 75 0a d4 08 52 4a 43 20 | RIGHTJ.u...RJC | 00000270 54 58 41 00 80 0a de 08 af 20 23 24 31 30 00 8c |TXA...... #$10..| 00000280 0a e3 08 45 b0 20 23 24 31 30 00 99 0a e8 08 42 |...E. #$10.....B| 00000290 45 51 20 43 4a 43 48 00 a7 0a f2 08 53 54 41 20 |EQ CJCH.....STA | 000002a0 43 4c 49 43 4b 00 ba 0a fc 08 43 4a 43 48 20 4a |CLICK.....CJCH J| 000002b0 4d 50 20 24 45 41 33 31 00 cd 0a 06 09 4c 45 46 |MP $EA31.....LEF| 000002c0 54 4b 20 4a 53 52 20 4c 45 46 54 00 d9 0a 10 09 |TK JSR LEFT.....| 000002d0 4a 4d 50 20 4c 4b 43 00 ee 0a 1a 09 52 49 47 48 |JMP LKC.....RIGH| 000002e0 54 4b 20 4a 53 52 20 52 49 47 48 54 00 fa 0a 24 |TK JSR RIGHT...$| 000002f0 09 4a 4d 50 20 52 4b 43 00 09 0b 2e 09 55 50 4b |.JMP RKC.....UPK| 00000300 20 4a 53 52 20 55 50 00 16 0b 38 09 4a 4d 50 20 | JSR UP...8.JMP | 00000310 55 50 4b 43 00 29 0b 42 09 44 4f 57 4e 4b 20 4a |UPKC.).B.DOWNK J| 00000320 53 52 20 44 4f 57 4e 00 35 0b 4c 09 4a 4d 50 20 |SR DOWN.5.L.JMP | 00000330 44 4b 43 00 44 0b 56 09 55 50 4a 20 4a 53 52 20 |DKC.D.V.UPJ JSR | 00000340 55 50 00 50 0b 60 09 4a 4d 50 20 55 4a 43 00 63 |UP.P.`.JMP UJC.c| 00000350 0b 6a 09 44 4f 57 4e 4a 20 4a 53 52 20 44 4f 57 |.j.DOWNJ JSR DOW| 00000360 4e 00 6f 0b 74 09 4a 4d 50 20 44 4a 43 00 82 0b |N.o.t.JMP DJC...| 00000370 7e 09 4c 45 46 54 4a 20 4a 53 52 20 4c 45 46 54 |~.LEFTJ JSR LEFT| 00000380 00 8e 0b 88 09 4a 4d 50 20 4c 4a 43 00 a3 0b 92 |.....JMP LJC....| 00000390 09 52 49 47 48 54 4a 20 4a 53 52 20 52 49 47 48 |.RIGHTJ JSR RIGH| 000003a0 54 00 af 0b 9c 09 4a 4d 50 20 52 4a 43 00 bf 0b |T.....JMP RJC...| 000003b0 a6 09 4c 45 46 54 20 44 45 43 20 58 50 00 ca 0b |..LEFT DEC XP...| 000003c0 b0 09 4c 44 41 20 58 50 00 d7 0b ba 09 43 4d 50 |..LDA XP.....CMP| 000003d0 20 23 24 46 46 00 e3 0b c4 09 42 4e 45 20 a8 46 | #$FF.....BNE .F| 000003e0 46 00 f0 0b ce 09 4c 44 59 20 23 24 30 30 00 fc |F.....LDY #$00..| 000003f0 0b d8 09 53 54 59 20 58 50 42 00 0c 0c e2 09 a8 |...STY XPB......| 00000400 46 46 20 4c 44 59 20 58 50 42 00 18 0c ec 09 42 |FF LDY XPB.....B| 00000410 4e 45 20 46 49 4e 00 25 0c f6 09 43 4d 50 20 23 |NE FIN.%...CMP #| 00000420 24 31 38 00 31 0c 00 0a 42 4e 45 20 46 49 4e 00 |$18.1...BNE FIN.| 00000430 3c 0c 0a 0a 49 4e 43 20 58 50 00 4d 0c 14 0a 46 |<...INC XP.M...F| 00000440 49 4e 20 4a 4d 50 20 9a 52 4f 4c 00 5e 0c 1e 0a |IN JMP .ROL.^...| 00000450 52 49 47 48 54 20 49 4e 43 20 58 50 00 69 0c 28 |RIGHT INC XP.i.(| 00000460 0a 4c 44 41 20 58 50 00 75 0c 32 0a 42 4e 45 20 |.LDA XP.u.2.BNE | 00000470 a8 30 30 00 82 0c 3c 0a 4c 44 59 20 23 24 30 31 |.00...<.LDY #$01| 00000480 00 8e 0c 46 0a 53 54 59 20 58 50 42 00 9e 0c 50 |...F.STY XPB...P| 00000490 0a a8 30 30 20 4c 44 59 20 58 50 42 00 aa 0c 5a |..00 LDY XPB...Z| 000004a0 0a 42 45 51 20 46 49 4e 00 b7 0c 64 0a 43 4d 50 |.BEQ FIN...d.CMP| 000004b0 20 23 24 35 38 00 c3 0c 6e 0a 42 4e 45 20 46 49 | #$58...n.BNE FI| 000004c0 4e 00 ce 0c 78 0a 44 45 43 20 58 50 00 db 0c 82 |N...x.DEC XP....| 000004d0 0a 4a 4d 50 20 9a 52 4f 4c 00 e9 0c 8c 0a 55 50 |.JMP .ROL.....UP| 000004e0 20 44 45 43 20 59 50 00 f4 0c 91 0a 4c 44 41 20 | DEC YP.....LDA | 000004f0 59 50 00 01 0d 96 0a 43 4d 50 20 23 24 33 32 00 |YP.....CMP #$32.| 00000500 0d 0d 9b 0a 42 4e 45 20 46 49 4e 00 18 0d a0 0a |....BNE FIN.....| 00000510 49 4e 43 20 59 50 00 25 0d aa 0a 4a 4d 50 20 9a |INC YP.%...JMP .| 00000520 52 4f 4c 00 35 0d b4 0a 44 4f 57 4e 20 49 4e 43 |ROL.5...DOWN INC| 00000530 20 59 50 00 40 0d be 0a 4c 44 41 20 59 50 00 4d | YP.@...LDA YP.M| 00000540 0d c8 0a 43 4d 50 20 23 24 46 38 00 59 0d d2 0a |...CMP #$F8.Y...| 00000550 42 4e 45 20 46 49 4e 00 64 0d dc 0a 44 45 43 20 |BNE FIN.d...DEC | 00000560 59 50 00 71 0d e6 0a 4a 4d 50 20 9a 52 4f 4c 00 |YP.q...JMP .ROL.| 00000570 86 0d f0 0a 3b 20 57 49 4d 50 20 2d 20 50 4f 49 |....; WIMP - POI| 00000580 4e 54 45 52 00 96 0d fa 0a 9a 52 4f 4c 20 4c 44 |NTER......ROL LD| 00000590 41 20 58 50 00 a3 0d 04 0b 43 4d 50 20 23 24 32 |A XP.....CMP #$2| 000005a0 38 00 b1 0d 0e 0b 42 43 43 20 4e 53 51 55 50 00 |8.....BCC NSQUP.| 000005b0 be 0d 18 0b 43 4d 50 20 23 24 46 38 00 cc 0d 22 |....CMP #$F8..."| 000005c0 0b 42 43 53 20 4e 53 51 55 50 00 d8 0d 2c 0b 4c |.BCS NSQUP...,.L| 000005d0 44 41 20 58 50 42 00 e6 0d 36 0b 42 4e 45 20 4e |DA XPB...6.BNE N| 000005e0 53 51 55 50 00 f1 0d 40 0b 4c 44 41 20 59 50 00 |SQUP...@.LDA YP.| 000005f0 fe 0d 4a 0b 43 4d 50 20 23 24 34 32 00 0c 0e 54 |..J.CMP #$42...T| 00000600 0b 42 43 43 20 4e 53 51 55 50 00 19 0e 5e 0b 43 |.BCC NSQUP...^.C| 00000610 4d 50 20 23 24 43 31 00 27 0e 68 0b 42 43 53 20 |MP #$C1.'.h.BCS | 00000620 4e 53 51 55 50 00 32 0e 72 0b 4c 44 41 20 58 50 |NSQUP.2.r.LDA XP| 00000630 00 3d 0e 7c 0b af 20 23 24 46 38 00 4b 0e 86 0b |.=.|.. #$F8.K...| 00000640 53 54 41 20 24 44 30 30 30 00 56 0e 9a 0b 4c 44 |STA $D000.V...LD| 00000650 41 20 59 50 00 61 0e a4 0b af 20 23 24 46 38 00 |A YP.a.... #$F8.| 00000660 6d 0e a9 0b b0 41 20 23 24 30 32 00 7b 0e b8 0b |m....A #$02.{...| 00000670 53 54 41 20 24 44 30 30 31 00 89 0e b9 0b 4c 44 |STA $D001.....LD| 00000680 41 20 24 44 30 31 30 00 94 0e ba 0b af 20 23 24 |A $D010...... #$| 00000690 46 43 00 a2 0e bc 0b 53 54 41 20 24 44 30 31 30 |FC.....STA $D010| 000006a0 00 af 0e bd 0b 4c 44 41 20 23 24 39 32 00 bd 0e |.....LDA #$92...| 000006b0 be 0b 53 54 41 20 24 36 33 46 38 00 cb 0e bf 0b |..STA $63F8.....| 000006c0 4c 44 41 20 24 44 30 31 35 00 d6 0e c0 0b af 20 |LDA $D015...... | 000006d0 23 24 46 43 00 e2 0e c1 0b b0 41 20 23 24 30 31 |#$FC......A #$01| 000006e0 00 f0 0e c2 0b 53 54 41 20 24 44 30 31 35 00 fd |.....STA $D015..| 000006f0 0e ca 0b 4c 44 41 20 23 24 30 31 00 0b 0f cb 0b |...LDA #$01.....| 00000700 53 54 41 20 24 44 30 32 37 00 13 0f cc 0b 52 54 |STA $D027.....RT| 00000710 53 00 24 0f d6 0b 4e 53 51 55 50 20 4c 44 41 20 |S.$...NSQUP LDA | 00000720 58 50 00 32 0f e0 0b 53 54 41 20 24 44 30 30 30 |XP.2...STA $D000| 00000730 00 40 0f ea 0b 53 54 41 20 24 44 30 30 32 00 4b |.@...STA $D002.K| 00000740 0f f4 0b 4c 44 41 20 59 50 00 59 0f fe 0b 53 54 |...LDA YP.Y...ST| 00000750 41 20 24 44 30 30 31 00 67 0f 08 0c 53 54 41 20 |A $D001.g...STA | 00000760 24 44 30 30 33 00 75 0f 12 0c 4c 44 41 20 24 44 |$D003.u...LDA $D| 00000770 30 31 30 00 80 0f 1c 0c af 20 23 24 46 43 00 8a |010...... #$FC..| 00000780 0f 26 0c 4c 53 52 20 41 00 92 0f 30 0c 43 4c 43 |.&.LSR A...0.CLC| 00000790 00 9e 0f 3a 0c 41 44 43 20 58 50 42 00 a8 0f 44 |...:.ADC XPB...D| 000007a0 0c 41 53 4c 20 41 00 b0 0f 4e 0c 43 4c 43 00 bc |.ASL A...N.CLC..| 000007b0 0f 58 0c 41 44 43 20 58 50 42 00 ca 0f 62 0c 53 |.X.ADC XPB...b.S| 000007c0 54 41 20 24 44 30 31 30 00 d7 0f 6c 0c 4c 44 41 |TA $D010...l.LDA| 000007d0 20 23 24 39 30 00 e5 0f 76 0c 53 54 41 20 24 36 | #$90...v.STA $6| 000007e0 33 46 38 00 f2 0f 80 0c 4c 44 41 20 23 24 39 31 |3F8.....LDA #$91| 000007f0 00 00 10 8a 0c 53 54 41 20 24 36 33 46 39 00 0e |.....STA $63F9..| 00000800 10 94 0c 4c 44 41 20 24 44 30 31 35 00 1a 10 9e |...LDA $D015....| 00000810 0c b0 41 20 23 24 30 33 00 28 10 a8 0c 53 54 41 |..A #$03.(...STA| 00000820 20 24 44 30 31 35 00 35 10 b2 0c 4c 44 41 20 23 | $D015.5...LDA #| 00000830 24 30 30 00 43 10 bc 0c 53 54 41 20 24 44 30 32 |$00.C...STA $D02| 00000840 37 00 50 10 c6 0c 4c 44 41 20 23 24 30 31 00 5e |7.P...LDA #$01.^| 00000850 10 d0 0c 53 54 41 20 24 44 30 32 38 00 66 10 da |...STA $D028.f..| 00000860 0c 52 54 53 00 7d 10 e4 0c 3b 20 53 54 41 52 54 |.RTS.}...; START| 00000870 55 50 20 52 4f 55 54 49 4e 45 53 00 8d 10 e6 0c |UP ROUTINES.....| 00000880 53 52 20 4c 44 41 20 23 24 38 42 00 9b 10 ea 0c |SR LDA #$8B.....| 00000890 53 54 41 20 24 44 30 31 31 00 a9 10 ee 0c 4c 44 |STA $D011.....LD| 000008a0 41 20 24 44 44 30 32 00 b5 10 f0 0c b0 41 20 23 |A $DD02......A #| 000008b0 24 30 32 00 c3 10 f2 0c 53 54 41 20 24 44 44 30 |$02.....STA $DD0| 000008c0 32 00 d1 10 f4 0c 4c 44 41 20 24 44 44 30 30 00 |2.....LDA $DD00.| 000008d0 dc 10 f8 0c af 20 23 24 46 45 00 e8 10 02 0d b0 |..... #$FE......| 000008e0 41 20 23 24 30 32 00 f6 10 0c 0d 53 54 41 20 24 |A #$02.....STA $| 000008f0 44 44 30 30 00 03 11 0f 0d 4c 44 41 20 23 24 30 |DD00.....LDA #$0| 00000900 30 00 11 11 12 0d 53 54 41 20 24 44 30 32 30 00 |0.....STA $D020.| 00000910 1f 11 14 0d 53 54 41 20 24 44 30 32 31 00 2c 11 |....STA $D021.,.| 00000920 16 0d 4c 44 41 20 23 24 38 36 00 3a 11 20 0d 53 |..LDA #$86.:. .S| 00000930 54 41 20 24 44 30 31 38 00 47 11 22 0d 4c 44 41 |TA $D018.G.".LDA| 00000940 20 23 24 30 30 00 55 11 25 0d 53 54 41 20 24 44 | #$00.U.%.STA $D| 00000950 30 30 30 00 62 11 26 0d 4c 44 41 20 23 24 30 42 |000.b.&.LDA #$0B| 00000960 00 70 11 28 0d 53 54 41 20 24 44 30 30 31 00 7d |.p.(.STA $D001.}| 00000970 11 2a 0d 4c 44 41 20 23 24 30 31 00 8a 11 34 0d |.*.LDA #$01...4.| 00000980 4c 44 58 20 23 24 30 38 00 92 11 3e 0d 54 41 59 |LDX #$08...>.TAY| 00000990 00 a0 11 48 0d 4a 53 52 20 24 46 46 42 41 00 ad |...H.JSR $FFBA..| 000009a0 11 52 0d 4c 44 41 20 23 24 30 43 00 be 11 5c 0d |.R.LDA #$0C...\.| 000009b0 4c 44 58 20 23 b3 45 47 52 54 58 54 00 cf 11 66 |LDX #.EGRTXT...f| 000009c0 0d 4c 44 59 20 23 b1 45 47 52 54 58 54 00 dd 11 |.LDY #.EGRTXT...| 000009d0 7a 0d 4a 53 52 20 24 46 46 42 44 00 ea 11 84 0d |z.JSR $FFBD.....| 000009e0 4c 44 41 20 23 24 30 30 00 f8 11 8e 0d 4a 53 52 |LDA #$00.....JSR| 000009f0 20 24 46 46 44 35 00 05 12 8f 0d 4c 44 41 20 23 | $FFD5.....LDA #| 00000a00 24 30 31 00 12 12 90 0d 4c 44 58 20 23 24 30 38 |$01.....LDX #$08| 00000a10 00 1a 12 91 0d 54 41 59 00 28 12 92 0d 4a 53 52 |.....TAY.(...JSR| 00000a20 20 24 46 46 42 41 00 35 12 93 0d 4c 44 41 20 23 | $FFBA.5...LDA #| 00000a30 24 30 38 00 45 12 94 0d 4c 44 58 20 23 b3 45 43 |$08.E...LDX #.EC| 00000a40 54 58 54 00 55 12 95 0d 4c 44 59 20 23 b1 45 43 |TXT.U...LDY #.EC| 00000a50 54 58 54 00 63 12 96 0d 4a 53 52 20 24 46 46 42 |TXT.c...JSR $FFB| 00000a60 44 00 70 12 97 0d 4c 44 41 20 23 24 30 30 00 7e |D.p...LDA #$00.~| 00000a70 12 98 0d 4a 53 52 20 24 46 46 44 35 00 8b 12 99 |...JSR $FFD5....| 00000a80 0d 4c 44 41 20 23 24 39 42 00 99 12 9a 0d 53 54 |.LDA #$9B.....ST| 00000a90 41 20 24 44 30 31 31 00 a6 12 9b 0d 4c 44 41 20 |A $D011.....LDA | 00000aa0 23 24 30 30 00 b4 12 a2 0d 53 54 41 20 42 55 54 |#$00.....STA BUT| 00000ab0 4e 4f 00 bc 12 ac 0d 53 45 49 00 c9 12 b6 0d 4c |NO.....SEI.....L| 00000ac0 44 41 20 23 24 30 30 00 d7 12 c0 0d 53 54 41 20 |DA #$00.....STA | 00000ad0 24 30 33 31 34 00 e4 12 ca 0d 4c 44 41 20 23 24 |$0314.....LDA #$| 00000ae0 43 30 00 f2 12 d4 0d 53 54 41 20 24 30 33 31 35 |C0.....STA $0315| 00000af0 00 fa 12 de 0d 43 4c 49 00 07 13 e8 0d 4c 44 41 |.....CLI.....LDA| 00000b00 20 23 24 30 30 00 12 13 f2 0d 53 54 41 20 58 50 | #$00.....STA XP| 00000b10 00 1f 13 fc 0d 53 54 41 20 48 4f 55 52 00 2c 13 |.....STA HOUR.,.| 00000b20 06 0e 4c 44 41 20 23 24 38 30 00 37 13 10 0e 53 |..LDA #$80.7...S| 00000b30 54 41 20 59 50 00 44 13 1a 0e 4c 44 41 20 23 24 |TA YP.D...LDA #$| 00000b40 30 31 00 50 13 24 0e 53 54 41 20 58 50 42 00 5d |01.P.$.STA XPB.]| 00000b50 13 25 0e 4c 44 41 20 23 24 30 43 00 6b 13 26 0e |.%.LDA #$0C.k.&.| 00000b60 53 54 41 20 24 44 30 31 35 00 78 13 27 0e 4a 53 |STA $D015.x.'.JS| 00000b70 52 20 4c 45 46 54 00 85 13 28 0e 4c 44 41 20 23 |R LEFT...(.LDA #| 00000b80 24 30 30 00 93 13 29 0e 53 54 41 20 24 44 30 30 |$00...).STA $D00| 00000b90 35 00 a1 13 2a 0e 53 54 41 20 24 44 30 30 37 00 |5...*.STA $D007.| 00000ba0 ae 13 2b 0e 4c 44 41 20 23 24 44 41 00 bc 13 2c |..+.LDA #$DA...,| 00000bb0 0e 53 54 41 20 24 44 30 30 34 00 ca 13 2d 0e 53 |.STA $D004...-.S| 00000bc0 54 41 20 24 44 30 30 36 00 d7 13 2e 0e 4c 44 41 |TA $D006.....LDA| 00000bd0 20 23 24 38 35 00 e5 13 30 0e 53 54 41 20 24 35 | #$85...0.STA $5| 00000be0 42 46 41 00 f2 13 32 0e 4c 44 41 20 23 24 30 34 |BFA...2.LDA #$04| 00000bf0 00 00 14 33 0e 53 54 41 20 24 44 30 31 43 00 16 |...3.STA $D01C..| 00000c00 14 35 0e 42 55 54 30 20 4a 53 52 20 42 55 54 43 |.5.BUT0 JSR BUTC| 00000c10 48 45 43 4b 00 23 14 38 0e 4a 4d 50 20 42 55 54 |HECK.#.8.JMP BUT| 00000c20 30 00 41 14 42 0e 45 47 52 54 58 54 20 54 58 54 |0.A.B.EGRTXT TXT| 00000c30 20 22 45 44 49 54 47 52 41 50 48 49 43 53 22 00 | "EDITGRAPHICS".| 00000c40 4e 14 47 0e 42 43 51 55 20 52 54 53 00 62 14 4c |N.G.BCQU RTS.b.L| 00000c50 0e 42 55 54 43 48 45 43 4b 20 4c 44 41 20 59 50 |.BUTCHECK LDA YP| 00000c60 00 6f 14 56 0e 43 4d 50 20 23 24 44 39 00 7c 14 |.o.V.CMP #$D9.|.| 00000c70 60 0e 42 43 43 20 42 43 51 55 00 87 14 6a 0e 4c |`.BCC BCQU...j.L| 00000c80 44 41 20 58 50 00 94 14 74 0e 43 4d 50 20 23 24 |DA XP...t.CMP #$| 00000c90 32 38 00 a1 14 7e 0e 42 43 43 20 42 43 51 55 00 |28...~.BCC BCQU.| 00000ca0 ad 14 88 0e 4c 44 41 20 58 50 42 00 ba 14 92 0e |....LDA XPB.....| 00000cb0 42 4e 45 20 42 43 4f 4b 00 c5 14 9c 0e 4c 44 41 |BNE BCOK.....LDA| 00000cc0 20 58 50 00 d2 14 a6 0e 43 4d 50 20 23 24 34 38 | XP.....CMP #$48| 00000cd0 00 df 14 b0 0e 42 43 53 20 42 43 51 55 00 ef 14 |.....BCS BCQU...| 00000ce0 ba 0e 42 43 4f 4b 20 4c 44 41 20 58 50 00 fb 14 |..BCOK LDA XP...| 00000cf0 bc 0e 4c 44 58 20 58 50 42 00 08 15 bf 0e 42 4e |..LDX XPB.....BN| 00000d00 45 20 42 43 54 43 00 10 15 c4 0e 53 45 43 00 1d |E BCTC.....SEC..| 00000d10 15 ce 0e 53 42 43 20 23 24 32 38 00 2f 15 d8 0e |...SBC #$28./...| 00000d20 42 43 54 43 20 4c 44 58 20 23 24 30 30 00 3d 15 |BCTC LDX #$00.=.| 00000d30 e2 0e 42 43 4c 50 41 20 49 4e 58 00 45 15 ec 0e |..BCLPA INX.E...| 00000d40 53 45 43 00 52 15 f6 0e 53 42 43 20 23 24 31 38 |SEC.R...SBC #$18| 00000d50 00 5f 15 00 0f 43 4d 50 20 23 24 45 38 00 6d 15 |._...CMP #$E8.m.| 00000d60 0a 0f 42 43 43 20 42 43 4c 50 41 00 75 15 14 0f |..BCC BCLPA.u...| 00000d70 54 58 41 00 81 15 1e 0f 4c 44 59 20 58 50 42 00 |TXA.....LDY XPB.| 00000d80 8d 15 28 0f 42 45 51 20 4e 41 4f 00 95 15 32 0f |..(.BEQ NAO...2.| 00000d90 43 4c 43 00 a2 15 3c 0f 41 44 43 20 23 24 30 39 |CLC...<.ADC #$09| 00000da0 00 b4 15 46 0f 4e 41 4f 20 53 54 41 20 42 55 54 |...F.NAO STA BUT| 00000db0 4e 4f 00 be 15 50 0f 41 53 4c 20 41 00 c8 15 5a |NO...P.ASL A...Z| 00000dc0 0f 41 53 4c 20 41 00 d2 15 64 0f 41 53 4c 20 41 |.ASL A...d.ASL A| 00000dd0 00 de 15 6e 0f 53 54 41 20 24 30 32 00 e6 15 78 |...n.STA $02...x| 00000de0 0f 43 4c 43 00 f2 15 82 0f 41 44 43 20 24 30 32 |.CLC.....ADC $02| 00000df0 00 fe 15 8c 0f 41 44 43 20 24 30 32 00 0c 16 96 |.....ADC $02....| 00000e00 0f 53 54 41 20 24 44 30 30 35 00 1a 16 a0 0f 53 |.STA $D005.....S| 00000e10 54 41 20 24 44 30 30 37 00 27 16 aa 0f 4c 44 41 |TA $D007.'...LDA| 00000e20 20 23 24 38 35 00 2f 16 ac 0f 43 4c 43 00 3d 16 | #$85./...CLC.=.| 00000e30 b0 0f 41 44 43 20 42 55 54 4e 4f 00 4b 16 b4 0f |..ADC BUTNO.K...| 00000e40 53 54 41 20 24 35 42 46 42 00 53 16 be 0f 50 4c |STA $5BFB.S...PL| 00000e50 41 00 5b 16 c8 0f 50 4c 41 00 68 16 d2 0f 4c 44 |A.[...PLA.h...LD| 00000e60 41 20 23 24 43 46 00 75 16 dc 0f 53 54 41 20 56 |A #$CF.u...STA V| 00000e70 45 aa 32 00 83 16 e6 0f 4c 44 41 20 42 55 54 4e |E.2.....LDA BUTN| 00000e80 4f 00 8d 16 f0 0f 41 53 4c 20 41 00 95 16 f3 0f |O.....ASL A.....| 00000e90 43 4c 43 00 a2 16 f6 0f 41 44 43 20 23 24 38 30 |CLC.....ADC #$80| 00000ea0 00 af 16 fa 0f 53 54 41 20 56 45 aa 31 00 bd 16 |.....STA VE.1...| 00000eb0 fc 0f 4c 44 41 20 23 b3 56 45 43 00 c5 16 fe 0f |..LDA #.VEC.....| 00000ec0 50 48 41 00 d3 16 00 10 4c 44 41 20 23 b1 56 45 |PHA.....LDA #.VE| 00000ed0 43 00 db 16 02 10 50 48 41 00 ee 16 04 10 56 45 |C.....PHA.....VE| 00000ee0 20 4a 4d 50 20 28 24 30 30 30 30 29 00 ff 16 0e | JMP ($0000)....| 00000ef0 10 56 45 43 20 4c 44 41 20 56 45 aa 31 00 07 17 |.VEC LDA VE.1...| 00000f00 18 10 43 4c 43 00 14 17 22 10 41 44 43 20 23 24 |..CLC...".ADC #$| 00000f10 32 30 00 21 17 2c 10 53 54 41 20 50 48 aa 31 00 |20.!.,.STA PH.1.| 00000f20 2e 17 36 10 4c 44 41 20 56 45 aa 32 00 3b 17 40 |..6.LDA VE.2.;.@| 00000f30 10 53 54 41 20 50 48 aa 32 00 4e 17 4a 10 50 48 |.STA PH.2.N.J.PH| 00000f40 20 4a 4d 50 20 28 24 30 30 30 30 29 00 5a 17 10 | JMP ($0000).Z..| 00000f50 27 42 49 31 20 52 54 53 00 66 17 11 27 42 49 32 |'BI1 RTS.f..'BI2| 00000f60 20 52 54 53 00 72 17 12 27 42 49 33 20 52 54 53 | RTS.r..'BI3 RTS| 00000f70 00 7e 17 13 27 42 49 34 20 52 54 53 00 8a 17 14 |.~..'BI4 RTS....| 00000f80 27 42 49 35 20 52 54 53 00 96 17 15 27 42 49 36 |'BI5 RTS....'BI6| 00000f90 20 52 54 53 00 a2 17 16 27 42 49 37 20 52 54 53 | RTS....'BI7 RTS| 00000fa0 00 ae 17 17 27 42 49 38 20 52 54 53 00 ba 17 18 |....'BI8 RTS....| 00000fb0 27 42 49 39 20 52 54 53 00 c6 17 19 27 42 49 41 |'BI9 RTS....'BIA| 00000fc0 20 52 54 53 00 d2 17 1a 27 42 49 42 20 52 54 53 | RTS....'BIB RTS| 00000fd0 00 de 17 1b 27 42 49 43 20 52 54 53 00 ea 17 24 |....'BIC RTS...$| 00000fe0 27 42 54 31 20 4e 4f 50 00 f6 17 25 27 42 54 32 |'BT1 NOP...%'BT2| 00000ff0 20 4e 4f 50 00 02 18 26 27 42 54 33 20 4e 4f 50 | NOP...&'BT3 NOP| 00001000 00 0e 18 27 27 42 54 34 20 4e 4f 50 00 1a 18 28 |...''BT4 NOP...(| 00001010 27 42 54 35 20 4e 4f 50 00 26 18 29 27 42 54 36 |'BT5 NOP.&.)'BT6| 00001020 20 4e 4f 50 00 32 18 2a 27 42 54 37 20 4e 4f 50 | NOP.2.*'BT7 NOP| 00001030 00 3e 18 2b 27 42 54 38 20 4e 4f 50 00 4a 18 2c |.>.+'BT8 NOP.J.,| 00001040 27 42 54 39 20 4e 4f 50 00 56 18 2d 27 42 54 41 |'BT9 NOP.V.-'BTA| 00001050 20 4e 4f 50 00 62 18 2e 27 42 54 42 20 4e 4f 50 | NOP.b..'BTB NOP| 00001060 00 6e 18 2f 27 42 54 43 20 4e 4f 50 00 7b 18 30 |.n./'BTC NOP.{.0| 00001070 27 4a 4d 50 20 42 55 54 30 00 8d 18 18 f6 3b 20 |'JMP BUT0.....; | 00001080 56 45 43 a4 52 20 54 41 42 4c 45 00 99 18 22 f6 |VEC.R TABLE...".| 00001090 ac b2 24 43 46 38 30 00 bf 18 2c f6 54 58 54 20 |..$CF80...,.TXT | 000010a0 b3 42 49 31 2c b1 42 49 31 2c b3 42 49 32 2c b1 |.BI1,.BI1,.BI2,.| 000010b0 42 49 32 2c b3 42 49 33 2c b1 42 49 33 00 e5 18 |BI2,.BI3,.BI3...| 000010c0 36 f6 54 58 54 20 b3 42 49 34 2c b1 42 49 34 2c |6.TXT .BI4,.BI4,| 000010d0 b3 42 49 35 2c b1 42 49 35 2c b3 42 49 36 2c b1 |.BI5,.BI5,.BI6,.| 000010e0 42 49 36 00 0b 19 40 f6 54 58 54 20 b3 42 49 37 |BI6...@.TXT .BI7| 000010f0 2c b1 42 49 37 2c b3 42 49 38 2c b1 42 49 38 2c |,.BI7,.BI8,.BI8,| 00001100 b3 42 49 39 2c b1 42 49 39 00 31 19 4a f6 54 58 |.BI9,.BI9.1.J.TX| 00001110 54 20 b3 42 49 41 2c b1 42 49 41 2c b3 42 49 42 |T .BIA,.BIA,.BIB| 00001120 2c b1 42 49 42 2c b3 42 49 43 2c b1 42 49 43 00 |,.BIB,.BIC,.BIC.| 00001130 37 19 54 f6 3b 00 5d 19 5e f6 54 58 54 20 b3 42 |7.T.;.].^.TXT .B| 00001140 54 31 2c b1 42 54 31 2c b3 42 54 32 2c b1 42 54 |T1,.BT1,.BT2,.BT| 00001150 32 2c b3 42 54 33 2c b1 42 54 33 00 83 19 68 f6 |2,.BT3,.BT3...h.| 00001160 54 58 54 20 b3 42 54 34 2c b1 42 54 34 2c b3 42 |TXT .BT4,.BT4,.B| 00001170 54 35 2c b1 42 54 35 2c b3 42 54 36 2c b1 42 54 |T5,.BT5,.BT6,.BT| 00001180 36 00 a9 19 72 f6 54 58 54 20 b3 42 54 37 2c b1 |6...r.TXT .BT7,.| 00001190 42 54 37 2c b3 42 54 38 2c b1 42 54 38 2c b3 42 |BT7,.BT8,.BT8,.B| 000011a0 54 39 2c b1 42 54 39 00 cf 19 7c f6 54 58 54 20 |T9,.BT9...|.TXT | 000011b0 b3 42 54 41 2c b1 42 54 41 2c b3 42 54 42 2c b1 |.BTA,.BTA,.BTB,.| 000011c0 42 54 42 2c b3 42 54 43 2c b1 42 54 43 00 00 00 |BTB,.BTC,.BTC...| 000011d0