MACHINE L F BEG

00000000: 01 09 2E 09 0A 00 48 B2  30 3A 8F 20 49 46 20 48  |......H.0:. IF H|
00000010: 3D 30 20 54 48 45 4E 20  41 53 53 45 4D 42 4C 59  |=0 THEN ASSEMBLY|
00000020: 20 49 53 20 49 4E 20 44  45 43 49 4D 41 4C 00 58  | IS IN DECIMAL.X|
00000030: 09 32 00 48 45 24 B2 22  30 31 32 33 34 35 36 37  |.2.HE$."01234567|
00000040: 38 39 41 42 43 44 45 46  22 3A 53 5A B2 31 3A 5A  |89ABCDEF":SZ.1:Z|
00000050: 4F 24 B2 22 30 30 30 22  00 83 09 64 00 99 22 20  |O$."000"...d.." |
00000060: 20 20 53 49 4D 50 4C 45  20 20 20 41 53 53 45 4D  |  SIMPLE   ASSEM|
00000070: 42 4C 45 52 20 20 43 4F  4E 56 45 4E 54 49 4F 4E  |BLER  CONVENTION|
00000080: 53 3A 22 00 9D 09 6E 00  86 4D 24 28 35 36 29 2C  |S:"...n..M$(56),|
00000090: 54 59 28 35 36 29 2C 4F  50 28 35 36 29 00 B0 09  |TY(56),OP(56)...|
000000A0: 78 00 81 49 B2 31 A4 35  36 3A 87 4D 24 28 49 29  |x..I.1.56:.M$(I)|
000000B0: 00 D4 09 7A 00 52 4F 50  24 B2 CA 28 4D 24 28 49  |...z.ROP$..(M$(I|
000000C0: 29 2C 34 2C 31 29 3A 54  59 28 49 29 B2 C5 28 52  |),4,1):TY(I)..(R|
000000D0: 4F 50 24 29 00 F4 09 7C  00 4F 50 24 B2 C9 28 4D  |OP$)...|.OP$..(M|
000000E0: 24 28 49 29 2C 33 29 3A  4F 50 28 49 29 B2 C5 28  |$(I),3):OP(I)..(|
000000F0: 4F 50 24 29 00 09 0A 7E  00 4D 24 28 49 29 B2 C8  |OP$)...~.M$(I)..|
00000100: 28 4D 24 28 49 29 2C 33  29 00 12 0A 8C 00 82 49  |(M$(I),3)......I|
00000110: 3A 99 00 2E 0A 96 00 99  22 49 4D 4D 45 44 49 41  |:......."IMMEDIA|
00000120: 54 45 20 20 20 20 20 4C  44 41 20 23 31 35 00 4B  |TE     LDA #15.K|
00000130: 0A 9B 00 99 22 41 42 53  4F 4C 55 54 45 20 20 20  |...."ABSOLUTE   |
00000140: 20 20 20 4C 44 41 20 31  35 30 30 00 66 0A A0 00  |   LDA 1500.f...|
00000150: 99 22 5A 45 52 4F 20 50  41 47 45 20 20 20 20 20  |."ZERO PAGE     |
00000160: 4C 44 41 20 31 35 00 7E  0A A5 00 99 22 41 43 43  |LDA 15.~...."ACC|
00000170: 55 4D 55 4C 41 54 4F 52  20 20 20 41 53 4C 00 9C  |UMULATOR   ASL..|
00000180: 0A AA 00 99 22 49 4E 44  49 52 45 43 54 20 58 20  |...."INDIRECT X |
00000190: 20 20 20 4C 44 41 20 28  31 35 58 29 00 BA 0A AF  |   LDA (15X)....|
000001A0: 00 99 22 49 4E 44 49 52  45 43 54 20 59 20 20 20  |.."INDIRECT Y   |
000001B0: 20 4C 44 41 20 28 31 35  29 59 00 D6 0A B1 00 99  | LDA (15)Y......|
000001C0: 22 5A 45 52 4F 20 50 41  47 45 20 58 20 20 20 4C  |"ZERO PAGE X   L|
000001D0: 44 41 20 31 35 58 00 F2  0A B3 00 99 22 5A 45 52  |DA 15X......"ZER|
000001E0: 4F 20 50 41 47 45 20 59  20 20 20 4C 44 58 20 31  |O PAGE Y   LDX 1|
000001F0: 35 59 00 10 0B B4 00 99  22 41 42 53 4F 4C 55 54  |5Y......"ABSOLUT|
00000200: 45 20 58 20 20 20 20 4C  44 41 20 31 35 30 30 58  |E X    LDA 1500X|
00000210: 00 2E 0B B9 00 99 22 41  42 53 4F 4C 55 54 45 20  |......"ABSOLUTE |
00000220: 59 20 20 20 20 4C 44 41  20 31 35 30 30 59 00 52  |Y    LDA 1500Y.R|
00000230: 0B BD 00 99 3A 99 22 20  20 20 20 45 4E 54 45 52  |....:."    ENTER|
00000240: 20 41 4C 4C 20 4E 55 4D  42 45 52 53 20 49 4E 20  | ALL NUMBERS IN |
00000250: 22 3B 00 67 0B BE 00 8B  48 B2 31 A7 99 22 48 45  |";.g....H.1.."HE|
00000260: 58 22 3A 89 32 30 30 00  76 0B C3 00 99 22 44 45  |X":.200.v...."DE|
00000270: 43 49 4D 41 4C 22 00 B1  0B C8 00 99 3A 99 22 50  |CIMAL"......:."P|
00000280: 4C 45 41 53 45 20 49 4E  50 55 54 20 53 54 41 52  |LEASE INPUT STAR|
00000290: 54 49 4E 47 20 41 44 44  52 45 53 53 20 46 4F 52  |TING ADDRESS FOR|
000002A0: 20 4D 4C 20 50 52 4F 47  52 41 4D 22 3A 85 53 41  | ML PROGRAM":.SA|
000002B0: 24 00 D2 0B D2 00 8B 48  B2 31 A7 48 24 B2 53 41  |$......H.1.H$.SA|
000002C0: 24 3A 8D 35 30 30 30 3A  53 41 B2 44 45 3A 89 32  |$:.5000:SA.DE:.2|
000002D0: 32 30 00 E0 0B D7 00 53  41 B2 C5 28 53 41 24 29  |20.....SA..(SA$)|
000002E0: 00 02 0C DC 00 54 41 B2  53 41 3A 99 22 93 22 3A  |.....TA.SA:.".":|
000002F0: 8F 20 43 4C 45 41 52 20  54 48 45 20 53 43 52 45  |. CLEAR THE SCRE|
00000300: 45 4E 00 26 0C E6 00 8B  48 B2 31 A7 44 45 B2 53  |EN.&....H.1.DE.S|
00000310: 41 3A 53 5A B2 33 3A 8D  34 30 30 30 3A 99 48 24  |A:SZ.3:.4000:.H$|
00000320: 3B 3A 89 32 34 30 00 32  0C EB 00 99 53 41 22 20  |;:.240.2....SA" |
00000330: 22 3B 00 69 0C F0 00 85  4D 4E 24 3A 99 22 91 22  |";.i....MN$:."."|
00000340: A6 32 30 29 3B 3A 8F 20  47 4F 20 55 50 20 4F 4E  |.20);:. GO UP ON|
00000350: 45 20 4C 49 4E 45 20 41  4E 44 20 4F 56 45 52 20  |E LINE AND OVER |
00000360: 32 30 20 53 50 41 43 45  53 00 87 0C F1 00 8F 20  |20 SPACES...... |
00000370: 41 44 44 20 4E 45 57 20  50 53 45 55 44 4F 2D 4F  |ADD NEW PSEUDO-O|
00000380: 50 53 20 48 45 52 45 00  A5 0C F2 00 8B C9 28 4D  |PS HERE.......(M|
00000390: 4E 24 2C 37 29 B2 22 46  4F 52 57 41 52 44 22 A7  |N$,7)."FORWARD".|
000003A0: 46 42 B2 53 41 00 DE 0C  F3 00 8B C9 28 4D 4E 24  |FB.SA.......(MN$|
000003B0: 2C 37 29 B2 22 52 45 53  4F 4C 56 45 22 A7 46 52  |,7)."RESOLVE".FR|
000003C0: B2 53 41 AB 46 42 3A 97  46 42 AA 31 2C 46 52 AB  |.SA.FB:.FB.1,FR.|
000003D0: 32 3A 99 22 20 20 4F 4B  22 3A 89 32 33 30 00 08  |2:."  OK":.230..|
000003E0: 0D F4 00 8B C9 28 4D 4E  24 2C 34 29 B2 22 50 4F  |.....(MN$,4)."PO|
000003F0: 4B 45 22 A7 99 22 41 44  44 52 2C 4E 55 4D 42 45  |KE".."ADDR,NUMBE|
00000400: 52 28 44 45 43 29 22 3B  00 34 0D F5 00 8B C9 28  |R(DEC)";.4.....(|
00000410: 4D 4E 24 2C 34 29 B2 22  50 4F 4B 45 22 A7 85 41  |MN$,4)."POKE"..A|
00000420: 44 52 2C 4E 55 4D 3A 97  41 44 52 2C 4E 55 4D 3A  |DR,NUM:.ADR,NUM:|
00000430: 89 32 33 30 00 68 0D FA  00 8B 4D 4E 24 B2 22 45  |.230.h....MN$."E|
00000440: 4E 44 22 A7 99 3A 99 22  20 20 20 20 20 20 50 52  |ND"..:."      PR|
00000450: 4F 47 52 41 4D 20 49 53  20 46 52 4F 4D 22 54 41  |OGRAM IS FROM"TA|
00000460: 22 54 4F 22 53 41 3A 80  00 81 0D 04 01 4C B2 C3  |"TO"SA:......L..|
00000470: 28 4D 4E 24 29 3A 4C 24  B2 C8 28 4D 4E 24 2C 33  |(MN$):L$..(MN$,3|
00000480: 29 00 9B 0D 0E 01 81 49  B2 31 A4 35 36 3A 8B 4C  |)......I.1.56:.L|
00000490: 24 B2 4D 24 28 49 29 A7  33 30 30 00 A2 0D 18 01  |$.M$(I).300.....|
000004A0: 82 49 00 AB 0D 22 01 89  38 35 30 00 CB 0D 2C 01  |.I..."..850...,.|
000004B0: 8F 20 50 52 49 4D 41 52  59 20 4F 50 43 4F 44 45  |. PRIMARY OPCODE|
000004C0: 20 43 41 54 45 47 4F 52  49 45 53 00 E1 0D 2D 01  | CATEGORIES...-.|
000004D0: 54 59 B2 54 59 28 49 29  3A 4F 50 B2 4F 50 28 49  |TY.TY(I):OP.OP(I|
000004E0: 29 00 F7 0D 31 01 8B 46  42 B2 53 41 A7 54 4E B2  |)...1..FB.SA.TN.|
000004F0: 30 3A 89 32 30 31 30 00  07 0E 36 01 8B 54 59 B2  |0:.2010...6..TY.|
00000500: 30 A7 89 31 30 30 30 00  29 0E 40 01 8B 54 59 B2  |0..1000.).@..TY.|
00000510: 33 A7 54 59 B2 31 3A 8B  4C B2 33 A7 4F 50 B2 4F  |3.TY.1:.L.3.OP.O|
00000520: 50 AA 38 3A 89 31 30 30  30 00 46 0E 4A 01 52 24  |P.8:.1000.F.J.R$|
00000530: B2 C9 28 4D 4E 24 2C 4C  AB 34 29 3A 8B 48 B2 31  |..(MN$,L.4):.H.1|
00000540: A7 8D 36 30 30 30 00 6C  0E 54 01 4C 52 24 B2 C8  |..6000.l.T.LR$..|
00000550: 28 52 24 2C 31 29 3A 4C  4C B2 C3 28 52 24 29 3A  |(R$,1):LL..(R$):|
00000560: 8B 4C 52 24 B2 22 23 22  A7 34 38 30 00 7D 0E 5E  |.LR$."#".480.}.^|
00000570: 01 8B 4C 52 24 B2 22 28  22 A7 35 32 30 00 8B 0E  |..LR$."(".520...|
00000580: 68 01 8B 54 59 B2 38 A7  36 30 30 00 A3 0E 72 01  |h..TY.8.600...r.|
00000590: 8B 54 59 B2 33 A7 4F 50  B2 4F 50 AA 38 3A 89 31  |.TY.3.OP.OP.8:.1|
000005A0: 30 30 30 00 C4 0E 7C 01  8B C9 28 52 24 2C 31 29  |000...|...(R$,1)|
000005B0: B2 22 58 22 B0 C9 28 52  24 2C 31 29 B2 22 59 22  |."X"..(R$,1)."Y"|
000005C0: A7 36 33 30 00 D9 0E 86  01 8B C8 28 4C 24 2C 31  |.630.......(L$,1|
000005D0: 29 B2 22 4A 22 A7 38 32  30 00 F2 0E 90 01 54 4E  |)."J".820.....TN|
000005E0: B2 C5 28 52 24 29 3A 8B  54 4E B1 32 35 35 A7 34  |..(R$):.TN.255.4|
000005F0: 33 30 00 13 0F 9A 01 8B  54 59 B2 31 B0 54 59 B2  |30......TY.1.TY.|
00000600: 33 B0 54 59 B2 34 B0 54  59 B2 35 A7 4F 50 B2 4F  |3.TY.4.TY.5.OP.O|
00000610: 50 AA 34 00 1D 0F A4 01  89 32 30 30 30 00 50 0F  |P.4......2000.P.|
00000620: AE 01 48 25 B2 54 4E AD  32 35 36 3A 4C 25 B2 54  |..H%.TN.256:L%.T|
00000630: 4E AB 32 35 36 AC 48 25  3A 8B 54 59 B2 32 B0 54  |N.256.H%:.TY.2.T|
00000640: 59 B2 37 A7 4F 50 B2 4F  50 AA 38 3A 89 34 37 30  |Y.7.OP.OP.8:.470|
00000650: 00 77 0F B8 01 8B 54 59  B2 31 B0 54 59 B2 33 B0  |.w....TY.1.TY.3.|
00000660: 54 59 B2 34 B0 54 59 B2  35 A7 4F 50 B2 4F 50 AA  |TY.4.TY.5.OP.OP.|
00000670: 31 32 3A 89 34 37 30 00  8A 0F C2 01 8B 54 59 B2  |12:.470......TY.|
00000680: 36 B0 54 59 B2 39 A7 34  37 30 00 93 0F CC 01 89  |6.TY.9.470......|
00000690: 38 35 30 00 9D 0F D6 01  89 33 30 30 30 00 B2 0F  |850......3000...|
000006A0: E0 01 54 4E B2 C5 28 C9  28 52 24 2C 4C 4C AB 31  |..TN..(.(R$,LL.1|
000006B0: 29 29 00 CA 0F EA 01 8B  54 59 B2 31 A7 4F 50 B2  |))......TY.1.OP.|
000006C0: 4F 50 AA 38 3A 89 32 30  30 30 00 DF 0F F4 01 8B  |OP.8:.2000......|
000006D0: 54 59 B2 34 B0 54 59 B2  35 A7 89 32 30 30 30 00  |TY.4.TY.5..2000.|
000006E0: E8 0F FE 01 89 38 35 30  00 FE 0F 08 02 8B C9 28  |.....850.......(|
000006F0: 52 24 2C 32 29 B2 22 29  59 22 A7 35 34 30 00 14  |R$,2).")Y".540..|
00000700: 10 12 02 8B C9 28 52 24  2C 32 29 B2 22 58 29 22  |.....(R$,2)."X)"|
00000710: A7 35 37 30 00 2B 10 1C  02 54 4E B2 C5 28 CA 28  |.570.+...TN..(.(|
00000720: 52 24 2C 32 2C 4C 4C AB  33 29 29 00 44 10 26 02  |R$,2,LL.3)).D.&.|
00000730: 8B 54 59 B2 31 A7 4F 50  B2 4F 50 AA 31 36 3A 89  |.TY.1.OP.OP.16:.|
00000740: 32 30 30 30 00 4D 10 30  02 89 38 35 30 00 64 10  |2000.M.0..850.d.|
00000750: 3A 02 54 4E B2 C5 28 CA  28 52 24 2C 32 2C 4C 4C  |:.TN..(.(R$,2,LL|
00000760: AB 33 29 29 00 74 10 44  02 8B 54 59 B2 31 A7 89  |.3)).t.D..TY.1..|
00000770: 32 30 30 30 00 7D 10 4E  02 89 38 35 30 00 B7 10  |2000.}.N..850...|
00000780: 58 02 54 4E B2 C5 28 52  24 29 3A 54 4E B2 54 4E  |X.TN..(R$):TN.TN|
00000790: AB 53 41 AB 32 3A 8B 54  4E B3 AB 31 32 38 B0 54  |.SA.2:.TN..128.T|
000007A0: 4E B1 31 32 37 A7 99 22  54 4F 4F 20 46 41 52 20  |N.127.."TOO FAR |
000007B0: 22 3B 3A 89 38 35 30 00  CB 10 62 02 8B 54 4E B3  |";:.850...b..TN.|
000007C0: 30 A7 54 4E B2 54 4E AA  32 35 36 00 D5 10 6C 02  |0.TN.TN.256...l.|
000007D0: 89 32 30 30 30 00 EB 10  76 02 8B C9 28 52 24 2C  |.2000...v...(R$,|
000007E0: 32 29 B2 22 29 59 22 A7  35 34 30 00 00 11 80 02  |2).")Y".540.....|
000007F0: 8B C9 28 52 24 2C 31 29  B2 22 58 22 A7 37 32 30  |..(R$,1)."X".720|
00000800: 00 0E 11 8A 02 8F 20 2A  5A 45 52 4F 20 59 00 2F  |...... *ZERO Y./|
00000810: 11 94 02 54 4E B2 C5 28  C8 28 52 24 2C 4C 4C AB  |...TN..(.(R$,LL.|
00000820: 31 29 29 3A 8B 54 4E B1  32 35 35 A7 36 38 30 00  |1)):.TN.255.680.|
00000830: 42 11 9E 02 8B 54 59 B2  32 B0 54 59 B2 35 A7 37  |B....TY.2.TY.5.7|
00000840: 33 30 00 50 11 A3 02 8B  54 59 B2 31 A7 37 36 30  |30.P....TY.1.760|
00000850: 00 6D 11 A8 02 8D 37 37  30 3A 8B 54 59 B2 31 A7  |.m....770:.TY.1.|
00000860: 4F 50 B2 4F 50 AA 32 34  3A 89 37 31 30 00 85 11  |OP.OP.24:.710...|
00000870: B2 02 8B 54 59 B2 35 A7  4F 50 B2 4F 50 AA 32 38  |...TY.5.OP.OP.28|
00000880: 3A 89 37 31 30 00 8E 11  BC 02 89 38 35 30 00 98  |:.710......850..|
00000890: 11 C6 02 89 33 30 30 30  00 BF 11 D0 02 54 4E B2  |....3000.....TN.|
000008A0: C5 28 C8 28 52 24 2C 4C  4C AB 31 29 29 3A 8B 54  |.(.(R$,LL.1)):.T|
000008B0: 4E B1 32 35 35 A7 8D 37  37 30 3A 89 37 38 30 00  |N.255..770:.780.|
000008C0: D7 11 DA 02 8B 54 59 B2  32 A7 4F 50 B2 4F 50 AA  |.....TY.2.OP.OP.|
000008D0: 31 36 3A 89 37 36 30 00  F9 11 E4 02 8B 54 59 B2  |16:.760......TY.|
000008E0: 31 B0 54 59 B2 33 B0 54  59 B2 35 A7 4F 50 B2 4F  |1.TY.3.TY.5.OP.O|
000008F0: 50 AA 32 30 3A 89 37 36  30 00 02 12 EE 02 89 38  |P.20:.760......8|
00000900: 35 30 00 0C 12 F8 02 89  32 30 30 30 00 29 12 02  |50......2000.)..|
00000910: 03 48 25 B2 54 4E AD 32  35 36 3A 4C 25 B2 54 4E  |.H%.TN.256:L%.TN|
00000920: AB 32 35 36 AC 48 25 3A  8E 00 41 12 0C 03 8B 54  |.256.H%:..A....T|
00000930: 59 B2 32 A7 4F 50 B2 4F  50 AA 32 34 3A 89 38 31  |Y.2.OP.OP.24:.81|
00000940: 30 00 63 12 16 03 8B 54  59 B2 31 B0 54 59 B2 33  |0.c....TY.1.TY.3|
00000950: B0 54 59 B2 35 A7 4F 50  B2 4F 50 AA 32 38 3A 89  |.TY.5.OP.OP.28:.|
00000960: 38 31 30 00 6C 12 20 03  89 38 35 30 00 76 12 2A  |810.l. ..850.v.*|
00000970: 03 89 33 30 30 30 00 83  12 34 03 54 4E B2 C5 28  |..3000...4.TN..(|
00000980: 52 24 29 00 8C 12 3E 03  8D 37 37 30 00 95 12 48  |R$)...>..770...H|
00000990: 03 89 37 31 30 00 AA 12  52 03 99 22 12 20 45 52  |..710...R..". ER|
000009A0: 52 4F 52 20 22 3A 89 32  33 30 00 C4 12 E8 03 8F  |ROR ":.230......|
000009B0: 20 31 20 42 59 54 45 20  49 4E 53 54 52 55 43 54  | 1 BYTE INSTRUCT|
000009C0: 49 4F 4E 53 00 E1 12 F2  03 97 53 41 2C 4F 50 3A  |IONS......SA,OP:|
000009D0: 53 41 B2 53 41 AA 31 3A  8B 48 B2 31 A7 31 30 33  |SA.SA.1:.H.1.103|
000009E0: 30 00 EE 12 FC 03 99 4F  50 3A 89 32 33 30 00 07  |0......OP:.230..|
000009F0: 13 06 04 44 45 B2 4F 50  3A 8D 34 30 30 30 3A 99  |...DE.OP:.4000:.|
00000A00: 48 24 3A 89 32 33 30 00  21 13 D0 07 8F 20 32 20  |H$:.230.!.... 2 |
00000A10: 42 59 54 45 20 49 4E 53  54 52 55 43 54 49 4F 4E  |BYTE INSTRUCTION|
00000A20: 53 00 4A 13 D5 07 8B 54  4E B1 32 35 35 A7 99 22  |S.J....TN.255.."|
00000A30: 20 49 4E 43 4F 52 52 45  43 54 20 41 52 47 55 4D  | INCORRECT ARGUM|
00000A40: 45 4E 54 2E 22 3A 89 32  33 30 00 70 13 DA 07 97  |ENT.":.230.p....|
00000A50: 53 41 2C 4F 50 3A 97 53  41 AA 31 2C 54 4E 3A 53  |SA,OP:.SA.1,TN:S|
00000A60: 41 B2 53 41 AA 32 3A 8B  48 B2 31 A7 32 30 33 30  |A.SA.2:.H.1.2030|
00000A70: 00 80 13 E4 07 99 4F 50  3B 54 4E 3A 89 32 33 30  |......OP;TN:.230|
00000A80: 00 98 13 EE 07 44 45 B2  4F 50 3A 8D 34 30 30 30  |.....DE.OP:.4000|
00000A90: 3A 99 48 24 22 20 22 3B  00 B1 13 F8 07 44 45 B2  |:.H$" ";.....DE.|
00000AA0: 54 4E 3A 8D 34 30 30 30  3A 99 48 24 3A 89 32 33  |TN:.4000:.H$:.23|
00000AB0: 30 00 CB 13 B8 0B 8F 20  33 20 42 59 54 45 20 49  |0...... 3 BYTE I|
00000AC0: 4E 53 54 52 55 43 54 49  4F 4E 53 00 FA 13 C2 0B  |NSTRUCTIONS.....|
00000AD0: 97 53 41 2C 4F 50 3A 97  53 41 AA 31 2C 4C 25 3A  |.SA,OP:.SA.1,L%:|
00000AE0: 97 53 41 AA 32 2C 48 25  3A 53 41 B2 53 41 AA 33  |.SA.2,H%:SA.SA.3|
00000AF0: 3A 8B 48 B2 31 A7 33 30  33 30 00 0D 14 CC 0B 99  |:.H.1.3030......|
00000B00: 4F 50 3B 4C 25 3B 48 25  3A 89 32 33 30 00 25 14  |OP;L%;H%:.230.%.|
00000B10: D6 0B 44 45 B2 4F 50 3A  8D 34 30 30 30 3A 99 48  |..DE.OP:.4000:.H|
00000B20: 24 22 20 22 3B 00 3D 14  E0 0B 44 45 B2 4C 25 3A  |$" ";.=...DE.L%:|
00000B30: 8D 34 30 30 30 3A 99 48  24 22 20 22 3B 00 56 14  |.4000:.H$" ";.V.|
00000B40: EA 0B 44 45 B2 48 25 3A  8D 34 30 30 30 3A 99 48  |..DE.H%:.4000:.H|
00000B50: 24 3A 89 32 33 30 00 78  14 A0 0F 8F 20 20 20 44  |$:.230.x....   D|
00000B60: 45 43 49 4D 41 4C 20 54  4F 20 48 45 58 20 28 44  |ECIMAL TO HEX (D|
00000B70: 45 20 54 4F 20 48 24 29  00 BC 14 AA 0F 48 24 B2  |E TO H$).....H$.|
00000B80: 22 22 3A 81 4D B2 53 5A  A4 30 A9 AB 31 3A 4E 25  |"":.M.SZ.0..1:N%|
00000B90: B2 44 45 AD 28 31 36 AE  4D 29 3A 44 45 B2 44 45  |.DE.(16.M):DE.DE|
00000BA0: AB 4E 25 AC 31 36 AE 4D  3A 48 24 B2 48 24 AA CA  |.N%.16.M:H$.H$..|
00000BB0: 28 48 45 24 2C 4E 25 AA  31 2C 31 29 00 C9 14 B4  |(HE$,N%.1,1)....|
00000BC0: 0F 82 3A 53 5A B2 31 3A  8E 00 EA 14 88 13 8F 20  |..:SZ.1:....... |
00000BD0: 20 48 45 58 20 54 4F 20  44 45 43 49 4D 41 4C 20  | HEX TO DECIMAL |
00000BE0: 28 48 24 20 54 4F 20 44  45 29 00 22 15 92 13 44  |(H$ TO DE)."...D|
00000BF0: B2 30 3A 51 B2 33 3A 81  4D B2 31 A4 34 3A 81 57  |.0:Q.3:.M.1.4:.W|
00000C00: B2 30 A4 31 35 3A 8B CA  28 48 24 2C 4D 2C 31 29  |.0.15:..(H$,M,1)|
00000C10: B2 CA 28 48 45 24 2C 57  AA 31 2C 31 29 A7 35 30  |..(HE$,W.1,1).50|
00000C20: 33 30 00 29 15 9C 13 82  57 00 55 15 A6 13 44 31  |30.)....W.U...D1|
00000C30: B2 57 AC 28 31 36 AE 28  51 29 29 3A 44 B2 44 AA  |.W.(16.(Q)):D.D.|
00000C40: 44 31 3A 51 B2 51 AB 31  3A 82 4D 3A 44 45 B2 B5  |D1:Q.Q.1:.M:DE..|
00000C50: 28 44 29 3A 8E 00 8F 15  70 17 8F 20 41 43 43 45  |(D):....p.. ACCE|
00000C60: 50 54 20 48 45 58 20 4F  50 43 4F 44 45 20 49 4E  |PT HEX OPCODE IN|
00000C70: 50 55 54 20 41 4E 44 20  54 52 41 4E 53 4C 41 54  |PUT AND TRANSLAT|
00000C80: 45 20 49 54 20 54 4F 20  44 45 43 49 4D 41 4C 00  |E IT TO DECIMAL.|
00000C90: C5 15 7A 17 8B C8 28 52  24 2C 31 29 B2 22 23 22  |..z...(R$,1)."#"|
00000CA0: A7 48 24 B2 22 30 30 22  AA C9 28 52 24 2C 32 29  |.H$."00"..(R$,2)|
00000CB0: 3A 8D 35 30 30 30 3A 52  24 B2 22 23 22 AA C4 28  |:.5000:R$."#"..(|
00000CC0: 44 45 29 3A 8E 00 FC 15  84 17 4C 53 B2 C3 28 52  |DE):......LS..(R|
00000CD0: 24 29 3A 41 5A 24 B2 C8  28 52 24 2C 31 29 3A 5A  |$):AZ$..(R$,1):Z|
00000CE0: 41 24 B2 CA 28 52 24 2C  4C 53 2C 31 29 3A 8B 41  |A$..(R$,LS,1):.A|
00000CF0: 5A 24 B3 B1 22 28 22 A7  36 30 35 30 00 35 16 8E  |Z$.."(".6050.5..|
00000D00: 17 8B 5A 41 24 B2 22 59  22 A7 48 24 B2 22 30 30  |..ZA$."Y".H$."00|
00000D10: 22 AA CA 28 52 24 2C 32  2C 32 29 3A 8D 35 30 30  |"..(R$,2,2):.500|
00000D20: 30 3A 52 24 B2 22 28 22  AA C4 28 44 45 29 AA 22  |0:R$."("..(DE)."|
00000D30: 29 59 22 3A 8E 00 6E 16  98 17 8B 5A 41 24 B2 22  |)Y":..n....ZA$."|
00000D40: 29 22 A7 48 24 B2 22 30  30 22 AA CA 28 52 24 2C  |)".H$."00"..(R$,|
00000D50: 32 2C 32 29 3A 8D 35 30  30 30 3A 52 24 B2 22 28  |2,2):.5000:R$."(|
00000D60: 22 AA C4 28 44 45 29 AA  22 58 29 22 3A 8E 00 88  |"..(DE)."X)":...|
00000D70: 16 A2 17 8B 5A 41 24 B2  22 58 22 B0 5A 41 24 B2  |....ZA$."X".ZA$.|
00000D80: 22 59 22 A7 36 30 37 30  00 AF 16 AC 17 48 24 B2  |"Y".6070.....H$.|
00000D90: C8 28 5A 4F 24 2C 34 AB  4C 53 29 AA 52 24 3A 8D  |.(ZO$,4.LS).R$:.|
00000DA0: 35 30 30 30 3A 52 24 B2  C4 28 44 45 29 3A 8E 00  |5000:R$..(DE):..|
00000DB0: CA 16 B6 17 8B 4C 53 B2  35 A7 48 24 B2 C8 28 52  |.....LS.5.H$..(R|
00000DC0: 24 2C 34 29 3A 89 36 30  39 30 00 DE 16 C0 17 48  |$,4):.6090.....H|
00000DD0: 24 B2 22 30 30 22 AA C8  28 52 24 2C 32 29 00 F7  |$."00"..(R$,2)..|
00000DE0: 16 CA 17 8D 35 30 30 30  3A 52 24 B2 C4 28 44 45  |....5000:R$..(DE|
00000DF0: 29 AA 5A 41 24 3A 8E 00  3C 17 20 4E 83 41 44 43  |).ZA$:..<. N.ADC|
00000E00: 31 30 39 37 2C 41 4E 44  31 30 33 33 2C 41 53 4C  |1097,AND1033,ASL|
00000E10: 33 30 30 32 2C 42 43 43  38 31 34 34 2C 42 43 53  |3002,BCC8144,BCS|
00000E20: 38 31 37 36 2C 42 45 51  38 32 34 30 2C 42 49 54  |8176,BEQ8240,BIT|
00000E30: 37 30 33 36 2C 42 4D 49  38 30 34 38 00 81 17 2A  |7036,BMI8048...*|
00000E40: 4E 83 42 4E 45 38 32 30  38 2C 42 50 4C 38 30 31  |N.BNE8208,BPL801|
00000E50: 36 2C 42 52 4B 30 30 30  30 2C 42 56 43 38 30 38  |6,BRK0000,BVC808|
00000E60: 30 2C 42 56 53 38 31 31  32 2C 43 4C 43 30 30 32  |0,BVS8112,CLC002|
00000E70: 34 2C 43 4C 44 30 32 31  36 2C 43 4C 49 30 30 38  |4,CLD0216,CLI008|
00000E80: 38 00 C6 17 34 4E 83 43  4C 56 30 31 38 34 2C 43  |8...4N.CLV0184,C|
00000E90: 4D 50 31 31 39 33 2C 43  50 58 34 32 32 34 2C 43  |MP1193,CPX4224,C|
00000EA0: 50 59 34 31 39 32 2C 44  45 43 32 31 39 38 2C 44  |PY4192,DEC2198,D|
00000EB0: 45 58 30 32 30 32 2C 44  45 59 30 31 33 36 2C 45  |EX0202,DEY0136,E|
00000EC0: 4F 52 31 30 36 35 00 0B  18 3E 4E 83 49 4E 43 32  |OR1065...>N.INC2|
00000ED0: 32 33 30 2C 49 4E 58 30  32 33 32 2C 49 4E 59 30  |230,INX0232,INY0|
00000EE0: 32 30 30 2C 4A 4D 50 36  30 37 36 2C 4A 53 52 39  |200,JMP6076,JSR9|
00000EF0: 30 33 32 2C 4C 44 41 31  31 36 31 2C 4C 44 58 35  |032,LDA1161,LDX5|
00000F00: 31 36 32 2C 4C 44 59 35  31 36 30 00 50 18 48 4E  |162,LDY5160.P.HN|
00000F10: 83 4C 53 52 33 30 36 36  2C 4E 4F 50 30 32 33 34  |.LSR3066,NOP0234|
00000F20: 2C 4F 52 41 31 30 30 31  2C 50 48 41 30 30 37 32  |,ORA1001,PHA0072|
00000F30: 2C 50 48 50 30 30 30 38  2C 50 4C 41 30 31 30 34  |,PHP0008,PLA0104|
00000F40: 2C 50 4C 50 30 30 34 30  2C 52 4F 4C 33 30 33 34  |,PLP0040,ROL3034|
00000F50: 00 95 18 52 4E 83 52 4F  52 33 30 39 38 2C 52 54  |...RN.ROR3098,RT|
00000F60: 49 30 30 36 34 2C 52 54  53 30 30 39 36 2C 53 42  |I0064,RTS0096,SB|
00000F70: 43 31 32 32 35 2C 53 45  43 30 30 35 36 2C 53 45  |C1225,SEC0056,SE|
00000F80: 44 30 32 34 38 2C 53 45  49 30 31 32 30 2C 53 54  |D0248,SEI0120,ST|
00000F90: 41 31 31 32 39 00 DA 18  5C 4E 83 53 54 58 32 31  |A1129...\N.STX21|
00000FA0: 33 34 2C 53 54 59 32 31  33 32 2C 54 41 58 30 31  |34,STY2132,TAX01|
00000FB0: 37 30 2C 54 41 59 30 31  36 38 2C 54 53 58 30 31  |70,TAY0168,TSX01|
00000FC0: 38 36 2C 54 58 41 30 31  33 38 2C 54 58 53 30 31  |86,TXA0138,TXS01|
00000FD0: 35 34 2C 54 59 41 30 31  35 32 00 00 00           |54,TYA0152...   |

......H.0:. IF H=0 THEN ASSEMBLY IS IN D
ECIMAL.X.2.HE$."0123456789ABCDEF":SZ.1:Z
O$."000"...D.."   SIMPLE   ASSEMBLER  CO
NVENTIONS:"...N..M$(56),TY(56),OP(56)...
X..I.1.56:.M$(I).T.Z.ROP$.J(M$(I),4,1):T
Y(I).E(ROP$)...|.OP$.I(M$(I),3):OP(I).E(
OP$)...~.M$(I).H(M$(I),3)......I:.......
"IMMEDIATE     LDA #15.K...."ABSOLUTE   
   LDA 1500.F. .."ZERO PAGE     LDA 15.~
...."ACCUMULATOR   ASL......"INDIRECT X 
   LDA (15X)......"INDIRECT Y    LDA (15
)Y.V...."ZERO PAGE X   LDA 15X......"ZER
O PAGE Y   LDX 15Y......"ABSOLUTE X    L
DA 1500X......"ABSOLUTE Y    LDA 1500Y.R
....:."    ENTER ALL NUMBERS IN ";.G....
H.1.."HEX":.200.V.C.."DECIMAL"...H..:."P
LEASE INPUT STARTING ADDRESS FOR ML PROG
RAM":.SA$.R.R..H.1.H$.SA$:.5000:SA.DE:.2
20...W.SA.E(SA$).....TA.SA:.".":. CLEAR 
THE SCREEN.&....H.1.DE.SA:SZ.3:.4000:.H$
;:.240.2....SA" ";.I....MN$:.".".20);:. 
GO UP ONE LINE AND OVER 20 SPACES...... 
ADD NEW PSEUDO-OPS HERE......I(MN$,7)."F
ORWARD".FB.SA......I(MN$,7)."RESOLVE".FR
.SA.FB:.FB.1,FR.2:."  OK":.230......I(MN
$,4)."POKE".."ADDR,NUMBER(DEC)";.4....I(
MN$,4)."POKE"..ADR,NUM:.ADR,NUM:.230.H..
..MN$."END"..:."      PROGRAM IS FROM"TA
"TO"SA:......L.C(MN$):L$.H(MN$,3)......I
.1.56:.L$.M$(I).300......I..."..850.K.,.
. PRIMARY OPCODE CATEGORIES...-.TY.TY(I)
:OP.OP(I)...1..FB.SA.TN.0:.2010...6..TY.
0..1000.).@..TY.3.TY.1:.L.3.OP.OP.8:.100
0.F.J.R$.I(MN$,L.4):.H.1..6000.L.T.LR$.H
(R$,1):LL.C(R$):.LR$."#".480.}.^..LR$."(
".520...H..TY.8.600...R..TY.3.OP.OP.8:.1
000.D.|..I(R$,1)."X".I(R$,1)."Y".630.Y..
..H(L$,1)."J".820.....TN.E(R$):.TN.255.4
30......TY.1.TY.3.TY.4.TY.5.OP.OP.4.....
.2000.P...H%.TN.256:L%.TN.256.H%:.TY.2.T
Y.7.OP.OP.8:.470.W....TY.1.TY.3.TY.4.TY.
5.OP.OP.12:.470...B..TY.6.TY.9.470...L..
850...V..3000.....TN.E(I(R$,LL.1)).J....
TY.1.OP.OP.8:.2000......TY.4.TY.5..2000.
.....850......I(R$,2).")Y".540......I(R$
,2)."X)".570.+...TN.E(J(R$,2,LL.3)).D.&.
.TY.1.OP.OP.16:.2000.M.0..850.D.:.TN.E(J
(R$,2,LL.3)).T.D..TY.1..2000.}.N..850...
X.TN.E(R$):TN.TN.SA.2:.TN..128.TN.127.."
TOO FAR ";:.850.K.B..TN.0.TN.TN.256.U.L.
.2000...V..I(R$,2).")Y".540......I(R$,1)
."X".720...... *ZERO Y./...TN.E(H(R$,LL.
1)):.TN.255.680.B....TY.2.TY.5.730.P....
TY.1.760.M....770:.TY.1.OP.OP.24:.710...
...TY.5.OP.OP.28:.710......850...F..3000
...P.TN.E(H(R$,LL.1)):.TN.255..770:.780.
W.Z..TY.2.OP.OP.16:.760......TY.1.TY.3.T
Y.5.OP.OP.20:.760......850......2000.)..
.H%.TN.256:L%.TN.256.H%:..A....TY.2.OP.O
P.24:.810.C....TY.1.TY.3.TY.5.OP.OP.28:.
810.L. ..850.V.*..3000...4.TN.E(R$)...>.
.770...H..710...R..". ERROR ":.230.D....
 1 BYTE INSTRUCTIONS......SA,OP:SA.SA.1:
.H.1.1030......OP:.230.....DE.OP:.4000:.
H$:.230.!.P.. 2 BYTE INSTRUCTIONS.J.U..T
N.255.." INCORRECT ARGUMENT.":.230.P.Z..
SA,OP:.SA.1,TN:SA.SA.2:.H.1.2030......OP
;TN:.230.....DE.OP:.4000:.H$" ";.....DE.
TN:.4000:.H$:.230.K.... 3 BYTE INSTRUCTI
ONS...B..SA,OP:.SA.1,L%:.SA.2,H%:SA.SA.3
:.H.1.3030...L..OP;L%;H%:.230.%.V.DE.OP:
.4000:.H$" ";.=...DE.L%:.4000:.H$" ";.V.
..DE.H%:.4000:.H$:.230.X. ..   DECIMAL T
O HEX (DE TO H$).....H$."":.M.SZ.0..1:N%
.DE.(16.M):DE.DE.N%.16.M:H$.H$.J(HE$,N%.
1,1).I....:SZ.1:.......  HEX TO DECIMAL 
(H$ TO DE)."...D.0:Q.3:.M.1.4:.W.0.15:.J
(H$,M,1).J(HE$,W.1,1).5030.)....W.U...D1
.W.(16.(Q)):D.D.D1:Q.Q.1:.M:DE..(D):....
P.. ACCEPT HEX OPCODE INPUT AND TRANSLAT
E IT TO DECIMAL.E.Z..H(R$,1)."#".H$."00"
.I(R$,2):.5000:R$."#".D(DE):......LS.C(R
$):AZ$.H(R$,1):ZA$.J(R$,LS,1):.AZ$.."(".
6050.5....ZA$."Y".H$."00".J(R$,2,2):.500
0:R$."(".D(DE).")Y":..N....ZA$.")".H$."0
0".J(R$,2,2):.5000:R$."(".D(DE)."X)":...
....ZA$."X".ZA$."Y".6070.....H$.H(ZO$,4.
LS).R$:.5000:R$.D(DE):..J....LS.5.H$.H(R
$,4):.6090.....H$."00".H(R$,2)...J..5000
:R$.D(DE).ZA$:..<. N.ADC1097,AND1033,ASL
3002,BCC8144,BCS8176,BEQ8240,BIT7036,BMI
8048...*N.BNE8208,BPL8016,BRK0000,BVC808
0,BVS8112,CLC0024,CLD0216,CLI0088.F.4N.C
LV0184,CMP1193,CPX4224,CPY4192,DEC2198,D
EX0202,DEY0136,EOR1065...>N.INC2230,INX0
232,INY0200,JMP6076,JSR9032,LDA1161,LDX5
162,LDY5160.P.HN.LSR3066,NOP0234,ORA1001
,PHA0072,PHP0008,PLA0104,PLP0040,ROL3034
...RN.ROR3098,RTI0064,RTS0096,SBC1225,SE
C0056,SED0248,SEI0120,STA1129.Z.\N.STX21
34,STY2132,TAX0170,TAY0168,TSX0186,TXA01
38,TXS0154,TYA0152...

×

C64 Image

> CLICK IMAGE PREVIEW FOR FULL MODAL