8osbyte=&FFF4:osword=&FFF1:oswrch=&FFEE:P%=0:O%=&5300

[OPT pass
Y.xch EQUB0:.ych EQUB0:.col EQUB0:.score EQUW0:.scrch EQUB0:.titstat EQUB0:.mdir EQUB0
(e.xset EQUB0:.yset EQUB0:.xscr EQUB0:.yscr EQUB0:.xpos EQUB0:.ypos EQUB0:.mfine EQUB0:.mtype EQUB0
2y.scrno EQUB0:.upvelo EQUB0:.xold EQUB0:.yold EQUB0:.fine EQUB0:.sound EQUB1:.clock EQUB0:.titcyc EQUB0:.invflag EQUB0
<�.face EQUB1:.phase EQUB0:.rghts EQUB0:.wiper EQUB0:.movstag EQUB0:.changed EQUB0:.power EQUB0:.powchange EQUB0:.objects EQUW0:.obch EQUB0:.getstat EQUB0
F�.vector EQUW0:.lastat EQUB0:.lasad EQUW0:.lasdir EQUB0:.lastep EQUB0:.xf EQUB0:.yf EQUB0:.wirep EQUW0:.wirepb EQUW0:.xmont EQUB0:.ymont EQUB0:.mflag EQUB0:.monstat EQUB0:.wiperm EQUB0
PX.scrofd EQUB0:EQUD0:.deaded EQUB0:.clearup EQUB0:.xmoo EQUB0:.ymoo EQUB0:.fnst EQUB0
Z+.scrtxt EQUD0:.shoot EQUB0:.itemp EQUB0
d0.delyou LDXxmoo:LDYymoo:.mcd STXxset:STYyset
n']:�P%>&70��"Code Overflow to:";P%:�
xP%=&1000:O%=&5800:[OPT pass
�hLDY#&80:LDA#0:.zerolop STA&1FFF,Y:DEY:BNEzerolop:.botscrl LDA&7F00,Y:�#&C0:STA&7F00,Y:INY:BNEbotscrl
�uLDA#&FF:STAscrtxt+3:SEI:LDA&204:STAvector:LDA&205:STAvector+1:LDA#(irq � 256):STA&204:LDA#(irq � 256):STA&205:CLI
�".prog JSRtitle:JSRscroff:LDA#1
�bSTApowchange:STAobch:STAscrch:LDY#255:STYpower:STYobjects:STYobjects+1:INY:STYscore:STYscore+1
��.game LDA#0:STAxscr:STAyscr:LDA#2:STAxpos:STAypos:LDX#&20:.clrpot STXclrpnt+2:STXclrplp+2:.clrplp LDA&20FE:�#&7F:.clrpnt STA&20FE:INX:CPX#&80:BNEclrpot
��.newscr JSRscreen:.oldscr JSRquitch:JSRsboard:LDA#0:STAmovstag:LDAfine:BEQmoveslop:STAchanged:LDAwiper:PHA:JSRmainclear:PLA:STAwiper:.moveslop LDAchanged:BEQnodyou:JSRdispyou:.nodyou JSRdispmon:JSRwait:INCmovstag
�NLDAmovstag:CMP#3:BNEmoveslop:LDAmfine:PHA:LDAfine:STAfnst:LDA#0:STAmovstag
�WSTAchanged:STAfine:STAmfine:JSRdispyou:JSRdispmon:PLA:STAmfine:JSRwait:JSRmainclear
җ.finend JSRlaser:JSRdeadedch:JSRmonpro:JSRgetoput:LDAupvelo:BEQfallh:JSRjumpup:LDAxpos:STAxset:LDAypos:STAyset:JSRgetblock:CMP#10:BNEnofall:BEQwatt
ܽ.fallh LDAxpos:STAxset:LDAypos:STAyset:JSRgetblock:CMP#8:BEQwatt:CMP#14:BEQladder:.laddown LDAypos:CMP#9:BEQdownscr:INCyset:JSRgetblock:JSRdoorch:BCSfalldown:�#&30:BEQfalldown:BNEnofall
�M.downscr LDA#0:STAypos:INCyscr:JMPnewscr:.watt JMPzap:.ladder JMP ladderb
�a.falldown LDA#5:STAfine:INCypos:.nofall LDA#((oldscr-1) � 256):PHA:LDA#((oldscr-1) � 256):PHA
�.moveyou LDX#&B6:JSRkeybyte:BCCnjump:JSRjump:.njump LDX#&9E:JSRkeybyte:BCSleft:.nleft LDX#&BD:JSRkeybyte:BCCnright:BCSright

�.left LDA#0:STAface:STArghts:LDAxpos:BEQleftscr:SEC:SBC#1:STAxset:LDAypos:STAyset:JSRgetblock:JSRdoorch:BCSnoupl:�#&30:CMP#&10:BEQnomove:CMP#&20:BEQnomove:CMP#&30:BNEnoupl:DECypos:DECxpos:LDA#3:STAfine:.nright RTS

�.noupl DECxpos:LDA#1:STAfine:.nomove RTS:.right LDA#0:STArghts:LDA#1:STAface:LDAxpos:CMP#9:BEQrightscr:CLC:ADC#1:STAxset:LDAypos:STAyset:JSRgetblock:JSRdoorch:BCSnoupr:�#&30:CMP#&10:BEQnomover:CMP#&20:BEQnomover:CMP#&30:BNEnoupr

�DECypos:LDA#4:.nouprs INCxpos:STAfine:.nosnd RTS:.noupr LDA#2:JMPnouprs:.nomover LDA#1:STArghts:STAchanged:RTS:.leftscr LDA#9:STAxpos:DECxscr:.scrpass JMPscreen:.rightscr LDA#0:STAxpos:INCxscr:BNEscrpass

"�.jump LDAypos:CMP#9:BEQnosnd:CLC:ADC#1:STAyset:LDAxpos:STAxset:JSRgetblock:�#&30:BEQnosnd:LDA#3:STAupvelo:LDAsound:BEQnosnd:LDA#7:LDX#(jumpn � 256):LDY#(jumpn � 256):JMPosword

,�.dispshr SEI:LDAwiper:BEQnowipe:LDY#0:.wiplop LDA(wirep),Y:STA(&78),Y:INY:CPY#32:BNEwiplop:LDA&78:CLC:ADC#&80:STA&78:LDA&79:ADC#2:STA&79:LDY#0:.wipeb LDA(wirepb),Y:STA(&78),Y:INY:CPY#32:BNEwipeb

6�.nowipe LDA#1:STAwiper:LDAxpos:ASL A:ASL A:ASL A:ASL A:ASL A:ASL A:STA&70:LDAxpos:LSR A:LSR A:CLC:ADC#&35:STA&71:LDAypos:CLC:ADC&71:STA&71:LDAypos:ASL A:ASL A:CLC:ADC&71:STA&71:LDY#0

@�STY&72:LDA#&1A:STA&73:LDXmovstag:LDAsequen,X:CLC:ADCfine:TAX:LDA&70:CLC:ADClowad,X:STA&70:LDA&71:ADChighad,X:STA&71:LDAmflag:BNEmonsadr:CPX#0:BEQnophase:LDAmovstag:CMP#2:BEQnophase:LDXphase:INX

J�.addph LDA&72:CLC:ADC#&80:STA&72:LDA&73:ADC#0:STA&73:DEX:BNEaddph:LDAphase:�#1:STAphase:JMPnophase:.monsadr LDAmonstat:�#1:STAmonstat:ASL A:ASL A:ASL A:ASL A:ASL A:CLC:ADC#&80:STA&72:LDA#&1B:STA&73:LDA#1:STAwiperm

T^LDAmtype:CMP#2:BNEnotyptr:LDA&72:CLC:ADC#&80:STA&72:LDA&73:ADC#0:STA&73:.notyptr JMPleface

^�.nophase LDArghts:BEQnotrght:LDA&70:CLC:ADC#32:STA&70:LDA&71:ADC#0:STA&71:.notrght LDAface:BNEleface:LDA&72:CLC:ADC#&20:STA&72:.leface LDA&70:STA&78:LDA&71:STA&79

h�.ladisp LDA(&70),Y:STA(wirep),Y:�(&72),Y:STA(&70),Y:INY:CPY#32:BNEladisp:LDA&72:CLC:ADC#&40:STA&72:LDA&73:ADC#0:STA&73:LDA&70:CLC:ADC#&80:STA&70:LDA&71:ADC#2:STA&71:LDY#0

rU.lbdisp LDA(&70),Y:STA(wirepb),Y:�(&72),Y:STA(&70),Y:INY:CPY#32:BNElbdisp:CLI:RTS

|;.wait LDAclock:CMP&80:BNEwait:LDAclock:ADC#5:STA&80:RTS

��.jumpup DECupvelo:LDAypos:BEQupscr:SEC:SBC#1:STAyset:LDAxpos:STAxset:JSRgetblock:JSRdoorch:BCSupone:�#&30:BEQupone:LDA#0:STAupvelo:RTS:.upone LDA#6:STAfine:DECypos:RTS:.upscr DECyscr:LDA#9:STAypos:JMPscreen

��.screen LDA#0:STAclearup:STAlastat:STAinvflag:JSRscroff:LDAxpos:STAxold:LDAypos:STAyold:JSRpoint:LDA#&FF:STAyset:.ylop LDA#&FF:STAxset:INCyset

�l.xlop INCxset:JSRblockon:LDAxset:CMP#9:BEQnexty:JMPxlop:.nexty LDAyset:CMP#9:BNEylop:JSRsboard:JSRnamscr

��.scron LDA#17:STAscrofd:.scronlop LDA#&C:LDX#(scrofd �256):LDY#(scrofd �256):JSRosword:DECscrofd:LDAscrofd:�#7:STAscrofd+1:LDAscrofd:BNEscronlop:LDAclock:CLC:ADC#4:STA&80:LDA#0:STAwiper:STAwiperm:LDA#1:STAchanged:JMPmonset

��.ladderb LDX#&97:JSRkeybyte:BCSfallset:LDX#&B6:JSRkeybyte:BCCstable:LDA#1:STAupvelo:JSRjumpup:JMPoldscr:.stable JMPnofall:.fallset JMPladdown

��.blockon JSRobjcheck:JSRgetblock:LDAxset:ASL A:ASL A:ASL A:ASL A:ASL A:ASL A:STA&70:LDAxset:LSR A:LSR A:CLC:ADC#&35:STA&71:LDAyset:CLC:ADC&71:STA&71:LDAyset:ASL A:ASL A:CLC:ADC&71:STA&71

�gLDA&72:LSR A:LSR A:CLC:ADC#&20:STA&73:LDA&72:CMP#30:BEQdoorcol:LSR A:ROR A:ROR A:�#&C0:STA&72:LDY#0

̲.transtop LDA(&72),Y:�#&3F:STA&74:LDA(&70),Y:�#&C0:CLC:ADC&74:STA(&70),Y:INY:CPY#&40:BNEtranstop:LDY#0:LDA&72:CLC:ADC#&40:STA&72:LDA&70:CLC:ADC#&80:STA&70:LDA&71:ADC#2:STA&71

�}.transbot LDA(&72),Y:�#&3F:STA&74:LDA(&70),Y:�#&C0:CLC:ADC&74:STA(&70),Y:INY:CPY#&40:BNEtransbot:RTS:.doorcol JMPlocktype

�\.getblock LDA#&20:CLC:ADCxscr:STA&71:LDAyscr:ASL A:ASL A:ASL A:ASL A:CLC:ADC&71:STAscrno

��STA&71:LDAyset:STA&70:ASL A:ASL A:ASL A:PHA:CLC:ADC&70:STA&70:PLA:ASL A:CLC:ADC&70:STA&70:LDYxset:LDAxdata,Y:TAY:LDA(&70),Y:ROL A:ROL A:ROL A:�#3:STA&72:INY:LDA(&70),Y:LSR A:LSR A:LSR A:LSR A:�#12

�~CLC:ADC&72:STA&72:LDAxset:LSR A:TAY:LDAhbdat,Y:TAY:LDA(&70),Y:STA&73:LDAxset:�#1:BNEbit2:LDA&73:ASL A:ROL A:ROL A:JMPfbgot

�[.bit2 LDA&73:ASL A:ROL A:.fbgot �#1:ASL A:ASL A:ASL A:ASL A:CLC:ADC&72:ASL A:STA&72:RTS
C.putch ASL A:ASL A:ASL A:TAX:LDA#0:STA&70:LDA#&30:STA&71:LDYxch
N.xlopc BEQnoxch:LDA&70:CLC:ADC#&20:STA&70:LDA&71:ADC#0:STA&71:DEY:JMPxlopc
\.noxch LDYych:.ylopc BEQnoych:LDA&70:CLC:ADC#&80:STA&70:LDA&71:ADC#2:STA&71:DEY:JMPylopc
&].noych LDY#0:.sline LDA&C00,X:.linelop PHA:ASL A:ROL A:ROL A:�#3:BEQblanch:STAitemp:LDA#0
0�.colch CLC:ADCcol:DECitemp:BNEcolch:.blanch STAitemp:LDA(&70),Y:�#&C0:�Aitemp:�invflag:STA(&70),Y:TYA:CLC:ADC#8:TAY:CMP#&20:BCSnewlin
:MPLA:ASL A:ASL A:JMPlinelop:.newlin �#7:TAY:PLA:INY:INX:CPY#8:BNEsline:RTS
D&.keybyte LDA#&81:LDY#&FF:JMPosbyte
N]:�
�

00000000  0d 00 0a 38 6f 73 62 79  74 65 3d 26 46 46 46 34  |...8osbyte=&FFF4|
00000010  3a 6f 73 77 6f 72 64 3d  26 46 46 46 31 3a 6f 73  |:osword=&FFF1:os|
00000020  77 72 63 68 3d 26 46 46  45 45 3a 50 25 3d 30 3a  |wrch=&FFEE:P%=0:|
00000030  4f 25 3d 26 35 33 30 30  0d 00 14 0d 5b 4f 50 54  |O%=&5300....[OPT|
00000040  20 70 61 73 73 0d 00 1e  59 2e 78 63 68 20 45 51  | pass...Y.xch EQ|
00000050  55 42 30 3a 2e 79 63 68  20 45 51 55 42 30 3a 2e  |UB0:.ych EQUB0:.|
00000060  63 6f 6c 20 45 51 55 42  30 3a 2e 73 63 6f 72 65  |col EQUB0:.score|
00000070  20 45 51 55 57 30 3a 2e  73 63 72 63 68 20 45 51  | EQUW0:.scrch EQ|
00000080  55 42 30 3a 2e 74 69 74  73 74 61 74 20 45 51 55  |UB0:.titstat EQU|
00000090  42 30 3a 2e 6d 64 69 72  20 45 51 55 42 30 0d 00  |B0:.mdir EQUB0..|
000000a0  28 65 2e 78 73 65 74 20  45 51 55 42 30 3a 2e 79  |(e.xset EQUB0:.y|
000000b0  73 65 74 20 45 51 55 42  30 3a 2e 78 73 63 72 20  |set EQUB0:.xscr |
000000c0  45 51 55 42 30 3a 2e 79  73 63 72 20 45 51 55 42  |EQUB0:.yscr EQUB|
000000d0  30 3a 2e 78 70 6f 73 20  45 51 55 42 30 3a 2e 79  |0:.xpos EQUB0:.y|
000000e0  70 6f 73 20 45 51 55 42  30 3a 2e 6d 66 69 6e 65  |pos EQUB0:.mfine|
000000f0  20 45 51 55 42 30 3a 2e  6d 74 79 70 65 20 45 51  | EQUB0:.mtype EQ|
00000100  55 42 30 0d 00 32 79 2e  73 63 72 6e 6f 20 45 51  |UB0..2y.scrno EQ|
00000110  55 42 30 3a 2e 75 70 76  65 6c 6f 20 45 51 55 42  |UB0:.upvelo EQUB|
00000120  30 3a 2e 78 6f 6c 64 20  45 51 55 42 30 3a 2e 79  |0:.xold EQUB0:.y|
00000130  6f 6c 64 20 45 51 55 42  30 3a 2e 66 69 6e 65 20  |old EQUB0:.fine |
00000140  45 51 55 42 30 3a 2e 73  6f 75 6e 64 20 45 51 55  |EQUB0:.sound EQU|
00000150  42 31 3a 2e 63 6c 6f 63  6b 20 45 51 55 42 30 3a  |B1:.clock EQUB0:|
00000160  2e 74 69 74 63 79 63 20  45 51 55 42 30 3a 2e 69  |.titcyc EQUB0:.i|
00000170  6e 76 66 6c 61 67 20 45  51 55 42 30 0d 00 3c 9c  |nvflag EQUB0..<.|
00000180  2e 66 61 63 65 20 45 51  55 42 31 3a 2e 70 68 61  |.face EQUB1:.pha|
00000190  73 65 20 45 51 55 42 30  3a 2e 72 67 68 74 73 20  |se EQUB0:.rghts |
000001a0  45 51 55 42 30 3a 2e 77  69 70 65 72 20 45 51 55  |EQUB0:.wiper EQU|
000001b0  42 30 3a 2e 6d 6f 76 73  74 61 67 20 45 51 55 42  |B0:.movstag EQUB|
000001c0  30 3a 2e 63 68 61 6e 67  65 64 20 45 51 55 42 30  |0:.changed EQUB0|
000001d0  3a 2e 70 6f 77 65 72 20  45 51 55 42 30 3a 2e 70  |:.power EQUB0:.p|
000001e0  6f 77 63 68 61 6e 67 65  20 45 51 55 42 30 3a 2e  |owchange EQUB0:.|
000001f0  6f 62 6a 65 63 74 73 20  45 51 55 57 30 3a 2e 6f  |objects EQUW0:.o|
00000200  62 63 68 20 45 51 55 42  30 3a 2e 67 65 74 73 74  |bch EQUB0:.getst|
00000210  61 74 20 45 51 55 42 30  0d 00 46 bb 2e 76 65 63  |at EQUB0..F..vec|
00000220  74 6f 72 20 45 51 55 57  30 3a 2e 6c 61 73 74 61  |tor EQUW0:.lasta|
00000230  74 20 45 51 55 42 30 3a  2e 6c 61 73 61 64 20 45  |t EQUB0:.lasad E|
00000240  51 55 57 30 3a 2e 6c 61  73 64 69 72 20 45 51 55  |QUW0:.lasdir EQU|
00000250  42 30 3a 2e 6c 61 73 74  65 70 20 45 51 55 42 30  |B0:.lastep EQUB0|
00000260  3a 2e 78 66 20 45 51 55  42 30 3a 2e 79 66 20 45  |:.xf EQUB0:.yf E|
00000270  51 55 42 30 3a 2e 77 69  72 65 70 20 45 51 55 57  |QUB0:.wirep EQUW|
00000280  30 3a 2e 77 69 72 65 70  62 20 45 51 55 57 30 3a  |0:.wirepb EQUW0:|
00000290  2e 78 6d 6f 6e 74 20 45  51 55 42 30 3a 2e 79 6d  |.xmont EQUB0:.ym|
000002a0  6f 6e 74 20 45 51 55 42  30 3a 2e 6d 66 6c 61 67  |ont EQUB0:.mflag|
000002b0  20 45 51 55 42 30 3a 2e  6d 6f 6e 73 74 61 74 20  | EQUB0:.monstat |
000002c0  45 51 55 42 30 3a 2e 77  69 70 65 72 6d 20 45 51  |EQUB0:.wiperm EQ|
000002d0  55 42 30 0d 00 50 58 2e  73 63 72 6f 66 64 20 45  |UB0..PX.scrofd E|
000002e0  51 55 42 30 3a 45 51 55  44 30 3a 2e 64 65 61 64  |QUB0:EQUD0:.dead|
000002f0  65 64 20 45 51 55 42 30  3a 2e 63 6c 65 61 72 75  |ed EQUB0:.clearu|
00000300  70 20 45 51 55 42 30 3a  2e 78 6d 6f 6f 20 45 51  |p EQUB0:.xmoo EQ|
00000310  55 42 30 3a 2e 79 6d 6f  6f 20 45 51 55 42 30 3a  |UB0:.ymoo EQUB0:|
00000320  2e 66 6e 73 74 20 45 51  55 42 30 0d 00 5a 2b 2e  |.fnst EQUB0..Z+.|
00000330  73 63 72 74 78 74 20 45  51 55 44 30 3a 2e 73 68  |scrtxt EQUD0:.sh|
00000340  6f 6f 74 20 45 51 55 42  30 3a 2e 69 74 65 6d 70  |oot EQUB0:.itemp|
00000350  20 45 51 55 42 30 0d 00  64 30 2e 64 65 6c 79 6f  | EQUB0..d0.delyo|
00000360  75 20 4c 44 58 78 6d 6f  6f 3a 4c 44 59 79 6d 6f  |u LDXxmoo:LDYymo|
00000370  6f 3a 2e 6d 63 64 20 53  54 58 78 73 65 74 3a 53  |o:.mcd STXxset:S|
00000380  54 59 79 73 65 74 0d 00  6e 27 5d 3a e7 50 25 3e  |TYyset..n']:.P%>|
00000390  26 37 30 8c f1 22 43 6f  64 65 20 4f 76 65 72 66  |&70.."Code Overf|
000003a0  6c 6f 77 20 74 6f 3a 22  3b 50 25 3a e0 0d 00 78  |low to:";P%:...x|
000003b0  1f 50 25 3d 26 31 30 30  30 3a 4f 25 3d 26 35 38  |.P%=&1000:O%=&58|
000003c0  30 30 3a 5b 4f 50 54 20  70 61 73 73 0d 00 82 68  |00:[OPT pass...h|
000003d0  4c 44 59 23 26 38 30 3a  4c 44 41 23 30 3a 2e 7a  |LDY#&80:LDA#0:.z|
000003e0  65 72 6f 6c 6f 70 20 53  54 41 26 31 46 46 46 2c  |erolop STA&1FFF,|
000003f0  59 3a 44 45 59 3a 42 4e  45 7a 65 72 6f 6c 6f 70  |Y:DEY:BNEzerolop|
00000400  3a 2e 62 6f 74 73 63 72  6c 20 4c 44 41 26 37 46  |:.botscrl LDA&7F|
00000410  30 30 2c 59 3a 80 23 26  43 30 3a 53 54 41 26 37  |00,Y:.#&C0:STA&7|
00000420  46 30 30 2c 59 3a 49 4e  59 3a 42 4e 45 62 6f 74  |F00,Y:INY:BNEbot|
00000430  73 63 72 6c 0d 00 8c 75  4c 44 41 23 26 46 46 3a  |scrl...uLDA#&FF:|
00000440  53 54 41 73 63 72 74 78  74 2b 33 3a 53 45 49 3a  |STAscrtxt+3:SEI:|
00000450  4c 44 41 26 32 30 34 3a  53 54 41 76 65 63 74 6f  |LDA&204:STAvecto|
00000460  72 3a 4c 44 41 26 32 30  35 3a 53 54 41 76 65 63  |r:LDA&205:STAvec|
00000470  74 6f 72 2b 31 3a 4c 44  41 23 28 69 72 71 20 83  |tor+1:LDA#(irq .|
00000480  20 32 35 36 29 3a 53 54  41 26 32 30 34 3a 4c 44  | 256):STA&204:LD|
00000490  41 23 28 69 72 71 20 81  20 32 35 36 29 3a 53 54  |A#(irq . 256):ST|
000004a0  41 26 32 30 35 3a 43 4c  49 0d 00 96 22 2e 70 72  |A&205:CLI...".pr|
000004b0  6f 67 20 4a 53 52 74 69  74 6c 65 3a 4a 53 52 73  |og JSRtitle:JSRs|
000004c0  63 72 6f 66 66 3a 4c 44  41 23 31 0d 00 a0 62 53  |croff:LDA#1...bS|
000004d0  54 41 70 6f 77 63 68 61  6e 67 65 3a 53 54 41 6f  |TApowchange:STAo|
000004e0  62 63 68 3a 53 54 41 73  63 72 63 68 3a 4c 44 59  |bch:STAscrch:LDY|
000004f0  23 32 35 35 3a 53 54 59  70 6f 77 65 72 3a 53 54  |#255:STYpower:ST|
00000500  59 6f 62 6a 65 63 74 73  3a 53 54 59 6f 62 6a 65  |Yobjects:STYobje|
00000510  63 74 73 2b 31 3a 49 4e  59 3a 53 54 59 73 63 6f  |cts+1:INY:STYsco|
00000520  72 65 3a 53 54 59 73 63  6f 72 65 2b 31 0d 00 aa  |re:STYscore+1...|
00000530  9b 2e 67 61 6d 65 20 4c  44 41 23 30 3a 53 54 41  |..game LDA#0:STA|
00000540  78 73 63 72 3a 53 54 41  79 73 63 72 3a 4c 44 41  |xscr:STAyscr:LDA|
00000550  23 32 3a 53 54 41 78 70  6f 73 3a 53 54 41 79 70  |#2:STAxpos:STAyp|
00000560  6f 73 3a 4c 44 58 23 26  32 30 3a 2e 63 6c 72 70  |os:LDX#&20:.clrp|
00000570  6f 74 20 53 54 58 63 6c  72 70 6e 74 2b 32 3a 53  |ot STXclrpnt+2:S|
00000580  54 58 63 6c 72 70 6c 70  2b 32 3a 2e 63 6c 72 70  |TXclrplp+2:.clrp|
00000590  6c 70 20 4c 44 41 26 32  30 46 45 3a 80 23 26 37  |lp LDA&20FE:.#&7|
000005a0  46 3a 2e 63 6c 72 70 6e  74 20 53 54 41 26 32 30  |F:.clrpnt STA&20|
000005b0  46 45 3a 49 4e 58 3a 43  50 58 23 26 38 30 3a 42  |FE:INX:CPX#&80:B|
000005c0  4e 45 63 6c 72 70 6f 74  0d 00 b4 d8 2e 6e 65 77  |NEclrpot.....new|
000005d0  73 63 72 20 4a 53 52 73  63 72 65 65 6e 3a 2e 6f  |scr JSRscreen:.o|
000005e0  6c 64 73 63 72 20 4a 53  52 71 75 69 74 63 68 3a  |ldscr JSRquitch:|
000005f0  4a 53 52 73 62 6f 61 72  64 3a 4c 44 41 23 30 3a  |JSRsboard:LDA#0:|
00000600  53 54 41 6d 6f 76 73 74  61 67 3a 4c 44 41 66 69  |STAmovstag:LDAfi|
00000610  6e 65 3a 42 45 51 6d 6f  76 65 73 6c 6f 70 3a 53  |ne:BEQmoveslop:S|
00000620  54 41 63 68 61 6e 67 65  64 3a 4c 44 41 77 69 70  |TAchanged:LDAwip|
00000630  65 72 3a 50 48 41 3a 4a  53 52 6d 61 69 6e 63 6c  |er:PHA:JSRmaincl|
00000640  65 61 72 3a 50 4c 41 3a  53 54 41 77 69 70 65 72  |ear:PLA:STAwiper|
00000650  3a 2e 6d 6f 76 65 73 6c  6f 70 20 4c 44 41 63 68  |:.moveslop LDAch|
00000660  61 6e 67 65 64 3a 42 45  51 6e 6f 64 79 6f 75 3a  |anged:BEQnodyou:|
00000670  4a 53 52 64 69 73 70 79  6f 75 3a 2e 6e 6f 64 79  |JSRdispyou:.nody|
00000680  6f 75 20 4a 53 52 64 69  73 70 6d 6f 6e 3a 4a 53  |ou JSRdispmon:JS|
00000690  52 77 61 69 74 3a 49 4e  43 6d 6f 76 73 74 61 67  |Rwait:INCmovstag|
000006a0  0d 00 be 4e 4c 44 41 6d  6f 76 73 74 61 67 3a 43  |...NLDAmovstag:C|
000006b0  4d 50 23 33 3a 42 4e 45  6d 6f 76 65 73 6c 6f 70  |MP#3:BNEmoveslop|
000006c0  3a 4c 44 41 6d 66 69 6e  65 3a 50 48 41 3a 4c 44  |:LDAmfine:PHA:LD|
000006d0  41 66 69 6e 65 3a 53 54  41 66 6e 73 74 3a 4c 44  |Afine:STAfnst:LD|
000006e0  41 23 30 3a 53 54 41 6d  6f 76 73 74 61 67 0d 00  |A#0:STAmovstag..|
000006f0  c8 57 53 54 41 63 68 61  6e 67 65 64 3a 53 54 41  |.WSTAchanged:STA|
00000700  66 69 6e 65 3a 53 54 41  6d 66 69 6e 65 3a 4a 53  |fine:STAmfine:JS|
00000710  52 64 69 73 70 79 6f 75  3a 4a 53 52 64 69 73 70  |Rdispyou:JSRdisp|
00000720  6d 6f 6e 3a 50 4c 41 3a  53 54 41 6d 66 69 6e 65  |mon:PLA:STAmfine|
00000730  3a 4a 53 52 77 61 69 74  3a 4a 53 52 6d 61 69 6e  |:JSRwait:JSRmain|
00000740  63 6c 65 61 72 0d 00 d2  97 2e 66 69 6e 65 6e 64  |clear.....finend|
00000750  20 4a 53 52 6c 61 73 65  72 3a 4a 53 52 64 65 61  | JSRlaser:JSRdea|
00000760  64 65 64 63 68 3a 4a 53  52 6d 6f 6e 70 72 6f 3a  |dedch:JSRmonpro:|
00000770  4a 53 52 67 65 74 6f 70  75 74 3a 4c 44 41 75 70  |JSRgetoput:LDAup|
00000780  76 65 6c 6f 3a 42 45 51  66 61 6c 6c 68 3a 4a 53  |velo:BEQfallh:JS|
00000790  52 6a 75 6d 70 75 70 3a  4c 44 41 78 70 6f 73 3a  |Rjumpup:LDAxpos:|
000007a0  53 54 41 78 73 65 74 3a  4c 44 41 79 70 6f 73 3a  |STAxset:LDAypos:|
000007b0  53 54 41 79 73 65 74 3a  4a 53 52 67 65 74 62 6c  |STAyset:JSRgetbl|
000007c0  6f 63 6b 3a 43 4d 50 23  31 30 3a 42 4e 45 6e 6f  |ock:CMP#10:BNEno|
000007d0  66 61 6c 6c 3a 42 45 51  77 61 74 74 0d 00 dc bd  |fall:BEQwatt....|
000007e0  2e 66 61 6c 6c 68 20 4c  44 41 78 70 6f 73 3a 53  |.fallh LDAxpos:S|
000007f0  54 41 78 73 65 74 3a 4c  44 41 79 70 6f 73 3a 53  |TAxset:LDAypos:S|
00000800  54 41 79 73 65 74 3a 4a  53 52 67 65 74 62 6c 6f  |TAyset:JSRgetblo|
00000810  63 6b 3a 43 4d 50 23 38  3a 42 45 51 77 61 74 74  |ck:CMP#8:BEQwatt|
00000820  3a 43 4d 50 23 31 34 3a  42 45 51 6c 61 64 64 65  |:CMP#14:BEQladde|
00000830  72 3a 2e 6c 61 64 64 6f  77 6e 20 4c 44 41 79 70  |r:.laddown LDAyp|
00000840  6f 73 3a 43 4d 50 23 39  3a 42 45 51 64 6f 77 6e  |os:CMP#9:BEQdown|
00000850  73 63 72 3a 49 4e 43 79  73 65 74 3a 4a 53 52 67  |scr:INCyset:JSRg|
00000860  65 74 62 6c 6f 63 6b 3a  4a 53 52 64 6f 6f 72 63  |etblock:JSRdoorc|
00000870  68 3a 42 43 53 66 61 6c  6c 64 6f 77 6e 3a 80 23  |h:BCSfalldown:.#|
00000880  26 33 30 3a 42 45 51 66  61 6c 6c 64 6f 77 6e 3a  |&30:BEQfalldown:|
00000890  42 4e 45 6e 6f 66 61 6c  6c 0d 00 e6 4d 2e 64 6f  |BNEnofall...M.do|
000008a0  77 6e 73 63 72 20 4c 44  41 23 30 3a 53 54 41 79  |wnscr LDA#0:STAy|
000008b0  70 6f 73 3a 49 4e 43 79  73 63 72 3a 4a 4d 50 6e  |pos:INCyscr:JMPn|
000008c0  65 77 73 63 72 3a 2e 77  61 74 74 20 4a 4d 50 7a  |ewscr:.watt JMPz|
000008d0  61 70 3a 2e 6c 61 64 64  65 72 20 4a 4d 50 20 6c  |ap:.ladder JMP l|
000008e0  61 64 64 65 72 62 0d 00  f0 61 2e 66 61 6c 6c 64  |adderb...a.falld|
000008f0  6f 77 6e 20 4c 44 41 23  35 3a 53 54 41 66 69 6e  |own LDA#5:STAfin|
00000900  65 3a 49 4e 43 79 70 6f  73 3a 2e 6e 6f 66 61 6c  |e:INCypos:.nofal|
00000910  6c 20 4c 44 41 23 28 28  6f 6c 64 73 63 72 2d 31  |l LDA#((oldscr-1|
00000920  29 20 81 20 32 35 36 29  3a 50 48 41 3a 4c 44 41  |) . 256):PHA:LDA|
00000930  23 28 28 6f 6c 64 73 63  72 2d 31 29 20 83 20 32  |#((oldscr-1) . 2|
00000940  35 36 29 3a 50 48 41 0d  00 fa 7f 2e 6d 6f 76 65  |56):PHA.....move|
00000950  79 6f 75 20 4c 44 58 23  26 42 36 3a 4a 53 52 6b  |you LDX#&B6:JSRk|
00000960  65 79 62 79 74 65 3a 42  43 43 6e 6a 75 6d 70 3a  |eybyte:BCCnjump:|
00000970  4a 53 52 6a 75 6d 70 3a  2e 6e 6a 75 6d 70 20 4c  |JSRjump:.njump L|
00000980  44 58 23 26 39 45 3a 4a  53 52 6b 65 79 62 79 74  |DX#&9E:JSRkeybyt|
00000990  65 3a 42 43 53 6c 65 66  74 3a 2e 6e 6c 65 66 74  |e:BCSleft:.nleft|
000009a0  20 4c 44 58 23 26 42 44  3a 4a 53 52 6b 65 79 62  | LDX#&BD:JSRkeyb|
000009b0  79 74 65 3a 42 43 43 6e  72 69 67 68 74 3a 42 43  |yte:BCCnright:BC|
000009c0  53 72 69 67 68 74 0d 01  04 d9 2e 6c 65 66 74 20  |Sright.....left |
000009d0  4c 44 41 23 30 3a 53 54  41 66 61 63 65 3a 53 54  |LDA#0:STAface:ST|
000009e0  41 72 67 68 74 73 3a 4c  44 41 78 70 6f 73 3a 42  |Arghts:LDAxpos:B|
000009f0  45 51 6c 65 66 74 73 63  72 3a 53 45 43 3a 53 42  |EQleftscr:SEC:SB|
00000a00  43 23 31 3a 53 54 41 78  73 65 74 3a 4c 44 41 79  |C#1:STAxset:LDAy|
00000a10  70 6f 73 3a 53 54 41 79  73 65 74 3a 4a 53 52 67  |pos:STAyset:JSRg|
00000a20  65 74 62 6c 6f 63 6b 3a  4a 53 52 64 6f 6f 72 63  |etblock:JSRdoorc|
00000a30  68 3a 42 43 53 6e 6f 75  70 6c 3a 80 23 26 33 30  |h:BCSnoupl:.#&30|
00000a40  3a 43 4d 50 23 26 31 30  3a 42 45 51 6e 6f 6d 6f  |:CMP#&10:BEQnomo|
00000a50  76 65 3a 43 4d 50 23 26  32 30 3a 42 45 51 6e 6f  |ve:CMP#&20:BEQno|
00000a60  6d 6f 76 65 3a 43 4d 50  23 26 33 30 3a 42 4e 45  |move:CMP#&30:BNE|
00000a70  6e 6f 75 70 6c 3a 44 45  43 79 70 6f 73 3a 44 45  |noupl:DECypos:DE|
00000a80  43 78 70 6f 73 3a 4c 44  41 23 33 3a 53 54 41 66  |Cxpos:LDA#3:STAf|
00000a90  69 6e 65 3a 2e 6e 72 69  67 68 74 20 52 54 53 0d  |ine:.nright RTS.|
00000aa0  01 0e e8 2e 6e 6f 75 70  6c 20 44 45 43 78 70 6f  |....noupl DECxpo|
00000ab0  73 3a 4c 44 41 23 31 3a  53 54 41 66 69 6e 65 3a  |s:LDA#1:STAfine:|
00000ac0  2e 6e 6f 6d 6f 76 65 20  52 54 53 3a 2e 72 69 67  |.nomove RTS:.rig|
00000ad0  68 74 20 4c 44 41 23 30  3a 53 54 41 72 67 68 74  |ht LDA#0:STArght|
00000ae0  73 3a 4c 44 41 23 31 3a  53 54 41 66 61 63 65 3a  |s:LDA#1:STAface:|
00000af0  4c 44 41 78 70 6f 73 3a  43 4d 50 23 39 3a 42 45  |LDAxpos:CMP#9:BE|
00000b00  51 72 69 67 68 74 73 63  72 3a 43 4c 43 3a 41 44  |Qrightscr:CLC:AD|
00000b10  43 23 31 3a 53 54 41 78  73 65 74 3a 4c 44 41 79  |C#1:STAxset:LDAy|
00000b20  70 6f 73 3a 53 54 41 79  73 65 74 3a 4a 53 52 67  |pos:STAyset:JSRg|
00000b30  65 74 62 6c 6f 63 6b 3a  4a 53 52 64 6f 6f 72 63  |etblock:JSRdoorc|
00000b40  68 3a 42 43 53 6e 6f 75  70 72 3a 80 23 26 33 30  |h:BCSnoupr:.#&30|
00000b50  3a 43 4d 50 23 26 31 30  3a 42 45 51 6e 6f 6d 6f  |:CMP#&10:BEQnomo|
00000b60  76 65 72 3a 43 4d 50 23  26 32 30 3a 42 45 51 6e  |ver:CMP#&20:BEQn|
00000b70  6f 6d 6f 76 65 72 3a 43  4d 50 23 26 33 30 3a 42  |omover:CMP#&30:B|
00000b80  4e 45 6e 6f 75 70 72 0d  01 18 cf 44 45 43 79 70  |NEnoupr....DECyp|
00000b90  6f 73 3a 4c 44 41 23 34  3a 2e 6e 6f 75 70 72 73  |os:LDA#4:.nouprs|
00000ba0  20 49 4e 43 78 70 6f 73  3a 53 54 41 66 69 6e 65  | INCxpos:STAfine|
00000bb0  3a 2e 6e 6f 73 6e 64 20  52 54 53 3a 2e 6e 6f 75  |:.nosnd RTS:.nou|
00000bc0  70 72 20 4c 44 41 23 32  3a 4a 4d 50 6e 6f 75 70  |pr LDA#2:JMPnoup|
00000bd0  72 73 3a 2e 6e 6f 6d 6f  76 65 72 20 4c 44 41 23  |rs:.nomover LDA#|
00000be0  31 3a 53 54 41 72 67 68  74 73 3a 53 54 41 63 68  |1:STArghts:STAch|
00000bf0  61 6e 67 65 64 3a 52 54  53 3a 2e 6c 65 66 74 73  |anged:RTS:.lefts|
00000c00  63 72 20 4c 44 41 23 39  3a 53 54 41 78 70 6f 73  |cr LDA#9:STAxpos|
00000c10  3a 44 45 43 78 73 63 72  3a 2e 73 63 72 70 61 73  |:DECxscr:.scrpas|
00000c20  73 20 4a 4d 50 73 63 72  65 65 6e 3a 2e 72 69 67  |s JMPscreen:.rig|
00000c30  68 74 73 63 72 20 4c 44  41 23 30 3a 53 54 41 78  |htscr LDA#0:STAx|
00000c40  70 6f 73 3a 49 4e 43 78  73 63 72 3a 42 4e 45 73  |pos:INCxscr:BNEs|
00000c50  63 72 70 61 73 73 0d 01  22 b3 2e 6a 75 6d 70 20  |crpass.."..jump |
00000c60  4c 44 41 79 70 6f 73 3a  43 4d 50 23 39 3a 42 45  |LDAypos:CMP#9:BE|
00000c70  51 6e 6f 73 6e 64 3a 43  4c 43 3a 41 44 43 23 31  |Qnosnd:CLC:ADC#1|
00000c80  3a 53 54 41 79 73 65 74  3a 4c 44 41 78 70 6f 73  |:STAyset:LDAxpos|
00000c90  3a 53 54 41 78 73 65 74  3a 4a 53 52 67 65 74 62  |:STAxset:JSRgetb|
00000ca0  6c 6f 63 6b 3a 80 23 26  33 30 3a 42 45 51 6e 6f  |lock:.#&30:BEQno|
00000cb0  73 6e 64 3a 4c 44 41 23  33 3a 53 54 41 75 70 76  |snd:LDA#3:STAupv|
00000cc0  65 6c 6f 3a 4c 44 41 73  6f 75 6e 64 3a 42 45 51  |elo:LDAsound:BEQ|
00000cd0  6e 6f 73 6e 64 3a 4c 44  41 23 37 3a 4c 44 58 23  |nosnd:LDA#7:LDX#|
00000ce0  28 6a 75 6d 70 6e 20 83  20 32 35 36 29 3a 4c 44  |(jumpn . 256):LD|
00000cf0  59 23 28 6a 75 6d 70 6e  20 81 20 32 35 36 29 3a  |Y#(jumpn . 256):|
00000d00  4a 4d 50 6f 73 77 6f 72  64 0d 01 2c c6 2e 64 69  |JMPosword..,..di|
00000d10  73 70 73 68 72 20 53 45  49 3a 4c 44 41 77 69 70  |spshr SEI:LDAwip|
00000d20  65 72 3a 42 45 51 6e 6f  77 69 70 65 3a 4c 44 59  |er:BEQnowipe:LDY|
00000d30  23 30 3a 2e 77 69 70 6c  6f 70 20 4c 44 41 28 77  |#0:.wiplop LDA(w|
00000d40  69 72 65 70 29 2c 59 3a  53 54 41 28 26 37 38 29  |irep),Y:STA(&78)|
00000d50  2c 59 3a 49 4e 59 3a 43  50 59 23 33 32 3a 42 4e  |,Y:INY:CPY#32:BN|
00000d60  45 77 69 70 6c 6f 70 3a  4c 44 41 26 37 38 3a 43  |Ewiplop:LDA&78:C|
00000d70  4c 43 3a 41 44 43 23 26  38 30 3a 53 54 41 26 37  |LC:ADC#&80:STA&7|
00000d80  38 3a 4c 44 41 26 37 39  3a 41 44 43 23 32 3a 53  |8:LDA&79:ADC#2:S|
00000d90  54 41 26 37 39 3a 4c 44  59 23 30 3a 2e 77 69 70  |TA&79:LDY#0:.wip|
00000da0  65 62 20 4c 44 41 28 77  69 72 65 70 62 29 2c 59  |eb LDA(wirepb),Y|
00000db0  3a 53 54 41 28 26 37 38  29 2c 59 3a 49 4e 59 3a  |:STA(&78),Y:INY:|
00000dc0  43 50 59 23 33 32 3a 42  4e 45 77 69 70 65 62 0d  |CPY#32:BNEwipeb.|
00000dd0  01 36 ba 2e 6e 6f 77 69  70 65 20 4c 44 41 23 31  |.6..nowipe LDA#1|
00000de0  3a 53 54 41 77 69 70 65  72 3a 4c 44 41 78 70 6f  |:STAwiper:LDAxpo|
00000df0  73 3a 41 53 4c 20 41 3a  41 53 4c 20 41 3a 41 53  |s:ASL A:ASL A:AS|
00000e00  4c 20 41 3a 41 53 4c 20  41 3a 41 53 4c 20 41 3a  |L A:ASL A:ASL A:|
00000e10  41 53 4c 20 41 3a 53 54  41 26 37 30 3a 4c 44 41  |ASL A:STA&70:LDA|
00000e20  78 70 6f 73 3a 4c 53 52  20 41 3a 4c 53 52 20 41  |xpos:LSR A:LSR A|
00000e30  3a 43 4c 43 3a 41 44 43  23 26 33 35 3a 53 54 41  |:CLC:ADC#&35:STA|
00000e40  26 37 31 3a 4c 44 41 79  70 6f 73 3a 43 4c 43 3a  |&71:LDAypos:CLC:|
00000e50  41 44 43 26 37 31 3a 53  54 41 26 37 31 3a 4c 44  |ADC&71:STA&71:LD|
00000e60  41 79 70 6f 73 3a 41 53  4c 20 41 3a 41 53 4c 20  |Aypos:ASL A:ASL |
00000e70  41 3a 43 4c 43 3a 41 44  43 26 37 31 3a 53 54 41  |A:CLC:ADC&71:STA|
00000e80  26 37 31 3a 4c 44 59 23  30 0d 01 40 c5 53 54 59  |&71:LDY#0..@.STY|
00000e90  26 37 32 3a 4c 44 41 23  26 31 41 3a 53 54 41 26  |&72:LDA#&1A:STA&|
00000ea0  37 33 3a 4c 44 58 6d 6f  76 73 74 61 67 3a 4c 44  |73:LDXmovstag:LD|
00000eb0  41 73 65 71 75 65 6e 2c  58 3a 43 4c 43 3a 41 44  |Asequen,X:CLC:AD|
00000ec0  43 66 69 6e 65 3a 54 41  58 3a 4c 44 41 26 37 30  |Cfine:TAX:LDA&70|
00000ed0  3a 43 4c 43 3a 41 44 43  6c 6f 77 61 64 2c 58 3a  |:CLC:ADClowad,X:|
00000ee0  53 54 41 26 37 30 3a 4c  44 41 26 37 31 3a 41 44  |STA&70:LDA&71:AD|
00000ef0  43 68 69 67 68 61 64 2c  58 3a 53 54 41 26 37 31  |Chighad,X:STA&71|
00000f00  3a 4c 44 41 6d 66 6c 61  67 3a 42 4e 45 6d 6f 6e  |:LDAmflag:BNEmon|
00000f10  73 61 64 72 3a 43 50 58  23 30 3a 42 45 51 6e 6f  |sadr:CPX#0:BEQno|
00000f20  70 68 61 73 65 3a 4c 44  41 6d 6f 76 73 74 61 67  |phase:LDAmovstag|
00000f30  3a 43 4d 50 23 32 3a 42  45 51 6e 6f 70 68 61 73  |:CMP#2:BEQnophas|
00000f40  65 3a 4c 44 58 70 68 61  73 65 3a 49 4e 58 0d 01  |e:LDXphase:INX..|
00000f50  4a d9 2e 61 64 64 70 68  20 4c 44 41 26 37 32 3a  |J..addph LDA&72:|
00000f60  43 4c 43 3a 41 44 43 23  26 38 30 3a 53 54 41 26  |CLC:ADC#&80:STA&|
00000f70  37 32 3a 4c 44 41 26 37  33 3a 41 44 43 23 30 3a  |72:LDA&73:ADC#0:|
00000f80  53 54 41 26 37 33 3a 44  45 58 3a 42 4e 45 61 64  |STA&73:DEX:BNEad|
00000f90  64 70 68 3a 4c 44 41 70  68 61 73 65 3a 82 23 31  |dph:LDAphase:.#1|
00000fa0  3a 53 54 41 70 68 61 73  65 3a 4a 4d 50 6e 6f 70  |:STAphase:JMPnop|
00000fb0  68 61 73 65 3a 2e 6d 6f  6e 73 61 64 72 20 4c 44  |hase:.monsadr LD|
00000fc0  41 6d 6f 6e 73 74 61 74  3a 82 23 31 3a 53 54 41  |Amonstat:.#1:STA|
00000fd0  6d 6f 6e 73 74 61 74 3a  41 53 4c 20 41 3a 41 53  |monstat:ASL A:AS|
00000fe0  4c 20 41 3a 41 53 4c 20  41 3a 41 53 4c 20 41 3a  |L A:ASL A:ASL A:|
00000ff0  41 53 4c 20 41 3a 43 4c  43 3a 41 44 43 23 26 38  |ASL A:CLC:ADC#&8|
00001000  30 3a 53 54 41 26 37 32  3a 4c 44 41 23 26 31 42  |0:STA&72:LDA#&1B|
00001010  3a 53 54 41 26 37 33 3a  4c 44 41 23 31 3a 53 54  |:STA&73:LDA#1:ST|
00001020  41 77 69 70 65 72 6d 0d  01 54 5e 4c 44 41 6d 74  |Awiperm..T^LDAmt|
00001030  79 70 65 3a 43 4d 50 23  32 3a 42 4e 45 6e 6f 74  |ype:CMP#2:BNEnot|
00001040  79 70 74 72 3a 4c 44 41  26 37 32 3a 43 4c 43 3a  |yptr:LDA&72:CLC:|
00001050  41 44 43 23 26 38 30 3a  53 54 41 26 37 32 3a 4c  |ADC#&80:STA&72:L|
00001060  44 41 26 37 33 3a 41 44  43 23 30 3a 53 54 41 26  |DA&73:ADC#0:STA&|
00001070  37 33 3a 2e 6e 6f 74 79  70 74 72 20 4a 4d 50 6c  |73:.notyptr JMPl|
00001080  65 66 61 63 65 0d 01 5e  a6 2e 6e 6f 70 68 61 73  |eface..^..nophas|
00001090  65 20 4c 44 41 72 67 68  74 73 3a 42 45 51 6e 6f  |e LDArghts:BEQno|
000010a0  74 72 67 68 74 3a 4c 44  41 26 37 30 3a 43 4c 43  |trght:LDA&70:CLC|
000010b0  3a 41 44 43 23 33 32 3a  53 54 41 26 37 30 3a 4c  |:ADC#32:STA&70:L|
000010c0  44 41 26 37 31 3a 41 44  43 23 30 3a 53 54 41 26  |DA&71:ADC#0:STA&|
000010d0  37 31 3a 2e 6e 6f 74 72  67 68 74 20 4c 44 41 66  |71:.notrght LDAf|
000010e0  61 63 65 3a 42 4e 45 6c  65 66 61 63 65 3a 4c 44  |ace:BNEleface:LD|
000010f0  41 26 37 32 3a 43 4c 43  3a 41 44 43 23 26 32 30  |A&72:CLC:ADC#&20|
00001100  3a 53 54 41 26 37 32 3a  2e 6c 65 66 61 63 65 20  |:STA&72:.leface |
00001110  4c 44 41 26 37 30 3a 53  54 41 26 37 38 3a 4c 44  |LDA&70:STA&78:LD|
00001120  41 26 37 31 3a 53 54 41  26 37 39 0d 01 68 ae 2e  |A&71:STA&79..h..|
00001130  6c 61 64 69 73 70 20 4c  44 41 28 26 37 30 29 2c  |ladisp LDA(&70),|
00001140  59 3a 53 54 41 28 77 69  72 65 70 29 2c 59 3a 82  |Y:STA(wirep),Y:.|
00001150  28 26 37 32 29 2c 59 3a  53 54 41 28 26 37 30 29  |(&72),Y:STA(&70)|
00001160  2c 59 3a 49 4e 59 3a 43  50 59 23 33 32 3a 42 4e  |,Y:INY:CPY#32:BN|
00001170  45 6c 61 64 69 73 70 3a  4c 44 41 26 37 32 3a 43  |Eladisp:LDA&72:C|
00001180  4c 43 3a 41 44 43 23 26  34 30 3a 53 54 41 26 37  |LC:ADC#&40:STA&7|
00001190  32 3a 4c 44 41 26 37 33  3a 41 44 43 23 30 3a 53  |2:LDA&73:ADC#0:S|
000011a0  54 41 26 37 33 3a 4c 44  41 26 37 30 3a 43 4c 43  |TA&73:LDA&70:CLC|
000011b0  3a 41 44 43 23 26 38 30  3a 53 54 41 26 37 30 3a  |:ADC#&80:STA&70:|
000011c0  4c 44 41 26 37 31 3a 41  44 43 23 32 3a 53 54 41  |LDA&71:ADC#2:STA|
000011d0  26 37 31 3a 4c 44 59 23  30 0d 01 72 55 2e 6c 62  |&71:LDY#0..rU.lb|
000011e0  64 69 73 70 20 4c 44 41  28 26 37 30 29 2c 59 3a  |disp LDA(&70),Y:|
000011f0  53 54 41 28 77 69 72 65  70 62 29 2c 59 3a 82 28  |STA(wirepb),Y:.(|
00001200  26 37 32 29 2c 59 3a 53  54 41 28 26 37 30 29 2c  |&72),Y:STA(&70),|
00001210  59 3a 49 4e 59 3a 43 50  59 23 33 32 3a 42 4e 45  |Y:INY:CPY#32:BNE|
00001220  6c 62 64 69 73 70 3a 43  4c 49 3a 52 54 53 0d 01  |lbdisp:CLI:RTS..|
00001230  7c 3b 2e 77 61 69 74 20  4c 44 41 63 6c 6f 63 6b  ||;.wait LDAclock|
00001240  3a 43 4d 50 26 38 30 3a  42 4e 45 77 61 69 74 3a  |:CMP&80:BNEwait:|
00001250  4c 44 41 63 6c 6f 63 6b  3a 41 44 43 23 35 3a 53  |LDAclock:ADC#5:S|
00001260  54 41 26 38 30 3a 52 54  53 0d 01 86 d2 2e 6a 75  |TA&80:RTS.....ju|
00001270  6d 70 75 70 20 44 45 43  75 70 76 65 6c 6f 3a 4c  |mpup DECupvelo:L|
00001280  44 41 79 70 6f 73 3a 42  45 51 75 70 73 63 72 3a  |DAypos:BEQupscr:|
00001290  53 45 43 3a 53 42 43 23  31 3a 53 54 41 79 73 65  |SEC:SBC#1:STAyse|
000012a0  74 3a 4c 44 41 78 70 6f  73 3a 53 54 41 78 73 65  |t:LDAxpos:STAxse|
000012b0  74 3a 4a 53 52 67 65 74  62 6c 6f 63 6b 3a 4a 53  |t:JSRgetblock:JS|
000012c0  52 64 6f 6f 72 63 68 3a  42 43 53 75 70 6f 6e 65  |Rdoorch:BCSupone|
000012d0  3a 80 23 26 33 30 3a 42  45 51 75 70 6f 6e 65 3a  |:.#&30:BEQupone:|
000012e0  4c 44 41 23 30 3a 53 54  41 75 70 76 65 6c 6f 3a  |LDA#0:STAupvelo:|
000012f0  52 54 53 3a 2e 75 70 6f  6e 65 20 4c 44 41 23 36  |RTS:.upone LDA#6|
00001300  3a 53 54 41 66 69 6e 65  3a 44 45 43 79 70 6f 73  |:STAfine:DECypos|
00001310  3a 52 54 53 3a 2e 75 70  73 63 72 20 44 45 43 79  |:RTS:.upscr DECy|
00001320  73 63 72 3a 4c 44 41 23  39 3a 53 54 41 79 70 6f  |scr:LDA#9:STAypo|
00001330  73 3a 4a 4d 50 73 63 72  65 65 6e 0d 01 90 92 2e  |s:JMPscreen.....|
00001340  73 63 72 65 65 6e 20 4c  44 41 23 30 3a 53 54 41  |screen LDA#0:STA|
00001350  63 6c 65 61 72 75 70 3a  53 54 41 6c 61 73 74 61  |clearup:STAlasta|
00001360  74 3a 53 54 41 69 6e 76  66 6c 61 67 3a 4a 53 52  |t:STAinvflag:JSR|
00001370  73 63 72 6f 66 66 3a 4c  44 41 78 70 6f 73 3a 53  |scroff:LDAxpos:S|
00001380  54 41 78 6f 6c 64 3a 4c  44 41 79 70 6f 73 3a 53  |TAxold:LDAypos:S|
00001390  54 41 79 6f 6c 64 3a 4a  53 52 70 6f 69 6e 74 3a  |TAyold:JSRpoint:|
000013a0  4c 44 41 23 26 46 46 3a  53 54 41 79 73 65 74 3a  |LDA#&FF:STAyset:|
000013b0  2e 79 6c 6f 70 20 4c 44  41 23 26 46 46 3a 53 54  |.ylop LDA#&FF:ST|
000013c0  41 78 73 65 74 3a 49 4e  43 79 73 65 74 0d 01 9a  |Axset:INCyset...|
000013d0  6c 2e 78 6c 6f 70 20 49  4e 43 78 73 65 74 3a 4a  |l.xlop INCxset:J|
000013e0  53 52 62 6c 6f 63 6b 6f  6e 3a 4c 44 41 78 73 65  |SRblockon:LDAxse|
000013f0  74 3a 43 4d 50 23 39 3a  42 45 51 6e 65 78 74 79  |t:CMP#9:BEQnexty|
00001400  3a 4a 4d 50 78 6c 6f 70  3a 2e 6e 65 78 74 79 20  |:JMPxlop:.nexty |
00001410  4c 44 41 79 73 65 74 3a  43 4d 50 23 39 3a 42 4e  |LDAyset:CMP#9:BN|
00001420  45 79 6c 6f 70 3a 4a 53  52 73 62 6f 61 72 64 3a  |Eylop:JSRsboard:|
00001430  4a 53 52 6e 61 6d 73 63  72 0d 01 a4 e2 2e 73 63  |JSRnamscr.....sc|
00001440  72 6f 6e 20 4c 44 41 23  31 37 3a 53 54 41 73 63  |ron LDA#17:STAsc|
00001450  72 6f 66 64 3a 2e 73 63  72 6f 6e 6c 6f 70 20 4c  |rofd:.scronlop L|
00001460  44 41 23 26 43 3a 4c 44  58 23 28 73 63 72 6f 66  |DA#&C:LDX#(scrof|
00001470  64 20 83 32 35 36 29 3a  4c 44 59 23 28 73 63 72  |d .256):LDY#(scr|
00001480  6f 66 64 20 81 32 35 36  29 3a 4a 53 52 6f 73 77  |ofd .256):JSRosw|
00001490  6f 72 64 3a 44 45 43 73  63 72 6f 66 64 3a 4c 44  |ord:DECscrofd:LD|
000014a0  41 73 63 72 6f 66 64 3a  80 23 37 3a 53 54 41 73  |Ascrofd:.#7:STAs|
000014b0  63 72 6f 66 64 2b 31 3a  4c 44 41 73 63 72 6f 66  |crofd+1:LDAscrof|
000014c0  64 3a 42 4e 45 73 63 72  6f 6e 6c 6f 70 3a 4c 44  |d:BNEscronlop:LD|
000014d0  41 63 6c 6f 63 6b 3a 43  4c 43 3a 41 44 43 23 34  |Aclock:CLC:ADC#4|
000014e0  3a 53 54 41 26 38 30 3a  4c 44 41 23 30 3a 53 54  |:STA&80:LDA#0:ST|
000014f0  41 77 69 70 65 72 3a 53  54 41 77 69 70 65 72 6d  |Awiper:STAwiperm|
00001500  3a 4c 44 41 23 31 3a 53  54 41 63 68 61 6e 67 65  |:LDA#1:STAchange|
00001510  64 3a 4a 4d 50 6d 6f 6e  73 65 74 0d 01 ae 91 2e  |d:JMPmonset.....|
00001520  6c 61 64 64 65 72 62 20  4c 44 58 23 26 39 37 3a  |ladderb LDX#&97:|
00001530  4a 53 52 6b 65 79 62 79  74 65 3a 42 43 53 66 61  |JSRkeybyte:BCSfa|
00001540  6c 6c 73 65 74 3a 4c 44  58 23 26 42 36 3a 4a 53  |llset:LDX#&B6:JS|
00001550  52 6b 65 79 62 79 74 65  3a 42 43 43 73 74 61 62  |Rkeybyte:BCCstab|
00001560  6c 65 3a 4c 44 41 23 31  3a 53 54 41 75 70 76 65  |le:LDA#1:STAupve|
00001570  6c 6f 3a 4a 53 52 6a 75  6d 70 75 70 3a 4a 4d 50  |lo:JSRjumpup:JMP|
00001580  6f 6c 64 73 63 72 3a 2e  73 74 61 62 6c 65 20 4a  |oldscr:.stable J|
00001590  4d 50 6e 6f 66 61 6c 6c  3a 2e 66 61 6c 6c 73 65  |MPnofall:.fallse|
000015a0  74 20 4a 4d 50 6c 61 64  64 6f 77 6e 0d 01 b8 be  |t JMPladdown....|
000015b0  2e 62 6c 6f 63 6b 6f 6e  20 4a 53 52 6f 62 6a 63  |.blockon JSRobjc|
000015c0  68 65 63 6b 3a 4a 53 52  67 65 74 62 6c 6f 63 6b  |heck:JSRgetblock|
000015d0  3a 4c 44 41 78 73 65 74  3a 41 53 4c 20 41 3a 41  |:LDAxset:ASL A:A|
000015e0  53 4c 20 41 3a 41 53 4c  20 41 3a 41 53 4c 20 41  |SL A:ASL A:ASL A|
000015f0  3a 41 53 4c 20 41 3a 41  53 4c 20 41 3a 53 54 41  |:ASL A:ASL A:STA|
00001600  26 37 30 3a 4c 44 41 78  73 65 74 3a 4c 53 52 20  |&70:LDAxset:LSR |
00001610  41 3a 4c 53 52 20 41 3a  43 4c 43 3a 41 44 43 23  |A:LSR A:CLC:ADC#|
00001620  26 33 35 3a 53 54 41 26  37 31 3a 4c 44 41 79 73  |&35:STA&71:LDAys|
00001630  65 74 3a 43 4c 43 3a 41  44 43 26 37 31 3a 53 54  |et:CLC:ADC&71:ST|
00001640  41 26 37 31 3a 4c 44 41  79 73 65 74 3a 41 53 4c  |A&71:LDAyset:ASL|
00001650  20 41 3a 41 53 4c 20 41  3a 43 4c 43 3a 41 44 43  | A:ASL A:CLC:ADC|
00001660  26 37 31 3a 53 54 41 26  37 31 0d 01 c2 67 4c 44  |&71:STA&71...gLD|
00001670  41 26 37 32 3a 4c 53 52  20 41 3a 4c 53 52 20 41  |A&72:LSR A:LSR A|
00001680  3a 43 4c 43 3a 41 44 43  23 26 32 30 3a 53 54 41  |:CLC:ADC#&20:STA|
00001690  26 37 33 3a 4c 44 41 26  37 32 3a 43 4d 50 23 33  |&73:LDA&72:CMP#3|
000016a0  30 3a 42 45 51 64 6f 6f  72 63 6f 6c 3a 4c 53 52  |0:BEQdoorcol:LSR|
000016b0  20 41 3a 52 4f 52 20 41  3a 52 4f 52 20 41 3a 80  | A:ROR A:ROR A:.|
000016c0  23 26 43 30 3a 53 54 41  26 37 32 3a 4c 44 59 23  |#&C0:STA&72:LDY#|
000016d0  30 0d 01 cc b2 2e 74 72  61 6e 73 74 6f 70 20 4c  |0.....transtop L|
000016e0  44 41 28 26 37 32 29 2c  59 3a 80 23 26 33 46 3a  |DA(&72),Y:.#&3F:|
000016f0  53 54 41 26 37 34 3a 4c  44 41 28 26 37 30 29 2c  |STA&74:LDA(&70),|
00001700  59 3a 80 23 26 43 30 3a  43 4c 43 3a 41 44 43 26  |Y:.#&C0:CLC:ADC&|
00001710  37 34 3a 53 54 41 28 26  37 30 29 2c 59 3a 49 4e  |74:STA(&70),Y:IN|
00001720  59 3a 43 50 59 23 26 34  30 3a 42 4e 45 74 72 61  |Y:CPY#&40:BNEtra|
00001730  6e 73 74 6f 70 3a 4c 44  59 23 30 3a 4c 44 41 26  |nstop:LDY#0:LDA&|
00001740  37 32 3a 43 4c 43 3a 41  44 43 23 26 34 30 3a 53  |72:CLC:ADC#&40:S|
00001750  54 41 26 37 32 3a 4c 44  41 26 37 30 3a 43 4c 43  |TA&72:LDA&70:CLC|
00001760  3a 41 44 43 23 26 38 30  3a 53 54 41 26 37 30 3a  |:ADC#&80:STA&70:|
00001770  4c 44 41 26 37 31 3a 41  44 43 23 32 3a 53 54 41  |LDA&71:ADC#2:STA|
00001780  26 37 31 0d 01 d6 7d 2e  74 72 61 6e 73 62 6f 74  |&71...}.transbot|
00001790  20 4c 44 41 28 26 37 32  29 2c 59 3a 80 23 26 33  | LDA(&72),Y:.#&3|
000017a0  46 3a 53 54 41 26 37 34  3a 4c 44 41 28 26 37 30  |F:STA&74:LDA(&70|
000017b0  29 2c 59 3a 80 23 26 43  30 3a 43 4c 43 3a 41 44  |),Y:.#&C0:CLC:AD|
000017c0  43 26 37 34 3a 53 54 41  28 26 37 30 29 2c 59 3a  |C&74:STA(&70),Y:|
000017d0  49 4e 59 3a 43 50 59 23  26 34 30 3a 42 4e 45 74  |INY:CPY#&40:BNEt|
000017e0  72 61 6e 73 62 6f 74 3a  52 54 53 3a 2e 64 6f 6f  |ransbot:RTS:.doo|
000017f0  72 63 6f 6c 20 4a 4d 50  6c 6f 63 6b 74 79 70 65  |rcol JMPlocktype|
00001800  0d 01 e0 5c 2e 67 65 74  62 6c 6f 63 6b 20 4c 44  |...\.getblock LD|
00001810  41 23 26 32 30 3a 43 4c  43 3a 41 44 43 78 73 63  |A#&20:CLC:ADCxsc|
00001820  72 3a 53 54 41 26 37 31  3a 4c 44 41 79 73 63 72  |r:STA&71:LDAyscr|
00001830  3a 41 53 4c 20 41 3a 41  53 4c 20 41 3a 41 53 4c  |:ASL A:ASL A:ASL|
00001840  20 41 3a 41 53 4c 20 41  3a 43 4c 43 3a 41 44 43  | A:ASL A:CLC:ADC|
00001850  26 37 31 3a 53 54 41 73  63 72 6e 6f 0d 01 ea c8  |&71:STAscrno....|
00001860  53 54 41 26 37 31 3a 4c  44 41 79 73 65 74 3a 53  |STA&71:LDAyset:S|
00001870  54 41 26 37 30 3a 41 53  4c 20 41 3a 41 53 4c 20  |TA&70:ASL A:ASL |
00001880  41 3a 41 53 4c 20 41 3a  50 48 41 3a 43 4c 43 3a  |A:ASL A:PHA:CLC:|
00001890  41 44 43 26 37 30 3a 53  54 41 26 37 30 3a 50 4c  |ADC&70:STA&70:PL|
000018a0  41 3a 41 53 4c 20 41 3a  43 4c 43 3a 41 44 43 26  |A:ASL A:CLC:ADC&|
000018b0  37 30 3a 53 54 41 26 37  30 3a 4c 44 59 78 73 65  |70:STA&70:LDYxse|
000018c0  74 3a 4c 44 41 78 64 61  74 61 2c 59 3a 54 41 59  |t:LDAxdata,Y:TAY|
000018d0  3a 4c 44 41 28 26 37 30  29 2c 59 3a 52 4f 4c 20  |:LDA(&70),Y:ROL |
000018e0  41 3a 52 4f 4c 20 41 3a  52 4f 4c 20 41 3a 80 23  |A:ROL A:ROL A:.#|
000018f0  33 3a 53 54 41 26 37 32  3a 49 4e 59 3a 4c 44 41  |3:STA&72:INY:LDA|
00001900  28 26 37 30 29 2c 59 3a  4c 53 52 20 41 3a 4c 53  |(&70),Y:LSR A:LS|
00001910  52 20 41 3a 4c 53 52 20  41 3a 4c 53 52 20 41 3a  |R A:LSR A:LSR A:|
00001920  80 23 31 32 0d 01 f4 7e  43 4c 43 3a 41 44 43 26  |.#12...~CLC:ADC&|
00001930  37 32 3a 53 54 41 26 37  32 3a 4c 44 41 78 73 65  |72:STA&72:LDAxse|
00001940  74 3a 4c 53 52 20 41 3a  54 41 59 3a 4c 44 41 68  |t:LSR A:TAY:LDAh|
00001950  62 64 61 74 2c 59 3a 54  41 59 3a 4c 44 41 28 26  |bdat,Y:TAY:LDA(&|
00001960  37 30 29 2c 59 3a 53 54  41 26 37 33 3a 4c 44 41  |70),Y:STA&73:LDA|
00001970  78 73 65 74 3a 80 23 31  3a 42 4e 45 62 69 74 32  |xset:.#1:BNEbit2|
00001980  3a 4c 44 41 26 37 33 3a  41 53 4c 20 41 3a 52 4f  |:LDA&73:ASL A:RO|
00001990  4c 20 41 3a 52 4f 4c 20  41 3a 4a 4d 50 66 62 67  |L A:ROL A:JMPfbg|
000019a0  6f 74 0d 01 fe 5b 2e 62  69 74 32 20 4c 44 41 26  |ot...[.bit2 LDA&|
000019b0  37 33 3a 41 53 4c 20 41  3a 52 4f 4c 20 41 3a 2e  |73:ASL A:ROL A:.|
000019c0  66 62 67 6f 74 20 80 23  31 3a 41 53 4c 20 41 3a  |fbgot .#1:ASL A:|
000019d0  41 53 4c 20 41 3a 41 53  4c 20 41 3a 41 53 4c 20  |ASL A:ASL A:ASL |
000019e0  41 3a 43 4c 43 3a 41 44  43 26 37 32 3a 41 53 4c  |A:CLC:ADC&72:ASL|
000019f0  20 41 3a 53 54 41 26 37  32 3a 52 54 53 0d 02 08  | A:STA&72:RTS...|
00001a00  43 2e 70 75 74 63 68 20  41 53 4c 20 41 3a 41 53  |C.putch ASL A:AS|
00001a10  4c 20 41 3a 41 53 4c 20  41 3a 54 41 58 3a 4c 44  |L A:ASL A:TAX:LD|
00001a20  41 23 30 3a 53 54 41 26  37 30 3a 4c 44 41 23 26  |A#0:STA&70:LDA#&|
00001a30  33 30 3a 53 54 41 26 37  31 3a 4c 44 59 78 63 68  |30:STA&71:LDYxch|
00001a40  0d 02 12 4e 2e 78 6c 6f  70 63 20 42 45 51 6e 6f  |...N.xlopc BEQno|
00001a50  78 63 68 3a 4c 44 41 26  37 30 3a 43 4c 43 3a 41  |xch:LDA&70:CLC:A|
00001a60  44 43 23 26 32 30 3a 53  54 41 26 37 30 3a 4c 44  |DC#&20:STA&70:LD|
00001a70  41 26 37 31 3a 41 44 43  23 30 3a 53 54 41 26 37  |A&71:ADC#0:STA&7|
00001a80  31 3a 44 45 59 3a 4a 4d  50 78 6c 6f 70 63 0d 02  |1:DEY:JMPxlopc..|
00001a90  1c 5c 2e 6e 6f 78 63 68  20 4c 44 59 79 63 68 3a  |.\.noxch LDYych:|
00001aa0  2e 79 6c 6f 70 63 20 42  45 51 6e 6f 79 63 68 3a  |.ylopc BEQnoych:|
00001ab0  4c 44 41 26 37 30 3a 43  4c 43 3a 41 44 43 23 26  |LDA&70:CLC:ADC#&|
00001ac0  38 30 3a 53 54 41 26 37  30 3a 4c 44 41 26 37 31  |80:STA&70:LDA&71|
00001ad0  3a 41 44 43 23 32 3a 53  54 41 26 37 31 3a 44 45  |:ADC#2:STA&71:DE|
00001ae0  59 3a 4a 4d 50 79 6c 6f  70 63 0d 02 26 5d 2e 6e  |Y:JMPylopc..&].n|
00001af0  6f 79 63 68 20 4c 44 59  23 30 3a 2e 73 6c 69 6e  |oych LDY#0:.slin|
00001b00  65 20 4c 44 41 26 43 30  30 2c 58 3a 2e 6c 69 6e  |e LDA&C00,X:.lin|
00001b10  65 6c 6f 70 20 50 48 41  3a 41 53 4c 20 41 3a 52  |elop PHA:ASL A:R|
00001b20  4f 4c 20 41 3a 52 4f 4c  20 41 3a 80 23 33 3a 42  |OL A:ROL A:.#3:B|
00001b30  45 51 62 6c 61 6e 63 68  3a 53 54 41 69 74 65 6d  |EQblanch:STAitem|
00001b40  70 3a 4c 44 41 23 30 0d  02 30 89 2e 63 6f 6c 63  |p:LDA#0..0..colc|
00001b50  68 20 43 4c 43 3a 41 44  43 63 6f 6c 3a 44 45 43  |h CLC:ADCcol:DEC|
00001b60  69 74 65 6d 70 3a 42 4e  45 63 6f 6c 63 68 3a 2e  |itemp:BNEcolch:.|
00001b70  62 6c 61 6e 63 68 20 53  54 41 69 74 65 6d 70 3a  |blanch STAitemp:|
00001b80  4c 44 41 28 26 37 30 29  2c 59 3a 80 23 26 43 30  |LDA(&70),Y:.#&C0|
00001b90  3a 84 41 69 74 65 6d 70  3a 82 69 6e 76 66 6c 61  |:.Aitemp:.invfla|
00001ba0  67 3a 53 54 41 28 26 37  30 29 2c 59 3a 54 59 41  |g:STA(&70),Y:TYA|
00001bb0  3a 43 4c 43 3a 41 44 43  23 38 3a 54 41 59 3a 43  |:CLC:ADC#8:TAY:C|
00001bc0  4d 50 23 26 32 30 3a 42  43 53 6e 65 77 6c 69 6e  |MP#&20:BCSnewlin|
00001bd0  0d 02 3a 4d 50 4c 41 3a  41 53 4c 20 41 3a 41 53  |..:MPLA:ASL A:AS|
00001be0  4c 20 41 3a 4a 4d 50 6c  69 6e 65 6c 6f 70 3a 2e  |L A:JMPlinelop:.|
00001bf0  6e 65 77 6c 69 6e 20 80  23 37 3a 54 41 59 3a 50  |newlin .#7:TAY:P|
00001c00  4c 41 3a 49 4e 59 3a 49  4e 58 3a 43 50 59 23 38  |LA:INY:INX:CPY#8|
00001c10  3a 42 4e 45 73 6c 69 6e  65 3a 52 54 53 0d 02 44  |:BNEsline:RTS..D|
00001c20  26 2e 6b 65 79 62 79 74  65 20 4c 44 41 23 26 38  |&.keybyte LDA#&8|
00001c30  31 3a 4c 44 59 23 26 46  46 3a 4a 4d 50 6f 73 62  |1:LDY#&FF:JMPosb|
00001c40  79 74 65 0d 02 4e 07 5d  3a e1 0d ff              |yte..N.]:...|
00001c4c