old=&E822

�A%=0�3�3
P%=&C00
([
2
OPT A%
<LDA#start � 255:STA&20E
FLDA#start � 256:STA&20F
PLDA#5:STA&90
ZRTS
d
.start
nPHP
xPHA
�LDA&D0:�#1:BEQout
�	.mine
�PLA:PHY:LDY&90
�CMP#10:BEQP%+6
�STA&B00,Y:INY:STY&90
�PLY
�CMP#13:BNEfred
�PHA:PHY:PHX
�LDA&D0:�#&FE:STA&D0
�LDX#0:LDY#11:JSR&FFF7
�LDA&D0:�A#1:STA&D0
�PLX:PLY:PLA
�PHA

LDA#5:STA&90

PLA

	.fred

"PHA:PHA:LDA&D0:�#&FE:STA&D0

,!PLA:JSRold:LDA&D0:�A#1:STA&D0

6PLA:PLP

@RTS

J.out

TPLA:PLP:JMPold

^	.test

hLDA#2:JSR&FFEE

r	LDY#0

|LDAmess,Y:jsr&FFEE:iny

�%CPY#15:BNEP%-9:LDA#3:JSR&FFEE:RTS

�	.mess

�EQUS "This is a test"

�EQUB 13

�]�

�$&B00="*SAY "

�	�&C00
�

00000000  0d 00 0a 0d 6f 6c 64 3d  26 45 38 32 32 0d 00 14  |....old=&E822...|
00000010  0d e3 41 25 3d 30 b8 33  88 33 0d 00 1e 0b 50 25  |..A%=0.3.3....P%|
00000020  3d 26 43 30 30 0d 00 28  05 5b 0d 00 32 0a 4f 50  |=&C00..(.[..2.OP|
00000030  54 20 41 25 0d 00 3c 1b  4c 44 41 23 73 74 61 72  |T A%..<.LDA#star|
00000040  74 20 80 20 32 35 35 3a  53 54 41 26 32 30 45 0d  |t . 255:STA&20E.|
00000050  00 46 1b 4c 44 41 23 73  74 61 72 74 20 81 20 32  |.F.LDA#start . 2|
00000060  35 36 3a 53 54 41 26 32  30 46 0d 00 50 10 4c 44  |56:STA&20F..P.LD|
00000070  41 23 35 3a 53 54 41 26  39 30 0d 00 5a 07 52 54  |A#5:STA&90..Z.RT|
00000080  53 0d 00 64 0a 2e 73 74  61 72 74 0d 00 6e 07 50  |S..d..start..n.P|
00000090  48 50 0d 00 78 07 50 48  41 0d 00 82 15 4c 44 41  |HP..x.PHA....LDA|
000000a0  26 44 30 3a 80 23 31 3a  42 45 51 6f 75 74 0d 00  |&D0:.#1:BEQout..|
000000b0  8c 09 2e 6d 69 6e 65 0d  00 96 12 50 4c 41 3a 50  |...mine....PLA:P|
000000c0  48 59 3a 4c 44 59 26 39  30 0d 00 a0 12 43 4d 50  |HY:LDY&90....CMP|
000000d0  23 31 30 3a 42 45 51 50  25 2b 36 0d 00 aa 18 53  |#10:BEQP%+6....S|
000000e0  54 41 26 42 30 30 2c 59  3a 49 4e 59 3a 53 54 59  |TA&B00,Y:INY:STY|
000000f0  26 39 30 0d 00 b4 07 50  4c 59 0d 00 be 12 43 4d  |&90....PLY....CM|
00000100  50 23 31 33 3a 42 4e 45  66 72 65 64 0d 00 c8 0f  |P#13:BNEfred....|
00000110  50 48 41 3a 50 48 59 3a  50 48 58 0d 00 d2 17 4c  |PHA:PHY:PHX....L|
00000120  44 41 26 44 30 3a 80 23  26 46 45 3a 53 54 41 26  |DA&D0:.#&FE:STA&|
00000130  44 30 0d 00 dc 19 4c 44  58 23 30 3a 4c 44 59 23  |D0....LDX#0:LDY#|
00000140  31 31 3a 4a 53 52 26 46  46 46 37 0d 00 e6 16 4c  |11:JSR&FFF7....L|
00000150  44 41 26 44 30 3a 84 41  23 31 3a 53 54 41 26 44  |DA&D0:.A#1:STA&D|
00000160  30 0d 00 f0 0f 50 4c 58  3a 50 4c 59 3a 50 4c 41  |0....PLX:PLY:PLA|
00000170  0d 00 fa 07 50 48 41 0d  01 04 10 4c 44 41 23 35  |....PHA....LDA#5|
00000180  3a 53 54 41 26 39 30 0d  01 0e 07 50 4c 41 0d 01  |:STA&90....PLA..|
00000190  18 09 2e 66 72 65 64 0d  01 22 1f 50 48 41 3a 50  |...fred..".PHA:P|
000001a0  48 41 3a 4c 44 41 26 44  30 3a 80 23 26 46 45 3a  |HA:LDA&D0:.#&FE:|
000001b0  53 54 41 26 44 30 0d 01  2c 21 50 4c 41 3a 4a 53  |STA&D0..,!PLA:JS|
000001c0  52 6f 6c 64 3a 4c 44 41  26 44 30 3a 84 41 23 31  |Rold:LDA&D0:.A#1|
000001d0  3a 53 54 41 26 44 30 0d  01 36 0b 50 4c 41 3a 50  |:STA&D0..6.PLA:P|
000001e0  4c 50 0d 01 40 07 52 54  53 0d 01 4a 08 2e 6f 75  |LP..@.RTS..J..ou|
000001f0  74 0d 01 54 12 50 4c 41  3a 50 4c 50 3a 4a 4d 50  |t..T.PLA:PLP:JMP|
00000200  6f 6c 64 0d 01 5e 09 2e  74 65 73 74 0d 01 68 12  |old..^..test..h.|
00000210  4c 44 41 23 32 3a 4a 53  52 26 46 46 45 45 0d 01  |LDA#2:JSR&FFEE..|
00000220  72 09 4c 44 59 23 30 0d  01 7c 1a 4c 44 41 6d 65  |r.LDY#0..|.LDAme|
00000230  73 73 2c 59 3a 6a 73 72  26 46 46 45 45 3a 69 6e  |ss,Y:jsr&FFEE:in|
00000240  79 0d 01 86 25 43 50 59  23 31 35 3a 42 4e 45 50  |y...%CPY#15:BNEP|
00000250  25 2d 39 3a 4c 44 41 23  33 3a 4a 53 52 26 46 46  |%-9:LDA#3:JSR&FF|
00000260  45 45 3a 52 54 53 0d 01  90 09 2e 6d 65 73 73 0d  |EE:RTS.....mess.|
00000270  01 9a 19 45 51 55 53 20  22 54 68 69 73 20 69 73  |...EQUS "This is|
00000280  20 61 20 74 65 73 74 22  0d 01 a4 0b 45 51 55 42  | a test"....EQUB|
00000290  20 31 33 0d 01 ae 06 5d  ed 0d 01 b8 11 24 26 42  | 13....].....$&B|
000002a0  30 30 3d 22 2a 53 41 59  20 22 0d 01 c2 09 d6 26  |00="*SAY ".....&|
000002b0  43 30 30 0d ff                                    |C00..|
000002b5