SIMPLE ASSEMBLER
FILE INFORMATION
FILENAME(S): SIMPLE ASSEMBLER
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-10-19 22:48:33
APPEARS ON: 1 disk(s)
FILE HASH
f06ace89a91b437c980ad528b25e5a4542eaafba9be03e3c7c2511d51f08fca1
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAZETTE OCT 86 | SIMPLE ASSEMBLER | PRG | Radd Maxx | 26 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 30 08 0A 00 48 B2 30 3A 8F 20 49 46 20 48 |..0...H.0:. IF H|
00000010: 20 3D 20 30 20 54 48 45 4E 20 41 53 53 45 4D 42 | = 0 THEN ASSEMB|
00000020: 4C 59 20 49 53 20 49 4E 20 44 45 43 49 4D 41 4C |LY IS IN DECIMAL|
00000030: 00 5A 08 32 00 48 45 24 B2 22 30 31 32 33 34 35 |.Z.2.HE$."012345|
00000040: 36 37 38 39 41 42 43 44 45 46 22 3A 53 5A B2 31 |6789ABCDEF":SZ.1|
00000050: 3A 5A 4F 24 B2 22 30 30 30 22 00 87 08 64 00 99 |:ZO$."000"...d..|
00000060: 22 93 05 20 20 20 53 49 4D 50 4C 45 20 20 20 41 |".. SIMPLE A|
00000070: 53 53 45 4D 42 4C 45 52 20 20 43 4F 4E 56 45 4E |SSEMBLER CONVEN|
00000080: 54 49 4F 4E 53 3A 22 00 A1 08 6E 00 86 4D 24 28 |TIONS:"...n..M$(|
00000090: 35 36 29 2C 54 59 28 35 36 29 2C 4F 50 28 35 36 |56),TY(56),OP(56|
000000A0: 29 00 B4 08 78 00 81 49 B2 31 A4 35 36 3A 87 4D |)...x..I.1.56:.M|
000000B0: 24 28 49 29 00 D8 08 7A 00 52 4F 50 24 B2 CA 28 |$(I)...z.ROP$..(|
000000C0: 4D 24 28 49 29 2C 34 2C 31 29 3A 54 59 28 49 29 |M$(I),4,1):TY(I)|
000000D0: B2 C5 28 52 4F 50 24 29 00 F8 08 7C 00 4F 50 24 |..(ROP$)...|.OP$|
000000E0: B2 C9 28 4D 24 28 49 29 2C 33 29 3A 4F 50 28 49 |..(M$(I),3):OP(I|
000000F0: 29 B2 C5 28 4F 50 24 29 00 0D 09 7E 00 4D 24 28 |)..(OP$)...~.M$(|
00000100: 49 29 B2 C8 28 4D 24 28 49 29 2C 33 29 00 17 09 |I)..(M$(I),3)...|
00000110: 8C 00 82 49 3A 20 99 00 33 09 96 00 99 22 49 4D |...I: ..3...."IM|
00000120: 4D 45 44 49 41 54 45 20 20 20 20 20 4C 44 41 20 |MEDIATE LDA |
00000130: 23 31 35 00 50 09 9B 00 99 22 41 42 53 4F 4C 55 |#15.P...."ABSOLU|
00000140: 54 45 20 20 20 20 20 20 4C 44 41 20 31 35 30 30 |TE LDA 1500|
00000150: 00 6B 09 A0 00 99 22 5A 45 52 4F 20 50 41 47 45 |.k...."ZERO PAGE|
00000160: 20 20 20 20 20 4C 44 41 20 31 35 00 83 09 A5 00 | LDA 15.....|
00000170: 99 22 41 43 43 55 4D 55 4C 41 54 4F 52 20 20 20 |."ACCUMULATOR |
00000180: 41 53 4C 00 A1 09 AA 00 99 22 49 4E 44 49 52 45 |ASL......"INDIRE|
00000190: 43 54 20 58 20 20 20 20 4C 44 41 20 28 31 35 58 |CT X LDA (15X|
000001A0: 29 00 BF 09 AF 00 99 22 49 4E 44 49 52 45 43 54 |)......"INDIRECT|
000001B0: 20 59 20 20 20 20 4C 44 41 20 28 31 35 29 59 00 | Y LDA (15)Y.|
000001C0: DB 09 B1 00 99 22 5A 45 52 4F 20 50 41 47 45 20 |....."ZERO PAGE |
000001D0: 58 20 20 20 4C 44 41 20 31 35 58 00 F7 09 B3 00 |X LDA 15X.....|
000001E0: 99 22 5A 45 52 4F 20 50 41 47 45 20 59 20 20 20 |."ZERO PAGE Y |
000001F0: 4C 44 58 20 31 35 59 00 15 0A B4 00 99 22 41 42 |LDX 15Y......"AB|
00000200: 53 4F 4C 55 54 45 20 58 20 20 20 20 4C 44 41 20 |SOLUTE X LDA |
00000210: 31 35 30 30 58 00 33 0A B9 00 99 22 41 42 53 4F |1500X.3...."ABSO|
00000220: 4C 55 54 45 20 59 20 20 20 20 4C 44 41 20 31 35 |LUTE Y LDA 15|
00000230: 30 30 59 00 57 0A BD 00 99 3A 99 22 20 20 20 20 |00Y.W....:." |
00000240: 45 4E 54 45 52 20 41 4C 4C 20 4E 55 4D 42 45 52 |ENTER ALL NUMBER|
00000250: 53 20 49 4E 20 22 3B 00 6D 0A BE 00 8B 48 B2 31 |S IN ";.m....H.1|
00000260: 20 A7 99 22 48 45 58 22 3A 89 32 30 30 00 7C 0A | .."HEX":.200.|.|
00000270: C3 00 99 22 44 45 43 49 4D 41 4C 22 00 B8 0A C8 |..."DECIMAL"....|
00000280: 00 99 3A 99 22 50 4C 45 41 53 45 20 49 4E 50 55 |..:."PLEASE INPU|
00000290: 54 20 53 54 41 52 54 49 4E 47 20 41 44 44 52 45 |T STARTING ADDRE|
000002A0: 53 53 20 46 4F 52 20 4D 4C 20 50 52 4F 47 52 41 |SS FOR ML PROGRA|
000002B0: 4D 22 3A 85 20 53 41 24 00 D9 0A D2 00 8B 48 B2 |M":. SA$......H.|
000002C0: 31 A7 48 24 B2 53 41 24 3A 8D 35 30 30 30 3A 53 |1.H$.SA$:.5000:S|
000002D0: 41 B2 44 45 3A 89 32 32 30 00 E7 0A D7 00 53 41 |A.DE:.220.....SA|
000002E0: B2 C5 28 53 41 24 29 00 09 0B DC 00 54 41 B2 53 |..(SA$).....TA.S|
000002F0: 41 3A 99 22 93 22 3A 8F 20 43 4C 45 41 52 20 54 |A:.".":. CLEAR T|
00000300: 48 45 20 53 43 52 45 45 4E 00 2D 0B E6 00 8B 48 |HE SCREEN.-....H|
00000310: B2 31 A7 44 45 B2 53 41 3A 53 5A B2 33 3A 8D 34 |.1.DE.SA:SZ.3:.4|
00000320: 30 30 30 3A 99 48 24 3B 3A 89 32 34 30 00 39 0B |000:.H$;:.240.9.|
00000330: EB 00 99 53 41 22 20 22 3B 00 70 0B F0 00 85 4D |...SA" ";.p....M|
00000340: 4E 24 3A 99 22 91 22 A6 32 30 29 3B 3A 8F 20 47 |N$:.".".20);:. G|
00000350: 4F 20 55 50 20 4F 4E 45 20 4C 49 4E 45 20 41 4E |O UP ONE LINE AN|
00000360: 44 20 4F 56 45 52 20 32 30 20 53 50 41 43 45 53 |D OVER 20 SPACES|
00000370: 00 8E 0B F1 00 8F 20 41 44 44 20 4E 45 57 20 50 |...... ADD NEW P|
00000380: 53 45 55 44 4F 2D 4F 50 53 20 48 45 52 45 00 AC |SEUDO-OPS HERE..|
00000390: 0B F2 00 8B C9 28 4D 4E 24 2C 37 29 B2 22 46 4F |.....(MN$,7)."FO|
000003A0: 52 57 41 52 44 22 A7 46 42 B2 53 41 00 E5 0B F3 |RWARD".FB.SA....|
000003B0: 00 8B C9 28 4D 4E 24 2C 37 29 B2 22 52 45 53 4F |...(MN$,7)."RESO|
000003C0: 4C 56 45 22 A7 46 52 B2 53 41 AB 46 42 3A 97 46 |LVE".FR.SA.FB:.F|
000003D0: 42 AA 31 2C 46 52 AB 32 3A 99 22 20 20 4F 4B 22 |B.1,FR.2:." OK"|
000003E0: 3A 89 32 33 30 00 0F 0C F4 00 8B C9 28 4D 4E 24 |:.230.......(MN$|
000003F0: 2C 34 29 B2 22 50 4F 4B 45 22 A7 99 22 41 44 44 |,4)."POKE".."ADD|
00000400: 52 2C 4E 55 4D 42 45 52 28 44 45 43 29 22 3B 00 |R,NUMBER(DEC)";.|
00000410: 3B 0C F5 00 8B C9 28 4D 4E 24 2C 34 29 B2 22 50 |;.....(MN$,4)."P|
00000420: 4F 4B 45 22 A7 85 41 44 52 2C 4E 55 4D 3A 97 41 |OKE"..ADR,NUM:.A|
00000430: 44 52 2C 4E 55 4D 3A 89 32 33 30 00 6F 0C FA 00 |DR,NUM:.230.o...|
00000440: 8B 4D 4E 24 B2 22 45 4E 44 22 A7 99 3A 99 22 20 |.MN$."END"..:." |
00000450: 20 20 20 20 20 50 52 4F 47 52 41 4D 20 49 53 20 | PROGRAM IS |
00000460: 46 52 4F 4D 22 54 41 22 54 4F 22 53 41 3A 80 00 |FROM"TA"TO"SA:..|
00000470: 88 0C 04 01 4C B2 C3 28 4D 4E 24 29 3A 4C 24 B2 |....L..(MN$):L$.|
00000480: C8 28 4D 4E 24 2C 33 29 00 A2 0C 0E 01 81 49 B2 |.(MN$,3)......I.|
00000490: 31 A4 35 36 3A 8B 4C 24 B2 4D 24 28 49 29 A7 33 |1.56:.L$.M$(I).3|
000004A0: 30 30 00 A9 0C 18 01 82 49 00 B2 0C 22 01 89 38 |00......I..."..8|
000004B0: 35 30 00 D2 0C 2C 01 8F 20 50 52 49 4D 41 52 59 |50...,.. PRIMARY|
000004C0: 20 4F 50 43 4F 44 45 20 43 41 54 45 47 4F 52 49 | OPCODE CATEGORI|
000004D0: 45 53 00 E8 0C 2D 01 54 59 B2 54 59 28 49 29 3A |ES...-.TY.TY(I):|
000004E0: 4F 50 B2 4F 50 28 49 29 00 FE 0C 31 01 8B 46 42 |OP.OP(I)...1..FB|
000004F0: B2 53 41 A7 54 4E B2 30 3A 89 32 30 31 30 00 0E |.SA.TN.0:.2010..|
00000500: 0D 36 01 8B 54 59 B2 30 A7 89 31 30 30 30 00 30 |.6..TY.0..1000.0|
00000510: 0D 40 01 8B 54 59 B2 33 A7 54 59 B2 31 3A 8B 4C |.@..TY.3.TY.1:.L|
00000520: B2 33 A7 4F 50 B2 4F 50 AA 38 3A 89 31 30 30 30 |.3.OP.OP.8:.1000|
00000530: 00 4D 0D 4A 01 52 24 B2 C9 28 4D 4E 24 2C 4C AB |.M.J.R$..(MN$,L.|
00000540: 34 29 3A 8B 48 B2 31 A7 8D 36 30 30 30 00 73 0D |4):.H.1..6000.s.|
00000550: 54 01 4C 52 24 B2 C8 28 52 24 2C 31 29 3A 4C 4C |T.LR$..(R$,1):LL|
00000560: B2 C3 28 52 24 29 3A 8B 4C 52 24 B2 22 23 22 A7 |..(R$):.LR$."#".|
00000570: 34 38 30 00 84 0D 5E 01 8B 4C 52 24 B2 22 28 22 |480...^..LR$."("|
00000580: A7 35 32 30 00 92 0D 68 01 8B 54 59 B2 38 A7 36 |.520...h..TY.8.6|
00000590: 30 30 00 AA 0D 72 01 8B 54 59 B2 33 A7 4F 50 B2 |00...r..TY.3.OP.|
000005A0: 4F 50 AA 38 3A 89 31 30 30 30 00 CB 0D 7C 01 8B |OP.8:.1000...|..|
000005B0: C9 28 52 24 2C 31 29 B2 22 58 22 B0 C9 28 52 24 |.(R$,1)."X"..(R$|
000005C0: 2C 31 29 B2 22 59 22 A7 36 33 30 00 E0 0D 86 01 |,1)."Y".630.....|
000005D0: 8B C8 28 4C 24 2C 31 29 B2 22 4A 22 A7 38 32 30 |..(L$,1)."J".820|
000005E0: 00 F9 0D 90 01 54 4E B2 C5 28 52 24 29 3A 8B 54 |.....TN..(R$):.T|
000005F0: 4E B1 32 35 35 A7 34 33 30 00 1A 0E 9A 01 8B 54 |N.255.430......T|
00000600: 59 B2 31 B0 54 59 B2 33 B0 54 59 B2 34 B0 54 59 |Y.1.TY.3.TY.4.TY|
00000610: B2 35 A7 4F 50 B2 4F 50 AA 34 00 24 0E A4 01 89 |.5.OP.OP.4.$....|
00000620: 32 30 30 30 00 57 0E AE 01 48 25 B2 54 4E AD 32 |2000.W...H%.TN.2|
00000630: 35 36 3A 4C 25 B2 54 4E AB 32 35 36 AC 48 25 3A |56:L%.TN.256.H%:|
00000640: 8B 54 59 B2 32 B0 54 59 B2 37 A7 4F 50 B2 4F 50 |.TY.2.TY.7.OP.OP|
00000650: AA 38 3A 89 34 37 30 00 7E 0E B8 01 8B 54 59 B2 |.8:.470.~....TY.|
00000660: 31 B0 54 59 B2 33 B0 54 59 B2 34 B0 54 59 B2 35 |1.TY.3.TY.4.TY.5|
00000670: A7 4F 50 B2 4F 50 AA 31 32 3A 89 34 37 30 00 91 |.OP.OP.12:.470..|
00000680: 0E C2 01 8B 54 59 B2 36 B0 54 59 B2 39 A7 34 37 |....TY.6.TY.9.47|
00000690: 30 00 9A 0E CC 01 89 38 35 30 00 A4 0E D6 01 89 |0......850......|
000006A0: 33 30 30 30 00 B9 0E E0 01 54 4E B2 C5 28 C9 28 |3000.....TN..(.(|
000006B0: 52 24 2C 4C 4C AB 31 29 29 00 D1 0E EA 01 8B 54 |R$,LL.1))......T|
000006C0: 59 B2 31 A7 4F 50 B2 4F 50 AA 38 3A 89 32 30 30 |Y.1.OP.OP.8:.200|
000006D0: 30 00 E6 0E F4 01 8B 54 59 B2 34 B0 54 59 B2 35 |0......TY.4.TY.5|
000006E0: A7 89 32 30 30 30 00 EF 0E FE 01 89 38 35 30 00 |..2000......850.|
000006F0: 05 0F 08 02 8B C9 28 52 24 2C 32 29 B2 22 29 59 |......(R$,2).")Y|
00000700: 22 A7 35 34 30 00 1B 0F 12 02 8B C9 28 52 24 2C |".540.......(R$,|
00000710: 32 29 B2 22 58 29 22 A7 35 37 30 00 32 0F 1C 02 |2)."X)".570.2...|
00000720: 54 4E B2 C5 28 CA 28 52 24 2C 32 2C 4C 4C AB 33 |TN..(.(R$,2,LL.3|
00000730: 29 29 00 4B 0F 26 02 8B 54 59 B2 31 A7 4F 50 B2 |)).K.&..TY.1.OP.|
00000740: 4F 50 AA 31 36 3A 89 32 30 30 30 00 54 0F 30 02 |OP.16:.2000.T.0.|
00000750: 89 38 35 30 00 6B 0F 3A 02 54 4E B2 C5 28 CA 28 |.850.k.:.TN..(.(|
00000760: 52 24 2C 32 2C 4C 4C AB 33 29 29 00 7B 0F 44 02 |R$,2,LL.3)).{.D.|
00000770: 8B 54 59 B2 31 A7 89 32 30 30 30 00 84 0F 4E 02 |.TY.1..2000...N.|
00000780: 89 38 35 30 00 BE 0F 58 02 54 4E B2 C5 28 52 24 |.850...X.TN..(R$|
00000790: 29 3A 54 4E B2 54 4E AB 53 41 AB 32 3A 8B 54 4E |):TN.TN.SA.2:.TN|
000007A0: B3 AB 31 32 38 B0 54 4E B1 31 32 37 A7 99 22 54 |..128.TN.127.."T|
000007B0: 4F 4F 20 46 41 52 20 22 3B 3A 89 38 35 30 00 D2 |OO FAR ";:.850..|
000007C0: 0F 62 02 8B 54 4E B3 30 A7 54 4E B2 54 4E AA 32 |.b..TN.0.TN.TN.2|
000007D0: 35 36 00 DC 0F 6C 02 89 32 30 30 30 00 F2 0F 76 |56...l..2000...v|
000007E0: 02 8B C9 28 52 24 2C 32 29 B2 22 29 59 22 A7 35 |...(R$,2).")Y".5|
000007F0: 34 30 00 07 10 80 02 8B C9 28 52 24 2C 31 29 B2 |40.......(R$,1).|
00000800: 22 58 22 A7 37 32 30 00 15 10 8A 02 8F 20 2A 5A |"X".720...... *Z|
00000810: 45 52 4F 20 59 00 36 10 94 02 54 4E B2 C5 28 C8 |ERO Y.6...TN..(.|
00000820: 28 52 24 2C 4C 4C AB 31 29 29 3A 8B 54 4E B1 32 |(R$,LL.1)):.TN.2|
00000830: 35 35 A7 36 38 30 00 49 10 9E 02 8B 54 59 B2 32 |55.680.I....TY.2|
00000840: B0 54 59 B2 35 A7 37 33 30 00 57 10 A3 02 8B 54 |.TY.5.730.W....T|
00000850: 59 B2 31 A7 37 36 30 00 74 10 A8 02 8D 37 37 30 |Y.1.760.t....770|
00000860: 3A 8B 54 59 B2 31 A7 4F 50 B2 4F 50 AA 32 34 3A |:.TY.1.OP.OP.24:|
00000870: 89 37 31 30 00 8C 10 B2 02 8B 54 59 B2 35 A7 4F |.710......TY.5.O|
00000880: 50 B2 4F 50 AA 32 38 3A 89 37 31 30 00 95 10 BC |P.OP.28:.710....|
00000890: 02 89 38 35 30 00 9F 10 C6 02 89 33 30 30 30 00 |..850......3000.|
000008A0: C6 10 D0 02 54 4E B2 C5 28 C8 28 52 24 2C 4C 4C |....TN..(.(R$,LL|
000008B0: AB 31 29 29 3A 8B 54 4E B1 32 35 35 A7 8D 37 37 |.1)):.TN.255..77|
000008C0: 30 3A 89 37 38 30 00 DE 10 DA 02 8B 54 59 B2 32 |0:.780......TY.2|
000008D0: A7 4F 50 B2 4F 50 AA 31 36 3A 89 37 36 30 00 00 |.OP.OP.16:.760..|
000008E0: 11 E4 02 8B 54 59 B2 31 B0 54 59 B2 33 B0 54 59 |....TY.1.TY.3.TY|
000008F0: B2 35 A7 4F 50 B2 4F 50 AA 32 30 3A 89 37 36 30 |.5.OP.OP.20:.760|
00000900: 00 09 11 EE 02 89 38 35 30 00 13 11 F8 02 89 32 |......850......2|
00000910: 30 30 30 00 30 11 02 03 48 25 B2 54 4E AD 32 35 |000.0...H%.TN.25|
00000920: 36 3A 4C 25 B2 54 4E AB 32 35 36 AC 48 25 3A 8E |6:L%.TN.256.H%:.|
00000930: 00 48 11 0C 03 8B 54 59 B2 32 A7 4F 50 B2 4F 50 |.H....TY.2.OP.OP|
00000940: AA 32 34 3A 89 38 31 30 00 6A 11 16 03 8B 54 59 |.24:.810.j....TY|
00000950: B2 31 B0 54 59 B2 33 B0 54 59 B2 35 A7 4F 50 B2 |.1.TY.3.TY.5.OP.|
00000960: 4F 50 AA 32 38 3A 89 38 31 30 00 73 11 20 03 89 |OP.28:.810.s. ..|
00000970: 38 35 30 00 7D 11 2A 03 89 33 30 30 30 00 8A 11 |850.}.*..3000...|
00000980: 34 03 54 4E B2 C5 28 52 24 29 00 93 11 3E 03 8D |4.TN..(R$)...>..|
00000990: 37 37 30 00 9C 11 48 03 89 37 31 30 00 B1 11 52 |770...H..710...R|
000009A0: 03 99 22 12 20 45 52 52 4F 52 20 22 3A 89 32 33 |..". ERROR ":.23|
000009B0: 30 00 CB 11 E8 03 8F 20 31 20 42 59 54 45 20 49 |0...... 1 BYTE I|
000009C0: 4E 53 54 52 55 43 54 49 4F 4E 53 00 E9 11 F2 03 |NSTRUCTIONS.....|
000009D0: 97 53 41 2C 4F 50 3A 53 41 B2 53 41 AA 31 3A 8B |.SA,OP:SA.SA.1:.|
000009E0: 48 B2 31 A7 20 31 30 33 30 00 F6 11 FC 03 99 4F |H.1. 1030......O|
000009F0: 50 3A 89 32 33 30 00 11 12 06 04 44 45 20 B2 20 |P:.230.....DE . |
00000A00: 4F 50 3A 8D 34 30 30 30 3A 99 48 24 3A 89 32 33 |OP:.4000:.H$:.23|
00000A10: 30 00 2B 12 D0 07 8F 20 32 20 42 59 54 45 20 49 |0.+.... 2 BYTE I|
00000A20: 4E 53 54 52 55 43 54 49 4F 4E 53 00 54 12 D5 07 |NSTRUCTIONS.T...|
00000A30: 8B 54 4E B1 32 35 35 A7 99 22 20 49 4E 43 4F 52 |.TN.255.." INCOR|
00000A40: 52 45 43 54 20 41 52 47 55 4D 45 4E 54 2E 22 3A |RECT ARGUMENT.":|
00000A50: 89 32 33 30 00 7A 12 DA 07 97 53 41 2C 4F 50 3A |.230.z....SA,OP:|
00000A60: 97 53 41 AA 31 2C 54 4E 3A 53 41 B2 53 41 AA 32 |.SA.1,TN:SA.SA.2|
00000A70: 3A 8B 48 B2 31 A7 32 30 33 30 00 8A 12 E4 07 99 |:.H.1.2030......|
00000A80: 4F 50 3B 54 4E 3A 89 32 33 30 00 A4 12 EE 07 44 |OP;TN:.230.....D|
00000A90: 45 20 B2 20 4F 50 3A 8D 34 30 30 30 3A 99 48 24 |E . OP:.4000:.H$|
00000AA0: 22 20 22 3B 00 BF 12 F8 07 44 45 20 B2 20 54 4E |" ";.....DE . TN|
00000AB0: 3A 8D 34 30 30 30 3A 99 48 24 3A 89 32 33 30 00 |:.4000:.H$:.230.|
00000AC0: D9 12 B8 0B 8F 20 33 20 42 59 54 45 20 49 4E 53 |..... 3 BYTE INS|
00000AD0: 54 52 55 43 54 49 4F 4E 53 00 08 13 C2 0B 97 53 |TRUCTIONS......S|
00000AE0: 41 2C 4F 50 3A 97 53 41 AA 31 2C 4C 25 3A 97 53 |A,OP:.SA.1,L%:.S|
00000AF0: 41 AA 32 2C 48 25 3A 53 41 B2 53 41 AA 33 3A 8B |A.2,H%:SA.SA.3:.|
00000B00: 48 B2 31 A7 33 30 33 30 00 1B 13 CC 0B 99 4F 50 |H.1.3030......OP|
00000B10: 3B 4C 25 3B 48 25 3A 89 32 33 30 00 35 13 D6 0B |;L%;H%:.230.5...|
00000B20: 44 45 20 B2 20 4F 50 3A 8D 34 30 30 30 3A 99 48 |DE . OP:.4000:.H|
00000B30: 24 22 20 22 3B 00 4F 13 E0 0B 44 45 20 B2 20 4C |$" ";.O...DE . L|
00000B40: 25 3A 8D 34 30 30 30 3A 99 48 24 22 20 22 3B 00 |%:.4000:.H$" ";.|
00000B50: 6A 13 EA 0B 44 45 20 B2 20 48 25 3A 8D 34 30 30 |j...DE . H%:.400|
00000B60: 30 3A 99 48 24 3A 89 32 33 30 00 8B 13 A0 0F 8F |0:.H$:.230......|
00000B70: 20 20 44 45 43 49 4D 41 4C 20 54 4F 20 48 45 58 | DECIMAL TO HEX|
00000B80: 20 28 44 45 20 54 4F 20 48 24 29 00 CF 13 AA 0F | (DE TO H$).....|
00000B90: 48 24 B2 22 22 3A 81 4D B2 53 5A A4 30 A9 AB 31 |H$."":.M.SZ.0..1|
00000BA0: 3A 4E 25 B2 44 45 AD 28 31 36 AE 4D 29 3A 44 45 |:N%.DE.(16.M):DE|
00000BB0: B2 44 45 AB 4E 25 AC 31 36 AE 4D 3A 48 24 B2 48 |.DE.N%.16.M:H$.H|
00000BC0: 24 AA CA 28 48 45 24 2C 4E 25 AA 31 2C 31 29 00 |$..(HE$,N%.1,1).|
00000BD0: DC 13 B4 0F 82 3A 53 5A B2 31 3A 8E 00 FD 13 88 |.....:SZ.1:.....|
00000BE0: 13 8F 20 20 48 45 58 20 54 4F 20 44 45 43 49 4D |.. HEX TO DECIM|
00000BF0: 41 4C 20 28 48 24 20 54 4F 20 44 45 29 00 35 14 |AL (H$ TO DE).5.|
00000C00: 92 13 44 B2 30 3A 51 B2 33 3A 81 4D B2 31 A4 34 |..D.0:Q.3:.M.1.4|
00000C10: 3A 81 57 B2 30 A4 31 35 3A 8B CA 28 48 24 2C 4D |:.W.0.15:..(H$,M|
00000C20: 2C 31 29 B2 CA 28 48 45 24 2C 57 AA 31 2C 31 29 |,1)..(HE$,W.1,1)|
00000C30: A7 35 30 33 30 00 3C 14 9C 13 82 57 00 68 14 A6 |.5030.<....W.h..|
00000C40: 13 44 31 B2 57 AC 28 31 36 AE 28 51 29 29 3A 44 |.D1.W.(16.(Q)):D|
00000C50: B2 44 AA 44 31 3A 51 B2 51 AB 31 3A 82 4D 3A 44 |.D.D1:Q.Q.1:.M:D|
00000C60: 45 B2 B5 28 44 29 3A 8E 00 A2 14 70 17 8F 20 41 |E..(D):....p.. A|
00000C70: 43 43 45 50 54 20 48 45 58 20 4F 50 43 4F 44 45 |CCEPT HEX OPCODE|
00000C80: 20 49 4E 50 55 54 20 41 4E 44 20 54 52 41 4E 53 | INPUT AND TRANS|
00000C90: 4C 41 54 45 20 49 54 20 54 4F 20 44 45 43 49 4D |LATE IT TO DECIM|
00000CA0: 41 4C 00 D8 14 7A 17 8B C8 28 52 24 2C 31 29 B2 |AL...z...(R$,1).|
00000CB0: 22 23 22 A7 48 24 B2 22 30 30 22 AA C9 28 52 24 |"#".H$."00"..(R$|
00000CC0: 2C 32 29 3A 8D 35 30 30 30 3A 52 24 B2 22 23 22 |,2):.5000:R$."#"|
00000CD0: AA C4 28 44 45 29 3A 8E 00 0F 15 84 17 4C 53 B2 |..(DE):......LS.|
00000CE0: C3 28 52 24 29 3A 41 5A 24 B2 C8 28 52 24 2C 31 |.(R$):AZ$..(R$,1|
00000CF0: 29 3A 5A 41 24 B2 CA 28 52 24 2C 4C 53 2C 31 29 |):ZA$..(R$,LS,1)|
00000D00: 3A 8B 41 5A 24 B3 B1 22 28 22 A7 36 30 35 30 00 |:.AZ$.."(".6050.|
00000D10: 48 15 8E 17 8B 5A 41 24 B2 22 59 22 A7 48 24 B2 |H....ZA$."Y".H$.|
00000D20: 22 30 30 22 AA CA 28 52 24 2C 32 2C 32 29 3A 8D |"00"..(R$,2,2):.|
00000D30: 35 30 30 30 3A 52 24 B2 22 28 22 AA C4 28 44 45 |5000:R$."("..(DE|
00000D40: 29 AA 22 29 59 22 3A 8E 00 81 15 98 17 8B 5A 41 |).")Y":.......ZA|
00000D50: 24 B2 22 29 22 A7 48 24 B2 22 30 30 22 AA CA 28 |$.")".H$."00"..(|
00000D60: 52 24 2C 32 2C 32 29 3A 8D 35 30 30 30 3A 52 24 |R$,2,2):.5000:R$|
00000D70: B2 22 28 22 AA C4 28 44 45 29 AA 22 58 29 22 3A |."("..(DE)."X)":|
00000D80: 8E 00 9B 15 A2 17 8B 5A 41 24 B2 22 58 22 B0 5A |.......ZA$."X".Z|
00000D90: 41 24 B2 22 59 22 A7 36 30 37 30 00 C2 15 AC 17 |A$."Y".6070.....|
00000DA0: 48 24 B2 C8 28 5A 4F 24 2C 34 AB 4C 53 29 AA 52 |H$..(ZO$,4.LS).R|
00000DB0: 24 3A 8D 35 30 30 30 3A 52 24 B2 C4 28 44 45 29 |$:.5000:R$..(DE)|
00000DC0: 3A 8E 00 DD 15 B6 17 8B 4C 53 B2 35 A7 48 24 B2 |:.......LS.5.H$.|
00000DD0: C8 28 52 24 2C 34 29 3A 89 36 30 39 30 00 F1 15 |.(R$,4):.6090...|
00000DE0: C0 17 48 24 B2 22 30 30 22 AA C8 28 52 24 2C 32 |..H$."00"..(R$,2|
00000DF0: 29 00 0A 16 CA 17 8D 35 30 30 30 3A 52 24 B2 C4 |)......5000:R$..|
00000E00: 28 44 45 29 AA 5A 41 24 3A 8E 00 4F 16 20 4E 83 |(DE).ZA$:..O. N.|
00000E10: 41 44 43 31 30 39 37 2C 41 4E 44 31 30 33 33 2C |ADC1097,AND1033,|
00000E20: 41 53 4C 33 30 30 32 2C 42 43 43 38 31 34 34 2C |ASL3002,BCC8144,|
00000E30: 42 43 53 38 31 37 36 2C 42 45 51 38 32 34 30 2C |BCS8176,BEQ8240,|
00000E40: 42 49 54 37 30 33 36 2C 42 4D 49 38 30 34 38 00 |BIT7036,BMI8048.|
00000E50: 94 16 2A 4E 83 42 4E 45 38 32 30 38 2C 42 50 4C |..*N.BNE8208,BPL|
00000E60: 38 30 31 36 2C 42 52 4B 30 30 30 30 2C 42 56 43 |8016,BRK0000,BVC|
00000E70: 38 30 38 30 2C 42 56 53 38 31 31 32 2C 43 4C 43 |8080,BVS8112,CLC|
00000E80: 30 30 32 34 2C 43 4C 44 30 32 31 36 2C 43 4C 49 |0024,CLD0216,CLI|
00000E90: 30 30 38 38 00 D9 16 34 4E 83 43 4C 56 30 31 38 |0088...4N.CLV018|
00000EA0: 34 2C 43 4D 50 31 31 39 33 2C 43 50 58 34 32 32 |4,CMP1193,CPX422|
00000EB0: 34 2C 43 50 59 34 31 39 32 2C 44 45 43 32 31 39 |4,CPY4192,DEC219|
00000EC0: 38 2C 44 45 58 30 32 30 32 2C 44 45 59 30 31 33 |8,DEX0202,DEY013|
00000ED0: 36 2C 45 4F 52 31 30 36 35 00 1E 17 3E 4E 83 49 |6,EOR1065...>N.I|
00000EE0: 4E 43 32 32 33 30 2C 49 4E 58 30 32 33 32 2C 49 |NC2230,INX0232,I|
00000EF0: 4E 59 30 32 30 30 2C 4A 4D 50 36 30 37 36 2C 4A |NY0200,JMP6076,J|
00000F00: 53 52 39 30 33 32 2C 4C 44 41 31 31 36 31 2C 4C |SR9032,LDA1161,L|
00000F10: 44 58 35 31 36 32 2C 4C 44 59 35 31 36 30 00 63 |DX5162,LDY5160.c|
00000F20: 17 48 4E 83 4C 53 52 33 30 36 36 2C 4E 4F 50 30 |.HN.LSR3066,NOP0|
00000F30: 32 33 34 2C 4F 52 41 31 30 30 31 2C 50 48 41 30 |234,ORA1001,PHA0|
00000F40: 30 37 32 2C 50 48 50 30 30 30 38 2C 50 4C 41 30 |072,PHP0008,PLA0|
00000F50: 31 30 34 2C 50 4C 50 30 30 34 30 2C 52 4F 4C 33 |104,PLP0040,ROL3|
00000F60: 30 33 34 00 A8 17 52 4E 83 52 4F 52 33 30 39 38 |034...RN.ROR3098|
00000F70: 2C 52 54 49 30 30 36 34 2C 52 54 53 30 30 39 36 |,RTI0064,RTS0096|
00000F80: 2C 53 42 43 31 32 32 35 2C 53 45 43 30 30 35 36 |,SBC1225,SEC0056|
00000F90: 2C 53 45 44 30 32 34 38 2C 53 45 49 30 31 32 30 |,SED0248,SEI0120|
00000FA0: 2C 53 54 41 31 31 32 39 00 ED 17 5C 4E 83 53 54 |,STA1129...\N.ST|
00000FB0: 58 32 31 33 34 2C 53 54 59 32 31 33 32 2C 54 41 |X2134,STY2132,TA|
00000FC0: 58 30 31 37 30 2C 54 41 59 30 31 36 38 2C 54 53 |X0170,TAY0168,TS|
00000FD0: 58 30 31 38 36 2C 54 58 41 30 31 33 38 2C 54 58 |X0186,TXA0138,TX|
00000FE0: 53 30 31 35 34 2C 54 59 41 30 31 35 32 00 00 00 |S0154,TYA0152...|
..0...H.0:. IF H = 0 THEN ASSEMBLY IS IN
DECIMAL.Z.2.HE$."0123456789ABCDEF":SZ.1
:ZO$."000"...D..".. SIMPLE ASSEMBLER
CONVENTIONS:"...N..M$(56),TY(56),OP(56
)...X..I.1.56:.M$(I).X.Z.ROP$.J(M$(I),4,
1):TY(I).E(ROP$)...|.OP$.I(M$(I),3):OP(I
).E(OP$)...~.M$(I).H(M$(I),3)......I: ..
3...."IMMEDIATE LDA #15.P...."ABSOLU
TE LDA 1500.K. .."ZERO PAGE LDA
15......"ACCUMULATOR ASL......"INDIRE
CT X LDA (15X)......"INDIRECT Y LD
A (15)Y......"ZERO PAGE X LDA 15X.....
."ZERO PAGE Y LDX 15Y......"ABSOLUTE X
LDA 1500X.3...."ABSOLUTE Y LDA 15
00Y.W....:." ENTER ALL NUMBERS IN ";.
M....H.1 .."HEX":.200.|.C.."DECIMAL"...H
..:."PLEASE INPUT STARTING ADDRESS FOR M
L PROGRAM":. SA$.Y.R..H.1.H$.SA$:.5000:S
A.DE:.220...W.SA.E(SA$).....TA.SA:.".":.
CLEAR THE SCREEN.-....H.1.DE.SA:SZ.3:.4
000:.H$;:.240.9....SA" ";.P....MN$:.".".
20);:. GO UP ONE LINE AND OVER 20 SPACES
...... ADD NEW PSEUDO-OPS HERE......I(MN
$,7)."FORWARD".FB.SA......I(MN$,7)."RESO
LVE".FR.SA.FB:.FB.1,FR.2:." OK":.230...
...I(MN$,4)."POKE".."ADDR,NUMBER(DEC)";.
;....I(MN$,4)."POKE"..ADR,NUM:.ADR,NUM:.
230.O....MN$."END"..:." PROGRAM IS
FROM"TA"TO"SA:......L.C(MN$):L$.H(MN$,3)
......I.1.56:.L$.M$(I).300......I..."..8
50.R.,.. PRIMARY OPCODE CATEGORIES...-.T
Y.TY(I):OP.OP(I)...1..FB.SA.TN.0:.2010..
.6..TY.0..1000.0.@..TY.3.TY.1:.L.3.OP.OP
.8:.1000.M.J.R$.I(MN$,L.4):.H.1..6000.S.
T.LR$.H(R$,1):LL.C(R$):.LR$."#".480...^.
.LR$."(".520...H..TY.8.600...R..TY.3.OP.
OP.8:.1000.K.|..I(R$,1)."X".I(R$,1)."Y".
630......H(L$,1)."J".820.....TN.E(R$):.T
N.255.430......TY.1.TY.3.TY.4.TY.5.OP.OP
.4.$....2000.W...H%.TN.256:L%.TN.256.H%:
.TY.2.TY.7.OP.OP.8:.470.~....TY.1.TY.3.T
Y.4.TY.5.OP.OP.12:.470...B..TY.6.TY.9.47
0...L..850...V..3000.....TN.E(I(R$,LL.1)
).Q....TY.1.OP.OP.8:.2000......TY.4.TY.5
..2000......850......I(R$,2).")Y".540...
...I(R$,2)."X)".570.2...TN.E(J(R$,2,LL.3
)).K.&..TY.1.OP.OP.16:.2000.T.0..850.K.:
.TN.E(J(R$,2,LL.3)).{.D..TY.1..2000...N.
.850...X.TN.E(R$):TN.TN.SA.2:.TN..128.TN
.127.."TOO FAR ";:.850.R.B..TN.0.TN.TN.2
56...L..2000...V..I(R$,2).")Y".540......
I(R$,1)."X".720...... *ZERO Y.6...TN.E(H
(R$,LL.1)):.TN.255.680.I....TY.2.TY.5.73
0.W....TY.1.760.T....770:.TY.1.OP.OP.24:
.710......TY.5.OP.OP.28:.710......850...
F..3000.F.P.TN.E(H(R$,LL.1)):.TN.255..77
0:.780...Z..TY.2.OP.OP.16:.760......TY.1
.TY.3.TY.5.OP.OP.20:.760......850......2
000.0...H%.TN.256:L%.TN.256.H%:..H....TY
.2.OP.OP.24:.810.J....TY.1.TY.3.TY.5.OP.
OP.28:.810.S. ..850.}.*..3000...4.TN.E(R
$)...>..770...H..710...R..". ERROR ":.23
0.K.... 1 BYTE INSTRUCTIONS......SA,OP:S
A.SA.1:.H.1. 1030......OP:.230.....DE .
OP:.4000:.H$:.230.+.P.. 2 BYTE INSTRUCTI
ONS.T.U..TN.255.." INCORRECT ARGUMENT.":
.230.Z.Z..SA,OP:.SA.1,TN:SA.SA.2:.H.1.20
30......OP;TN:.230.....DE . OP:.4000:.H$
" ";.....DE . TN:.4000:.H$:.230.Y.... 3
BYTE INSTRUCTIONS...B..SA,OP:.SA.1,L%:.S
A.2,H%:SA.SA.3:.H.1.3030...L..OP;L%;H%:.
230.5.V.DE . OP:.4000:.H$" ";.O...DE . L
%:.4000:.H$" ";.J...DE . H%:.4000:.H$:.2
30... .. DECIMAL TO HEX (DE TO H$).O...
H$."":.M.SZ.0..1:N%.DE.(16.M):DE.DE.N%.1
6.M:H$.H$.J(HE$,N%.1,1)......:SZ.1:.....
.. HEX TO DECIMAL (H$ TO DE).5...D.0:Q.
3:.M.1.4:.W.0.15:.J(H$,M,1).J(HE$,W.1,1)
.5030.<....W.H...D1.W.(16.(Q)):D.D.D1:Q.
Q.1:.M:DE..(D):....P.. ACCEPT HEX OPCODE
INPUT AND TRANSLATE IT TO DECIMAL.X.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.H....ZA$."Y".H$.
"00".J(R$,2,2):.5000:R$."(".D(DE).")Y":.
......ZA$.")".H$."00".J(R$,2,2):.5000:R$
."(".D(DE)."X)":.......ZA$."X".ZA$."Y".6
070.B...H$.H(ZO$,4.LS).R$:.5000:R$.D(DE)
:.......LS.5.H$.H(R$,4):.6090.....H$."00
".H(R$,2)...J..5000:R$.D(DE).ZA$:..O. N.
ADC1097,AND1033,ASL3002,BCC8144,BCS8176,
BEQ8240,BIT7036,BMI8048...*N.BNE8208,BPL
8016,BRK0000,BVC8080,BVS8112,CLC0024,CLD
0216,CLI0088.Y.4N.CLV0184,CMP1193,CPX422
4,CPY4192,DEC2198,DEX0202,DEY0136,EOR106
5...>N.INC2230,INX0232,INY0200,JMP6076,J
SR9032,LDA1161,LDX5162,LDY5160.C.HN.LSR3
066,NOP0234,ORA1001,PHA0072,PHP0008,PLA0
104,PLP0040,ROL3034...RN.ROR3098,RTI0064
,RTS0096,SBC1225,SEC0056,SED0248,SEI0120
,STA1129...\N.STX2134,STY2132,TAX0170,TA
Y0168,TSX0186,TXA0138,TXS0154,TYA0152...
> CLICK IMAGE PREVIEW FOR FULL MODAL