�6:�:�"Address:&"a$
 code=�("&"+a$)

 � i=0 � 2 � 2
 P%=code
� [OPT i:PHP:PHA:TYA:PHA:TXA:PHA:LDA#&81:LDX#&FE:LDY#&FF:STYd2:JSR&FFF4:BEQreturn:LDA#13:LDX#4:LDY#0:JSR&FFF4:LDA#2:JSR&FFEE:LDA#3:STAd3
(5 .l LDA#24:STAd7:.b LDA#0:STAd1:LDA#&1B:JSR print
2M LDA#&4C:JSR print:LDA#&A0:JSR print:LDA#0:JSR print:.d:.e LDX#(d0 � 256)
<� LDY#(d0 � 256):LDA#9:JSR&FFF1:CLC:LDAd4:BEQ f:LDAd3:BMI f:SEC:.f ROLd5:LDAd2:SEC:SBC#&C:STAd2:BCS g:DECd3:.g DECd6:LDAd6:�#7:BNE e
F^ LDAd5:JSR print:CLC:LDA#8:ADCd0:STAd0:BCC h:INCd1:.h LDAd1:CMP#5:BEQ i:LDA#&60:LDX#0:BEQn
P� .i LDAd6:BEQ k:LDA#&A:JSR print:LDA#&5C:LDX#1:BNEn:.k LDA#&1B:JSR print:LDA#&4A:JSR print:LDA#&15:JSR print:LDA#&A:JSR print:LDAd3:BMI j:LDA#8:LDX#2:BNEn
Z} .j LDA#3:JSR&FFEE:.return LDA#14:LDX#4:LDY#0:JSR&FFF4:PLA:TAX:PLA:TAY:PLA:PLP:RTS:.print PHA:LDA#1:JSR&FFEE:PLA:JMP&FFEE
[; .n CLC:ADCd2:STAd2:BCC o:INCd3:.o CPX#1:BEQd:BCCl:BCSb
_L .d0 EQUB0:.d1 EQUB0:.d2 EQUB0:.d3 EQUB0:.d4 EQUB0:.d5 EQUB0:.d6 EQUB0:]
d �
n ?&220=code � 256
x ?&221=code � 256
�
 *FX 14,4
�

00000000  0d 00 01 18 20 eb 36 3a  f1 3a e8 22 41 64 64 72  |.... .6:.:."Addr|
00000010  65 73 73 3a 26 22 61 24  0d 00 02 13 20 63 6f 64  |ess:&"a$.... cod|
00000020  65 3d a0 28 22 26 22 2b  61 24 29 0d 00 0a 12 20  |e=.("&"+a$).... |
00000030  e3 20 69 3d 30 20 b8 20  32 20 88 20 32 0d 00 14  |. i=0 . 2 . 2...|
00000040  0c 20 50 25 3d 63 6f 64  65 0d 00 1e 8b 20 5b 4f  |. P%=code.... [O|
00000050  50 54 20 69 3a 50 48 50  3a 50 48 41 3a 54 59 41  |PT i:PHP:PHA:TYA|
00000060  3a 50 48 41 3a 54 58 41  3a 50 48 41 3a 4c 44 41  |:PHA:TXA:PHA:LDA|
00000070  23 26 38 31 3a 4c 44 58  23 26 46 45 3a 4c 44 59  |#&81:LDX#&FE:LDY|
00000080  23 26 46 46 3a 53 54 59  64 32 3a 4a 53 52 26 46  |#&FF:STYd2:JSR&F|
00000090  46 46 34 3a 42 45 51 72  65 74 75 72 6e 3a 4c 44  |FF4:BEQreturn:LD|
000000a0  41 23 31 33 3a 4c 44 58  23 34 3a 4c 44 59 23 30  |A#13:LDX#4:LDY#0|
000000b0  3a 4a 53 52 26 46 46 46  34 3a 4c 44 41 23 32 3a  |:JSR&FFF4:LDA#2:|
000000c0  4a 53 52 26 46 46 45 45  3a 4c 44 41 23 33 3a 53  |JSR&FFEE:LDA#3:S|
000000d0  54 41 64 33 0d 00 28 35  20 2e 6c 20 4c 44 41 23  |TAd3..(5 .l LDA#|
000000e0  32 34 3a 53 54 41 64 37  3a 2e 62 20 4c 44 41 23  |24:STAd7:.b LDA#|
000000f0  30 3a 53 54 41 64 31 3a  4c 44 41 23 26 31 42 3a  |0:STAd1:LDA#&1B:|
00000100  4a 53 52 20 70 72 69 6e  74 0d 00 32 4d 20 4c 44  |JSR print..2M LD|
00000110  41 23 26 34 43 3a 4a 53  52 20 70 72 69 6e 74 3a  |A#&4C:JSR print:|
00000120  4c 44 41 23 26 41 30 3a  4a 53 52 20 70 72 69 6e  |LDA#&A0:JSR prin|
00000130  74 3a 4c 44 41 23 30 3a  4a 53 52 20 70 72 69 6e  |t:LDA#0:JSR prin|
00000140  74 3a 2e 64 3a 2e 65 20  4c 44 58 23 28 64 30 20  |t:.d:.e LDX#(d0 |
00000150  83 20 32 35 36 29 0d 00  3c 87 20 4c 44 59 23 28  |. 256)..<. LDY#(|
00000160  64 30 20 81 20 32 35 36  29 3a 4c 44 41 23 39 3a  |d0 . 256):LDA#9:|
00000170  4a 53 52 26 46 46 46 31  3a 43 4c 43 3a 4c 44 41  |JSR&FFF1:CLC:LDA|
00000180  64 34 3a 42 45 51 20 66  3a 4c 44 41 64 33 3a 42  |d4:BEQ f:LDAd3:B|
00000190  4d 49 20 66 3a 53 45 43  3a 2e 66 20 52 4f 4c 64  |MI f:SEC:.f ROLd|
000001a0  35 3a 4c 44 41 64 32 3a  53 45 43 3a 53 42 43 23  |5:LDAd2:SEC:SBC#|
000001b0  26 43 3a 53 54 41 64 32  3a 42 43 53 20 67 3a 44  |&C:STAd2:BCS g:D|
000001c0  45 43 64 33 3a 2e 67 20  44 45 43 64 36 3a 4c 44  |ECd3:.g DECd6:LD|
000001d0  41 64 36 3a 80 23 37 3a  42 4e 45 20 65 0d 00 46  |Ad6:.#7:BNE e..F|
000001e0  5e 20 4c 44 41 64 35 3a  4a 53 52 20 70 72 69 6e  |^ LDAd5:JSR prin|
000001f0  74 3a 43 4c 43 3a 4c 44  41 23 38 3a 41 44 43 64  |t:CLC:LDA#8:ADCd|
00000200  30 3a 53 54 41 64 30 3a  42 43 43 20 68 3a 49 4e  |0:STAd0:BCC h:IN|
00000210  43 64 31 3a 2e 68 20 4c  44 41 64 31 3a 43 4d 50  |Cd1:.h LDAd1:CMP|
00000220  23 35 3a 42 45 51 20 69  3a 4c 44 41 23 26 36 30  |#5:BEQ i:LDA#&60|
00000230  3a 4c 44 58 23 30 3a 42  45 51 6e 0d 00 50 9e 20  |:LDX#0:BEQn..P. |
00000240  2e 69 20 4c 44 41 64 36  3a 42 45 51 20 6b 3a 4c  |.i LDAd6:BEQ k:L|
00000250  44 41 23 26 41 3a 4a 53  52 20 70 72 69 6e 74 3a  |DA#&A:JSR print:|
00000260  4c 44 41 23 26 35 43 3a  4c 44 58 23 31 3a 42 4e  |LDA#&5C:LDX#1:BN|
00000270  45 6e 3a 2e 6b 20 4c 44  41 23 26 31 42 3a 4a 53  |En:.k LDA#&1B:JS|
00000280  52 20 70 72 69 6e 74 3a  4c 44 41 23 26 34 41 3a  |R print:LDA#&4A:|
00000290  4a 53 52 20 70 72 69 6e  74 3a 4c 44 41 23 26 31  |JSR print:LDA#&1|
000002a0  35 3a 4a 53 52 20 70 72  69 6e 74 3a 4c 44 41 23  |5:JSR print:LDA#|
000002b0  26 41 3a 4a 53 52 20 70  72 69 6e 74 3a 4c 44 41  |&A:JSR print:LDA|
000002c0  64 33 3a 42 4d 49 20 6a  3a 4c 44 41 23 38 3a 4c  |d3:BMI j:LDA#8:L|
000002d0  44 58 23 32 3a 42 4e 45  6e 0d 00 5a 7d 20 2e 6a  |DX#2:BNEn..Z} .j|
000002e0  20 4c 44 41 23 33 3a 4a  53 52 26 46 46 45 45 3a  | LDA#3:JSR&FFEE:|
000002f0  2e 72 65 74 75 72 6e 20  4c 44 41 23 31 34 3a 4c  |.return LDA#14:L|
00000300  44 58 23 34 3a 4c 44 59  23 30 3a 4a 53 52 26 46  |DX#4:LDY#0:JSR&F|
00000310  46 46 34 3a 50 4c 41 3a  54 41 58 3a 50 4c 41 3a  |FF4:PLA:TAX:PLA:|
00000320  54 41 59 3a 50 4c 41 3a  50 4c 50 3a 52 54 53 3a  |TAY:PLA:PLP:RTS:|
00000330  2e 70 72 69 6e 74 20 50  48 41 3a 4c 44 41 23 31  |.print PHA:LDA#1|
00000340  3a 4a 53 52 26 46 46 45  45 3a 50 4c 41 3a 4a 4d  |:JSR&FFEE:PLA:JM|
00000350  50 26 46 46 45 45 0d 00  5b 3b 20 2e 6e 20 43 4c  |P&FFEE..[; .n CL|
00000360  43 3a 41 44 43 64 32 3a  53 54 41 64 32 3a 42 43  |C:ADCd2:STAd2:BC|
00000370  43 20 6f 3a 49 4e 43 64  33 3a 2e 6f 20 43 50 58  |C o:INCd3:.o CPX|
00000380  23 31 3a 42 45 51 64 3a  42 43 43 6c 3a 42 43 53  |#1:BEQd:BCCl:BCS|
00000390  62 0d 00 5f 4c 20 2e 64  30 20 45 51 55 42 30 3a  |b.._L .d0 EQUB0:|
000003a0  2e 64 31 20 45 51 55 42  30 3a 2e 64 32 20 45 51  |.d1 EQUB0:.d2 EQ|
000003b0  55 42 30 3a 2e 64 33 20  45 51 55 42 30 3a 2e 64  |UB0:.d3 EQUB0:.d|
000003c0  34 20 45 51 55 42 30 3a  2e 64 35 20 45 51 55 42  |4 EQUB0:.d5 EQUB|
000003d0  30 3a 2e 64 36 20 45 51  55 42 30 3a 5d 0d 00 64  |0:.d6 EQUB0:]..d|
000003e0  06 20 ed 0d 00 6e 15 20  3f 26 32 32 30 3d 63 6f  |. ...n. ?&220=co|
000003f0  64 65 20 83 20 32 35 36  0d 00 78 15 20 3f 26 32  |de . 256..x. ?&2|
00000400  32 31 3d 63 6f 64 65 20  81 20 32 35 36 0d 00 82  |21=code . 256...|
00000410  0d 20 2a 46 58 20 31 34  2c 34 0d ff              |. *FX 14,4..|
0000041c