00000000: 52 2C 20 24 32 41 0D 4C 41 4E 44 32 20 4C 44 41 |R, $2A.LAND2 LDA|
00000010: 20 53 54 4C 2C 58 0D 20 41 4E 44 20 4F 50 4C 2C | STL,X. AND OPL,|
00000020: 58 0D 20 53 54 41 20 4F 50 4C 2C 58 0D 20 4C 44 |X. STA OPL,X. LD|
00000030: 41 20 53 54 48 2C 58 0D 20 41 4E 44 20 4F 50 48 |A STH,X. AND OPH|
00000040: 2C 58 0D 20 53 54 41 20 4F 50 48 2C 58 0D 20 52 |,X. STA OPH,X. R|
00000050: 54 53 0D 3B 0D 3B 20 20 4F 52 2C 20 53 54 4B 5E |TS.;.; OR, STK^|
00000060: 59 3D 3E 53 54 4B 20 24 34 39 0D 4C 4F 52 20 54 |Y=>STK $49.LOR T|
00000070: 59 41 0D 20 4F 52 41 20 53 54 4C 2C 58 0D 20 53 |YA. ORA STL,X. S|
00000080: 54 41 20 53 54 4C 2C 58 0D 20 52 54 53 0D 3B 0D |TA STL,X. RTS.;.|
00000090: 3B 20 20 58 4F 52 2C 20 53 54 4B 20 58 4F 52 20 |; XOR, STK XOR |
000000A0: 59 3D 3E 53 54 4B 20 24 34 41 0D 4C 58 4F 52 20 |Y=>STK $4A.LXOR |
000000B0: 54 59 41 0D 20 45 4F 52 20 53 54 4C 2C 58 0D 20 |TYA. EOR STL,X. |
000000C0: 53 54 41 20 53 54 4C 2C 58 0D 20 52 54 53 0D 3B |STA STL,X. RTS.;|
000000D0: 0D 3B 20 43 4C 52 2C 20 43 4C 45 41 52 20 53 54 |.; CLR, CLEAR ST|
000000E0: 41 43 4B 20 24 37 45 0D 43 4C 52 20 4C 44 58 20 |ACK $7E.CLR LDX |
000000F0: 23 24 46 45 0D 20 52 54 53 0D 3B 0D 3B 20 52 55 |#$FE. RTS.;.; RU|
00000100: 4E 2C 20 53 54 41 52 54 20 4F 56 45 52 20 24 37 |N, START OVER $7|
00000110: 46 0D 52 55 4E 20 4C 44 41 20 50 43 53 56 45 2B |F.RUN LDA PCSVE+|
00000120: 31 0D 20 53 54 41 20 50 43 4E 54 2B 31 0D 20 4C |1. STA PCNT+1. L|
00000130: 44 41 20 50 43 53 56 45 0D 20 53 54 41 20 50 43 |DA PCSVE. STA PC|
00000140: 4E 54 0D 52 55 4E 31 20 4C 44 58 20 23 24 37 38 |NT.RUN1 LDX #$78|
00000150: 0D 20 53 54 58 20 47 4F 50 0D 20 53 54 58 20 56 |. STX GOP. STX V|
00000160: 4C 49 4D 0D 20 4C 44 58 20 23 24 30 30 0D 20 53 |LIM. LDX #$00. S|
00000170: 54 58 20 56 50 4C 55 53 0D 20 53 54 58 20 46 4F |TX VPLUS. STX FO|
00000180: 52 50 0D 20 44 45 58 0D 20 44 45 58 0D 20 52 54 |RP. DEX. DEX. RT|
00000190: 53 0D 3B 0D 20 2E 45 4E 44 0D |S.;. .END. |
R, $2A.LAND2 LDA STL,X. AND OPL,X. STA O
PL,X. LDA STH,X. AND OPH,X. STA OPH,X. R
TS.;.; OR, STK^Y=>STK $49.LOR TYA. ORA
STL,X. STA STL,X. RTS.;.; XOR, STK XOR
Y=>STK $4A.LXOR TYA. EOR STL,X. STA STL,
X. RTS.;.; CLR, CLEAR STACK $7E.CLR LDX
#$FE. RTS.;.; RUN, START OVER $7F.RUN LD
A PCSVE+1. STA PCNT+1. LDA PCSVE. STA PC
NT.RUN1 LDX #$78. STX GOP. STX VLIM. LDX
#$00. STX VPLUS. STX FORP. DEX. DEX. RT
S.;. .END.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL