� LaserDarts
� by Dominic Ford
:
(�<>&1000��6:�reloc
2��1:� 23,128,96,80,200,255,200,80,96,0,23,129,6,10,19,255,19,10,6,0,23,1,0;0;0;0;19,1,4,0,0,0,0,19,2,2,0,0,0,0,19,3,1,0,0,0,0:�pix%(1,7),nam$(1):sound=�
<�:�title
F� k$=" " � opp=0:�game
P� k$="2" � opp=1:�game
Z� k$="Q" � k$="q"
d�6:�23,1,1;0;0;0;0;:�
n:
x
��game
���names:�:�0,1:�0,0:�320,0:�85,0,192:�85,320,192:�1280,1024:�960,1024:�85,1280,832:�85,960,832:�0,1024:�320,1024:�85,0,832:�85,320,832:�1280,0:�1280,192:�85,960,0:�85,960,192
�dlasa=10:lasb=10:�2:�3,16);�128;�(32);�129;:stop=�:scra%=2000:scrb%=2000:liva%=3:livb%=3:�screen
���129:�1,1)"Player 1";�31,1)"Player 2";�2,27)"Score";�1,30)"Lives ";�32,27)"Score";�31,30)"Lives ";�14,0)"LASER DARTS";�10,31)"by Dominic Ford 1996";
���5-�(.5*�(nam$(0))),3)nam$(0);�35-�(.5*�(nam$(1))),3)nam$(1):�128:�14,2)"2";�12,3)"Points";�22,2)"New";�19,3)"Reflectors";�19,28)"50";�17,29)"Points"
��
�
�score
�:�move(0):xl=128:yl=816-lasa*32:dl=2:pl=1:�trace:�score
� � opp=0 ��compmove ��move(1)
�5� stop=� �xl=1152:yl=816-lasb*32:dl=0:pl=2:�trace
� � stop=� � scra%=0 � scrb%=0
�� liva%<0 � scrb%=0
�� livb%<0 � scra%=0
�F� scra%=0 � opp=0 � �mess("Congratulations "+nam$(0)+": You Win!")

'� scrb%=0 � opp=0 � �mess("I won!")

L� scra%=0 � opp=1 � �mess("Player 1 Wins! Congratulations "+nam$(0)+"!")

L� scrb%=0 � opp=1 � �mess("Player 2 Wins! Congratulations "+nam$(1)+"!")

"�

,:

6��mess(m$)

@4�5:�0,1:�ba=0�16�4:�640-16*�(m$)+ba,512+ba:�m$:�

J!�0,2:�640-16*�(m$),512:�m$:�4

Tnt%=�+250:� � �>nt%

^�

h:

r��names

|nam$(1)="Elk":�:�nam=0�opp

��

�6�"Player ";nam+1;": What is your name";:�nam$(nam)

�_� �(nam$(nam))>10 � �nam$(nam);" is rather a long name isn't it? Can't you shorten it?":� �

�%� �(nam$(nam))<1 � �"Pardon?":� �

�� �

��

��

�:

���screen

��ad=&A00�&BFC�4:!ad=0:�:�3

�4�y=0�19:x=�(20)-1:�10,y+6)�20," "):�x+10,y+6);

�7�(2)=1��"/":?(&A00+x+y*20)=1��"\":?(&A00+x+y*20)=2

�$�:�x=0�19:y=�(20)-1:�x+10,y+6);
7�(2)=1��"/":?(&A00+x+y*20)=1��"\":?(&A00+x+y*20)=2
�
�
&:
0��move(opm)
:*� opm=0 � las=lasa:x=3 � las=lasb:x=36
D�2:�
NA$=�
X�x,las+6);" "
b,� (A$="A" � A$="a") � las<>0 � las=las-1
l-� (A$="Z" � A$="z") � las<>19 � las=las+1
v�x,las+6);�(128+opm)
�� A$=�13
�� sound �*MOTOR1
�*MOTOR0
�!� opm=0 � lasa=las � lasb=las
��
�:
���compmove
��
�:
���trace
�1�pix=0�7:pix%(0,pix)=xl:pix%(1,pix)=yl:�:pn=0
��
��dl=0�xl=xl-8
�dl=1�yl=yl+8
�dl=2�xl=xl+8
�dl=3�yl=yl-8
 �xl,yl)=3��reflect
*.pn=(pn+1)�8:�0,0:�69,pix%(0,pn),pix%(1,pn)
4.pix%(0,pn)=xl:pix%(1,pn)=yl:�0,2:�69,xl,yl
>(� xl<132 � xl>1148 � yl<196 � yl>828
HE�0,0:�pix=0�7:�69,pix%(0,pix),pix%(1,pix):�:sca%=scra%:scb%=scrb%
R#� xl<36� pl=1 � scra%=scra%+9:�
\%� xl>1244� pl=2 � scrb%=scrb%+9:�
fP� xl<36� scrb%=scrb%-100:�((832-yl)/32)=lasa �scrb%=scrb%-900:liva%=liva%-1
pR� xl>1244� scra%=scra%-100:�((832-yl)/32)=lasb �scra%=scra%-900:livb%=livb%-1
z"� yl<196� pl=1� scra%=scra%-50
�"� yl<196� pl=2� scrb%=scrb%-50
�!� yl>828� pl=1� scra%=scra%-2
�!� yl>828� pl=2� scrb%=scrb%-2
�� (yl>828)�(�(3)=2)��screen
� � liva%<0 � livb%<0 � stop=�
�?� scra%<0� scra%=sca%:� sound ��b=0�5:�1,-15,0,2:�1,0,0,2:�
�?� scrb%<0� scrb%=scb%:� sound ��b=0�5:�1,-15,0,2:�1,0,0,2:�
��
�:
�
��reflect
�'xc=�((xl-320)/32):yc=�((832-yl)/32)
�+�dl=0�?(&A00+xc+yc*20)=1�dl=3:yc=yc-8:�
�+�dl=0�?(&A00+xc+yc*20)=2�dl=1:yc=yc+8:�
+�dl=1�?(&A00+xc+yc*20)=1�dl=2:xc=xc+8:�
+�dl=1�?(&A00+xc+yc*20)=2�dl=0:xc=xc-8:�
+�dl=2�?(&A00+xc+yc*20)=1�dl=1:yc=yc+8:�
$+�dl=2�?(&A00+xc+yc*20)=2�dl=3:yc=yc-8:�
.+�dl=3�?(&A00+xc+yc*20)=1�dl=0:xc=xc-8:�
8dl=2:xc=xc+8
B�
L:
V��score
`�2:�129
j�2,28)"      ";�2,28)scra%
t�7,30)"  ";�7,30);liva%
~!�32,28)"      ";�32,28)scrb%
��37,30)"  ";�37,30);livb%
��128
��
�:
���title
��19,3,1,0,0,0,0
č�:�ba=300�1�-50:�0,ba/50:�400-ba,400:�400,400+ba:�85,400,400-ba:�85,400+ba,400:�:�131:�:�yc=1�5:�l$:�xc=0�39:�l$,xc+1,1)="*"��xc,yc)" "
Π�,:�128:�1:�10,9)"by Dominic Ford 1996":�2:�23,20)"SPACE - Human/Elk";�27,22)"2 - 2 Player";�27,24)"Q - Quit";�27,26);"S - Sound";�25,16)"Sound:";�32,16);
�� sound ��"On"��"Off"
�S�3,2:�1180,1024:�400,400:�85,1380,1024:�:�:k$=�(0):� �" 2QqSs",k$)<>0 � �(k$)>0
��k$="S"�k$="s"��sound:��
��
:

��sound
%� sound � sound=�:�32,16)"Off":�
sound=�:�32,16)"On "
(�
2:
</�"*   *** *** *** ***  **** *** *** ******"
F/�"*   * * *   *   * *   * * * * * *  * *  "
P/�"*   *** *** **  ***   * * *** ***  * ***"
Z/�"*   * *   * *   **    * * * * **   *   *"
d/�"*** * * *** *** * *  **** * * * *  * ***"
n:
x��reloc
��=&5800
�� pass=0 � 2 � 2
�P%=&C00
�[OPTpass
�J    LDY#0:STY&70:STY&72:LDA#&10:SEC:SBC&18:STA&74:LDA&18:CMP#&10:BCCad
�.sb STA&71:LDA#&10:STA&73
�S.m1 LDA(&70),Y:STA(&72),Y:INY:BNEm1:INC&71:INC&73:LDX&71:DEX:CPX&03:BCCm1:BCSem
�4.ad LDA&03:STA&71:CLC:ADC&74:STA&73:LDA#0:LDY&02
�R.m2 LDA(&70),Y:STA(&72),Y:DEY:CPY#&FF:BNEm2:DEC&71:DEC&73:LDA&73:CMP#&16:BCSm2
�:.em LDA&13:CLC:ADC&74:STA&13:STA&01:LDA#&10:STA&18:RTS
�]
��
�� 21
1�"KEY 0""CALL&C00|MRUN|F|M""":�"FX 153,0,128"
�
�
�

00000000  0d 00 0a 10 f4 20 4c 61  73 65 72 44 61 72 74 73  |..... LaserDarts|
00000010  0d 00 14 15 f4 20 62 79  20 44 6f 6d 69 6e 69 63  |..... by Dominic|
00000020  20 46 6f 72 64 0d 00 1e  05 3a 0d 00 28 17 e7 90  | Ford....:..(...|
00000030  3c 3e 26 31 30 30 30 8c  eb 36 3a f2 72 65 6c 6f  |<>&1000..6:.relo|
00000040  63 0d 00 32 9b eb 31 3a  ef 20 32 33 2c 31 32 38  |c..2..1:. 23,128|
00000050  2c 39 36 2c 38 30 2c 32  30 30 2c 32 35 35 2c 32  |,96,80,200,255,2|
00000060  30 30 2c 38 30 2c 39 36  2c 30 2c 32 33 2c 31 32  |00,80,96,0,23,12|
00000070  39 2c 36 2c 31 30 2c 31  39 2c 32 35 35 2c 31 39  |9,6,10,19,255,19|
00000080  2c 31 30 2c 36 2c 30 2c  32 33 2c 31 2c 30 3b 30  |,10,6,0,23,1,0;0|
00000090  3b 30 3b 30 3b 31 39 2c  31 2c 34 2c 30 2c 30 2c  |;0;0;19,1,4,0,0,|
000000a0  30 2c 30 2c 31 39 2c 32  2c 32 2c 30 2c 30 2c 30  |0,0,19,2,2,0,0,0|
000000b0  2c 30 2c 31 39 2c 33 2c  31 2c 30 2c 30 2c 30 2c  |,0,19,3,1,0,0,0,|
000000c0  30 3a de 70 69 78 25 28  31 2c 37 29 2c 6e 61 6d  |0:.pix%(1,7),nam|
000000d0  24 28 31 29 3a 73 6f 75  6e 64 3d b9 0d 00 3c 0c  |$(1):sound=...<.|
000000e0  f5 3a f2 74 69 74 6c 65  0d 00 46 1a e7 20 6b 24  |.:.title..F.. k$|
000000f0  3d 22 20 22 20 8c 20 6f  70 70 3d 30 3a f2 67 61  |=" " . opp=0:.ga|
00000100  6d 65 0d 00 50 1a e7 20  6b 24 3d 22 32 22 20 8c  |me..P.. k$="2" .|
00000110  20 6f 70 70 3d 31 3a f2  67 61 6d 65 0d 00 5a 15  | opp=1:.game..Z.|
00000120  fd 20 6b 24 3d 22 51 22  20 84 20 6b 24 3d 22 71  |. k$="Q" . k$="q|
00000130  22 0d 00 64 19 eb 36 3a  ef 32 33 2c 31 2c 31 3b  |"..d..6:.23,1,1;|
00000140  30 3b 30 3b 30 3b 30 3b  3a e0 0d 00 6e 05 3a 0d  |0;0;0;0;:...n.:.|
00000150  00 78 0a dd f2 67 61 6d  65 0d 00 82 b1 f2 6e 61  |.x...game.....na|
00000160  6d 65 73 3a db 3a e6 30  2c 31 3a ec 30 2c 30 3a  |mes:.:.0,1:.0,0:|
00000170  ec 33 32 30 2c 30 3a f0  38 35 2c 30 2c 31 39 32  |.320,0:.85,0,192|
00000180  3a f0 38 35 2c 33 32 30  2c 31 39 32 3a ec 31 32  |:.85,320,192:.12|
00000190  38 30 2c 31 30 32 34 3a  ec 39 36 30 2c 31 30 32  |80,1024:.960,102|
000001a0  34 3a f0 38 35 2c 31 32  38 30 2c 38 33 32 3a f0  |4:.85,1280,832:.|
000001b0  38 35 2c 39 36 30 2c 38  33 32 3a ec 30 2c 31 30  |85,960,832:.0,10|
000001c0  32 34 3a ec 33 32 30 2c  31 30 32 34 3a f0 38 35  |24:.320,1024:.85|
000001d0  2c 30 2c 38 33 32 3a f0  38 35 2c 33 32 30 2c 38  |,0,832:.85,320,8|
000001e0  33 32 3a ec 31 32 38 30  2c 30 3a ec 31 32 38 30  |32:.1280,0:.1280|
000001f0  2c 31 39 32 3a f0 38 35  2c 39 36 30 2c 30 3a f0  |,192:.85,960,0:.|
00000200  38 35 2c 39 36 30 2c 31  39 32 0d 00 8c 64 6c 61  |85,960,192...dla|
00000210  73 61 3d 31 30 3a 6c 61  73 62 3d 31 30 3a fb 32  |sa=10:lasb=10:.2|
00000220  3a f1 8a 33 2c 31 36 29  3b bd 31 32 38 3b 89 28  |:..3,16);.128;.(|
00000230  33 32 29 3b bd 31 32 39  3b 3a 73 74 6f 70 3d a3  |32);.129;:stop=.|
00000240  3a 73 63 72 61 25 3d 32  30 30 30 3a 73 63 72 62  |:scra%=2000:scrb|
00000250  25 3d 32 30 30 30 3a 6c  69 76 61 25 3d 33 3a 6c  |%=2000:liva%=3:l|
00000260  69 76 62 25 3d 33 3a f2  73 63 72 65 65 6e 0d 00  |ivb%=3:.screen..|
00000270  96 99 fb 31 32 39 3a f1  8a 31 2c 31 29 22 50 6c  |...129:..1,1)"Pl|
00000280  61 79 65 72 20 31 22 3b  8a 33 31 2c 31 29 22 50  |ayer 1";.31,1)"P|
00000290  6c 61 79 65 72 20 32 22  3b 8a 32 2c 32 37 29 22  |layer 2";.2,27)"|
000002a0  53 63 6f 72 65 22 3b 8a  31 2c 33 30 29 22 4c 69  |Score";.1,30)"Li|
000002b0  76 65 73 20 22 3b 8a 33  32 2c 32 37 29 22 53 63  |ves ";.32,27)"Sc|
000002c0  6f 72 65 22 3b 8a 33 31  2c 33 30 29 22 4c 69 76  |ore";.31,30)"Liv|
000002d0  65 73 20 22 3b 8a 31 34  2c 30 29 22 4c 41 53 45  |es ";.14,0)"LASE|
000002e0  52 20 44 41 52 54 53 22  3b 8a 31 30 2c 33 31 29  |R DARTS";.10,31)|
000002f0  22 62 79 20 44 6f 6d 69  6e 69 63 20 46 6f 72 64  |"by Dominic Ford|
00000300  20 31 39 39 36 22 3b 0d  00 a0 9b f1 8a 35 2d a8  | 1996";......5-.|
00000310  28 2e 35 2a a9 28 6e 61  6d 24 28 30 29 29 29 2c  |(.5*.(nam$(0))),|
00000320  33 29 6e 61 6d 24 28 30  29 3b 8a 33 35 2d a8 28  |3)nam$(0);.35-.(|
00000330  2e 35 2a a9 28 6e 61 6d  24 28 31 29 29 29 2c 33  |.5*.(nam$(1))),3|
00000340  29 6e 61 6d 24 28 31 29  3a fb 31 32 38 3a f1 8a  |)nam$(1):.128:..|
00000350  31 34 2c 32 29 22 32 22  3b 8a 31 32 2c 33 29 22  |14,2)"2";.12,3)"|
00000360  50 6f 69 6e 74 73 22 3b  8a 32 32 2c 32 29 22 4e  |Points";.22,2)"N|
00000370  65 77 22 3b 8a 31 39 2c  33 29 22 52 65 66 6c 65  |ew";.19,3)"Refle|
00000380  63 74 6f 72 73 22 3b 8a  31 39 2c 32 38 29 22 35  |ctors";.19,28)"5|
00000390  30 22 3b 8a 31 37 2c 32  39 29 22 50 6f 69 6e 74  |0";.17,29)"Point|
000003a0  73 22 0d 00 aa 05 f5 0d  00 b4 0a f2 73 63 6f 72  |s"..........scor|
000003b0  65 0d 00 be 3a f2 6d 6f  76 65 28 30 29 3a 78 6c  |e...:.move(0):xl|
000003c0  3d 31 32 38 3a 79 6c 3d  38 31 36 2d 6c 61 73 61  |=128:yl=816-lasa|
000003d0  2a 33 32 3a 64 6c 3d 32  3a 70 6c 3d 31 3a f2 74  |*32:dl=2:pl=1:.t|
000003e0  72 61 63 65 3a f2 73 63  6f 72 65 0d 00 c8 20 e7  |race:.score... .|
000003f0  20 6f 70 70 3d 30 20 8c  f2 63 6f 6d 70 6d 6f 76  | opp=0 ..compmov|
00000400  65 20 8b f2 6d 6f 76 65  28 31 29 0d 00 d2 35 e7  |e ..move(1)...5.|
00000410  20 73 74 6f 70 3d a3 20  8c 78 6c 3d 31 31 35 32  | stop=. .xl=1152|
00000420  3a 79 6c 3d 38 31 36 2d  6c 61 73 62 2a 33 32 3a  |:yl=816-lasb*32:|
00000430  64 6c 3d 30 3a 70 6c 3d  32 3a f2 74 72 61 63 65  |dl=0:pl=2:.trace|
00000440  0d 00 dc 20 fd 20 73 74  6f 70 3d b9 20 84 20 73  |... . stop=. . s|
00000450  63 72 61 25 3d 30 20 84  20 73 63 72 62 25 3d 30  |cra%=0 . scrb%=0|
00000460  0d 00 e6 17 e7 20 6c 69  76 61 25 3c 30 20 8c 20  |..... liva%<0 . |
00000470  73 63 72 62 25 3d 30 0d  00 f0 17 e7 20 6c 69 76  |scrb%=0..... liv|
00000480  62 25 3c 30 20 8c 20 73  63 72 61 25 3d 30 0d 00  |b%<0 . scra%=0..|
00000490  fa 46 e7 20 73 63 72 61  25 3d 30 20 80 20 6f 70  |.F. scra%=0 . op|
000004a0  70 3d 30 20 8c 20 f2 6d  65 73 73 28 22 43 6f 6e  |p=0 . .mess("Con|
000004b0  67 72 61 74 75 6c 61 74  69 6f 6e 73 20 22 2b 6e  |gratulations "+n|
000004c0  61 6d 24 28 30 29 2b 22  3a 20 59 6f 75 20 57 69  |am$(0)+": You Wi|
000004d0  6e 21 22 29 0d 01 04 27  e7 20 73 63 72 62 25 3d  |n!")...'. scrb%=|
000004e0  30 20 80 20 6f 70 70 3d  30 20 8c 20 f2 6d 65 73  |0 . opp=0 . .mes|
000004f0  73 28 22 49 20 77 6f 6e  21 22 29 0d 01 0e 4c e7  |s("I won!")...L.|
00000500  20 73 63 72 61 25 3d 30  20 80 20 6f 70 70 3d 31  | scra%=0 . opp=1|
00000510  20 8c 20 f2 6d 65 73 73  28 22 50 6c 61 79 65 72  | . .mess("Player|
00000520  20 31 20 57 69 6e 73 21  20 43 6f 6e 67 72 61 74  | 1 Wins! Congrat|
00000530  75 6c 61 74 69 6f 6e 73  20 22 2b 6e 61 6d 24 28  |ulations "+nam$(|
00000540  30 29 2b 22 21 22 29 0d  01 18 4c e7 20 73 63 72  |0)+"!")...L. scr|
00000550  62 25 3d 30 20 80 20 6f  70 70 3d 31 20 8c 20 f2  |b%=0 . opp=1 . .|
00000560  6d 65 73 73 28 22 50 6c  61 79 65 72 20 32 20 57  |mess("Player 2 W|
00000570  69 6e 73 21 20 43 6f 6e  67 72 61 74 75 6c 61 74  |ins! Congratulat|
00000580  69 6f 6e 73 20 22 2b 6e  61 6d 24 28 31 29 2b 22  |ions "+nam$(1)+"|
00000590  21 22 29 0d 01 22 05 e1  0d 01 2c 05 3a 0d 01 36  |!").."....,.:..6|
000005a0  0e dd f2 6d 65 73 73 28  6d 24 29 0d 01 40 34 ef  |...mess(m$)..@4.|
000005b0  35 3a e6 30 2c 31 3a e3  62 61 3d 30 b8 31 36 88  |5:.0,1:.ba=0.16.|
000005c0  34 3a ec 36 34 30 2d 31  36 2a a9 28 6d 24 29 2b  |4:.640-16*.(m$)+|
000005d0  62 61 2c 35 31 32 2b 62  61 3a f1 6d 24 3a ed 0d  |ba,512+ba:.m$:..|
000005e0  01 4a 21 e6 30 2c 32 3a  ec 36 34 30 2d 31 36 2a  |.J!.0,2:.640-16*|
000005f0  a9 28 6d 24 29 2c 35 31  32 3a f1 6d 24 3a ef 34  |.(m$),512:.m$:.4|
00000600  0d 01 54 17 6e 74 25 3d  91 2b 32 35 30 3a f5 20  |..T.nt%=.+250:. |
00000610  fd 20 91 3e 6e 74 25 0d  01 5e 05 e1 0d 01 68 05  |. .>nt%..^....h.|
00000620  3a 0d 01 72 0b dd f2 6e  61 6d 65 73 0d 01 7c 1e  |:..r...names..|.|
00000630  6e 61 6d 24 28 31 29 3d  22 45 6c 6b 22 3a db 3a  |nam$(1)="Elk":.:|
00000640  e3 6e 61 6d 3d 30 b8 6f  70 70 0d 01 86 05 f5 0d  |.nam=0.opp......|
00000650  01 90 36 f1 22 50 6c 61  79 65 72 20 22 3b 6e 61  |..6."Player ";na|
00000660  6d 2b 31 3b 22 3a 20 57  68 61 74 20 69 73 20 79  |m+1;": What is y|
00000670  6f 75 72 20 6e 61 6d 65  22 3b 3a e8 6e 61 6d 24  |our name";:.nam$|
00000680  28 6e 61 6d 29 0d 01 9a  5f e7 20 a9 28 6e 61 6d  |(nam)..._. .(nam|
00000690  24 28 6e 61 6d 29 29 3e  31 30 20 8c 20 f1 6e 61  |$(nam))>10 . .na|
000006a0  6d 24 28 6e 61 6d 29 3b  22 20 69 73 20 72 61 74  |m$(nam);" is rat|
000006b0  68 65 72 20 61 20 6c 6f  6e 67 20 6e 61 6d 65 20  |her a long name |
000006c0  69 73 6e 27 74 20 69 74  3f 20 43 61 6e 27 74 20  |isn't it? Can't |
000006d0  79 6f 75 20 73 68 6f 72  74 65 6e 20 69 74 3f 22  |you shorten it?"|
000006e0  3a fd 20 a3 0d 01 a4 25  e7 20 a9 28 6e 61 6d 24  |:. ....%. .(nam$|
000006f0  28 6e 61 6d 29 29 3c 31  20 8c 20 f1 22 50 61 72  |(nam))<1 . ."Par|
00000700  64 6f 6e 3f 22 3a fd 20  a3 0d 01 ae 07 fd 20 b9  |don?":. ...... .|
00000710  0d 01 b8 05 ed 0d 01 c2  05 e1 0d 01 cc 05 3a 0d  |..............:.|
00000720  01 d6 0c dd f2 73 63 72  65 65 6e 0d 01 e0 1e e3  |.....screen.....|
00000730  61 64 3d 26 41 30 30 b8  26 42 46 43 88 34 3a 21  |ad=&A00.&BFC.4:!|
00000740  61 64 3d 30 3a ed 3a fb  33 0d 01 ea 34 e3 79 3d  |ad=0:.:.3...4.y=|
00000750  30 b8 31 39 3a 78 3d b3  28 32 30 29 2d 31 3a f1  |0.19:x=.(20)-1:.|
00000760  8a 31 30 2c 79 2b 36 29  c4 32 30 2c 22 20 22 29  |.10,y+6).20," ")|
00000770  3a f1 8a 78 2b 31 30 2c  79 2b 36 29 3b 0d 01 f4  |:..x+10,y+6);...|
00000780  37 e7 b3 28 32 29 3d 31  8c f1 22 2f 22 3a 3f 28  |7..(2)=1.."/":?(|
00000790  26 41 30 30 2b 78 2b 79  2a 32 30 29 3d 31 8b f1  |&A00+x+y*20)=1..|
000007a0  22 5c 22 3a 3f 28 26 41  30 30 2b 78 2b 79 2a 32  |"\":?(&A00+x+y*2|
000007b0  30 29 3d 32 0d 01 fe 24  ed 3a e3 78 3d 30 b8 31  |0)=2...$.:.x=0.1|
000007c0  39 3a 79 3d b3 28 32 30  29 2d 31 3a f1 8a 78 2b  |9:y=.(20)-1:..x+|
000007d0  31 30 2c 79 2b 36 29 3b  0d 02 08 37 e7 b3 28 32  |10,y+6);...7..(2|
000007e0  29 3d 31 8c f1 22 2f 22  3a 3f 28 26 41 30 30 2b  |)=1.."/":?(&A00+|
000007f0  78 2b 79 2a 32 30 29 3d  31 8b f1 22 5c 22 3a 3f  |x+y*20)=1.."\":?|
00000800  28 26 41 30 30 2b 78 2b  79 2a 32 30 29 3d 32 0d  |(&A00+x+y*20)=2.|
00000810  02 12 05 ed 0d 02 1c 05  e1 0d 02 26 05 3a 0d 02  |...........&.:..|
00000820  30 0f dd f2 6d 6f 76 65  28 6f 70 6d 29 0d 02 3a  |0...move(opm)..:|
00000830  2a e7 20 6f 70 6d 3d 30  20 8c 20 6c 61 73 3d 6c  |*. opm=0 . las=l|
00000840  61 73 61 3a 78 3d 33 20  8b 20 6c 61 73 3d 6c 61  |asa:x=3 . las=la|
00000850  73 62 3a 78 3d 33 36 0d  02 44 08 fb 32 3a f5 0d  |sb:x=36..D..2:..|
00000860  02 4e 08 41 24 3d be 0d  02 58 12 f1 8a 78 2c 6c  |.N.A$=...X...x,l|
00000870  61 73 2b 36 29 3b 22 20  22 0d 02 62 2c e7 20 28  |as+6);" "..b,. (|
00000880  41 24 3d 22 41 22 20 84  20 41 24 3d 22 61 22 29  |A$="A" . A$="a")|
00000890  20 80 20 6c 61 73 3c 3e  30 20 8c 20 6c 61 73 3d  | . las<>0 . las=|
000008a0  6c 61 73 2d 31 0d 02 6c  2d e7 20 28 41 24 3d 22  |las-1..l-. (A$="|
000008b0  5a 22 20 84 20 41 24 3d  22 7a 22 29 20 80 20 6c  |Z" . A$="z") . l|
000008c0  61 73 3c 3e 31 39 20 8c  20 6c 61 73 3d 6c 61 73  |as<>19 . las=las|
000008d0  2b 31 0d 02 76 19 f1 8a  78 2c 6c 61 73 2b 36 29  |+1..v...x,las+6)|
000008e0  3b bd 28 31 32 38 2b 6f  70 6d 29 0d 02 80 0c fd  |;.(128+opm).....|
000008f0  20 41 24 3d bd 31 33 0d  02 8a 14 e7 20 73 6f 75  | A$=.13..... sou|
00000900  6e 64 20 8c 2a 4d 4f 54  4f 52 31 0d 02 94 0b 2a  |nd .*MOTOR1....*|
00000910  4d 4f 54 4f 52 30 0d 02  9e 21 e7 20 6f 70 6d 3d  |MOTOR0...!. opm=|
00000920  30 20 8c 20 6c 61 73 61  3d 6c 61 73 20 8b 20 6c  |0 . lasa=las . l|
00000930  61 73 62 3d 6c 61 73 0d  02 a8 05 e1 0d 02 b2 05  |asb=las.........|
00000940  3a 0d 02 bc 0e dd f2 63  6f 6d 70 6d 6f 76 65 0d  |:......compmove.|
00000950  02 c6 05 e1 0d 02 d0 05  3a 0d 02 da 0b dd f2 74  |........:......t|
00000960  72 61 63 65 0d 02 e4 31  e3 70 69 78 3d 30 b8 37  |race...1.pix=0.7|
00000970  3a 70 69 78 25 28 30 2c  70 69 78 29 3d 78 6c 3a  |:pix%(0,pix)=xl:|
00000980  70 69 78 25 28 31 2c 70  69 78 29 3d 79 6c 3a ed  |pix%(1,pix)=yl:.|
00000990  3a 70 6e 3d 30 0d 02 ee  05 f5 0d 02 f8 11 e7 64  |:pn=0..........d|
000009a0  6c 3d 30 8c 78 6c 3d 78  6c 2d 38 0d 03 02 11 e7  |l=0.xl=xl-8.....|
000009b0  64 6c 3d 31 8c 79 6c 3d  79 6c 2b 38 0d 03 0c 11  |dl=1.yl=yl+8....|
000009c0  e7 64 6c 3d 32 8c 78 6c  3d 78 6c 2b 38 0d 03 16  |.dl=2.xl=xl+8...|
000009d0  11 e7 64 6c 3d 33 8c 79  6c 3d 79 6c 2d 38 0d 03  |..dl=3.yl=yl-8..|
000009e0  20 17 e7 b0 78 6c 2c 79  6c 29 3d 33 8c f2 72 65  | ...xl,yl)=3..re|
000009f0  66 6c 65 63 74 0d 03 2a  2e 70 6e 3d 28 70 6e 2b  |flect..*.pn=(pn+|
00000a00  31 29 83 38 3a e6 30 2c  30 3a f0 36 39 2c 70 69  |1).8:.0,0:.69,pi|
00000a10  78 25 28 30 2c 70 6e 29  2c 70 69 78 25 28 31 2c  |x%(0,pn),pix%(1,|
00000a20  70 6e 29 0d 03 34 2e 70  69 78 25 28 30 2c 70 6e  |pn)..4.pix%(0,pn|
00000a30  29 3d 78 6c 3a 70 69 78  25 28 31 2c 70 6e 29 3d  |)=xl:pix%(1,pn)=|
00000a40  79 6c 3a e6 30 2c 32 3a  f0 36 39 2c 78 6c 2c 79  |yl:.0,2:.69,xl,y|
00000a50  6c 0d 03 3e 28 fd 20 78  6c 3c 31 33 32 20 84 20  |l..>(. xl<132 . |
00000a60  78 6c 3e 31 31 34 38 20  84 20 79 6c 3c 31 39 36  |xl>1148 . yl<196|
00000a70  20 84 20 79 6c 3e 38 32  38 0d 03 48 45 e6 30 2c  | . yl>828..HE.0,|
00000a80  30 3a e3 70 69 78 3d 30  b8 37 3a f0 36 39 2c 70  |0:.pix=0.7:.69,p|
00000a90  69 78 25 28 30 2c 70 69  78 29 2c 70 69 78 25 28  |ix%(0,pix),pix%(|
00000aa0  31 2c 70 69 78 29 3a ed  3a 73 63 61 25 3d 73 63  |1,pix):.:sca%=sc|
00000ab0  72 61 25 3a 73 63 62 25  3d 73 63 72 62 25 0d 03  |ra%:scb%=scrb%..|
00000ac0  52 23 e7 20 78 6c 3c 33  36 80 20 70 6c 3d 31 20  |R#. xl<36. pl=1 |
00000ad0  8c 20 73 63 72 61 25 3d  73 63 72 61 25 2b 39 3a  |. scra%=scra%+9:|
00000ae0  e1 0d 03 5c 25 e7 20 78  6c 3e 31 32 34 34 80 20  |...\%. xl>1244. |
00000af0  70 6c 3d 32 20 8c 20 73  63 72 62 25 3d 73 63 72  |pl=2 . scrb%=scr|
00000b00  62 25 2b 39 3a e1 0d 03  66 50 e7 20 78 6c 3c 33  |b%+9:...fP. xl<3|
00000b10  36 8c 20 73 63 72 62 25  3d 73 63 72 62 25 2d 31  |6. scrb%=scrb%-1|
00000b20  30 30 3a e7 a8 28 28 38  33 32 2d 79 6c 29 2f 33  |00:..((832-yl)/3|
00000b30  32 29 3d 6c 61 73 61 20  8c 73 63 72 62 25 3d 73  |2)=lasa .scrb%=s|
00000b40  63 72 62 25 2d 39 30 30  3a 6c 69 76 61 25 3d 6c  |crb%-900:liva%=l|
00000b50  69 76 61 25 2d 31 0d 03  70 52 e7 20 78 6c 3e 31  |iva%-1..pR. xl>1|
00000b60  32 34 34 8c 20 73 63 72  61 25 3d 73 63 72 61 25  |244. scra%=scra%|
00000b70  2d 31 30 30 3a e7 a8 28  28 38 33 32 2d 79 6c 29  |-100:..((832-yl)|
00000b80  2f 33 32 29 3d 6c 61 73  62 20 8c 73 63 72 61 25  |/32)=lasb .scra%|
00000b90  3d 73 63 72 61 25 2d 39  30 30 3a 6c 69 76 62 25  |=scra%-900:livb%|
00000ba0  3d 6c 69 76 62 25 2d 31  0d 03 7a 22 e7 20 79 6c  |=livb%-1..z". yl|
00000bb0  3c 31 39 36 80 20 70 6c  3d 31 8c 20 73 63 72 61  |<196. pl=1. scra|
00000bc0  25 3d 73 63 72 61 25 2d  35 30 0d 03 84 22 e7 20  |%=scra%-50...". |
00000bd0  79 6c 3c 31 39 36 80 20  70 6c 3d 32 8c 20 73 63  |yl<196. pl=2. sc|
00000be0  72 62 25 3d 73 63 72 62  25 2d 35 30 0d 03 8e 21  |rb%=scrb%-50...!|
00000bf0  e7 20 79 6c 3e 38 32 38  80 20 70 6c 3d 31 8c 20  |. yl>828. pl=1. |
00000c00  73 63 72 61 25 3d 73 63  72 61 25 2d 32 0d 03 98  |scra%=scra%-2...|
00000c10  21 e7 20 79 6c 3e 38 32  38 80 20 70 6c 3d 32 8c  |!. yl>828. pl=2.|
00000c20  20 73 63 72 62 25 3d 73  63 72 62 25 2d 32 0d 03  | scrb%=scrb%-2..|
00000c30  a2 1f e7 20 28 79 6c 3e  38 32 38 29 80 28 b3 28  |... (yl>828).(.(|
00000c40  33 29 3d 32 29 8c f2 73  63 72 65 65 6e 0d 03 ac  |3)=2)..screen...|
00000c50  20 e7 20 6c 69 76 61 25  3c 30 20 84 20 6c 69 76  | . liva%<0 . liv|
00000c60  62 25 3c 30 20 8c 20 73  74 6f 70 3d b9 0d 03 b6  |b%<0 . stop=....|
00000c70  3f e7 20 73 63 72 61 25  3c 30 8c 20 73 63 72 61  |?. scra%<0. scra|
00000c80  25 3d 73 63 61 25 3a e7  20 73 6f 75 6e 64 20 8c  |%=sca%:. sound .|
00000c90  e3 62 3d 30 b8 35 3a d4  31 2c 2d 31 35 2c 30 2c  |.b=0.5:.1,-15,0,|
00000ca0  32 3a d4 31 2c 30 2c 30  2c 32 3a ed 0d 03 c0 3f  |2:.1,0,0,2:....?|
00000cb0  e7 20 73 63 72 62 25 3c  30 8c 20 73 63 72 62 25  |. scrb%<0. scrb%|
00000cc0  3d 73 63 62 25 3a e7 20  73 6f 75 6e 64 20 8c e3  |=scb%:. sound ..|
00000cd0  62 3d 30 b8 35 3a d4 31  2c 2d 31 35 2c 30 2c 32  |b=0.5:.1,-15,0,2|
00000ce0  3a d4 31 2c 30 2c 30 2c  32 3a ed 0d 03 ca 05 e1  |:.1,0,0,2:......|
00000cf0  0d 03 d4 05 3a 0d 03 de  0d dd f2 72 65 66 6c 65  |....:......refle|
00000d00  63 74 0d 03 e8 27 78 63  3d a8 28 28 78 6c 2d 33  |ct...'xc=.((xl-3|
00000d10  32 30 29 2f 33 32 29 3a  79 63 3d a8 28 28 38 33  |20)/32):yc=.((83|
00000d20  32 2d 79 6c 29 2f 33 32  29 0d 03 f2 2b e7 64 6c  |2-yl)/32)...+.dl|
00000d30  3d 30 80 3f 28 26 41 30  30 2b 78 63 2b 79 63 2a  |=0.?(&A00+xc+yc*|
00000d40  32 30 29 3d 31 8c 64 6c  3d 33 3a 79 63 3d 79 63  |20)=1.dl=3:yc=yc|
00000d50  2d 38 3a e1 0d 03 fc 2b  e7 64 6c 3d 30 80 3f 28  |-8:....+.dl=0.?(|
00000d60  26 41 30 30 2b 78 63 2b  79 63 2a 32 30 29 3d 32  |&A00+xc+yc*20)=2|
00000d70  8c 64 6c 3d 31 3a 79 63  3d 79 63 2b 38 3a e1 0d  |.dl=1:yc=yc+8:..|
00000d80  04 06 2b e7 64 6c 3d 31  80 3f 28 26 41 30 30 2b  |..+.dl=1.?(&A00+|
00000d90  78 63 2b 79 63 2a 32 30  29 3d 31 8c 64 6c 3d 32  |xc+yc*20)=1.dl=2|
00000da0  3a 78 63 3d 78 63 2b 38  3a e1 0d 04 10 2b e7 64  |:xc=xc+8:....+.d|
00000db0  6c 3d 31 80 3f 28 26 41  30 30 2b 78 63 2b 79 63  |l=1.?(&A00+xc+yc|
00000dc0  2a 32 30 29 3d 32 8c 64  6c 3d 30 3a 78 63 3d 78  |*20)=2.dl=0:xc=x|
00000dd0  63 2d 38 3a e1 0d 04 1a  2b e7 64 6c 3d 32 80 3f  |c-8:....+.dl=2.?|
00000de0  28 26 41 30 30 2b 78 63  2b 79 63 2a 32 30 29 3d  |(&A00+xc+yc*20)=|
00000df0  31 8c 64 6c 3d 31 3a 79  63 3d 79 63 2b 38 3a e1  |1.dl=1:yc=yc+8:.|
00000e00  0d 04 24 2b e7 64 6c 3d  32 80 3f 28 26 41 30 30  |..$+.dl=2.?(&A00|
00000e10  2b 78 63 2b 79 63 2a 32  30 29 3d 32 8c 64 6c 3d  |+xc+yc*20)=2.dl=|
00000e20  33 3a 79 63 3d 79 63 2d  38 3a e1 0d 04 2e 2b e7  |3:yc=yc-8:....+.|
00000e30  64 6c 3d 33 80 3f 28 26  41 30 30 2b 78 63 2b 79  |dl=3.?(&A00+xc+y|
00000e40  63 2a 32 30 29 3d 31 8c  64 6c 3d 30 3a 78 63 3d  |c*20)=1.dl=0:xc=|
00000e50  78 63 2d 38 3a e1 0d 04  38 10 64 6c 3d 32 3a 78  |xc-8:...8.dl=2:x|
00000e60  63 3d 78 63 2b 38 0d 04  42 05 e1 0d 04 4c 05 3a  |c=xc+8..B....L.:|
00000e70  0d 04 56 0b dd f2 73 63  6f 72 65 0d 04 60 0b fb  |..V...score..`..|
00000e80  32 3a fb 31 32 39 0d 04  6a 1f f1 8a 32 2c 32 38  |2:.129..j...2,28|
00000e90  29 22 20 20 20 20 20 20  22 3b 8a 32 2c 32 38 29  |)"      ";.2,28)|
00000ea0  73 63 72 61 25 0d 04 74  1c f1 8a 37 2c 33 30 29  |scra%..t...7,30)|
00000eb0  22 20 20 22 3b 8a 37 2c  33 30 29 3b 6c 69 76 61  |"  ";.7,30);liva|
00000ec0  25 0d 04 7e 21 f1 8a 33  32 2c 32 38 29 22 20 20  |%..~!..32,28)"  |
00000ed0  20 20 20 20 22 3b 8a 33  32 2c 32 38 29 73 63 72  |    ";.32,28)scr|
00000ee0  62 25 0d 04 88 1e f1 8a  33 37 2c 33 30 29 22 20  |b%......37,30)" |
00000ef0  20 22 3b 8a 33 37 2c 33  30 29 3b 6c 69 76 62 25  | ";.37,30);livb%|
00000f00  0d 04 92 08 fb 31 32 38  0d 04 9c 05 e1 0d 04 a6  |.....128........|
00000f10  05 3a 0d 04 b0 0b dd f2  74 69 74 6c 65 0d 04 ba  |.:......title...|
00000f20  13 ef 31 39 2c 33 2c 31  2c 30 2c 30 2c 30 2c 30  |..19,3,1,0,0,0,0|
00000f30  0d 04 c4 8d db 3a e3 62  61 3d 33 30 30 b8 31 88  |.....:.ba=300.1.|
00000f40  2d 35 30 3a e6 30 2c 62  61 2f 35 30 3a ec 34 30  |-50:.0,ba/50:.40|
00000f50  30 2d 62 61 2c 34 30 30  3a ec 34 30 30 2c 34 30  |0-ba,400:.400,40|
00000f60  30 2b 62 61 3a f0 38 35  2c 34 30 30 2c 34 30 30  |0+ba:.85,400,400|
00000f70  2d 62 61 3a f0 38 35 2c  34 30 30 2b 62 61 2c 34  |-ba:.85,400+ba,4|
00000f80  30 30 3a ed 3a fb 31 33  31 3a f7 3a e3 79 63 3d  |00:.:.131:.:.yc=|
00000f90  31 b8 35 3a f3 6c 24 3a  e3 78 63 3d 30 b8 33 39  |1.5:.l$:.xc=0.39|
00000fa0  3a e7 c1 6c 24 2c 78 63  2b 31 2c 31 29 3d 22 2a  |:..l$,xc+1,1)="*|
00000fb0  22 8c f1 8a 78 63 2c 79  63 29 22 20 22 0d 04 ce  |"...xc,yc)" "...|
00000fc0  a0 ed 2c 3a fb 31 32 38  3a fb 31 3a f1 8a 31 30  |..,:.128:.1:..10|
00000fd0  2c 39 29 22 62 79 20 44  6f 6d 69 6e 69 63 20 46  |,9)"by Dominic F|
00000fe0  6f 72 64 20 31 39 39 36  22 3a fb 32 3a f1 8a 32  |ord 1996":.2:..2|
00000ff0  33 2c 32 30 29 22 53 50  41 43 45 20 2d 20 48 75  |3,20)"SPACE - Hu|
00001000  6d 61 6e 2f 45 6c 6b 22  3b 8a 32 37 2c 32 32 29  |man/Elk";.27,22)|
00001010  22 32 20 2d 20 32 20 50  6c 61 79 65 72 22 3b 8a  |"2 - 2 Player";.|
00001020  32 37 2c 32 34 29 22 51  20 2d 20 51 75 69 74 22  |27,24)"Q - Quit"|
00001030  3b 8a 32 37 2c 32 36 29  3b 22 53 20 2d 20 53 6f  |;.27,26);"S - So|
00001040  75 6e 64 22 3b 8a 32 35  2c 31 36 29 22 53 6f 75  |und";.25,16)"Sou|
00001050  6e 64 3a 22 3b 8a 33 32  2c 31 36 29 3b 0d 04 d8  |nd:";.32,16);...|
00001060  19 e7 20 73 6f 75 6e 64  20 8c f1 22 4f 6e 22 8b  |.. sound .."On".|
00001070  f1 22 4f 66 66 22 0d 04  e2 53 e6 33 2c 32 3a ec  |."Off"...S.3,2:.|
00001080  31 31 38 30 2c 31 30 32  34 3a ec 34 30 30 2c 34  |1180,1024:.400,4|
00001090  30 30 3a f0 38 35 2c 31  33 38 30 2c 31 30 32 34  |00:.85,1380,1024|
000010a0  3a f5 3a f5 3a 6b 24 3d  bf 28 30 29 3a fd 20 a7  |:.:.:k$=.(0):. .|
000010b0  22 20 32 51 71 53 73 22  2c 6b 24 29 3c 3e 30 20  |" 2QqSs",k$)<>0 |
000010c0  80 20 a9 28 6b 24 29 3e  30 0d 04 ec 1c e7 6b 24  |. .(k$)>0.....k$|
000010d0  3d 22 53 22 84 6b 24 3d  22 73 22 8c f2 73 6f 75  |="S".k$="s"..sou|
000010e0  6e 64 3a fd a3 0d 04 f6  05 e1 0d 05 00 05 3a 0d  |nd:...........:.|
000010f0  05 0a 0b dd f2 73 6f 75  6e 64 0d 05 14 25 e7 20  |.....sound...%. |
00001100  73 6f 75 6e 64 20 8c 20  73 6f 75 6e 64 3d a3 3a  |sound . sound=.:|
00001110  f1 8a 33 32 2c 31 36 29  22 4f 66 66 22 3a e1 0d  |..32,16)"Off":..|
00001120  05 1e 19 73 6f 75 6e 64  3d b9 3a f1 8a 33 32 2c  |...sound=.:..32,|
00001130  31 36 29 22 4f 6e 20 22  0d 05 28 05 e1 0d 05 32  |16)"On "..(....2|
00001140  05 3a 0d 05 3c 2f dc 22  2a 20 20 20 2a 2a 2a 20  |.:..</."*   *** |
00001150  2a 2a 2a 20 2a 2a 2a 20  2a 2a 2a 20 20 2a 2a 2a  |*** *** ***  ***|
00001160  2a 20 2a 2a 2a 20 2a 2a  2a 20 2a 2a 2a 2a 2a 2a  |* *** *** ******|
00001170  22 0d 05 46 2f dc 22 2a  20 20 20 2a 20 2a 20 2a  |"..F/."*   * * *|
00001180  20 20 20 2a 20 20 20 2a  20 2a 20 20 20 2a 20 2a  |   *   * *   * *|
00001190  20 2a 20 2a 20 2a 20 2a  20 20 2a 20 2a 20 20 22  | * * * *  * *  "|
000011a0  0d 05 50 2f dc 22 2a 20  20 20 2a 2a 2a 20 2a 2a  |..P/."*   *** **|
000011b0  2a 20 2a 2a 20 20 2a 2a  2a 20 20 20 2a 20 2a 20  |* **  ***   * * |
000011c0  2a 2a 2a 20 2a 2a 2a 20  20 2a 20 2a 2a 2a 22 0d  |*** ***  * ***".|
000011d0  05 5a 2f dc 22 2a 20 20  20 2a 20 2a 20 20 20 2a  |.Z/."*   * *   *|
000011e0  20 2a 20 20 20 2a 2a 20  20 20 20 2a 20 2a 20 2a  | *   **    * * *|
000011f0  20 2a 20 2a 2a 20 20 20  2a 20 20 20 2a 22 0d 05  | * **   *   *"..|
00001200  64 2f dc 22 2a 2a 2a 20  2a 20 2a 20 2a 2a 2a 20  |d/."*** * * *** |
00001210  2a 2a 2a 20 2a 20 2a 20  20 2a 2a 2a 2a 20 2a 20  |*** * *  **** * |
00001220  2a 20 2a 20 2a 20 20 2a  20 2a 2a 2a 22 0d 05 6e  |* * *  * ***"..n|
00001230  05 3a 0d 05 78 0b dd f2  72 65 6c 6f 63 0d 05 82  |.:..x...reloc...|
00001240  0b d3 3d 26 35 38 30 30  0d 05 8c 14 e3 20 70 61  |..=&5800..... pa|
00001250  73 73 3d 30 20 b8 20 32  20 88 20 32 0d 05 96 0b  |ss=0 . 2 . 2....|
00001260  50 25 3d 26 43 30 30 0d  05 a0 0c 5b 4f 50 54 70  |P%=&C00....[OPTp|
00001270  61 73 73 0d 05 aa 4a 20  20 20 20 4c 44 59 23 30  |ass...J    LDY#0|
00001280  3a 53 54 59 26 37 30 3a  53 54 59 26 37 32 3a 4c  |:STY&70:STY&72:L|
00001290  44 41 23 26 31 30 3a 53  45 43 3a 53 42 43 26 31  |DA#&10:SEC:SBC&1|
000012a0  38 3a 53 54 41 26 37 34  3a 4c 44 41 26 31 38 3a  |8:STA&74:LDA&18:|
000012b0  43 4d 50 23 26 31 30 3a  42 43 43 61 64 0d 05 b4  |CMP#&10:BCCad...|
000012c0  1d 2e 73 62 20 53 54 41  26 37 31 3a 4c 44 41 23  |..sb STA&71:LDA#|
000012d0  26 31 30 3a 53 54 41 26  37 33 0d 05 be 53 2e 6d  |&10:STA&73...S.m|
000012e0  31 20 4c 44 41 28 26 37  30 29 2c 59 3a 53 54 41  |1 LDA(&70),Y:STA|
000012f0  28 26 37 32 29 2c 59 3a  49 4e 59 3a 42 4e 45 6d  |(&72),Y:INY:BNEm|
00001300  31 3a 49 4e 43 26 37 31  3a 49 4e 43 26 37 33 3a  |1:INC&71:INC&73:|
00001310  4c 44 58 26 37 31 3a 44  45 58 3a 43 50 58 26 30  |LDX&71:DEX:CPX&0|
00001320  33 3a 42 43 43 6d 31 3a  42 43 53 65 6d 0d 05 c8  |3:BCCm1:BCSem...|
00001330  34 2e 61 64 20 4c 44 41  26 30 33 3a 53 54 41 26  |4.ad LDA&03:STA&|
00001340  37 31 3a 43 4c 43 3a 41  44 43 26 37 34 3a 53 54  |71:CLC:ADC&74:ST|
00001350  41 26 37 33 3a 4c 44 41  23 30 3a 4c 44 59 26 30  |A&73:LDA#0:LDY&0|
00001360  32 0d 05 d2 52 2e 6d 32  20 4c 44 41 28 26 37 30  |2...R.m2 LDA(&70|
00001370  29 2c 59 3a 53 54 41 28  26 37 32 29 2c 59 3a 44  |),Y:STA(&72),Y:D|
00001380  45 59 3a 43 50 59 23 26  46 46 3a 42 4e 45 6d 32  |EY:CPY#&FF:BNEm2|
00001390  3a 44 45 43 26 37 31 3a  44 45 43 26 37 33 3a 4c  |:DEC&71:DEC&73:L|
000013a0  44 41 26 37 33 3a 43 4d  50 23 26 31 36 3a 42 43  |DA&73:CMP#&16:BC|
000013b0  53 6d 32 0d 05 dc 3a 2e  65 6d 20 4c 44 41 26 31  |Sm2...:.em LDA&1|
000013c0  33 3a 43 4c 43 3a 41 44  43 26 37 34 3a 53 54 41  |3:CLC:ADC&74:STA|
000013d0  26 31 33 3a 53 54 41 26  30 31 3a 4c 44 41 23 26  |&13:STA&01:LDA#&|
000013e0  31 30 3a 53 54 41 26 31  38 3a 52 54 53 0d 05 e6  |10:STA&18:RTS...|
000013f0  05 5d 0d 05 f0 05 ed 0d  05 fa 08 ef 20 32 31 0d  |.].......... 21.|
00001400  06 04 31 ff 22 4b 45 59  20 30 22 22 43 41 4c 4c  |..1."KEY 0""CALL|
00001410  26 43 30 30 7c 4d 52 55  4e 7c 46 7c 4d 22 22 22  |&C00|MRUN|F|M"""|
00001420  3a ff 22 46 58 20 31 35  33 2c 30 2c 31 32 38 22  |:."FX 153,0,128"|
00001430  0d 06 0e 05 e0 0d 06 18  05 e1 0d ff              |............|
0000143c