.�2:�23,128,255,255,255,255,255,255,255,255
.c=0:�l=0�29:�c:c=(c+1)�8:�x=0�19:�128;:�,
	�move
(	� � �
2:
�
��move
��p=0�2�2:P%=&A00:[OPTp
��LDY#0:.refract LDAeug,Y:STA&70:CLC:ADC#&80:STA&72:LDAeug+1,Y:STA&71:ADC#2:STA&73:LDXeug+2,Y:TYA:CLC:ADC#3:PHA:LDY#0:DEC&70:DEC&72:LDA&71:CLC:ADC#&30:STA&71:LDA&73:CLC:ADC#&30:STA&73:TXA:TAY
�M.copy LDA(&70),Y:STA(&72),Y:DEY:BNEcopy:PLA:TAY:LDAeug+1,Y:BNErefract:RTS
�;.eug EQUW&2DA0:EQUB96:EQUW&2E20:EQUB96:EQUW&2EA0:EQUB96
�XEQUW&2B20:EQUB32:EQUW&2BA0:EQUB32:EQUW&2BE0:EQUB32:EQUW&2C20:EQUB32:EQUW&2C60:EQUB32
�XEQUW&28A0:EQUB64:EQUW&2920:EQUB32:EQUW&2960:EQUB32:EQUW&29A0:EQUB32:EQUW&29E0:EQUB32
GEQUW&2620:EQUB32:EQUW&26A0:EQUB32:EQUW&26E0:EQUB32:EQUW&2720:EQUB32
MEQUW&23A0:EQUB96:EQUW&2420:EQUB32:EQUW&2460:EQUB32:EQUW&24A0:EQUB96:EQUW0
]:�:�&A00:�
�

00000000  0d 00 0a 2e eb 32 3a ef  32 33 2c 31 32 38 2c 32  |.....2:.23,128,2|
00000010  35 35 2c 32 35 35 2c 32  35 35 2c 32 35 35 2c 32  |55,255,255,255,2|
00000020  35 35 2c 32 35 35 2c 32  35 35 2c 32 35 35 0d 00  |55,255,255,255..|
00000030  14 2e 63 3d 30 3a e3 6c  3d 30 b8 32 39 3a fb 63  |..c=0:.l=0.29:.c|
00000040  3a 63 3d 28 63 2b 31 29  83 38 3a e3 78 3d 30 b8  |:c=(c+1).8:.x=0.|
00000050  31 39 3a f1 bd 31 32 38  3b 3a ed 2c 0d 00 1e 09  |19:..128;:.,....|
00000060  f2 6d 6f 76 65 0d 00 28  09 f5 20 fd 20 a3 0d 00  |.move..(.. . ...|
00000070  32 05 3a 0d 00 82 0a dd  f2 6d 6f 76 65 0d 00 8c  |2.:......move...|
00000080  1a e3 70 3d 30 b8 32 88  32 3a 50 25 3d 26 41 30  |..p=0.2.2:P%=&A0|
00000090  30 3a 5b 4f 50 54 70 0d  00 96 c1 4c 44 59 23 30  |0:[OPTp....LDY#0|
000000a0  3a 2e 72 65 66 72 61 63  74 20 4c 44 41 65 75 67  |:.refract LDAeug|
000000b0  2c 59 3a 53 54 41 26 37  30 3a 43 4c 43 3a 41 44  |,Y:STA&70:CLC:AD|
000000c0  43 23 26 38 30 3a 53 54  41 26 37 32 3a 4c 44 41  |C#&80:STA&72:LDA|
000000d0  65 75 67 2b 31 2c 59 3a  53 54 41 26 37 31 3a 41  |eug+1,Y:STA&71:A|
000000e0  44 43 23 32 3a 53 54 41  26 37 33 3a 4c 44 58 65  |DC#2:STA&73:LDXe|
000000f0  75 67 2b 32 2c 59 3a 54  59 41 3a 43 4c 43 3a 41  |ug+2,Y:TYA:CLC:A|
00000100  44 43 23 33 3a 50 48 41  3a 4c 44 59 23 30 3a 44  |DC#3:PHA:LDY#0:D|
00000110  45 43 26 37 30 3a 44 45  43 26 37 32 3a 4c 44 41  |EC&70:DEC&72:LDA|
00000120  26 37 31 3a 43 4c 43 3a  41 44 43 23 26 33 30 3a  |&71:CLC:ADC#&30:|
00000130  53 54 41 26 37 31 3a 4c  44 41 26 37 33 3a 43 4c  |STA&71:LDA&73:CL|
00000140  43 3a 41 44 43 23 26 33  30 3a 53 54 41 26 37 33  |C:ADC#&30:STA&73|
00000150  3a 54 58 41 3a 54 41 59  0d 00 a0 4d 2e 63 6f 70  |:TXA:TAY...M.cop|
00000160  79 20 4c 44 41 28 26 37  30 29 2c 59 3a 53 54 41  |y LDA(&70),Y:STA|
00000170  28 26 37 32 29 2c 59 3a  44 45 59 3a 42 4e 45 63  |(&72),Y:DEY:BNEc|
00000180  6f 70 79 3a 50 4c 41 3a  54 41 59 3a 4c 44 41 65  |opy:PLA:TAY:LDAe|
00000190  75 67 2b 31 2c 59 3a 42  4e 45 72 65 66 72 61 63  |ug+1,Y:BNErefrac|
000001a0  74 3a 52 54 53 0d 03 e8  3b 2e 65 75 67 20 45 51  |t:RTS...;.eug EQ|
000001b0  55 57 26 32 44 41 30 3a  45 51 55 42 39 36 3a 45  |UW&2DA0:EQUB96:E|
000001c0  51 55 57 26 32 45 32 30  3a 45 51 55 42 39 36 3a  |QUW&2E20:EQUB96:|
000001d0  45 51 55 57 26 32 45 41  30 3a 45 51 55 42 39 36  |EQUW&2EA0:EQUB96|
000001e0  0d 03 f2 58 45 51 55 57  26 32 42 32 30 3a 45 51  |...XEQUW&2B20:EQ|
000001f0  55 42 33 32 3a 45 51 55  57 26 32 42 41 30 3a 45  |UB32:EQUW&2BA0:E|
00000200  51 55 42 33 32 3a 45 51  55 57 26 32 42 45 30 3a  |QUB32:EQUW&2BE0:|
00000210  45 51 55 42 33 32 3a 45  51 55 57 26 32 43 32 30  |EQUB32:EQUW&2C20|
00000220  3a 45 51 55 42 33 32 3a  45 51 55 57 26 32 43 36  |:EQUB32:EQUW&2C6|
00000230  30 3a 45 51 55 42 33 32  0d 03 fc 58 45 51 55 57  |0:EQUB32...XEQUW|
00000240  26 32 38 41 30 3a 45 51  55 42 36 34 3a 45 51 55  |&28A0:EQUB64:EQU|
00000250  57 26 32 39 32 30 3a 45  51 55 42 33 32 3a 45 51  |W&2920:EQUB32:EQ|
00000260  55 57 26 32 39 36 30 3a  45 51 55 42 33 32 3a 45  |UW&2960:EQUB32:E|
00000270  51 55 57 26 32 39 41 30  3a 45 51 55 42 33 32 3a  |QUW&29A0:EQUB32:|
00000280  45 51 55 57 26 32 39 45  30 3a 45 51 55 42 33 32  |EQUW&29E0:EQUB32|
00000290  0d 04 06 47 45 51 55 57  26 32 36 32 30 3a 45 51  |...GEQUW&2620:EQ|
000002a0  55 42 33 32 3a 45 51 55  57 26 32 36 41 30 3a 45  |UB32:EQUW&26A0:E|
000002b0  51 55 42 33 32 3a 45 51  55 57 26 32 36 45 30 3a  |QUB32:EQUW&26E0:|
000002c0  45 51 55 42 33 32 3a 45  51 55 57 26 32 37 32 30  |EQUB32:EQUW&2720|
000002d0  3a 45 51 55 42 33 32 0d  04 10 4d 45 51 55 57 26  |:EQUB32...MEQUW&|
000002e0  32 33 41 30 3a 45 51 55  42 39 36 3a 45 51 55 57  |23A0:EQUB96:EQUW|
000002f0  26 32 34 32 30 3a 45 51  55 42 33 32 3a 45 51 55  |&2420:EQUB32:EQU|
00000300  57 26 32 34 36 30 3a 45  51 55 42 33 32 3a 45 51  |W&2460:EQUB32:EQ|
00000310  55 57 26 32 34 41 30 3a  45 51 55 42 39 36 3a 45  |UW&24A0:EQUB96:E|
00000320  51 55 57 30 0d 04 1a 0f  5d 3a ed 3a d6 26 41 30  |QUW0....]:.:.&A0|
00000330  30 3a e1 0d ff                                    |0:...|
00000335