; L�E;��$C800''; L�E4'LDA #$03@$'STA $FCM.'LDA #$C3Y8'STA $FEfB'LDA #$D8rL'STA $FB~V'STA $FD�`'LOOP LDY #$00�j'LDX #$00�t'JSR NEIGHBOUR�~'INY��'JSR NEIGHBOUR��'INY��'JSR NEIGHBOUR��'LDY #$28	�'JSR NEIGHBOUR	�'LDY #$2A!	�'JSR NEIGHBOUR.	�'LDY #$50@	�'JSR NEIGHBOURH	�'INYZ	�'JSR NEIGHBOURb	�'INYt	(JSR NEIGHBOUR�	
(LDY #$29�	(LDA ($FB),Y�	(CMP #$A0�	((BNE CH3�	2(CPX #$02�	<(BEQ LIVE��	F(CH3 CPX #$03�	P(BEQ LIVE��	Z(LDA #$20	
d(RETLIVE STA ($FD),Y
n(INC $FB!
x(INC $FD-
�(LDA $FB:
�(BNE LOOPF
�(INC $FCR
�(INC $FE^
�(LDA $FCk
�(CMP #$08x
�(BNE LOOP�
+LDA #$04�
+STA $FC�
+LDA #$C4�
 +STA $FE�
*+LDY #$00�
4+STY $FB�
>+STY $FD�
H+CLOP LDA ($FD),Y�
R+STA ($FB),Y�
\+INY	f+BNE CLOPp+INC $FC!z+INC $FE-�+LDA $FC:�+CMP #$08G�+BNE CLOPO�+RTSi N; NEIGHBOUR CALCULA�R�*NNEIGHBOUR LDA ($FB),Y�4NCMP #$A0�>NBNE NNM�HNINX�RNNNM RTS�RLIVE� LDA #$A0�RJMP RETLIVE�0u��@�� CONTROLLER�J��"�"
T�� A$:� A$�"" � 40020^�� $C8002h�� A$:� A$�"" � 40020>r�� 40030

KHJ@; l.e@QHT@;@]H.@..$c800@'HP'; l.e@4HZ'lda #$03@@H$'sta $fc@mH.'lda #$c3@yH8'sta $fe@FHb'lda #$d8@RHl'sta $fb@.Hv'sta $fd@.H.'loop ldy #$00@.HJ'ldx #$00@.HT'jsr neighbour@.H.'iny@.H.'jsr neighbour@.H.'iny@.H.'jsr neighbour@.H.'ldy #$28@BI.'jsr neighbour@OI.'ldy #$2a@!I.'jsr neighbour@.I.'ldy #$50@@I.'jsr neighbour@hI.'iny@zI.'jsr neighbour@BI.'iny@TI@(jsr neighbour@.IJ(ldy #$29@.IT(lda ($fb),y@.I.(cmp #$a0@.I((bne ch3@.I2(cpx #$02@.I<(beq live.@.If(ch3 cpx #$03@.Ip(beq live.@.Iz(lda #$20@IJD(retlive sta ($fd),y@UJN(inc $fb@!JX(inc $fd@-J.(lda $fb@:J.(bne loop@fJ.(inc $fc@rJ.(inc $fe@.J.(lda $fc@KJ.(cmp #$08@XJ.(bne loop@.JB+lda #$04@.JL+sta $fc@.JV+lda #$c4@.J +sta $fe@.J*+ldy #$00@.J4+sty $fb@.J>+sty $fd@.Jh+clop lda ($fd),y@.Jr+sta ($fb),y@.J£+iny@IKF+bne clop@UKP+inc $fc@!KZ+inc $fe@-K.+lda $fc@:K.+cmp #$08@gK.+bne clop@oK.+rts@IK n; neighbour calcula.r@.K*nneighbour lda ($fb),y@.K4ncmp #$a0@.K>nbne nnm@.Khninx@.Krnnnm rts@.KHrlive. lda #$a0@.KRrjmp retlive@.K0U.@.K@.. controller@.Kj..".E"@MLt.. a$:. a$."" . 40020@YL... $c800@2LH.. a$:. a$."" . 40020@>LR.. 40030@@@

00000000  0b 08 0a 00 3b 20 4c 8b  45 00 11 08 14 00 3b 00  |....; L.E.....;.|
00000010  1d 08 1e 00 ac b2 24 43  38 30 30 00 27 08 10 27  |......$C800.'..'|
00000020  3b 20 4c 8b 45 00 34 08  1a 27 4c 44 41 20 23 24  |; L.E.4..'LDA #$|
00000030  30 33 00 40 08 24 27 53  54 41 20 24 46 43 00 4d  |03.@.$'STA $FC.M|
00000040  08 2e 27 4c 44 41 20 23  24 43 33 00 59 08 38 27  |..'LDA #$C3.Y.8'|
00000050  53 54 41 20 24 46 45 00  66 08 42 27 4c 44 41 20  |STA $FE.f.B'LDA |
00000060  23 24 44 38 00 72 08 4c  27 53 54 41 20 24 46 42  |#$D8.r.L'STA $FB|
00000070  00 7e 08 56 27 53 54 41  20 24 46 44 00 90 08 60  |.~.V'STA $FD...`|
00000080  27 4c 4f 4f 50 20 4c 44  59 20 23 24 30 30 00 9d  |'LOOP LDY #$00..|
00000090  08 6a 27 4c 44 58 20 23  24 30 30 00 af 08 74 27  |.j'LDX #$00...t'|
000000a0  4a 53 52 20 4e 45 49 47  48 42 4f 55 52 00 b7 08  |JSR NEIGHBOUR...|
000000b0  7e 27 49 4e 59 00 c9 08  88 27 4a 53 52 20 4e 45  |~'INY....'JSR NE|
000000c0  49 47 48 42 4f 55 52 00  d1 08 92 27 49 4e 59 00  |IGHBOUR....'INY.|
000000d0  e3 08 9c 27 4a 53 52 20  4e 45 49 47 48 42 4f 55  |...'JSR NEIGHBOU|
000000e0  52 00 f0 08 a6 27 4c 44  59 20 23 24 32 38 00 02  |R....'LDY #$28..|
000000f0  09 b0 27 4a 53 52 20 4e  45 49 47 48 42 4f 55 52  |..'JSR NEIGHBOUR|
00000100  00 0f 09 ba 27 4c 44 59  20 23 24 32 41 00 21 09  |....'LDY #$2A.!.|
00000110  c4 27 4a 53 52 20 4e 45  49 47 48 42 4f 55 52 00  |.'JSR NEIGHBOUR.|
00000120  2e 09 ce 27 4c 44 59 20  23 24 35 30 00 40 09 d8  |...'LDY #$50.@..|
00000130  27 4a 53 52 20 4e 45 49  47 48 42 4f 55 52 00 48  |'JSR NEIGHBOUR.H|
00000140  09 e2 27 49 4e 59 00 5a  09 ec 27 4a 53 52 20 4e  |..'INY.Z..'JSR N|
00000150  45 49 47 48 42 4f 55 52  00 62 09 f6 27 49 4e 59  |EIGHBOUR.b..'INY|
00000160  00 74 09 00 28 4a 53 52  20 4e 45 49 47 48 42 4f  |.t..(JSR NEIGHBO|
00000170  55 52 00 81 09 0a 28 4c  44 59 20 23 24 32 39 00  |UR....(LDY #$29.|
00000180  91 09 14 28 4c 44 41 20  28 24 46 42 29 2c 59 00  |...(LDA ($FB),Y.|
00000190  9e 09 1e 28 43 4d 50 20  23 24 41 30 00 aa 09 28  |...(CMP #$A0...(|
000001a0  28 42 4e 45 20 43 48 33  00 b7 09 32 28 43 50 58  |(BNE CH3...2(CPX|
000001b0  20 23 24 30 32 00 c5 09  3c 28 42 45 51 20 4c 49  | #$02...<(BEQ LI|
000001c0  56 45 91 00 d6 09 46 28  43 48 33 20 43 50 58 20  |VE....F(CH3 CPX |
000001d0  23 24 30 33 00 e4 09 50  28 42 45 51 20 4c 49 56  |#$03...P(BEQ LIV|
000001e0  45 91 00 f1 09 5a 28 4c  44 41 20 23 24 32 30 00  |E....Z(LDA #$20.|
000001f0  09 0a 64 28 52 45 54 4c  49 56 45 20 53 54 41 20  |..d(RETLIVE STA |
00000200  28 24 46 44 29 2c 59 00  15 0a 6e 28 49 4e 43 20  |($FD),Y...n(INC |
00000210  24 46 42 00 21 0a 78 28  49 4e 43 20 24 46 44 00  |$FB.!.x(INC $FD.|
00000220  2d 0a 82 28 4c 44 41 20  24 46 42 00 3a 0a 8c 28  |-..(LDA $FB.:..(|
00000230  42 4e 45 20 4c 4f 4f 50  00 46 0a 96 28 49 4e 43  |BNE LOOP.F..(INC|
00000240  20 24 46 43 00 52 0a a0  28 49 4e 43 20 24 46 45  | $FC.R..(INC $FE|
00000250  00 5e 0a aa 28 4c 44 41  20 24 46 43 00 6b 0a b4  |.^..(LDA $FC.k..|
00000260  28 43 4d 50 20 23 24 30  38 00 78 0a be 28 42 4e  |(CMP #$08.x..(BN|
00000270  45 20 4c 4f 4f 50 00 85  0a 02 2b 4c 44 41 20 23  |E LOOP....+LDA #|
00000280  24 30 34 00 91 0a 0c 2b  53 54 41 20 24 46 43 00  |$04....+STA $FC.|
00000290  9e 0a 16 2b 4c 44 41 20  23 24 43 34 00 aa 0a 20  |...+LDA #$C4... |
000002a0  2b 53 54 41 20 24 46 45  00 b7 0a 2a 2b 4c 44 59  |+STA $FE...*+LDY|
000002b0  20 23 24 30 30 00 c3 0a  34 2b 53 54 59 20 24 46  | #$00...4+STY $F|
000002c0  42 00 cf 0a 3e 2b 53 54  59 20 24 46 44 00 e4 0a  |B...>+STY $FD...|
000002d0  48 2b 43 4c 4f 50 20 4c  44 41 20 28 24 46 44 29  |H+CLOP LDA ($FD)|
000002e0  2c 59 00 f4 0a 52 2b 53  54 41 20 28 24 46 42 29  |,Y...R+STA ($FB)|
000002f0  2c 59 00 fc 0a 5c 2b 49  4e 59 00 09 0b 66 2b 42  |,Y...\+INY...f+B|
00000300  4e 45 20 43 4c 4f 50 00  15 0b 70 2b 49 4e 43 20  |NE CLOP...p+INC |
00000310  24 46 43 00 21 0b 7a 2b  49 4e 43 20 24 46 45 00  |$FC.!.z+INC $FE.|
00000320  2d 0b 84 2b 4c 44 41 20  24 46 43 00 3a 0b 8e 2b  |-..+LDA $FC.:..+|
00000330  43 4d 50 20 23 24 30 38  00 47 0b 98 2b 42 4e 45  |CMP #$08.G..+BNE|
00000340  20 43 4c 4f 50 00 4f 0b  a2 2b 52 54 53 00 69 0b  | CLOP.O..+RTS.i.|
00000350  20 4e 3b 20 4e 45 49 47  48 42 4f 55 52 20 43 41  | N; NEIGHBOUR CA|
00000360  4c 43 55 4c 41 a4 52 00  83 0b 2a 4e 4e 45 49 47  |LCULA.R...*NNEIG|
00000370  48 42 4f 55 52 20 4c 44  41 20 28 24 46 42 29 2c  |HBOUR LDA ($FB),|
00000380  59 00 90 0b 34 4e 43 4d  50 20 23 24 41 30 00 9c  |Y...4NCMP #$A0..|
00000390  0b 3e 4e 42 4e 45 20 4e  4e 4d 00 a4 0b 48 4e 49  |.>NBNE NNM...HNI|
000003a0  4e 58 00 b0 0b 52 4e 4e  4e 4d 20 52 54 53 00 c3  |NX...RNNNM RTS..|
000003b0  0b 08 52 4c 49 56 45 91  20 4c 44 41 20 23 24 41  |..RLIVE. LDA #$A|
000003c0  30 00 d3 0b 12 52 4a 4d  50 20 52 45 54 4c 49 56  |0....RJMP RETLIV|
000003d0  45 00 d9 0b 30 75 80 00  ea 0b 40 9c 8f 20 43 4f  |E...0u....@.. CO|
000003e0  4e 54 52 4f 4c 4c 45 52  00 f4 0b 4a 9c 99 22 93  |NTROLLER...J..".|
000003f0  05 22 00 0d 0c 54 9c a1  20 41 24 3a 8b 20 41 24  |."...T.. A$:. A$|
00000400  b2 22 22 20 a7 20 34 30  30 32 30 00 19 0c 5e 9c  |."" . 40020...^.|
00000410  9e 20 24 43 38 30 30 00  32 0c 68 9c a1 20 41 24  |. $C800.2.h.. A$|
00000420  3a 8b 20 41 24 b2 22 22  20 a7 20 34 30 30 32 30  |:. A$."" . 40020|
00000430  00 3e 0c 72 9c 89 20 34  30 30 33 30 00 00 00     |.>.r.. 40030...|
0000043f