�LEFT INC DIR�LDA DIR+�CMP #$2D9BNE �WARDFLDA #$00RSTA DIR`$JMP �WARDr.RIGHT DEC DIR~8LDA DIR�BCMP #$FF�LBNE �WARD�VLDA #$2B�`STA DIR�jJMP �WARD�tIRQ LDA $C5�~CMP #$0C��BEQ LEFT��CMP #$17	�BEQ RIGHT	��WARD LDA DIR	�CLC,	�ADC #$C0:	�STA $07F8H	�LDA $D000T	�LDX DIR\	�CLCi	�ADC XM,Xw	�STA $D000�	LDA $D001�	
CLC�	ADC YM,X�	STA $D001�	(JMP $EA31�	';                            ��	'XM TXT 0,255,255,254,253,253,252
$'TXT 253,254,253,251:
.'TXT 251,253,254,253,252,253,253P
8'TXT 254,255,255,0n
B'TXT 0,1,1,2,3,3,4,3,2,3,5�
L'TXT 5,3,2,3,4,3,3,2,1,1,0�
V'; Y�
`'YM TXT 5,3,2,3,4,3,3,2,1,1,0�
j'TXT 0,255,255,254,253,253,252�
t'TXT 253,254,253,251~'TXT 251,253,254,253,252,253,253)�'TXT 254,255,255,0G�'TXT 0,1,1,2,3,3,4,3,2,3,5

RH.Cleft inc dir@.H.Clda dir@+H.Ccmp #$2d@9HFDbne .ward@fHPDlda #$00@rHZDsta dir@.H$Djmp .ward@RH.Dright dec dir@.H8Dlda dir@.HbDcmp #$ff@.HlDbne .ward@.HvDlda #$2b@.H.Dsta dir@.HJDjmp .ward@.HTDirq lda $c5@.H.Dcmp #$0c@.H.Dbeq left@.H.Dcmp #$17@EI.Dbeq right@WI.D.ward lda dir@.I.Dclc@,I.Dadc #$c0@:I.Dsta $07f8@hI.Dlda $d000@tI.Dldx dir@£I.Dclc@II.Dadc xm,x@WI.Dsta $d000@.I@Elda $d001@.IJEclc@.ITEadc ym,x@.I.Esta $d001@.I(Ejmp $ea31@.IP';                            .@.IZ'xm txt 0,255,255,254,253,253,252@VJ$'txt 253,254,253,251@:J.'txt 251,253,254,253,252,253,253@pJ8'txt 254,255,255,0@NJb'txt 0,1,1,2,3,3,4,3,2,3,5@.Jl'txt 5,3,2,3,4,3,3,2,1,1,0@.Jv'; y@.J.'ym txt 5,3,2,3,4,3,3,2,1,1,0@.JJ'txt 0,255,255,254,253,253,252@.JT'txt 253,254,253,251@SK.'txt 251,253,254,253,252,253,253@)K.'txt 254,255,255,0@gK.'txt 0,1,1,2,3,3,4,3,2,3,5@@@

00000000  12 08 e8 03 4c 45 46 54  20 49 4e 43 20 44 49 52  |....LEFT INC DIR|
00000010  00 1e 08 f2 03 4c 44 41  20 44 49 52 00 2b 08 fc  |.....LDA DIR.+..|
00000020  03 43 4d 50 20 23 24 32  44 00 39 08 06 04 42 4e  |.CMP #$2D.9...BN|
00000030  45 20 81 57 41 52 44 00  46 08 10 04 4c 44 41 20  |E .WARD.F...LDA |
00000040  23 24 30 30 00 52 08 1a  04 53 54 41 20 44 49 52  |#$00.R...STA DIR|
00000050  00 60 08 24 04 4a 4d 50  20 81 57 41 52 44 00 72  |.`.$.JMP .WARD.r|
00000060  08 2e 04 52 49 47 48 54  20 44 45 43 20 44 49 52  |...RIGHT DEC DIR|
00000070  00 7e 08 38 04 4c 44 41  20 44 49 52 00 8b 08 42  |.~.8.LDA DIR...B|
00000080  04 43 4d 50 20 23 24 46  46 00 99 08 4c 04 42 4e  |.CMP #$FF...L.BN|
00000090  45 20 81 57 41 52 44 00  a6 08 56 04 4c 44 41 20  |E .WARD...V.LDA |
000000a0  23 24 32 42 00 b2 08 60  04 53 54 41 20 44 49 52  |#$2B...`.STA DIR|
000000b0  00 c0 08 6a 04 4a 4d 50  20 81 57 41 52 44 00 d0  |...j.JMP .WARD..|
000000c0  08 74 04 49 52 51 20 4c  44 41 20 24 43 35 00 dd  |.t.IRQ LDA $C5..|
000000d0  08 7e 04 43 4d 50 20 23  24 30 43 00 ea 08 88 04  |.~.CMP #$0C.....|
000000e0  42 45 51 20 4c 45 46 54  00 f7 08 92 04 43 4d 50  |BEQ LEFT.....CMP|
000000f0  20 23 24 31 37 00 05 09  9c 04 42 45 51 20 52 49  | #$17.....BEQ RI|
00000100  47 48 54 00 17 09 a6 04  81 57 41 52 44 20 4c 44  |GHT......WARD LD|
00000110  41 20 44 49 52 00 1f 09  b0 04 43 4c 43 00 2c 09  |A DIR.....CLC.,.|
00000120  ba 04 41 44 43 20 23 24  43 30 00 3a 09 c4 04 53  |..ADC #$C0.:...S|
00000130  54 41 20 24 30 37 46 38  00 48 09 ce 04 4c 44 41  |TA $07F8.H...LDA|
00000140  20 24 44 30 30 30 00 54  09 d8 04 4c 44 58 20 44  | $D000.T...LDX D|
00000150  49 52 00 5c 09 e2 04 43  4c 43 00 69 09 ec 04 41  |IR.\...CLC.i...A|
00000160  44 43 20 58 4d 2c 58 00  77 09 f6 04 53 54 41 20  |DC XM,X.w...STA |
00000170  24 44 30 30 30 00 85 09  00 05 4c 44 41 20 24 44  |$D000.....LDA $D|
00000180  30 30 31 00 8d 09 0a 05  43 4c 43 00 9a 09 14 05  |001.....CLC.....|
00000190  41 44 43 20 59 4d 2c 58  00 a8 09 1e 05 53 54 41  |ADC YM,X.....STA|
000001a0  20 24 44 30 30 31 00 b6  09 28 05 4a 4d 50 20 24  | $D001...(.JMP $|
000001b0  45 41 33 31 00 d9 09 10  27 3b 20 20 20 20 20 20  |EA31....';      |
000001c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000001d0  20 20 20 20 20 20 83 00  fe 09 1a 27 58 4d 20 54  |      .....'XM T|
000001e0  58 54 20 30 2c 32 35 35  2c 32 35 35 2c 32 35 34  |XT 0,255,255,254|
000001f0  2c 32 35 33 2c 32 35 33  2c 32 35 32 00 16 0a 24  |,253,253,252...$|
00000200  27 54 58 54 20 32 35 33  2c 32 35 34 2c 32 35 33  |'TXT 253,254,253|
00000210  2c 32 35 31 00 3a 0a 2e  27 54 58 54 20 32 35 31  |,251.:..'TXT 251|
00000220  2c 32 35 33 2c 32 35 34  2c 32 35 33 2c 32 35 32  |,253,254,253,252|
00000230  2c 32 35 33 2c 32 35 33  00 50 0a 38 27 54 58 54  |,253,253.P.8'TXT|
00000240  20 32 35 34 2c 32 35 35  2c 32 35 35 2c 30 00 6e  | 254,255,255,0.n|
00000250  0a 42 27 54 58 54 20 30  2c 31 2c 31 2c 32 2c 33  |.B'TXT 0,1,1,2,3|
00000260  2c 33 2c 34 2c 33 2c 32  2c 33 2c 35 00 8c 0a 4c  |,3,4,3,2,3,5...L|
00000270  27 54 58 54 20 35 2c 33  2c 32 2c 33 2c 34 2c 33  |'TXT 5,3,2,3,4,3|
00000280  2c 33 2c 32 2c 31 2c 31  2c 30 00 94 0a 56 27 3b  |,3,2,1,1,0...V';|
00000290  20 59 00 b5 0a 60 27 59  4d 20 54 58 54 20 35 2c  | Y...`'YM TXT 5,|
000002a0  33 2c 32 2c 33 2c 34 2c  33 2c 33 2c 32 2c 31 2c  |3,2,3,4,3,3,2,1,|
000002b0  31 2c 30 00 d7 0a 6a 27  54 58 54 20 30 2c 32 35  |1,0...j'TXT 0,25|
000002c0  35 2c 32 35 35 2c 32 35  34 2c 32 35 33 2c 32 35  |5,255,254,253,25|
000002d0  33 2c 32 35 32 00 ef 0a  74 27 54 58 54 20 32 35  |3,252...t'TXT 25|
000002e0  33 2c 32 35 34 2c 32 35  33 2c 32 35 31 00 13 0b  |3,254,253,251...|
000002f0  7e 27 54 58 54 20 32 35  31 2c 32 35 33 2c 32 35  |~'TXT 251,253,25|
00000300  34 2c 32 35 33 2c 32 35  32 2c 32 35 33 2c 32 35  |4,253,252,253,25|
00000310  33 00 29 0b 88 27 54 58  54 20 32 35 34 2c 32 35  |3.)..'TXT 254,25|
00000320  35 2c 32 35 35 2c 30 00  47 0b 92 27 54 58 54 20  |5,255,0.G..'TXT |
00000330  30 2c 31 2c 31 2c 32 2c  33 2c 33 2c 34 2c 33 2c  |0,1,1,2,3,3,4,3,|
00000340  32 2c 33 2c 35 00 00 00                           |2,3,5...|
00000348