F�    ShipWrecked Map Printer                  by Dominic Ford 1997
:
�6:�=&2E00:�23,1,0;0;0;0;
(z�"ShipWrecked Map Printer"'"======================="''"NOTE: The map is printed sideways, and"'"requires 2 A4 sheets."
2*�'"Press <SPACE> when ready to print."
<� � �(-99)
F �''"Preparing to print. . ."
P-�ass:�printer:�2,1,27,1,119,1,2,1,27,1,14
Z*LOAD Print2
d,�x=0�159:�1,27,1,75,1,194,1,1:�y=49�0�-1
n'?(!&9FC)=x � 10:?((!&9FC)+1)=y � 10
x)?(!&9FC-2)=x � 10:?((!&9FC)-1)=y � 10
�0�(!&9F8):� b=&2E00+(?&72)*9 � &2E08+(?&72)*9
�'�1,?b:�,:�1,32,1,48+(x � 10),1,13:�
��
�:
�
��printer
�^�2,1,27,1,64,1,27,1,119,1,2,1,27,1,14:�s=4�0�-1:�c=0�9:�;s;:�1,27,1,75,1,1,1,0,1,255:�,:�'
��ch=&2E00 � &2F1F:� a:?ch=a
��:�1,27,1,65,1,8,3
��
�:
��0,0,0,0,0,0,0,0,0
��0,0,0,0,8,0,0,0,0
��0,0,0,8,20,8,0,0,0

�0,0,16,8,4,4,4,4,0

#�85,170,85,170,85,170,85,170,85

(�&18,&30,&60,&30,&18,&0C,&06,&0C,&18

"�0,0,0,0,0,0,0,0,0

,"�66,66,126,66,66,126,66,66,126

6�85,0,85,0,85,0,85,0,85

@!�40,84,170,85,170,84,40,0,255

J�16,8,4,2,20,40,64,64,32

T(�255,255,255,255,255,255,255,255,255

^�60,60,60,60,60,60,60,126,0

h �0,64,127,127,127,127,64,0,0

r�85,85,85,85,85,85,85,85,85

|�0,126,66,66,66,66,66,126,0

�"�255,34,34,255,17,17,255,34,34

�(�255,255,255,255,255,255,255,255,255

��255,0,0,255,0,0,255,0,0

��192,0,0,240,0,0,252,0,0

�"�192,32,32,240,16,16,252,34,34

��3,2,2,15,1,17,31,34,34

�#�85,170,85,170,85,0,255,255,255

��85,170,85,170,85,0,255,0,0

�$�255,255,255,255,127,127,63,31,7

��255,127,63,31,15,7,3,1,0

��255,127,63,31,15,7,3,1,0

��0,0,0,0,0,0,0,0,0

�(�255,255,255,255,254,254,252,248,224
&�255,254,252,248,240,224,192,128,0
&�255,254,252,248,240,224,192,128,0
�0,0,0,0,0,0,0,0,0
&:
0	��ass
:�pass=0�2�2:P%=&9F8
D
[OPT pass
NEQUD blockon
X
EQUD xscr
b.block JMP blockon
lS.screen LDA#&FF:STAyset:.ylop LDA#&FF:STAxset:INCyset:.xlop INCxset:JSR blockon
v"LDAxset:CMP#9:BEQnexty:JMPxlop
�*.nexty LDAyset:CMP#9:BEQscrend:JMPylop
�.scrend RTS
�:
�[.blockon LDA#&30:CLC:ADCxscr:STA&71:LDAyscr:ASL A:ASL A:ASL A:ASL A:CLC:ADC&71:STAscrno
�gLDAscrno:STA&71:LDAyset:PHA:STA&70:PLA:ASL A:ASL A:ASL A:PHA:CLC:ADC&70:STA&70:PLA:ASL A:CLC:ADC&70
�uSTA&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:STA&72:RTS
�L.xdata EQUB0:EQUB2:EQUB5:EQUB7:EQUB10:EQUB12:EQUB15:EQUB17:EQUB20:EQUB22
�+.hbdat EQUB4:EQUB9:EQUB14:EQUB19:EQUB24
�K.xset EQUB0:.yset EQUB0:.xscr EQUB0:.yscr EQUB0:.xpos EQUB0:.ypos EQUB0
�.scrno EQUB 0
]:�
�
�

00000000  0d 00 0a 46 f4 20 20 20  20 53 68 69 70 57 72 65  |...F.    ShipWre|
00000010  63 6b 65 64 20 4d 61 70  20 50 72 69 6e 74 65 72  |cked Map Printer|
00000020  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000030  20 20 62 79 20 44 6f 6d  69 6e 69 63 20 46 6f 72  |  by Dominic For|
00000040  64 20 31 39 39 37 0d 00  14 05 3a 0d 00 1e 1d eb  |d 1997....:.....|
00000050  36 3a d3 3d 26 32 45 30  30 3a ef 32 33 2c 31 2c  |6:.=&2E00:.23,1,|
00000060  30 3b 30 3b 30 3b 30 3b  0d 00 28 7a f1 22 53 68  |0;0;0;0;..(z."Sh|
00000070  69 70 57 72 65 63 6b 65  64 20 4d 61 70 20 50 72  |ipWrecked Map Pr|
00000080  69 6e 74 65 72 22 27 22  3d 3d 3d 3d 3d 3d 3d 3d  |inter"'"========|
00000090  3d 3d 3d 3d 3d 3d 3d 3d  3d 3d 3d 3d 3d 3d 3d 22  |==============="|
000000a0  27 27 22 4e 4f 54 45 3a  20 54 68 65 20 6d 61 70  |''"NOTE: The map|
000000b0  20 69 73 20 70 72 69 6e  74 65 64 20 73 69 64 65  | is printed side|
000000c0  77 61 79 73 2c 20 61 6e  64 22 27 22 72 65 71 75  |ways, and"'"requ|
000000d0  69 72 65 73 20 32 20 41  34 20 73 68 65 65 74 73  |ires 2 A4 sheets|
000000e0  2e 22 0d 00 32 2a f1 27  22 50 72 65 73 73 20 3c  |."..2*.'"Press <|
000000f0  53 50 41 43 45 3e 20 77  68 65 6e 20 72 65 61 64  |SPACE> when read|
00000100  79 20 74 6f 20 70 72 69  6e 74 2e 22 0d 00 3c 0e  |y to print."..<.|
00000110  f5 20 fd 20 a6 28 2d 39  39 29 0d 00 46 20 f1 27  |. . .(-99)..F .'|
00000120  27 22 50 72 65 70 61 72  69 6e 67 20 74 6f 20 70  |'"Preparing to p|
00000130  72 69 6e 74 2e 20 2e 20  2e 22 0d 00 50 2d f2 61  |rint. . ."..P-.a|
00000140  73 73 3a f2 70 72 69 6e  74 65 72 3a ef 32 2c 31  |ss:.printer:.2,1|
00000150  2c 32 37 2c 31 2c 31 31  39 2c 31 2c 32 2c 31 2c  |,27,1,119,1,2,1,|
00000160  32 37 2c 31 2c 31 34 0d  00 5a 10 2a 4c 4f 41 44  |27,1,14..Z.*LOAD|
00000170  20 50 72 69 6e 74 32 0d  00 64 2c e3 78 3d 30 b8  | Print2..d,.x=0.|
00000180  31 35 39 3a ef 31 2c 32  37 2c 31 2c 37 35 2c 31  |159:.1,27,1,75,1|
00000190  2c 31 39 34 2c 31 2c 31  3a e3 79 3d 34 39 b8 30  |,194,1,1:.y=49.0|
000001a0  88 2d 31 0d 00 6e 27 3f  28 21 26 39 46 43 29 3d  |.-1..n'?(!&9FC)=|
000001b0  78 20 81 20 31 30 3a 3f  28 28 21 26 39 46 43 29  |x . 10:?((!&9FC)|
000001c0  2b 31 29 3d 79 20 81 20  31 30 0d 00 78 29 3f 28  |+1)=y . 10..x)?(|
000001d0  21 26 39 46 43 2d 32 29  3d 78 20 83 20 31 30 3a  |!&9FC-2)=x . 10:|
000001e0  3f 28 28 21 26 39 46 43  29 2d 31 29 3d 79 20 83  |?((!&9FC)-1)=y .|
000001f0  20 31 30 0d 00 82 30 d6  28 21 26 39 46 38 29 3a  | 10...0.(!&9F8):|
00000200  e3 20 62 3d 26 32 45 30  30 2b 28 3f 26 37 32 29  |. b=&2E00+(?&72)|
00000210  2a 39 20 b8 20 26 32 45  30 38 2b 28 3f 26 37 32  |*9 . &2E08+(?&72|
00000220  29 2a 39 0d 00 8c 27 ef  31 2c 3f 62 3a ed 2c 3a  |)*9...'.1,?b:.,:|
00000230  ef 31 2c 33 32 2c 31 2c  34 38 2b 28 78 20 81 20  |.1,32,1,48+(x . |
00000240  31 30 29 2c 31 2c 31 33  3a ed 0d 00 96 05 e0 0d  |10),1,13:.......|
00000250  00 a0 05 3a 0d 00 aa 0d  dd f2 70 72 69 6e 74 65  |...:......printe|
00000260  72 0d 00 b4 5e ef 32 2c  31 2c 32 37 2c 31 2c 36  |r...^.2,1,27,1,6|
00000270  34 2c 31 2c 32 37 2c 31  2c 31 31 39 2c 31 2c 32  |4,1,27,1,119,1,2|
00000280  2c 31 2c 32 37 2c 31 2c  31 34 3a e3 73 3d 34 b8  |,1,27,1,14:.s=4.|
00000290  30 88 2d 31 3a e3 63 3d  30 b8 39 3a f1 3b 73 3b  |0.-1:.c=0.9:.;s;|
000002a0  3a ef 31 2c 32 37 2c 31  2c 37 35 2c 31 2c 31 2c  |:.1,27,1,75,1,1,|
000002b0  31 2c 30 2c 31 2c 32 35  35 3a ed 2c 3a f1 27 0d  |1,0,1,255:.,:.'.|
000002c0  00 be 1f e3 63 68 3d 26  32 45 30 30 20 b8 20 26  |....ch=&2E00 . &|
000002d0  32 46 31 46 3a f3 20 61  3a 3f 63 68 3d 61 0d 00  |2F1F:. a:?ch=a..|
000002e0  c8 16 ed 3a ef 31 2c 32  37 2c 31 2c 36 35 2c 31  |...:.1,27,1,65,1|
000002f0  2c 38 2c 33 0d 00 d2 05  e1 0d 00 dc 05 3a 0d 00  |,8,3.........:..|
00000300  e6 16 dc 30 2c 30 2c 30  2c 30 2c 30 2c 30 2c 30  |...0,0,0,0,0,0,0|
00000310  2c 30 2c 30 0d 00 f0 16  dc 30 2c 30 2c 30 2c 30  |,0,0.....0,0,0,0|
00000320  2c 38 2c 30 2c 30 2c 30  2c 30 0d 00 fa 17 dc 30  |,8,0,0,0,0.....0|
00000330  2c 30 2c 30 2c 38 2c 32  30 2c 38 2c 30 2c 30 2c  |,0,0,8,20,8,0,0,|
00000340  30 0d 01 04 17 dc 30 2c  30 2c 31 36 2c 38 2c 34  |0.....0,0,16,8,4|
00000350  2c 34 2c 34 2c 34 2c 30  0d 01 0e 23 dc 38 35 2c  |,4,4,4,0...#.85,|
00000360  31 37 30 2c 38 35 2c 31  37 30 2c 38 35 2c 31 37  |170,85,170,85,17|
00000370  30 2c 38 35 2c 31 37 30  2c 38 35 0d 01 18 28 dc  |0,85,170,85...(.|
00000380  26 31 38 2c 26 33 30 2c  26 36 30 2c 26 33 30 2c  |&18,&30,&60,&30,|
00000390  26 31 38 2c 26 30 43 2c  26 30 36 2c 26 30 43 2c  |&18,&0C,&06,&0C,|
000003a0  26 31 38 0d 01 22 16 dc  30 2c 30 2c 30 2c 30 2c  |&18.."..0,0,0,0,|
000003b0  30 2c 30 2c 30 2c 30 2c  30 0d 01 2c 22 dc 36 36  |0,0,0,0,0..,".66|
000003c0  2c 36 36 2c 31 32 36 2c  36 36 2c 36 36 2c 31 32  |,66,126,66,66,12|
000003d0  36 2c 36 36 2c 36 36 2c  31 32 36 0d 01 36 1b dc  |6,66,66,126..6..|
000003e0  38 35 2c 30 2c 38 35 2c  30 2c 38 35 2c 30 2c 38  |85,0,85,0,85,0,8|
000003f0  35 2c 30 2c 38 35 0d 01  40 21 dc 34 30 2c 38 34  |5,0,85..@!.40,84|
00000400  2c 31 37 30 2c 38 35 2c  31 37 30 2c 38 34 2c 34  |,170,85,170,84,4|
00000410  30 2c 30 2c 32 35 35 0d  01 4a 1c dc 31 36 2c 38  |0,0,255..J..16,8|
00000420  2c 34 2c 32 2c 32 30 2c  34 30 2c 36 34 2c 36 34  |,4,2,20,40,64,64|
00000430  2c 33 32 0d 01 54 28 dc  32 35 35 2c 32 35 35 2c  |,32..T(.255,255,|
00000440  32 35 35 2c 32 35 35 2c  32 35 35 2c 32 35 35 2c  |255,255,255,255,|
00000450  32 35 35 2c 32 35 35 2c  32 35 35 0d 01 5e 1f dc  |255,255,255..^..|
00000460  36 30 2c 36 30 2c 36 30  2c 36 30 2c 36 30 2c 36  |60,60,60,60,60,6|
00000470  30 2c 36 30 2c 31 32 36  2c 30 0d 01 68 20 dc 30  |0,60,126,0..h .0|
00000480  2c 36 34 2c 31 32 37 2c  31 32 37 2c 31 32 37 2c  |,64,127,127,127,|
00000490  31 32 37 2c 36 34 2c 30  2c 30 0d 01 72 1f dc 38  |127,64,0,0..r..8|
000004a0  35 2c 38 35 2c 38 35 2c  38 35 2c 38 35 2c 38 35  |5,85,85,85,85,85|
000004b0  2c 38 35 2c 38 35 2c 38  35 0d 01 7c 1f dc 30 2c  |,85,85,85..|..0,|
000004c0  31 32 36 2c 36 36 2c 36  36 2c 36 36 2c 36 36 2c  |126,66,66,66,66,|
000004d0  36 36 2c 31 32 36 2c 30  0d 01 86 22 dc 32 35 35  |66,126,0...".255|
000004e0  2c 33 34 2c 33 34 2c 32  35 35 2c 31 37 2c 31 37  |,34,34,255,17,17|
000004f0  2c 32 35 35 2c 33 34 2c  33 34 0d 01 90 28 dc 32  |,255,34,34...(.2|
00000500  35 35 2c 32 35 35 2c 32  35 35 2c 32 35 35 2c 32  |55,255,255,255,2|
*
00000520  35 35 0d 01 9a 1c dc 32  35 35 2c 30 2c 30 2c 32  |55.....255,0,0,2|
00000530  35 35 2c 30 2c 30 2c 32  35 35 2c 30 2c 30 0d 01  |55,0,0,255,0,0..|
00000540  a4 1c dc 31 39 32 2c 30  2c 30 2c 32 34 30 2c 30  |...192,0,0,240,0|
00000550  2c 30 2c 32 35 32 2c 30  2c 30 0d 01 ae 22 dc 31  |,0,252,0,0...".1|
00000560  39 32 2c 33 32 2c 33 32  2c 32 34 30 2c 31 36 2c  |92,32,32,240,16,|
00000570  31 36 2c 32 35 32 2c 33  34 2c 33 34 0d 01 b8 1b  |16,252,34,34....|
00000580  dc 33 2c 32 2c 32 2c 31  35 2c 31 2c 31 37 2c 33  |.3,2,2,15,1,17,3|
00000590  31 2c 33 34 2c 33 34 0d  01 c2 23 dc 38 35 2c 31  |1,34,34...#.85,1|
000005a0  37 30 2c 38 35 2c 31 37  30 2c 38 35 2c 30 2c 32  |70,85,170,85,0,2|
000005b0  35 35 2c 32 35 35 2c 32  35 35 0d 01 cc 1f dc 38  |55,255,255.....8|
000005c0  35 2c 31 37 30 2c 38 35  2c 31 37 30 2c 38 35 2c  |5,170,85,170,85,|
000005d0  30 2c 32 35 35 2c 30 2c  30 0d 01 d6 24 dc 32 35  |0,255,0,0...$.25|
000005e0  35 2c 32 35 35 2c 32 35  35 2c 32 35 35 2c 31 32  |5,255,255,255,12|
000005f0  37 2c 31 32 37 2c 36 33  2c 33 31 2c 37 0d 01 e0  |7,127,63,31,7...|
00000600  1d dc 32 35 35 2c 31 32  37 2c 36 33 2c 33 31 2c  |..255,127,63,31,|
00000610  31 35 2c 37 2c 33 2c 31  2c 30 0d 01 ea 1d dc 32  |15,7,3,1,0.....2|
00000620  35 35 2c 31 32 37 2c 36  33 2c 33 31 2c 31 35 2c  |55,127,63,31,15,|
00000630  37 2c 33 2c 31 2c 30 0d  01 f4 16 dc 30 2c 30 2c  |7,3,1,0.....0,0,|
00000640  30 2c 30 2c 30 2c 30 2c  30 2c 30 2c 30 0d 01 fe  |0,0,0,0,0,0,0...|
00000650  28 dc 32 35 35 2c 32 35  35 2c 32 35 35 2c 32 35  |(.255,255,255,25|
00000660  35 2c 32 35 34 2c 32 35  34 2c 32 35 32 2c 32 34  |5,254,254,252,24|
00000670  38 2c 32 32 34 0d 02 08  26 dc 32 35 35 2c 32 35  |8,224...&.255,25|
00000680  34 2c 32 35 32 2c 32 34  38 2c 32 34 30 2c 32 32  |4,252,248,240,22|
00000690  34 2c 31 39 32 2c 31 32  38 2c 30 0d 02 12 26 dc  |4,192,128,0...&.|
000006a0  32 35 35 2c 32 35 34 2c  32 35 32 2c 32 34 38 2c  |255,254,252,248,|
000006b0  32 34 30 2c 32 32 34 2c  31 39 32 2c 31 32 38 2c  |240,224,192,128,|
000006c0  30 0d 02 1c 16 dc 30 2c  30 2c 30 2c 30 2c 30 2c  |0.....0,0,0,0,0,|
000006d0  30 2c 30 2c 30 2c 30 0d  02 26 05 3a 0d 02 30 09  |0,0,0,0..&.:..0.|
000006e0  dd f2 61 73 73 0d 02 3a  17 e3 70 61 73 73 3d 30  |..ass..:..pass=0|
000006f0  b8 32 88 32 3a 50 25 3d  26 39 46 38 0d 02 44 0d  |.2.2:P%=&9F8..D.|
00000700  5b 4f 50 54 20 70 61 73  73 0d 02 4e 10 45 51 55  |[OPT pass..N.EQU|
00000710  44 20 62 6c 6f 63 6b 6f  6e 0d 02 58 0d 45 51 55  |D blockon..X.EQU|
00000720  44 20 78 73 63 72 0d 02  62 16 2e 62 6c 6f 63 6b  |D xscr..b..block|
00000730  20 4a 4d 50 20 62 6c 6f  63 6b 6f 6e 0d 02 6c 53  | JMP blockon..lS|
00000740  2e 73 63 72 65 65 6e 20  4c 44 41 23 26 46 46 3a  |.screen LDA#&FF:|
00000750  53 54 41 79 73 65 74 3a  2e 79 6c 6f 70 20 4c 44  |STAyset:.ylop LD|
00000760  41 23 26 46 46 3a 53 54  41 78 73 65 74 3a 49 4e  |A#&FF:STAxset:IN|
00000770  43 79 73 65 74 3a 2e 78  6c 6f 70 20 49 4e 43 78  |Cyset:.xlop INCx|
00000780  73 65 74 3a 4a 53 52 20  62 6c 6f 63 6b 6f 6e 0d  |set:JSR blockon.|
00000790  02 76 22 4c 44 41 78 73  65 74 3a 43 4d 50 23 39  |.v"LDAxset:CMP#9|
000007a0  3a 42 45 51 6e 65 78 74  79 3a 4a 4d 50 78 6c 6f  |:BEQnexty:JMPxlo|
000007b0  70 0d 02 80 2a 2e 6e 65  78 74 79 20 4c 44 41 79  |p...*.nexty LDAy|
000007c0  73 65 74 3a 43 4d 50 23  39 3a 42 45 51 73 63 72  |set:CMP#9:BEQscr|
000007d0  65 6e 64 3a 4a 4d 50 79  6c 6f 70 0d 02 8a 0f 2e  |end:JMPylop.....|
000007e0  73 63 72 65 6e 64 20 52  54 53 0d 02 94 05 3a 0d  |scrend RTS....:.|
000007f0  02 9e 5b 2e 62 6c 6f 63  6b 6f 6e 20 4c 44 41 23  |..[.blockon LDA#|
00000800  26 33 30 3a 43 4c 43 3a  41 44 43 78 73 63 72 3a  |&30:CLC:ADCxscr:|
00000810  53 54 41 26 37 31 3a 4c  44 41 79 73 63 72 3a 41  |STA&71:LDAyscr:A|
00000820  53 4c 20 41 3a 41 53 4c  20 41 3a 41 53 4c 20 41  |SL A:ASL A:ASL A|
00000830  3a 41 53 4c 20 41 3a 43  4c 43 3a 41 44 43 26 37  |:ASL A:CLC:ADC&7|
00000840  31 3a 53 54 41 73 63 72  6e 6f 0d 02 a8 67 4c 44  |1:STAscrno...gLD|
00000850  41 73 63 72 6e 6f 3a 53  54 41 26 37 31 3a 4c 44  |Ascrno:STA&71:LD|
00000860  41 79 73 65 74 3a 50 48  41 3a 53 54 41 26 37 30  |Ayset:PHA:STA&70|
00000870  3a 50 4c 41 3a 41 53 4c  20 41 3a 41 53 4c 20 41  |:PLA:ASL A:ASL A|
00000880  3a 41 53 4c 20 41 3a 50  48 41 3a 43 4c 43 3a 41  |:ASL A:PHA:CLC:A|
00000890  44 43 26 37 30 3a 53 54  41 26 37 30 3a 50 4c 41  |DC&70:STA&70:PLA|
000008a0  3a 41 53 4c 20 41 3a 43  4c 43 3a 41 44 43 26 37  |:ASL A:CLC:ADC&7|
000008b0  30 0d 02 b2 75 53 54 41  26 37 30 3a 4c 44 59 78  |0...uSTA&70:LDYx|
000008c0  73 65 74 3a 4c 44 41 78  64 61 74 61 2c 59 3a 54  |set:LDAxdata,Y:T|
000008d0  41 59 3a 4c 44 41 28 26  37 30 29 2c 59 3a 52 4f  |AY:LDA(&70),Y:RO|
000008e0  4c 20 41 3a 52 4f 4c 20  41 3a 52 4f 4c 20 41 3a  |L A:ROL A:ROL A:|
000008f0  80 23 33 3a 53 54 41 26  37 32 3a 49 4e 59 3a 4c  |.#3:STA&72:INY:L|
00000900  44 41 28 26 37 30 29 2c  59 3a 4c 53 52 20 41 3a  |DA(&70),Y:LSR A:|
00000910  4c 53 52 20 41 3a 4c 53  52 20 41 3a 4c 53 52 20  |LSR A:LSR A:LSR |
00000920  41 3a 80 23 31 32 0d 02  bc 7e 43 4c 43 3a 41 44  |A:.#12...~CLC:AD|
00000930  43 26 37 32 3a 53 54 41  26 37 32 3a 4c 44 41 78  |C&72:STA&72:LDAx|
00000940  73 65 74 3a 4c 53 52 20  41 3a 54 41 59 3a 4c 44  |set:LSR A:TAY:LD|
00000950  41 68 62 64 61 74 2c 59  3a 54 41 59 3a 4c 44 41  |Ahbdat,Y:TAY:LDA|
00000960  28 26 37 30 29 2c 59 3a  53 54 41 26 37 33 3a 4c  |(&70),Y:STA&73:L|
00000970  44 41 78 73 65 74 3a 80  23 31 3a 42 4e 45 62 69  |DAxset:.#1:BNEbi|
00000980  74 32 3a 4c 44 41 26 37  33 3a 41 53 4c 20 41 3a  |t2:LDA&73:ASL A:|
00000990  52 4f 4c 20 41 3a 52 4f  4c 20 41 3a 4a 4d 50 66  |ROL A:ROL A:JMPf|
000009a0  62 67 6f 74 0d 02 c6 1c  2e 62 69 74 32 20 4c 44  |bgot.....bit2 LD|
000009b0  41 26 37 33 3a 41 53 4c  20 41 3a 52 4f 4c 20 41  |A&73:ASL A:ROL A|
000009c0  0d 02 d0 3c 2e 66 62 67  6f 74 20 80 23 31 3a 41  |...<.fbgot .#1:A|
000009d0  53 4c 20 41 3a 41 53 4c  20 41 3a 41 53 4c 20 41  |SL A:ASL A:ASL A|
000009e0  3a 41 53 4c 20 41 3a 43  4c 43 3a 41 44 43 26 37  |:ASL A:CLC:ADC&7|
000009f0  32 3a 53 54 41 26 37 32  3a 52 54 53 0d 02 da 4c  |2:STA&72:RTS...L|
00000a00  2e 78 64 61 74 61 20 45  51 55 42 30 3a 45 51 55  |.xdata EQUB0:EQU|
00000a10  42 32 3a 45 51 55 42 35  3a 45 51 55 42 37 3a 45  |B2:EQUB5:EQUB7:E|
00000a20  51 55 42 31 30 3a 45 51  55 42 31 32 3a 45 51 55  |QUB10:EQUB12:EQU|
00000a30  42 31 35 3a 45 51 55 42  31 37 3a 45 51 55 42 32  |B15:EQUB17:EQUB2|
00000a40  30 3a 45 51 55 42 32 32  0d 02 e4 2b 2e 68 62 64  |0:EQUB22...+.hbd|
00000a50  61 74 20 45 51 55 42 34  3a 45 51 55 42 39 3a 45  |at EQUB4:EQUB9:E|
00000a60  51 55 42 31 34 3a 45 51  55 42 31 39 3a 45 51 55  |QUB14:EQUB19:EQU|
00000a70  42 32 34 0d 02 ee 4b 2e  78 73 65 74 20 45 51 55  |B24...K.xset EQU|
00000a80  42 30 3a 2e 79 73 65 74  20 45 51 55 42 30 3a 2e  |B0:.yset EQUB0:.|
00000a90  78 73 63 72 20 45 51 55  42 30 3a 2e 79 73 63 72  |xscr EQUB0:.yscr|
00000aa0  20 45 51 55 42 30 3a 2e  78 70 6f 73 20 45 51 55  | EQUB0:.xpos EQU|
00000ab0  42 30 3a 2e 79 70 6f 73  20 45 51 55 42 30 0d 02  |B0:.ypos EQUB0..|
00000ac0  f8 11 2e 73 63 72 6e 6f  20 45 51 55 42 20 30 0d  |...scrno EQUB 0.|
00000ad0  03 02 07 5d 3a ed 0d 03  0c 05 e1 0d ff           |...]:........|
00000add