ML BEG
FILE INFORMATION
FILENAME(S): ML BEG
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 18:12:59
APPEARS ON: 1 disk(s)
FILE HASH
47d123f8799da9ada4369cf493f5c3b5e77177249a9f81e017da192890514b62
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| NOVEMBER DISK | ML BEG | PRG | Sailor, Ganheden | 20 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 12 25 12 05 00 99 22 93 22 3A 9E 36 35 35 31 |..%....".":.6551|
00000010: 37 3A 8B C2 28 37 38 31 29 B2 34 30 A7 99 22 05 |7:..(781).40..".|
00000020: 22 3A 89 31 30 00 2E 12 06 00 99 22 1F 22 00 59 |":.10......".".Y|
00000030: 12 0A 00 48 B2 30 3A 8F 20 49 46 20 48 20 3D 20 |...H.0:. IF H = |
00000040: 31 20 54 48 45 4E 20 41 53 53 45 4D 42 4C 59 20 |1 THEN ASSEMBLY |
00000050: 49 53 20 49 4E 20 48 45 58 00 83 12 32 00 48 45 |IS IN HEX...2.HE|
00000060: 24 B2 22 30 31 32 33 34 35 36 37 38 39 41 42 43 |$."0123456789ABC|
00000070: 44 45 46 22 3A 53 5A B2 31 3A 5A 4F 24 B2 22 30 |DEF":SZ.1:ZO$."0|
00000080: 30 30 22 00 AE 12 64 00 99 22 20 53 49 4D 50 4C |00"...d.." SIMPL|
00000090: 45 20 41 53 53 45 4D 42 4C 45 52 22 3A 99 22 11 |E ASSEMBLER":.".|
000000A0: 20 43 4F 4E 56 45 4E 54 49 4F 4E 53 3A 22 00 C8 | CONVENTIONS:"..|
000000B0: 12 6E 00 86 4D 24 28 35 36 29 2C 54 59 28 35 36 |.n..M$(56),TY(56|
000000C0: 29 2C 4F 50 28 35 36 29 00 DB 12 78 00 81 49 B2 |),OP(56)...x..I.|
000000D0: 31 A4 35 36 3A 87 4D 24 28 49 29 00 FF 12 7A 00 |1.56:.M$(I)...z.|
000000E0: 52 4F 50 24 B2 CA 28 4D 24 28 49 29 2C 34 2C 31 |ROP$..(M$(I),4,1|
000000F0: 29 3A 54 59 28 49 29 B2 C5 28 52 4F 50 24 29 00 |):TY(I)..(ROP$).|
00000100: 1F 13 7C 00 4F 50 24 B2 C9 28 4D 24 28 49 29 2C |..|.OP$..(M$(I),|
00000110: 33 29 3A 4F 50 28 49 29 B2 C5 28 4F 50 24 29 00 |3):OP(I)..(OP$).|
00000120: 34 13 7E 00 4D 24 28 49 29 B2 C8 28 4D 24 28 49 |4.~.M$(I)..(M$(I|
00000130: 29 2C 33 29 00 3E 13 8C 00 82 49 3A 20 99 00 5A |),3).>....I: ..Z|
00000140: 13 96 00 99 22 49 4D 4D 45 44 49 41 54 45 20 20 |...."IMMEDIATE |
00000150: 20 20 20 4C 44 41 20 23 31 35 00 77 13 9B 00 99 | LDA #15.w....|
00000160: 22 41 42 53 4F 4C 55 54 45 20 20 20 20 20 20 4C |"ABSOLUTE L|
00000170: 44 41 20 31 35 30 30 00 92 13 A0 00 99 22 5A 45 |DA 1500......"ZE|
00000180: 52 4F 20 50 41 47 45 20 20 20 20 20 4C 44 41 20 |RO PAGE LDA |
00000190: 31 35 00 AA 13 A5 00 99 22 41 43 43 55 4D 55 4C |15......"ACCUMUL|
000001A0: 41 54 4F 52 20 20 20 41 53 4C 00 C8 13 AA 00 99 |ATOR ASL......|
000001B0: 22 49 4E 44 49 52 45 43 54 20 58 20 20 20 20 4C |"INDIRECT X L|
000001C0: 44 41 20 28 31 35 58 29 00 E6 13 AF 00 99 22 49 |DA (15X)......"I|
000001D0: 4E 44 49 52 45 43 54 20 59 20 20 20 20 4C 44 41 |NDIRECT Y LDA|
000001E0: 20 28 31 35 29 59 00 02 14 B1 00 99 22 5A 45 52 | (15)Y......"ZER|
000001F0: 4F 20 50 41 47 45 20 58 20 20 20 4C 44 41 20 31 |O PAGE X LDA 1|
00000200: 35 58 00 1E 14 B3 00 99 22 5A 45 52 4F 20 50 41 |5X......"ZERO PA|
00000210: 47 45 20 59 20 20 20 4C 44 58 20 31 35 59 00 3C |GE Y LDX 15Y.<|
00000220: 14 B4 00 99 22 41 42 53 4F 4C 55 54 45 20 58 20 |...."ABSOLUTE X |
00000230: 20 20 20 4C 44 41 20 31 35 30 30 58 00 5A 14 B9 | LDA 1500X.Z..|
00000240: 00 99 22 41 42 53 4F 4C 55 54 45 20 59 20 20 20 |.."ABSOLUTE Y |
00000250: 20 4C 44 41 20 31 35 30 30 59 00 7E 14 BD 00 99 | LDA 1500Y.~....|
00000260: 3A 99 22 45 4E 54 45 52 20 41 4C 4C 20 4E 55 4D |:."ENTER ALL NUM|
00000270: 42 45 52 53 20 20 20 20 20 49 4E 20 22 3B 00 94 |BERS IN ";..|
00000280: 14 BE 00 8B 48 B2 31 20 A7 99 22 48 45 58 22 3A |....H.1 .."HEX":|
00000290: 89 32 30 30 00 A3 14 C3 00 99 22 44 45 43 49 4D |.200......"DECIM|
000002A0: 41 4C 22 00 DF 14 C8 00 99 3A 99 22 50 4C 45 41 |AL"......:."PLEA|
000002B0: 53 45 20 49 4E 50 55 54 20 53 54 41 52 54 49 4E |SE INPUT STARTIN|
000002C0: 47 20 41 44 44 52 45 53 53 20 46 4F 52 20 4D 4C |G ADDRESS FOR ML|
000002D0: 20 50 52 4F 47 52 41 4D 22 3A 85 20 53 41 24 00 | PROGRAM":. SA$.|
000002E0: 00 15 D2 00 8B 48 B2 31 A7 48 24 B2 53 41 24 3A |.....H.1.H$.SA$:|
000002F0: 8D 35 30 30 30 3A 53 41 B2 44 45 3A 89 32 32 30 |.5000:SA.DE:.220|
00000300: 00 0E 15 D7 00 53 41 B2 C5 28 53 41 24 29 00 30 |.....SA..(SA$).0|
00000310: 15 DC 00 54 41 B2 53 41 3A 99 22 93 22 3A 8F 20 |...TA.SA:.".":. |
00000320: 43 4C 45 41 52 20 54 48 45 20 53 43 52 45 45 4E |CLEAR THE SCREEN|
00000330: 00 54 15 E6 00 8B 48 B2 31 A7 44 45 B2 53 41 3A |.T....H.1.DE.SA:|
00000340: 53 5A B2 33 3A 8D 34 30 30 30 3A 99 48 24 3B 3A |SZ.3:.4000:.H$;:|
00000350: 89 32 34 30 00 60 15 EB 00 99 53 41 22 20 22 3B |.240.`....SA" ";|
00000360: 00 97 15 F0 00 85 4D 4E 24 3A 99 22 91 22 A6 33 |......MN$:.".".3|
00000370: 30 29 3B 3A 8F 20 47 4F 20 55 50 20 4F 4E 45 20 |0);:. GO UP ONE |
00000380: 4C 49 4E 45 20 41 4E 44 20 4F 56 45 52 20 31 30 |LINE AND OVER 10|
00000390: 20 53 50 41 43 45 53 00 B5 15 F1 00 8F 20 41 44 | SPACES...... AD|
000003A0: 44 20 4E 45 57 20 50 53 45 55 44 4F 2D 4F 50 53 |D NEW PSEUDO-OPS|
000003B0: 20 48 45 52 45 00 D3 15 F2 00 8B C9 28 4D 4E 24 | HERE.......(MN$|
000003C0: 2C 37 29 B2 22 46 4F 52 57 41 52 44 22 A7 46 42 |,7)."FORWARD".FB|
000003D0: B2 53 41 00 0C 16 F3 00 8B C9 28 4D 4E 24 2C 37 |.SA.......(MN$,7|
000003E0: 29 B2 22 52 45 53 4F 4C 56 45 22 A7 46 52 B2 53 |)."RESOLVE".FR.S|
000003F0: 41 AB 46 42 3A 97 46 42 AA 31 2C 46 52 AB 32 3A |A.FB:.FB.1,FR.2:|
00000400: 99 22 20 20 4F 4B 22 3A 89 32 33 30 00 4D 16 F4 |." OK":.230.M..|
00000410: 00 8B C9 28 4D 4E 24 2C 34 29 B2 22 50 4F 4B 45 |...(MN$,4)."POKE|
00000420: 22 A7 99 22 41 44 44 52 2C 4E 55 4D 42 45 52 28 |".."ADDR,NUMBER(|
00000430: 44 45 43 29 22 3B 3A 85 41 44 52 2C 4E 55 4D 3A |DEC)";:.ADR,NUM:|
00000440: 97 41 44 52 2C 4E 55 4D 3A 89 32 33 30 00 81 16 |.ADR,NUM:.230...|
00000450: FA 00 8B 4D 4E 24 B2 22 45 4E 44 22 A7 99 3A 99 |...MN$."END"..:.|
00000460: 22 20 20 20 20 20 20 50 52 4F 47 52 41 4D 20 49 |" PROGRAM I|
00000470: 53 20 46 52 4F 4D 22 54 41 22 54 4F 22 53 41 3A |S FROM"TA"TO"SA:|
00000480: 80 00 9A 16 04 01 4C B2 C3 28 4D 4E 24 29 3A 4C |......L..(MN$):L|
00000490: 24 B2 C8 28 4D 4E 24 2C 33 29 00 B4 16 0E 01 81 |$..(MN$,3)......|
000004A0: 49 B2 31 A4 35 36 3A 8B 4C 24 B2 4D 24 28 49 29 |I.1.56:.L$.M$(I)|
000004B0: A7 33 30 30 00 BB 16 18 01 82 49 00 C4 16 22 01 |.300......I...".|
000004C0: 89 38 35 30 00 E4 16 2C 01 8F 20 50 52 49 4D 41 |.850...,.. PRIMA|
000004D0: 52 59 20 4F 50 43 4F 44 45 20 43 41 54 45 47 4F |RY OPCODE CATEGO|
000004E0: 52 49 45 53 00 FA 16 2D 01 54 59 B2 54 59 28 49 |RIES...-.TY.TY(I|
000004F0: 29 3A 4F 50 B2 4F 50 28 49 29 00 10 17 31 01 8B |):OP.OP(I)...1..|
00000500: 46 42 B2 53 41 A7 54 4E B2 30 3A 89 32 30 31 30 |FB.SA.TN.0:.2010|
00000510: 00 20 17 36 01 8B 54 59 B2 30 A7 89 31 30 30 30 |. .6..TY.0..1000|
00000520: 00 42 17 40 01 8B 54 59 B2 33 A7 54 59 B2 31 3A |.B.@..TY.3.TY.1:|
00000530: 8B 4C B2 33 A7 4F 50 B2 4F 50 AA 38 3A 89 31 30 |.L.3.OP.OP.8:.10|
00000540: 30 30 00 5F 17 4A 01 52 24 B2 C9 28 4D 4E 24 2C |00._.J.R$..(MN$,|
00000550: 4C AB 34 29 3A 8B 48 B2 31 A7 8D 36 30 30 30 00 |L.4):.H.1..6000.|
00000560: 85 17 54 01 4C 52 24 B2 C8 28 52 24 2C 31 29 3A |..T.LR$..(R$,1):|
00000570: 4C 4C B2 C3 28 52 24 29 3A 8B 4C 52 24 B2 22 23 |LL..(R$):.LR$."#|
00000580: 22 A7 34 38 30 00 96 17 5E 01 8B 4C 52 24 B2 22 |".480...^..LR$."|
00000590: 28 22 A7 35 32 30 00 A4 17 68 01 8B 54 59 B2 38 |(".520...h..TY.8|
000005A0: A7 36 30 30 00 BC 17 72 01 8B 54 59 B2 33 A7 4F |.600...r..TY.3.O|
000005B0: 50 B2 4F 50 AA 38 3A 89 31 30 30 30 00 DD 17 7C |P.OP.8:.1000...||
000005C0: 01 8B C9 28 52 24 2C 31 29 B2 22 58 22 B0 C9 28 |...(R$,1)."X"..(|
000005D0: 52 24 2C 31 29 B2 22 59 22 A7 36 33 30 00 F2 17 |R$,1)."Y".630...|
000005E0: 86 01 8B C8 28 4C 24 2C 31 29 B2 22 4A 22 A7 38 |....(L$,1)."J".8|
000005F0: 32 30 00 0B 18 90 01 54 4E B2 C5 28 52 24 29 3A |20.....TN..(R$):|
00000600: 8B 54 4E B1 32 35 35 A7 34 33 30 00 2C 18 9A 01 |.TN.255.430.,...|
00000610: 8B 54 59 B2 31 B0 54 59 B2 33 B0 54 59 B2 34 B0 |.TY.1.TY.3.TY.4.|
00000620: 54 59 B2 35 A7 4F 50 B2 4F 50 AA 34 00 36 18 A4 |TY.5.OP.OP.4.6..|
00000630: 01 89 32 30 30 30 00 69 18 AE 01 48 25 B2 54 4E |..2000.i...H%.TN|
00000640: AD 32 35 36 3A 4C 25 B2 54 4E AB 32 35 36 AC 48 |.256:L%.TN.256.H|
00000650: 25 3A 8B 54 59 B2 32 B0 54 59 B2 37 A7 4F 50 B2 |%:.TY.2.TY.7.OP.|
00000660: 4F 50 AA 38 3A 89 34 37 30 00 90 18 B8 01 8B 54 |OP.8:.470......T|
00000670: 59 B2 31 B0 54 59 B2 33 B0 54 59 B2 34 B0 54 59 |Y.1.TY.3.TY.4.TY|
00000680: B2 35 A7 4F 50 B2 4F 50 AA 31 32 3A 89 34 37 30 |.5.OP.OP.12:.470|
00000690: 00 A3 18 C2 01 8B 54 59 B2 36 B0 54 59 B2 39 A7 |......TY.6.TY.9.|
000006A0: 34 37 30 00 AC 18 CC 01 89 38 35 30 00 B6 18 D6 |470......850....|
000006B0: 01 89 33 30 30 30 00 CB 18 E0 01 54 4E B2 C5 28 |..3000.....TN..(|
000006C0: C9 28 52 24 2C 4C 4C AB 31 29 29 00 E3 18 EA 01 |.(R$,LL.1)).....|
000006D0: 8B 54 59 B2 31 A7 4F 50 B2 4F 50 AA 38 3A 89 32 |.TY.1.OP.OP.8:.2|
000006E0: 30 30 30 00 F8 18 F4 01 8B 54 59 B2 34 B0 54 59 |000......TY.4.TY|
000006F0: B2 35 A7 89 32 30 30 30 00 01 19 FE 01 89 38 35 |.5..2000......85|
00000700: 30 00 17 19 08 02 8B C9 28 52 24 2C 32 29 B2 22 |0.......(R$,2)."|
00000710: 29 59 22 A7 35 34 30 00 2D 19 12 02 8B C9 28 52 |)Y".540.-.....(R|
00000720: 24 2C 32 29 B2 22 58 29 22 A7 35 37 30 00 44 19 |$,2)."X)".570.D.|
00000730: 1C 02 54 4E B2 C5 28 CA 28 52 24 2C 32 2C 4C 4C |..TN..(.(R$,2,LL|
00000740: AB 33 29 29 00 5D 19 26 02 8B 54 59 B2 31 A7 4F |.3)).].&..TY.1.O|
00000750: 50 B2 4F 50 AA 31 36 3A 89 32 30 30 30 00 66 19 |P.OP.16:.2000.f.|
00000760: 30 02 89 38 35 30 00 7D 19 3A 02 54 4E B2 C5 28 |0..850.}.:.TN..(|
00000770: CA 28 52 24 2C 32 2C 4C 4C AB 33 29 29 00 8D 19 |.(R$,2,LL.3))...|
00000780: 44 02 8B 54 59 B2 31 A7 89 32 30 30 30 00 96 19 |D..TY.1..2000...|
00000790: 4E 02 89 38 35 30 00 D0 19 58 02 54 4E B2 C5 28 |N..850...X.TN..(|
000007A0: 52 24 29 3A 54 4E B2 54 4E AB 53 41 AB 32 3A 8B |R$):TN.TN.SA.2:.|
000007B0: 54 4E B3 AB 31 32 38 B0 54 4E B1 31 32 37 A7 99 |TN..128.TN.127..|
000007C0: 22 54 4F 4F 20 46 41 52 20 22 3B 3A 89 38 35 30 |"TOO FAR ";:.850|
000007D0: 00 E4 19 62 02 8B 54 4E B3 30 A7 54 4E B2 54 4E |...b..TN.0.TN.TN|
000007E0: AA 32 35 36 00 EE 19 6C 02 89 32 30 30 30 00 04 |.256...l..2000..|
000007F0: 1A 76 02 8B C9 28 52 24 2C 32 29 B2 22 29 59 22 |.v...(R$,2).")Y"|
00000800: A7 35 34 30 00 19 1A 80 02 8B C9 28 52 24 2C 31 |.540.......(R$,1|
00000810: 29 B2 22 58 22 A7 37 32 30 00 27 1A 8A 02 8F 20 |)."X".720.'.... |
00000820: 2A 5A 45 52 4F 20 59 00 48 1A 94 02 54 4E B2 C5 |*ZERO Y.H...TN..|
00000830: 28 C8 28 52 24 2C 4C 4C AB 31 29 29 3A 8B 54 4E |(.(R$,LL.1)):.TN|
00000840: B1 32 35 35 A7 36 38 30 00 5B 1A 9E 02 8B 54 59 |.255.680.[....TY|
00000850: B2 32 B0 54 59 B2 35 A7 37 33 30 00 69 1A A3 02 |.2.TY.5.730.i...|
00000860: 8B 54 59 B2 31 A7 37 36 30 00 86 1A A8 02 8D 37 |.TY.1.760......7|
00000870: 37 30 3A 8B 54 59 B2 31 A7 4F 50 B2 4F 50 AA 32 |70:.TY.1.OP.OP.2|
00000880: 34 3A 89 37 31 30 00 9E 1A B2 02 8B 54 59 B2 35 |4:.710......TY.5|
00000890: A7 4F 50 B2 4F 50 AA 32 38 3A 89 37 31 30 00 A7 |.OP.OP.28:.710..|
000008A0: 1A BC 02 89 38 35 30 00 B1 1A C6 02 89 33 30 30 |....850......300|
000008B0: 30 00 D8 1A D0 02 54 4E B2 C5 28 C8 28 52 24 2C |0.....TN..(.(R$,|
000008C0: 4C 4C AB 31 29 29 3A 8B 54 4E B1 32 35 35 A7 8D |LL.1)):.TN.255..|
000008D0: 37 37 30 3A 89 37 38 30 00 F0 1A DA 02 8B 54 59 |770:.780......TY|
000008E0: B2 32 A7 4F 50 B2 4F 50 AA 31 36 3A 89 37 36 30 |.2.OP.OP.16:.760|
000008F0: 00 12 1B E4 02 8B 54 59 B2 31 B0 54 59 B2 33 B0 |......TY.1.TY.3.|
00000900: 54 59 B2 35 A7 4F 50 B2 4F 50 AA 32 30 3A 89 37 |TY.5.OP.OP.20:.7|
00000910: 36 30 00 1B 1B EE 02 89 38 35 30 00 25 1B F8 02 |60......850.%...|
00000920: 89 32 30 30 30 00 42 1B 02 03 48 25 B2 54 4E AD |.2000.B...H%.TN.|
00000930: 32 35 36 3A 4C 25 B2 54 4E AB 32 35 36 AC 48 25 |256:L%.TN.256.H%|
00000940: 3A 8E 00 5A 1B 0C 03 8B 54 59 B2 32 A7 4F 50 B2 |:..Z....TY.2.OP.|
00000950: 4F 50 AA 32 34 3A 89 38 31 30 00 7C 1B 16 03 8B |OP.24:.810.|....|
00000960: 54 59 B2 31 B0 54 59 B2 33 B0 54 59 B2 35 A7 4F |TY.1.TY.3.TY.5.O|
00000970: 50 B2 4F 50 AA 32 38 3A 89 38 31 30 00 85 1B 20 |P.OP.28:.810... |
00000980: 03 89 38 35 30 00 8F 1B 2A 03 89 33 30 30 30 00 |..850...*..3000.|
00000990: 9C 1B 34 03 54 4E B2 C5 28 52 24 29 00 A5 1B 3E |..4.TN..(R$)...>|
000009A0: 03 8D 37 37 30 00 AE 1B 48 03 89 37 31 30 00 C3 |..770...H..710..|
000009B0: 1B 52 03 99 22 12 20 45 52 52 4F 52 20 22 3A 89 |.R..". ERROR ":.|
000009C0: 32 33 30 00 DD 1B E8 03 8F 20 31 20 42 59 54 45 |230...... 1 BYTE|
000009D0: 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 FB 1B | INSTRUCTIONS...|
000009E0: F2 03 97 53 41 2C 4F 50 3A 53 41 B2 53 41 AA 31 |...SA,OP:SA.SA.1|
000009F0: 3A 8B 48 B2 31 A7 20 31 30 33 30 00 08 1C FC 03 |:.H.1. 1030.....|
00000A00: 99 4F 50 3A 89 32 33 30 00 23 1C 06 04 44 45 20 |.OP:.230.#...DE |
00000A10: B2 20 4F 50 3A 8D 34 30 30 30 3A 99 48 24 3A 89 |. OP:.4000:.H$:.|
00000A20: 32 33 30 00 3D 1C D0 07 8F 20 32 20 42 59 54 45 |230.=.... 2 BYTE|
00000A30: 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 79 1C | INSTRUCTIONS.y.|
00000A40: D5 07 8B 54 4E B1 32 35 36 A7 99 22 20 49 4E 43 |...TN.256.." INC|
00000A50: 4F 52 52 45 43 54 20 41 52 47 55 4D 45 4E 54 2E |ORRECT ARGUMENT.|
00000A60: 20 28 23 35 20 49 4E 20 48 45 58 20 49 53 20 23 | (#5 IN HEX IS #|
00000A70: 30 35 29 22 3A 89 32 33 30 00 9F 1C DA 07 97 53 |05)":.230......S|
00000A80: 41 2C 4F 50 3A 97 53 41 AA 31 2C 54 4E 3A 53 41 |A,OP:.SA.1,TN:SA|
00000A90: B2 53 41 AA 32 3A 8B 48 B2 31 A7 32 30 33 30 00 |.SA.2:.H.1.2030.|
00000AA0: AF 1C E4 07 99 4F 50 3B 54 4E 3A 89 32 33 30 00 |.....OP;TN:.230.|
00000AB0: C9 1C EE 07 44 45 20 B2 20 4F 50 3A 8D 34 30 30 |....DE . OP:.400|
00000AC0: 30 3A 99 48 24 22 20 22 3B 00 E4 1C F8 07 44 45 |0:.H$" ";.....DE|
00000AD0: 20 B2 20 54 4E 3A 8D 34 30 30 30 3A 99 48 24 3A | . TN:.4000:.H$:|
00000AE0: 89 32 33 30 00 FE 1C B8 0B 8F 20 33 20 42 59 54 |.230...... 3 BYT|
00000AF0: 45 20 49 4E 53 54 52 55 43 54 49 4F 4E 53 00 2D |E INSTRUCTIONS.-|
00000B00: 1D C2 0B 97 53 41 2C 4F 50 3A 97 53 41 AA 31 2C |....SA,OP:.SA.1,|
00000B10: 4C 25 3A 97 53 41 AA 32 2C 48 25 3A 53 41 B2 53 |L%:.SA.2,H%:SA.S|
00000B20: 41 AA 33 3A 8B 48 B2 31 A7 33 30 33 30 00 40 1D |A.3:.H.1.3030.@.|
00000B30: CC 0B 99 4F 50 3B 4C 25 3B 48 25 3A 89 32 33 30 |...OP;L%;H%:.230|
00000B40: 00 5A 1D D6 0B 44 45 20 B2 20 4F 50 3A 8D 34 30 |.Z...DE . OP:.40|
00000B50: 30 30 3A 99 48 24 22 20 22 3B 00 74 1D E0 0B 44 |00:.H$" ";.t...D|
00000B60: 45 20 B2 20 4C 25 3A 8D 34 30 30 30 3A 99 48 24 |E . L%:.4000:.H$|
00000B70: 22 20 22 3B 00 8F 1D EA 0B 44 45 20 B2 20 48 25 |" ";.....DE . H%|
00000B80: 3A 8D 34 30 30 30 3A 99 48 24 3A 89 32 33 30 00 |:.4000:.H$:.230.|
00000B90: B0 1D A0 0F 8F 20 20 44 45 43 49 4D 41 4C 20 54 |..... DECIMAL T|
00000BA0: 4F 20 48 45 58 20 28 44 45 20 54 4F 20 48 24 29 |O HEX (DE TO H$)|
00000BB0: 00 F4 1D AA 0F 48 24 B2 22 22 3A 81 4D B2 53 5A |.....H$."":.M.SZ|
00000BC0: A4 30 A9 AB 31 3A 4E 25 B2 44 45 AD 28 31 36 AE |.0..1:N%.DE.(16.|
00000BD0: 4D 29 3A 44 45 B2 44 45 AB 4E 25 AC 31 36 AE 4D |M):DE.DE.N%.16.M|
00000BE0: 3A 48 24 B2 48 24 AA CA 28 48 45 24 2C 4E 25 AA |:H$.H$..(HE$,N%.|
00000BF0: 31 2C 31 29 00 01 1E B4 0F 82 3A 53 5A B2 31 3A |1,1)......:SZ.1:|
00000C00: 8E 00 22 1E 88 13 8F 20 20 48 45 58 20 54 4F 20 |..".... HEX TO |
00000C10: 44 45 43 49 4D 41 4C 20 28 48 24 20 54 4F 20 44 |DECIMAL (H$ TO D|
00000C20: 45 29 00 5A 1E 92 13 44 B2 30 3A 51 B2 33 3A 81 |E).Z...D.0:Q.3:.|
00000C30: 4D B2 31 A4 34 3A 81 57 B2 30 A4 31 35 3A 8B CA |M.1.4:.W.0.15:..|
00000C40: 28 48 24 2C 4D 2C 31 29 B2 CA 28 48 45 24 2C 57 |(H$,M,1)..(HE$,W|
00000C50: AA 31 2C 31 29 A7 35 30 33 30 00 61 1E 9C 13 82 |.1,1).5030.a....|
00000C60: 57 00 8D 1E A6 13 44 31 B2 57 AC 28 31 36 AE 28 |W.....D1.W.(16.(|
00000C70: 51 29 29 3A 44 B2 44 AA 44 31 3A 51 B2 51 AB 31 |Q)):D.D.D1:Q.Q.1|
00000C80: 3A 82 4D 3A 44 45 B2 B5 28 44 29 3A 8E 00 C7 1E |:.M:DE..(D):....|
00000C90: 70 17 8F 20 41 43 43 45 50 54 20 48 45 58 20 4F |p.. ACCEPT HEX O|
00000CA0: 50 43 4F 44 45 20 49 4E 50 55 54 20 41 4E 44 20 |PCODE INPUT AND |
00000CB0: 54 52 41 4E 53 4C 41 54 45 20 49 54 20 54 4F 20 |TRANSLATE IT TO |
00000CC0: 44 45 43 49 4D 41 4C 00 FD 1E 7A 17 8B C8 28 52 |DECIMAL...z...(R|
00000CD0: 24 2C 31 29 B2 22 23 22 A7 48 24 B2 22 30 30 22 |$,1)."#".H$."00"|
00000CE0: AA C9 28 52 24 2C 32 29 3A 8D 35 30 30 30 3A 52 |..(R$,2):.5000:R|
00000CF0: 24 B2 22 23 22 AA C4 28 44 45 29 3A 8E 00 34 1F |$."#"..(DE):..4.|
00000D00: 84 17 4C 53 B2 C3 28 52 24 29 3A 41 5A 24 B2 C8 |..LS..(R$):AZ$..|
00000D10: 28 52 24 2C 31 29 3A 5A 41 24 B2 CA 28 52 24 2C |(R$,1):ZA$..(R$,|
00000D20: 4C 53 2C 31 29 3A 8B 41 5A 24 B3 B1 22 28 22 A7 |LS,1):.AZ$.."(".|
00000D30: 36 30 35 30 00 6D 1F 8E 17 8B 5A 41 24 B2 22 59 |6050.m....ZA$."Y|
00000D40: 22 A7 48 24 B2 22 30 30 22 AA CA 28 52 24 2C 32 |".H$."00"..(R$,2|
00000D50: 2C 32 29 3A 8D 35 30 30 30 3A 52 24 B2 22 28 22 |,2):.5000:R$."("|
00000D60: AA C4 28 44 45 29 AA 22 29 59 22 3A 8E 00 A6 1F |..(DE).")Y":....|
00000D70: 98 17 8B 5A 41 24 B2 22 29 22 A7 48 24 B2 22 30 |...ZA$.")".H$."0|
00000D80: 30 22 AA CA 28 52 24 2C 32 2C 32 29 3A 8D 35 30 |0"..(R$,2,2):.50|
00000D90: 30 30 3A 52 24 B2 22 28 22 AA C4 28 44 45 29 AA |00:R$."("..(DE).|
00000DA0: 22 58 29 22 3A 8E 00 C0 1F A2 17 8B 5A 41 24 B2 |"X)":.......ZA$.|
00000DB0: 22 58 22 B0 5A 41 24 B2 22 59 22 A7 36 30 37 30 |"X".ZA$."Y".6070|
00000DC0: 00 E7 1F AC 17 48 24 B2 C8 28 5A 41 24 2C 34 AB |.....H$..(ZA$,4.|
00000DD0: 4C 53 29 AA 52 24 3A 8D 35 30 30 30 3A 52 24 B2 |LS).R$:.5000:R$.|
00000DE0: C4 28 44 45 29 3A 8E 00 02 20 B6 17 8B 4C 53 B2 |.(DE):... ...LS.|
00000DF0: 35 A7 48 24 B2 C8 28 52 24 2C 34 29 3A 89 36 30 |5.H$..(R$,4):.60|
00000E00: 39 30 00 16 20 C0 17 48 24 B2 22 30 30 22 AA C8 |90.. ..H$."00"..|
00000E10: 28 52 24 2C 32 29 00 2F 20 CA 17 8D 35 30 30 30 |(R$,2)./ ...5000|
00000E20: 3A 52 24 B2 C4 28 44 45 29 AA 5A 41 24 3A 8E 00 |:R$..(DE).ZA$:..|
00000E30: 74 20 20 4E 83 41 44 43 31 30 39 37 2C 41 4E 44 |t N.ADC1097,AND|
00000E40: 31 30 33 33 2C 41 53 4C 33 30 30 32 2C 42 43 43 |1033,ASL3002,BCC|
00000E50: 38 31 34 34 2C 42 43 53 38 31 37 36 2C 42 45 51 |8144,BCS8176,BEQ|
00000E60: 38 32 34 30 2C 42 49 54 37 30 33 36 2C 42 4D 49 |8240,BIT7036,BMI|
00000E70: 38 30 34 38 00 B9 20 2A 4E 83 42 4E 45 38 32 30 |8048.. *N.BNE820|
00000E80: 38 2C 42 50 4C 38 30 31 36 2C 42 52 4B 30 30 30 |8,BPL8016,BRK000|
00000E90: 30 2C 42 56 43 38 30 38 30 2C 42 56 53 38 31 31 |0,BVC8080,BVS811|
00000EA0: 32 2C 43 4C 43 30 30 32 34 2C 43 4C 44 30 32 31 |2,CLC0024,CLD021|
00000EB0: 36 2C 43 4C 49 30 30 38 38 00 FE 20 34 4E 83 43 |6,CLI0088.. 4N.C|
00000EC0: 4C 56 30 31 38 34 2C 43 4D 50 31 31 39 33 2C 43 |LV0184,CMP1193,C|
00000ED0: 50 58 34 32 32 34 2C 43 50 59 34 31 39 32 2C 44 |PX4224,CPY4192,D|
00000EE0: 45 43 32 31 39 38 2C 44 45 58 30 32 30 32 2C 44 |EC2198,DEX0202,D|
00000EF0: 45 59 30 31 33 36 2C 45 4F 52 31 30 36 35 00 43 |EY0136,EOR1065.C|
00000F00: 21 3E 4E 83 49 4E 43 32 32 33 30 2C 49 4E 58 30 |!>N.INC2230,INX0|
00000F10: 32 33 32 2C 49 4E 59 30 32 30 30 2C 4A 4D 50 36 |232,INY0200,JMP6|
00000F20: 30 37 36 2C 4A 53 52 39 30 33 32 2C 4C 44 41 31 |076,JSR9032,LDA1|
00000F30: 31 36 31 2C 4C 44 58 35 31 36 32 2C 4C 44 59 35 |161,LDX5162,LDY5|
00000F40: 31 36 30 00 88 21 48 4E 83 4C 53 52 33 30 36 36 |160..!HN.LSR3066|
00000F50: 2C 4E 4F 50 30 32 33 34 2C 4F 52 41 31 30 30 31 |,NOP0234,ORA1001|
00000F60: 2C 50 48 41 30 30 37 32 2C 50 48 50 30 30 30 38 |,PHA0072,PHP0008|
00000F70: 2C 50 4C 41 30 31 30 34 2C 50 4C 50 30 30 34 30 |,PLA0104,PLP0040|
00000F80: 2C 52 4F 4C 33 30 33 34 00 CD 21 52 4E 83 52 4F |,ROL3034..!RN.RO|
00000F90: 52 33 30 39 38 2C 52 54 49 30 30 36 34 2C 52 54 |R3098,RTI0064,RT|
00000FA0: 53 30 30 39 36 2C 53 42 43 31 32 32 35 2C 53 45 |S0096,SBC1225,SE|
00000FB0: 43 30 30 35 36 2C 53 45 44 30 32 34 38 2C 53 45 |C0056,SED0248,SE|
00000FC0: 49 30 31 32 30 2C 53 54 41 31 31 32 39 00 12 22 |I0120,STA1129.."|
00000FD0: 5C 4E 83 53 54 58 32 31 33 34 2C 53 54 59 32 31 |\N.STX2134,STY21|
00000FE0: 33 32 2C 54 41 58 30 31 37 30 2C 54 41 59 30 31 |32,TAX0170,TAY01|
00000FF0: 36 38 2C 54 53 58 30 31 38 36 2C 54 58 41 30 31 |68,TSX0186,TXA01|
00001000: 33 38 2C 54 58 53 30 31 35 34 2C 54 59 41 30 31 |38,TXS0154,TYA01|
00001010: 35 32 00 00 00 |52... |
..%....".":.65517:.B(781).40..".":.10...
...".".Y...H.0:. IF H = 1 THEN ASSEMBLY
IS IN HEX...2.HE$."0123456789ABCDEF":SZ.
1:ZO$."000"...D.." SIMPLE ASSEMBLER":.".
CONVENTIONS:".H.N..M$(56),TY(56),OP(56)
...X..I.1.56:.M$(I)...Z.ROP$.J(M$(I),4,1
):TY(I).E(ROP$)...|.OP$.I(M$(I),3):OP(I)
.E(OP$).4.~.M$(I).H(M$(I),3).>....I: ..Z
...."IMMEDIATE LDA #15.W...."ABSOLUT
E LDA 1500... .."ZERO PAGE LDA
15......"ACCUMULATOR ASL.H...."INDIREC
T X LDA (15X)......"INDIRECT Y LDA
(15)Y......"ZERO PAGE X LDA 15X......
"ZERO PAGE Y LDX 15Y.<...."ABSOLUTE X
LDA 1500X.Z...."ABSOLUTE Y LDA 150
0Y.~....:."ENTER ALL NUMBERS IN ";..
....H.1 .."HEX":.200...C.."DECIMAL"...H.
.:."PLEASE INPUT STARTING ADDRESS FOR ML
PROGRAM":. SA$...R..H.1.H$.SA$:.5000:SA
.DE:.220...W.SA.E(SA$).0...TA.SA:.".":.
CLEAR THE SCREEN.T....H.1.DE.SA:SZ.3:.40
00:.H$;:.240.`....SA" ";......MN$:.".".3
0);:. GO UP ONE LINE AND OVER 10 SPACES.
..... ADD NEW PSEUDO-OPS HERE.S....I(MN$
,7)."FORWARD".FB.SA......I(MN$,7)."RESOL
VE".FR.SA.FB:.FB.1,FR.2:." OK":.230.M..
..I(MN$,4)."POKE".."ADDR,NUMBER(DEC)";:.
ADR,NUM:.ADR,NUM:.230......MN$."END"..:.
" PROGRAM IS FROM"TA"TO"SA:......L.
C(MN$):L$.H(MN$,3)......I.1.56:.L$.M$(I)
.300......I.D."..850...,.. PRIMARY OPCOD
E CATEGORIES...-.TY.TY(I):OP.OP(I)...1..
FB.SA.TN.0:.2010. .6..TY.0..1000.B.@..TY
.3.TY.1:.L.3.OP.OP.8:.1000._.J.R$.I(MN$,
L.4):.H.1..6000...T.LR$.H(R$,1):LL.C(R$)
:.LR$."#".480...^..LR$."(".520...H..TY.8
.600...R..TY.3.OP.OP.8:.1000...|..I(R$,1
)."X".I(R$,1)."Y".630......H(L$,1)."J".8
20.....TN.E(R$):.TN.255.430.,....TY.1.TY
.3.TY.4.TY.5.OP.OP.4.6....2000.I...H%.TN
.256:L%.TN.256.H%:.TY.2.TY.7.OP.OP.8:.47
0......TY.1.TY.3.TY.4.TY.5.OP.OP.12:.470
...B..TY.6.TY.9.470...L..850...V..3000.K
...TN.E(I(R$,LL.1))......TY.1.OP.OP.8:.2
000......TY.4.TY.5..2000......850......I
(R$,2).")Y".540.-....I(R$,2)."X)".570.D.
..TN.E(J(R$,2,LL.3)).].&..TY.1.OP.OP.16:
.2000.F.0..850.}.:.TN.E(J(R$,2,LL.3))...
D..TY.1..2000...N..850.P.X.TN.E(R$):TN.T
N.SA.2:.TN..128.TN.127.."TOO FAR ";:.850
...B..TN.0.TN.TN.256...L..2000...V..I(R$
,2).")Y".540......I(R$,1)."X".720.'....
*ZERO Y.H...TN.E(H(R$,LL.1)):.TN.255.680
.[....TY.2.TY.5.730.I....TY.1.760......7
70:.TY.1.OP.OP.24:.710......TY.5.OP.OP.2
8:.710......850...F..3000.X.P.TN.E(H(R$,
LL.1)):.TN.255..770:.780...Z..TY.2.OP.OP
.16:.760......TY.1.TY.3.TY.5.OP.OP.20:.7
60......850.%....2000.B...H%.TN.256:L%.T
N.256.H%:..Z....TY.2.OP.OP.24:.810.|....
TY.1.TY.3.TY.5.OP.OP.28:.810... ..850...
*..3000...4.TN.E(R$)...>..770...H..710.C
.R..". ERROR ":.230...... 1 BYTE INSTRUC
TIONS......SA,OP:SA.SA.1:.H.1. 1030.....
.OP:.230.#...DE . OP:.4000:.H$:.230.=.P.
. 2 BYTE INSTRUCTIONS.Y.U..TN.256.." INC
ORRECT ARGUMENT. (#5 IN HEX IS #05)":.23
0...Z..SA,OP:.SA.1,TN:SA.SA.2:.H.1.2030.
.....OP;TN:.230.I...DE . OP:.4000:.H$" "
;.....DE . TN:.4000:.H$:.230...... 3 BYT
E INSTRUCTIONS.-.B..SA,OP:.SA.1,L%:.SA.2
,H%:SA.SA.3:.H.1.3030.@.L..OP;L%;H%:.230
.Z.V.DE . OP:.4000:.H$" ";.T...DE . L%:.
4000:.H$" ";.....DE . H%:.4000:.H$:.230.
.. .. DECIMAL TO 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)......:SZ.1:.."....
HEX TO DECIMAL (H$ TO DE).Z...D.0:Q.3:.
M.1.4:.W.0.15:.J(H$,M,1).J(HE$,W.1,1).50
30.A....W.....D1.W.(16.(Q)):D.D.D1:Q.Q.1
:.M:DE..(D):..G.P.. ACCEPT HEX OPCODE IN
PUT AND TRANSLATE IT TO DECIMAL...Z..H(R
$,1)."#".H$."00".I(R$,2):.5000:R$."#".D(
DE):..4...LS.C(R$):AZ$.H(R$,1):ZA$.J(R$,
LS,1):.AZ$.."(".6050.M....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".6070
.....H$.H(ZA$,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$:..T N.ADC
1097,AND1033,ASL3002,BCC8144,BCS8176,BEQ
8240,BIT7036,BMI8048.. *N.BNE8208,BPL801
6,BRK0000,BVC8080,BVS8112,CLC0024,CLD021
6,CLI0088.. 4N.CLV0184,CMP1193,CPX4224,C
PY4192,DEC2198,DEX0202,DEY0136,EOR1065.C
!>N.INC2230,INX0232,INY0200,JMP6076,JSR9
032,LDA1161,LDX5162,LDY5160..!HN.LSR3066
,NOP0234,ORA1001,PHA0072,PHP0008,PLA0104
,PLP0040,ROL3034.M!RN.ROR3098,RTI0064,RT
S0096,SBC1225,SEC0056,SED0248,SEI0120,ST
A1129.."\N.STX2134,STY2132,TAX0170,TAY01
68,TSX0186,TXA0138,TXS0154,TYA0152...
> CLICK IMAGE PREVIEW FOR FULL MODAL