Multiple names: MASTER, MONIT-MASTER
FILE INFORMATION
FILENAME(S):
• MASTER<br>• MONIT-MASTER
FILE TYPE(S): PRG
FILE SIZE: 5.4K
FIRST SEEN: 2025-12-02 00:01:53
APPEARS ON: 4 disk(s)
FILE HASH
801464c75be19e89e0f23394590203ccb35487414e085a8fd77430fce7c28ab7
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DE GROOT | MASTER | PRG | earthshaker | 11 | 0 | DOWNLOAD FILE |
| DE GROOT | MONIT-MASTER | PRG | earthshaker | 12 | 0 | DOWNLOAD FILE |
| DE GROOT | MASTER | PRG | earthshaker | 31 | 3 | DOWNLOAD FILE |
| DE GROOT | MONIT-MASTER | PRG | earthshaker | 10 | 11 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 10 27 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |..%..'.*********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 00 42 08 24 27 8F 20 47 45 4E 45 |*****.B.$'. GENE|
00000030: 52 41 4C 20 49 4E 49 54 49 41 4C 49 53 41 54 49 |RAL INITIALISATI|
00000040: 4F 4E 00 66 08 2E 27 8F 2A 2A 2A 2A 2A 2A 2A 2A |ON.f..'.********|
00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000060: 2A 2A 2A 2A 2A 2A 00 88 08 30 27 8B 20 C3 28 50 |******...0'. .(P|
00000070: 54 52 24 29 AA C3 28 45 24 29 B3 B1 32 35 35 A7 |TR$)..(E$)..255.|
00000080: 9C 3A 8D 31 39 30 30 30 00 9A 08 33 27 44 45 56 |.:.19000...3'DEV|
00000090: B2 31 3A 42 41 53 45 B2 31 36 00 BF 08 38 27 96 |.1:BASE.16...8'.|
000000A0: A5 20 48 45 58 28 58 29 B2 28 58 AF 31 35 29 AA |. HEX(X).(X.15).|
000000B0: 34 38 AB 28 28 58 AF 31 35 29 B1 39 29 AC 37 00 |48.((X.15).9).7.|
000000C0: DB 08 42 27 96 A5 20 44 45 43 28 58 29 B2 58 AB |..B'.. DEC(X).X.|
000000D0: 34 38 AA 28 58 B1 35 37 29 AC 37 00 EF 08 4C 27 |48.(X.57).7...L'|
000000E0: 46 41 4C 53 45 B2 30 3A 54 52 55 45 B2 AB 31 00 |FALSE.0:TRUE..1.|
000000F0: 06 09 56 27 97 35 33 32 38 31 2C 31 3A 97 35 33 |..V'.53281,1:.53|
00000100: 32 38 30 2C 31 35 00 2A 09 74 27 8F 2A 2A 2A 2A |280,15.*.t'.****|
00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4C 09 75 27 8F |**********.L.u'.|
00000130: 20 43 4F 4E 54 52 4F 4C 20 52 4F 55 54 49 4E 45 | CONTROL ROUTINE|
00000140: 20 46 4F 52 20 4D 4F 4E 49 54 4F 52 00 70 09 76 | FOR MONITOR.p.v|
00000150: 27 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |'.**************|
00000160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000170: 00 B2 09 7E 27 83 20 45 58 49 54 20 54 4F 20 42 |...~'. EXIT TO B|
00000180: 41 53 49 43 2C 4D 45 4D 4F 52 59 20 4D 4F 44 49 |ASIC,MEMORY MODI|
00000190: 46 59 2C 4D 45 4D 4F 52 59 20 44 55 4D 50 2C 4D |FY,MEMORY DUMP,M|
000001A0: 41 43 48 49 4E 45 20 43 4F 44 45 20 45 58 43 55 |ACHINE CODE EXCU|
000001B0: 54 45 00 E6 09 7F 27 83 20 4C 4F 41 44 20 4D 41 |TE....'. LOAD MA|
000001C0: 43 48 49 4E 45 20 43 4F 44 45 20 46 49 4C 45 2C |CHINE CODE FILE,|
000001D0: 53 41 56 45 20 4D 41 43 48 49 4E 45 20 43 4F 44 |SAVE MACHINE COD|
000001E0: 45 20 46 49 4C 45 00 F9 09 88 27 83 20 44 49 53 |E FILE....'. DIS|
000001F0: 41 53 53 45 4D 42 4C 45 52 00 0B 0A 92 27 83 20 |ASSEMBLER....'. |
00000200: 46 49 4C 45 20 45 44 49 54 4F 52 00 1B 0A 9C 27 |FILE EDITOR....'|
00000210: 83 20 41 53 53 45 4D 42 4C 45 52 00 25 0A CE 27 |. ASSEMBLER.%..'|
00000220: 83 20 45 4E 44 00 2B 0A D8 27 8C 00 33 0A EC 27 |. END.+..'..3..'|
00000230: 58 B2 30 00 67 0A F6 27 99 22 1F 93 2D 2D 2D 2D |X.0.g..'."..----|
00000240: 2D 2D 2D 2D 2D 4D 41 43 48 49 4E 45 20 43 4F 44 |-----MACHINE COD|
00000250: 45 20 4D 4F 4E 49 54 4F 52 2D 2D 2D 2D 2D 2D 2D |E MONITOR-------|
00000260: 2D 2D 2D 2D 1E 11 22 00 6F 0A 0A 28 87 54 24 00 |----..".o..(.T$.|
00000270: 98 0A 14 28 8B 20 54 24 B3 B1 22 45 4E 44 22 20 |...(. T$.."END" |
00000280: A7 99 A3 35 29 58 22 29 22 54 24 3A 58 B2 58 AA |...5)X")"T$:X.X.|
00000290: 31 3A 89 31 30 32 35 30 00 AF 0A 19 28 8B 20 58 |1:.10250....(. X|
000002A0: B3 31 35 A7 81 59 B2 58 A4 31 35 3A 99 3A 82 00 |.15..Y.X.15:.:..|
000002B0: D4 0A 1E 28 99 22 43 4F 4D 4D 41 4E 44 20 28 20 |...(."COMMAND ( |
000002C0: 30 20 2D 22 20 58 AB 31 20 22 20 29 20 3A 20 22 |0 -" X.1 " ) : "|
000002D0: 3B 3A 85 54 00 E8 0A 3C 28 8B 20 54 B3 30 B0 54 |;:.T...<(. T.0.T|
000002E0: B1 58 A7 31 30 31 30 30 00 0A 0B 41 28 8B 20 54 |.X.10100...A(. T|
000002F0: B2 30 20 A7 99 22 93 11 11 11 11 12 42 59 45 92 |.0 .."......BYE.|
00000300: 11 11 11 11 22 3A A0 31 3A 80 00 41 0B 46 28 91 |....":.1:..A.F(.|
00000310: 54 8D 31 33 31 30 30 2C 31 33 33 30 30 2C 31 33 |T.13100,13300,13|
00000320: 35 30 30 2C 31 34 33 30 30 2C 31 34 31 30 30 2C |500,14300,14100,|
00000330: 31 35 38 30 30 2C 32 34 38 30 30 2C 32 30 30 30 |15800,24800,2000|
00000340: 30 00 4D 0B 50 28 89 20 31 30 31 30 30 00 71 0B |0.M.P(. 10100.q.|
00000350: F8 2A 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.*.*************|
00000360: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000370: 2A 00 8E 0B F9 2A 8F 20 43 4F 4E 56 45 52 54 20 |*....*. CONVERT |
00000380: 44 45 43 49 4D 41 4C 20 54 4F 20 48 45 58 00 B2 |DECIMAL TO HEX..|
00000390: 0B FA 2A 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..*.************|
000003A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003B0: 2A 2A 00 C0 0B 02 2B 54 B2 48 3A 48 24 B2 22 22 |**....+T.H:H$.""|
000003C0: 00 F5 0B 0C 2B 48 24 B2 C7 28 A5 48 45 58 28 54 |....+H$..(.HEX(T|
000003D0: AB B5 28 54 AD 31 36 29 AC 31 36 29 29 AA 48 24 |..(T.16).16)).H$|
000003E0: 3A 54 B2 B5 28 54 AD 31 36 29 3A 8B 54 B1 30 A7 |:T..(T.16):.T.0.|
000003F0: 31 31 30 32 30 00 FB 0B 2A 2B 8E 00 1F 0C 5C 2B |11020...*+....\+|
00000400: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000420: 33 0C 5D 2B 8F 20 42 59 54 45 20 49 4E 54 4F 20 |3.]+. BYTE INTO |
00000430: 48 45 58 00 57 0C 5E 2B 8F 2A 2A 2A 2A 2A 2A 2A |HEX.W.^+.*******|
00000440: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000450: 2A 2A 2A 2A 2A 2A 2A 00 6B 0C 66 2B 48 B2 C2 28 |*******.k.f+H..(|
00000460: 41 44 29 3A 41 44 B2 41 44 AA 31 00 77 0C 70 2B |AD):AD.AD.1.w.p+|
00000470: 8D 20 31 31 30 30 30 00 91 0C 7A 2B 8B 20 C3 28 |. 11000...z+. .(|
00000480: 48 24 29 B3 32 20 A7 20 48 24 B2 22 30 22 AA 48 |H$).2 . H$."0".H|
00000490: 24 00 A0 0C 84 2B 4F 32 24 B2 4F 32 24 AA 48 24 |$....+O2$.O2$.H$|
000004A0: 00 A6 0C 8E 2B 8E 00 CA 0C C0 2B 8F 2A 2A 2A 2A |....+.....+.****|
000004B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E5 0C C1 2B 8F |**********....+.|
000004D0: 20 49 4E 50 55 54 20 46 49 4E 49 53 48 20 41 44 | INPUT FINISH AD|
000004E0: 44 52 45 53 53 00 09 0D C2 2B 8F 2A 2A 2A 2A 2A |DRESS....+.*****|
000004F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000500: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 13 0D C5 2B 48 24 |*********....+H$|
00000510: B2 22 22 00 40 0D CA 2B 85 22 46 49 4E 49 53 48 |."".@..+."FINISH|
00000520: 20 41 44 44 52 45 53 53 20 28 49 4E 20 48 45 58 | ADDRESS (IN HEX|
00000530: 29 20 3A 20 22 3B 48 24 3A 8D 20 31 31 39 35 30 |) : ";H$:. 11950|
00000540: 00 62 0D DE 2B 8B 20 45 52 52 20 B0 20 48 B3 30 |.b..+. ERR . H.0|
00000550: 20 B0 20 48 B1 36 35 35 33 35 20 A7 20 31 31 32 | . H.65535 . 112|
00000560: 30 30 00 6D 0D E8 2B 45 41 B2 48 3A 8E 00 91 0D |00.m..+EA.H:....|
00000570: F2 2B 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.+.*************|
00000580: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000590: 2A 00 A7 0D F3 2B 8F 20 49 4E 50 55 54 20 46 49 |*....+. INPUT FI|
000005A0: 4C 45 20 4E 41 4D 45 00 C1 0D F4 2B 8D 20 32 35 |LE NAME....+. 25|
000005B0: 35 30 30 3A 8B 20 44 45 56 B2 34 A7 31 31 32 39 |500:. DEV.4.1129|
000005C0: 30 00 CC 0D F7 2B 49 4E 24 B2 22 22 00 ED 0D FC |0....+IN$.""....|
000005D0: 2B 85 22 46 49 4C 45 20 4E 41 4D 45 20 3A 20 22 |+."FILE NAME : "|
000005E0: 3B 49 4E 24 3A 54 B2 C3 28 49 4E 24 29 00 1D 0E |;IN$:T..(IN$)...|
000005F0: 10 2C 8B 20 54 B1 31 36 20 B0 20 54 B3 30 20 A7 |.,. T.16 . T.0 .|
00000600: 99 22 11 46 49 4C 45 20 4E 41 4D 45 20 49 4E 56 |.".FILE NAME INV|
00000610: 41 4C 49 44 22 3A 89 20 31 31 32 36 30 00 23 0E |ALID":. 11260.#.|
00000620: 1A 2C 8E 00 47 0E 4A 2E 8F 2A 2A 2A 2A 2A 2A 2A |.,..G.J..*******|
00000630: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000640: 2A 2A 2A 2A 2A 2A 2A 00 5A 0E 4B 2E 8F 20 41 53 |*******.Z.K.. AS|
00000650: 4B 20 43 4F 4E 54 49 4E 55 45 00 7E 0E 4C 2E 8F |K CONTINUE.~.L..|
00000660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000670: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 88 |**************..|
00000680: 0E 52 2E 54 24 B2 22 22 00 A5 0E 54 2E 85 20 22 |.R.T$.""...T.. "|
00000690: 43 4F 4E 54 49 4E 55 45 20 28 59 2F 4E 29 20 3A |CONTINUE (Y/N) :|
000006A0: 20 22 3B 54 24 00 C4 0E 5E 2E 8B 20 54 24 B2 22 | ";T$...^.. T$."|
000006B0: 59 22 20 A7 20 43 4F B2 54 52 55 45 3A 89 20 31 |Y" . CO.TRUE:. 1|
000006C0: 31 38 39 35 00 E2 0E 68 2E 8B 20 54 24 B3 B1 22 |1895...h.. T$.."|
000006D0: 4E 22 20 A7 99 22 91 22 3B 20 3A 20 89 31 31 38 |N" .."."; : .118|
000006E0: 35 30 00 EF 0E 72 2E 43 4F B2 46 41 4C 53 45 00 |50...r.CO.FALSE.|
000006F0: F5 0E 77 2E 8E 00 19 0F AE 2E 8F 2A 2A 2A 2A 2A |..w........*****|
00000700: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000710: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3D 0F AF 2E 8F 20 |*********.=.... |
00000720: 43 4F 4E 56 45 52 54 20 48 45 58 20 49 4E 20 48 |CONVERT HEX IN H|
00000730: 24 20 54 4F 20 44 45 43 20 49 4E 20 48 00 61 0F |$ TO DEC IN H.a.|
00000740: B0 2E 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
00000750: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000760: 2A 00 83 0F C7 2E 45 52 52 B2 46 41 4C 53 45 3A |*.....ERR.FALSE:|
00000770: 48 B2 30 3A 8B 20 C3 28 48 24 29 B2 30 A7 31 32 |H.0:. .(H$).0.12|
00000780: 30 33 30 00 93 0F CC 2E 81 20 58 B2 31 A4 C3 28 |030...... X.1..(|
00000790: 48 24 29 00 B7 0F D6 2E 54 B2 A5 44 45 43 28 C6 |H$).....T..DEC(.|
000007A0: 28 CA 28 48 24 2C 58 2C 31 29 29 29 3A 48 B2 48 |(.(H$,X,1))):H.H|
000007B0: AC 42 41 53 45 AA 54 00 D4 0F EA 2E 8B 20 54 B1 |.BASE.T...... T.|
000007C0: 42 41 53 45 AB 31 B0 54 B3 30 A7 20 45 52 52 B2 |BASE.1.T.0. ERR.|
000007D0: 54 52 55 45 00 DB 0F F4 2E 82 58 00 E1 0F FE 2E |TRUE......X.....|
000007E0: 8E 00 05 10 12 2F 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |...../.*********|
000007F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000800: 2A 2A 2A 2A 2A 00 1F 10 13 2F 8F 20 49 4E 50 55 |*****..../. INPU|
00000810: 54 20 53 54 41 52 54 20 41 44 44 52 45 53 53 00 |T START ADDRESS.|
00000820: 43 10 14 2F 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |C../.***********|
00000830: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000840: 2A 2A 2A 00 4D 10 19 2F 48 24 B2 22 22 00 78 10 |***.M../H$."".x.|
00000850: 1C 2F 85 22 53 54 41 52 54 20 41 44 44 52 45 53 |./."START ADDRES|
00000860: 53 20 28 49 4E 20 48 45 58 29 20 3A 22 3B 20 48 |S (IN HEX) :"; H|
00000870: 24 3A 8D 31 31 39 35 30 00 95 10 30 2F 8B 20 45 |$:.11950...0/. E|
00000880: 52 52 20 B0 48 B3 30 B0 48 B1 36 35 35 33 35 A7 |RR .H.0.H.65535.|
00000890: 31 32 30 36 30 00 A0 10 3A 2F 41 44 B2 48 3A 8E |12060...:/AD.H:.|
000008A0: 00 C4 10 A8 2F 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..../.**********|
000008B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008C0: 2A 2A 2A 2A 00 D5 10 A9 2F 8F 20 48 45 58 20 4C |****..../. HEX L|
000008D0: 4F 41 44 45 52 00 F9 10 AA 2F 8F 2A 2A 2A 2A 2A |OADER..../.*****|
000008E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000008F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 04 11 B2 2F 54 31 |*********..../T1|
00000900: 24 B2 22 22 00 17 11 BC 2F 81 20 58 31 B2 31 A4 |$.""..../. X1.1.|
00000910: C3 28 54 24 29 A9 32 00 53 11 C6 2F 54 31 24 B2 |.(T$).2.S../T1$.|
00000920: 54 31 24 AA C7 28 A5 44 45 43 28 C6 28 CA 28 54 |T1$..(.DEC(.(.(T|
00000930: 24 2C 58 31 2C 31 29 29 29 AC 31 36 AA A5 44 45 |$,X1,1))).16..DE|
00000940: 43 28 C6 28 CA 28 54 24 2C 58 31 AA 31 2C 31 29 |C(.(.(T$,X1.1,1)|
00000950: 29 29 29 00 5B 11 E4 2F 82 58 31 00 61 11 EE 2F |))).[../.X1.a../|
00000960: 8E 00 85 11 C8 32 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....2.*********|
00000970: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000980: 2A 2A 2A 2A 2A 00 96 11 C9 32 8F 20 47 45 54 20 |*****....2. GET |
00000990: 31 20 42 59 54 45 00 BA 11 CA 32 8F 2A 2A 2A 2A |1 BYTE....2.****|
000009A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C4 11 CF 32 48 |**********....2H|
000009C0: 24 B2 22 22 00 DF 11 D2 32 85 22 42 59 54 45 20 |$.""....2."BYTE |
000009D0: 28 49 4E 20 48 45 58 29 20 3A 20 22 3B 48 24 00 |(IN HEX) : ";H$.|
000009E0: EB 11 E6 32 8D 20 31 31 39 35 30 00 11 12 F0 32 |...2. 11950....2|
000009F0: 8B 20 45 52 52 20 B0 20 48 B3 30 20 B0 20 48 B1 |. ERR . H.0 . H.|
00000A00: 32 35 35 20 A7 99 22 91 22 3A 89 20 31 33 30 30 |255 ..".":. 1300|
00000A10: 30 00 17 12 FA 32 8E 00 3B 12 2C 33 8F 2A 2A 2A |0....2..;.,3.***|
00000A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4F 12 2D 33 |***********.O.-3|
00000A40: 8F 20 4D 45 4D 4F 52 59 20 4D 4F 44 49 46 59 00 |. MEMORY MODIFY.|
00000A50: 73 12 2E 33 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |s..3.***********|
00000A60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A70: 2A 2A 2A 00 7F 12 36 33 8D 20 31 32 30 35 30 00 |***...63. 12050.|
00000A80: A8 12 40 33 48 B2 41 44 3A 8D 20 31 31 30 30 30 |..@3H.AD:. 11000|
00000A90: 3A 99 20 48 24 20 A3 36 29 20 22 2F 22 20 3B 20 |:. H$ .6) "/" ; |
00000AA0: 3A 20 4F 32 24 B2 22 22 00 C6 12 54 33 8D 20 31 |: O2$.""...T3. 1|
00000AB0: 31 31 30 30 3A 41 44 B2 41 44 AB 31 3A 99 20 48 |1100:AD.AD.1:. H|
00000AC0: 24 20 A6 36 29 3B 00 D0 12 5E 33 54 24 B2 22 22 |$ .6);...^3T$.""|
00000AD0: 00 E7 12 68 33 85 20 22 20 2B 2C 2D 2C 49 2C 45 |...h3. " +,-,I,E|
00000AE0: 20 3A 20 22 3B 54 24 00 0F 13 72 33 8B 20 54 24 | : ";T$...r3. T$|
00000AF0: B2 22 2B 22 20 AF 20 41 44 B3 36 35 35 33 35 A7 |."+" . AD.65535.|
00000B00: 41 44 B2 41 44 AA 31 3A 89 20 31 33 31 32 30 00 |AD.AD.1:. 13120.|
00000B10: 35 13 7C 33 8B 20 54 24 B2 22 2D 22 20 AF 20 41 |5.|3. T$."-" . A|
00000B20: 44 B1 30 20 A7 20 41 44 B2 41 44 AB 31 3A 89 20 |D.0 . AD.AD.1:. |
00000B30: 31 33 31 32 30 00 46 13 86 33 8B 20 54 24 B2 22 |13120.F..3. T$."|
00000B40: 45 22 20 A7 20 8E 00 64 13 90 33 8B 20 54 24 B3 |E" . ..d..3. T$.|
00000B50: B1 22 49 22 20 A7 20 99 22 91 91 22 3A 89 20 31 |."I" . ."..":. 1|
00000B60: 33 31 32 30 00 7F 13 9A 33 8D 20 31 33 30 30 30 |3120....3. 13000|
00000B70: 3A 97 20 41 44 2C 48 3A 89 20 31 33 31 32 30 00 |:. AD,H:. 13120.|
00000B80: A3 13 F4 33 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...3.***********|
00000B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BA0: 2A 2A 2A 00 BF 13 F5 33 8F 20 44 55 4D 50 20 4D |***....3. DUMP M|
00000BB0: 45 4D 4F 52 59 20 54 4F 20 53 43 52 45 45 4E 00 |EMORY TO SCREEN.|
00000BC0: E3 13 F6 33 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...3.***********|
00000BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BE0: 2A 2A 2A 00 EE 13 FE 33 8D 31 32 30 35 30 00 0C |***....3.12050..|
00000BF0: 14 08 34 99 22 93 22 3A 81 58 31 B2 31 A4 31 38 |..4.".":.X1.1.18|
00000C00: 3A 48 B2 41 44 3A 8D 31 31 30 30 30 00 25 14 1C |:H.AD:.11000.%..|
00000C10: 34 4F 32 24 B2 22 22 3A 4F 31 24 B2 48 24 3A 4F |4O2$."":O1$.H$:O|
00000C20: 33 24 B2 22 22 00 31 14 26 34 81 58 32 B2 30 A4 |3$."".1.&4.X2.0.|
00000C30: 37 00 48 14 30 34 8D 31 31 31 30 30 3A 4F 32 24 |7.H.04.11100:O2$|
00000C40: B2 4F 32 24 AA 22 20 22 00 70 14 3F 34 8B 20 48 |.O2$." ".p.?4. H|
00000C50: B1 33 31 20 AF 20 48 B3 39 35 20 A7 20 4F 33 24 |.31 . H.95 . O3$|
00000C60: B2 4F 33 24 AA C7 28 48 29 3A 89 31 33 33 38 30 |.O3$..(H):.13380|
00000C70: 00 80 14 41 34 4F 33 24 B2 4F 33 24 AA 22 2E 22 |...A4O3$.O3$."."|
00000C80: 00 88 14 44 34 82 58 32 00 A3 14 4E 34 99 20 4F |...D4.X2...N4. O|
00000C90: 31 24 20 A3 35 29 20 4F 32 24 20 A3 33 31 29 20 |1$ .5) O2$ .31) |
00000CA0: 4F 33 24 00 AB 14 58 34 82 58 31 00 C2 14 62 34 |O3$...X4.X1...b4|
00000CB0: 99 3A 8D 31 31 38 35 30 3A 8B 43 4F A7 31 33 33 |.:.11850:.CO.133|
00000CC0: 32 30 00 C8 14 80 34 8E 00 EC 14 BC 34 8F 2A 2A |20....4.....4.**|
00000CD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 09 15 BD |************....|
00000CF0: 34 8F 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 20 |4. MACHINE CODE |
00000D00: 45 58 45 43 55 54 49 4F 4E 00 2D 15 BE 34 8F 2A |EXECUTION.-..4.*|
00000D10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3F 15 |*************.?.|
00000D30: C6 34 8D 20 31 32 30 35 30 3A 9E 41 44 3A 8E 00 |.4. 12050:.AD:..|
00000D40: 63 15 14 37 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |c..7.***********|
00000D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D60: 2A 2A 2A 00 7B 15 15 37 8F 20 4D 41 43 48 49 4E |***.{..7. MACHIN|
00000D70: 45 20 43 4F 44 45 20 53 41 56 45 00 9F 15 16 37 |E CODE SAVE....7|
00000D80: 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.***************|
00000D90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000DA0: B9 15 1E 37 8D 20 31 31 32 35 30 3A 8D 31 32 30 |...7. 11250:.120|
00000DB0: 35 30 3A 8D 31 31 32 30 30 00 F5 15 23 37 54 24 |50:.11200...#7T$|
00000DC0: B2 22 4E 22 3A 8B 20 44 45 56 B2 38 20 A7 20 85 |."N":. DEV.8 . .|
00000DD0: 22 4F 56 45 52 57 52 49 54 45 20 45 58 49 53 54 |"OVERWRITE EXIST|
00000DE0: 49 4E 47 20 46 49 4C 45 20 28 59 2F 4E 29 20 3A |ING FILE (Y/N) :|
00000DF0: 20 22 3B 54 24 00 12 16 24 37 8B 20 54 24 B2 22 | ";T$...$7. T$."|
00000E00: 59 22 20 A7 20 49 4E 24 B2 22 20 40 30 22 AA 49 |Y" . IN$." @0".I|
00000E10: 4E 24 00 2F 16 28 37 8B 20 44 45 56 B2 38 20 A7 |N$./.(7. DEV.8 .|
00000E20: 20 49 4E 24 B2 49 4E 24 AA 22 2C 53 2C 57 22 00 | IN$.IN$.",S,W".|
00000E30: 43 16 2D 37 8B 20 53 41 B1 45 41 20 A7 20 31 34 |C.-7. SA.EA . 14|
00000E40: 31 39 30 00 63 16 32 37 9F 20 32 2C 44 45 56 2C |190.c.27. 2,DEV,|
00000E50: 32 2C 49 4E 24 3A 98 20 32 2C 41 44 3A 98 20 32 |2,IN$:. 2,AD:. 2|
00000E60: 2C 45 41 00 82 16 46 37 81 20 58 B2 41 44 A4 45 |,EA...F7. X.AD.E|
00000E70: 41 3A 98 32 2C C2 28 58 29 3A 82 3A 98 32 3A A0 |A:.2,.(X):.:.2:.|
00000E80: 20 32 00 88 16 6E 37 8E 00 AC 16 DC 37 8F 2A 2A | 2...n7.....7.**|
00000E90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C4 16 DD |************....|
00000EB0: 37 8F 20 4D 41 43 48 49 4E 45 20 43 4F 44 45 20 |7. MACHINE CODE |
00000EC0: 4C 4F 41 44 00 E8 16 DE 37 8F 2A 2A 2A 2A 2A 2A |LOAD....7.******|
00000ED0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EE0: 2A 2A 2A 2A 2A 2A 2A 2A 00 0D 17 E6 37 8D 20 31 |********....7. 1|
00000EF0: 31 32 35 30 3A 8B 20 44 45 56 B2 38 20 A7 20 49 |1250:. DEV.8 . I|
00000F00: 4E 24 B2 49 4E 24 AA 22 2C 53 2C 52 22 00 36 17 |N$.IN$.",S,R".6.|
00000F10: F0 37 9F 20 32 2C 44 45 56 2C 30 2C 49 4E 24 3A |.7. 2,DEV,0,IN$:|
00000F20: 84 20 32 2C 53 41 2C 45 41 3A 8B 20 53 54 20 A7 |. 2,SA,EA:. ST .|
00000F30: 20 A0 20 32 3A 8E 00 59 17 0E 38 81 20 58 B2 54 | . 2:..Y..8. X.T|
00000F40: 41 20 A4 20 45 41 3A 84 20 32 2C 54 3A 97 58 2C |A . EA:. 2,T:.X,|
00000F50: 54 3A 82 3A A0 20 32 3A 8E 00 7D 17 38 4A 8F 2A |T:.:. 2:..}.8J.*|
00000F60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9D 17 |*************...|
00000F80: 39 4A 8F 20 49 4E 49 54 49 41 4C 49 53 45 20 44 |9J. INITIALISE D|
00000F90: 45 43 4F 44 45 52 20 54 41 42 4C 45 53 00 C1 17 |ECODER TABLES...|
00000FA0: 3A 4A 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |:J.*************|
00000FB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FC0: 2A 00 CD 17 3D 4A 42 41 53 45 B2 31 36 00 E9 17 |*...=JBASE.16...|
00000FD0: 3F 4A 96 A5 20 44 45 43 28 58 29 B2 58 AB 34 38 |?J.. DEC(X).X.48|
00000FE0: AA 28 58 B1 35 37 29 AC 37 00 F6 17 42 4A 86 20 |.(X.57).7...BJ. |
00000FF0: 54 41 24 28 34 29 00 23 18 43 4A 54 24 B2 20 20 |TA$(4).#.CJT$. |
00001000: 20 22 30 41 32 32 33 38 33 38 33 38 32 32 30 32 | "0A223838382202|
00001010: 33 38 32 34 32 32 30 32 33 38 33 38 32 32 30 32 |3824220238382202|
00001020: 33 38 22 00 50 18 44 4A 54 24 B2 54 24 AA 22 30 |38".P.DJT$.T$."0|
00001030: 39 32 32 33 38 33 38 33 38 32 32 30 32 33 38 30 |9223838382202380|
00001040: 44 32 32 33 38 33 38 33 38 32 32 30 32 33 38 22 |D22383838220238"|
00001050: 00 7D 18 45 4A 54 24 B2 54 24 AA 22 31 43 30 31 |.}.EJT$.T$."1C01|
00001060: 33 38 33 38 30 36 30 31 32 37 33 38 32 36 30 31 |3838060127382601|
00001070: 32 37 33 38 30 36 30 31 32 37 33 38 22 00 AA 18 |273806012738"...|
00001080: 46 4A 54 24 B2 54 24 AA 22 30 37 30 31 33 38 33 |FJT$.T$."0701383|
00001090: 38 33 38 30 31 32 37 33 38 32 43 30 31 33 38 33 |8380127382C01383|
000010A0: 38 33 38 30 31 32 37 33 38 22 00 D7 18 47 4A 54 |838012738"...GJT|
000010B0: 24 B2 54 24 AA 22 32 39 31 37 33 38 33 38 33 38 |$.T$."2917383838|
000010C0: 31 37 32 30 33 38 32 33 31 37 32 30 33 38 31 42 |172038231720381B|
000010D0: 31 37 32 30 33 38 22 00 04 19 48 4A 54 24 B2 54 |172038"...HJT$.T|
000010E0: 24 AA 22 30 42 31 37 33 38 33 38 33 38 31 37 32 |$."0B17383838172|
000010F0: 30 33 38 30 46 31 37 33 38 33 38 33 38 31 37 32 |0380F17383838172|
00001100: 30 33 38 22 00 31 19 49 4A 54 24 B2 54 24 AA 22 |038".1.IJT$.T$."|
00001110: 32 41 30 30 33 38 33 38 33 38 30 30 32 38 33 38 |2A00383838002838|
00001120: 32 35 30 30 32 38 33 38 31 42 30 30 32 38 33 38 |250028381B002838|
00001130: 22 00 48 19 4A 4A 8D 20 31 32 32 30 30 3A 54 41 |".H.JJ. 12200:TA|
00001140: 24 28 30 29 B2 54 31 24 00 75 19 4B 4A 54 24 B2 |$(0).T1$.u.KJT$.|
00001150: 20 20 20 22 30 43 30 30 33 38 33 38 33 38 30 30 | "0C0038383800|
00001160: 32 38 33 38 32 45 30 30 33 38 33 38 33 38 30 30 |28382E0038383800|
00001170: 32 38 33 38 22 00 A2 19 4C 4A 54 24 B2 54 24 AA |2838"...LJT$.T$.|
00001180: 22 33 38 32 46 33 38 33 38 33 31 32 46 33 30 33 |"382F3838312F303|
00001190: 38 31 36 33 38 33 35 33 38 33 31 32 46 33 30 33 |816383538312F303|
000011A0: 38 22 00 CF 19 4D 4A 54 24 B2 54 24 AA 22 30 33 |8"...MJT$.T$."03|
000011B0: 32 46 33 38 33 38 33 31 32 46 33 30 33 38 33 37 |2F3838312F303837|
000011C0: 32 46 33 36 33 38 33 38 32 46 33 38 33 38 22 00 |2F3638382F3838".|
000011D0: FC 19 4E 4A 54 24 B2 54 24 AA 22 31 46 31 44 31 |..NJT$.T$."1F1D1|
000011E0: 45 33 38 31 46 31 44 31 45 33 38 33 33 31 44 33 |E381F1D1E38331D3|
000011F0: 32 33 38 31 46 31 44 31 45 33 38 22 00 29 1A 4F |2381F1D1E38".).O|
00001200: 4A 54 24 B2 54 24 AA 22 30 34 31 44 33 38 33 38 |JT$.T$."041D3838|
00001210: 31 46 31 44 31 45 33 38 31 30 31 44 33 34 33 38 |1F1D1E38101D3438|
00001220: 31 46 31 44 31 45 33 38 22 00 56 1A 50 4A 54 24 |1F1D1E38".V.PJT$|
00001230: B2 54 24 AA 22 31 33 31 31 33 38 33 38 31 33 31 |.T$."13113838131|
00001240: 31 31 34 33 38 31 41 31 31 31 35 33 38 31 33 31 |114381A111538131|
00001250: 31 31 34 33 38 22 00 83 1A 51 4A 54 24 B2 54 24 |11438"...QJT$.T$|
00001260: AA 22 30 38 31 31 33 38 33 38 33 38 31 31 31 34 |."08113838381114|
00001270: 33 38 30 45 31 31 33 38 33 38 33 38 31 31 31 34 |380E113838381114|
00001280: 33 38 22 00 A1 1A 52 4A 8D 20 31 32 32 30 30 3A |38"...RJ. 12200:|
00001290: 54 41 24 28 30 29 B2 54 41 24 28 30 29 AA 54 31 |TA$(0).TA$(0).T1|
000012A0: 24 00 CE 1A 53 4A 54 24 B2 20 20 20 22 31 32 32 |$...SJT$. "122|
000012B0: 42 33 38 33 38 31 32 32 42 31 38 33 38 31 39 32 |B3838122B1838192|
000012C0: 42 32 31 33 38 31 32 32 42 31 38 33 38 22 00 F9 |B2138122B1838"..|
000012D0: 1A 54 4A 54 24 B2 54 24 AA 22 30 35 32 42 33 38 |.TJT$.T$."052B38|
000012E0: 33 38 33 38 32 42 31 38 33 38 32 44 32 42 33 38 |38382B18382D2B38|
000012F0: 33 38 33 38 32 42 31 38 22 00 17 1B 55 4A 8D 20 |38382B18"...UJ. |
00001300: 31 32 32 30 30 3A 54 41 24 28 30 29 B2 54 41 24 |12200:TA$(0).TA$|
00001310: 28 30 29 AA 54 31 24 00 44 1B 56 4A 54 24 B2 20 |(0).T1$.D.VJT$. |
00001320: 20 20 22 31 37 31 31 31 36 36 31 31 32 30 31 31 | "1711166112011|
00001330: 43 43 31 33 38 31 31 31 34 34 31 31 42 31 31 31 |CC1381114411B111|
00001340: 41 41 31 22 00 71 1B 57 4A 54 24 B2 54 24 AA 22 |AA1".q.WJT$.T$."|
00001350: 43 37 31 31 36 36 36 31 31 32 30 31 43 43 43 31 |C71166611201CCC1|
00001360: 33 38 31 31 31 34 34 31 31 42 31 31 31 41 41 31 |381114411B111AA1|
00001370: 22 00 9E 1B 58 4A 54 24 B2 54 24 AA 22 31 37 31 |"...XJT$.T$."171|
00001380: 31 31 36 36 31 31 32 30 31 43 43 43 31 33 38 31 |116611201CCC1381|
00001390: 31 31 34 34 31 31 42 31 31 31 41 41 31 22 00 CB |114411B111AA1"..|
000013A0: 1B 59 4A 54 24 B2 54 24 AA 22 31 37 31 31 31 36 |.YJT$.T$."171116|
000013B0: 36 31 31 32 30 31 39 43 43 31 33 38 31 31 31 34 |6112019CC1381114|
000013C0: 34 31 31 42 31 31 31 41 41 31 22 00 F8 1B 5A 4A |411B111AA1"...ZJ|
000013D0: 54 24 B2 54 24 AA 22 31 37 31 31 36 36 36 31 31 |T$.T$."171166611|
000013E0: 31 31 31 43 43 43 31 33 38 31 31 34 34 35 31 31 |111CCC1381144511|
000013F0: 42 31 31 31 41 31 31 22 00 25 1C 5B 4A 54 24 B2 |B111A11".%.[JT$.|
00001400: 54 24 AA 22 32 37 32 31 36 36 36 31 31 32 31 31 |T$."272166611211|
00001410: 43 43 43 31 33 38 31 31 34 34 35 31 31 42 31 31 |CCC1381144511B11|
00001420: 41 41 42 31 22 00 52 1C 5C 4A 54 24 B2 54 24 AA |AAB1".R.\JT$.T$.|
00001430: 22 32 37 31 31 36 36 36 31 31 32 31 31 43 43 43 |"271166611211CCC|
00001440: 31 33 38 31 31 31 34 34 31 31 42 31 31 31 41 41 |1381114411B111AA|
00001450: 31 22 00 7D 1C 5D 4A 54 24 B2 54 24 AA 22 32 37 |1".}.]JT$.T$."27|
00001460: 31 31 36 36 36 31 31 32 31 31 43 43 43 31 33 38 |1166611211CCC138|
00001470: 31 31 31 34 34 31 31 42 31 31 31 41 22 00 9B 1C |1114411B111A"...|
00001480: 5E 4A 8D 20 31 32 32 30 30 3A 54 41 24 28 31 29 |^J. 12200:TA$(1)|
00001490: B2 54 31 24 AA C7 28 31 36 30 29 00 D7 1C 60 4A |.T1$..(160)...`J|
000014A0: 54 41 24 28 32 29 B2 20 20 20 20 20 20 20 22 41 |TA$(2). "A|
000014B0: 44 43 41 4E 44 41 53 4C 42 43 43 42 43 53 42 45 |DCANDASLBCCBCSBE|
000014C0: 51 42 49 54 42 4D 49 42 4E 45 42 50 4C 42 52 4B |QBITBMIBNEBPLBRK|
000014D0: 42 56 43 42 56 53 22 00 13 1D 61 4A 54 41 24 28 |BVCBVS"...aJTA$(|
000014E0: 32 29 B2 54 41 24 28 32 29 AA 22 43 4C 43 43 4C |2).TA$(2)."CLCCL|
000014F0: 44 43 4C 49 43 4C 56 43 4D 50 43 50 58 43 50 59 |DCLICLVCMPCPXCPY|
00001500: 44 45 43 44 45 58 44 45 59 45 4F 52 49 4E 43 49 |DECDEXDEYEORINCI|
00001510: 4E 58 22 00 4F 1D 62 4A 54 41 24 28 32 29 B2 54 |NX".O.bJTA$(2).T|
00001520: 41 24 28 32 29 AA 22 49 4E 59 4A 4D 50 4A 53 52 |A$(2)."INYJMPJSR|
00001530: 4C 44 41 4C 44 58 4C 44 59 4C 53 52 4E 4F 50 4F |LDALDXLDYLSRNOPO|
00001540: 52 41 50 48 41 50 48 50 50 4C 41 50 4C 50 22 00 |RAPHAPHPPLAPLP".|
00001550: 8B 1D 63 4A 54 41 24 28 32 29 B2 54 41 24 28 32 |..cJTA$(2).TA$(2|
00001560: 29 AA 22 52 4F 4C 52 4F 52 52 54 49 52 54 53 53 |)."ROLRORRTIRTSS|
00001570: 42 43 53 45 43 53 45 44 53 45 49 53 54 41 53 54 |BCSECSEDSEISTAST|
00001580: 58 53 54 59 54 41 58 54 41 59 22 00 AF 1D 64 4A |XSTYTAXTAY"...dJ|
00001590: 54 41 24 28 32 29 B2 54 41 24 28 32 29 AA 22 54 |TA$(2).TA$(2)."T|
000015A0: 53 58 54 58 41 54 58 53 54 59 41 3F 3F 3F 22 00 |SXTXATXSTYA???".|
000015B0: B5 1D 66 4A 8E 00 00 00 00 00 54 |..fJ......T |
..%..'.******************************.B.
$'. GENERAL INITIALISATION.F..'.********
**********************...0'. C(PTR$).C(E
$)..255..:.19000...3'DEV.1:BASE.16...8'.
. HEX(X).(X.15).48.((X.15).9).7...B'.. D
EC(X).X.48.(X.57).7...L'FALSE.0:TRUE..1.
..V'.53281,1:.53280,15.*.T'.************
******************.L.U'. CONTROL ROUTINE
FOR MONITOR.P.V'.**********************
********...~'. EXIT TO BASIC,MEMORY MODI
FY,MEMORY DUMP,MACHINE CODE EXCUTE...'.
LOAD MACHINE CODE FILE,SAVE MACHINE COD
E FILE....'. DISASSEMBLER....'. FILE EDI
TOR....'. ASSEMBLER.%.N'. END.+.X'..3..'
X.0.G..'."..---------MACHINE CODE MONITO
R-----------..".O..(.T$....(. T$.."END"
...5)X")"T$:X.X.1:.10250....(. X.15..Y.X
.15:.:..T..(."COMMAND ( 0 -" X.1 " ) : "
;:.T...<(. T.0.T.X.10100...A(. T.0 .."..
....BYE.....": 1:..A.F(.T.13100,13300,13
500,14300,14100,15800,24800,20000.M.P(.
10100.Q..*.*****************************
*....*. CONVERT DECIMAL TO HEX....*.****
**************************....+T.H:H$.""
....+H$.G(.HEX(T..(T.16).16)).H$:T..(T.1
6):.T.0.11020...*+....\+.***************
***************.3.]+. BYTE INTO HEX.W.^+
.******************************.K.F+H.B(
AD):AD.AD.1.W.P+. 11000...Z+. C(H$).2 .
H$."0".H$. ..+O2$.O2$.H$....+..J..+.****
**************************...A+. INPUT F
INISH ADDRESS...B+.*********************
*********...E+H$."".@.J+."FINISH ADDRESS
(IN HEX) : ";H$:. 11950.B..+. ERR . H.0
. H.65535 . 11200.M..+EA.H:.....+.*****
*************************....+. INPUT FI
LE NAME.A..+. 25500:. DEV.4.11290.L..+IN
$.""....+."FILE NAME : ";IN$:T.C(IN$)...
.,. T.16 . T.0 ..".FILE NAME INVALID":.
11260.#..,..G.J..***********************
*******.Z.K.. ASK CONTINUE.~.L..********
**********************...R.T$.""...T.. "
CONTINUE (Y/N) : ";T$.D.^.. T$."Y" . CO.
TRUE:. 11895...H.. T$.."N" .."."; : .118
50...R.CO.FALSE...W........*************
*****************.=.... CONVERT HEX IN H
$ TO DEC IN H.A....*********************
*********...G.ERR.FALSE:H.0:. C(H$).0.12
030...L.. X.1.C(H$)...V.T..DEC(F(J(H$,X,
1))):H.H.BASE.T.T.... T.BASE.1.T.0. ERR.
TRUE......X........../.*****************
*************..../. INPUT START ADDRESS.
C../.******************************.M../
H$."".X../."START ADDRESS (IN HEX) :"; H
$:.11950...0/. ERR .H.0.H.65535.12060. .
:/AD.H:..D../.**************************
****.U../. HEX LOADER..../.*************
*****************..../T1$.""..../. X1.1.
C(T$).2.S.F/T1$.T1$.G(.DEC(F(J(T$,X1,1))
).16..DEC(F(J(T$,X1.1,1)))).[../.X1.A../
....H2.******************************...
I2. GET 1 BYTE...J2.********************
**********.D.O2H$.""...R2."BYTE (IN HEX)
: ";H$....2. 11950....2. ERR . H.0 . H.
255 ..".":. 13000....2..;.,3.***********
*******************.O.-3. MEMORY MODIFY.
S..3.******************************..63
. 12050...@3H.AD:. 11000:. H$ .6) "/" ;
: O2$."".F.T3. 11100:AD.AD.1:. H$ .6);.P
.^3T$.""...H3. " +,-,I,E : ";T$...R3. T$
."+" . AD.65535.AD.AD.1:. 13120.5.|3. T$
."-" . AD.0 . AD.AD.1:. 13120.F..3. T$."
E" . ..D..3. T$.."I" . ."..":. 13120...
3. 13000:. AD,H:. 13120....3.***********
*******************....3. DUMP MEMORY TO
SCREEN....3.***************************
***....3.12050....4.".":.X1.1.18:H.AD:.1
1000.%..4O2$."":O1$.H$:O3$."".1.&4.X2.0.
7.H.04.11100:O2$.O2$." ".P.?4. H.31 . H.
95 . O3$.O3$.G(H):.13380...A4O3$.O3$."."
...D4.X2...N4. O1$ .5) O2$ .31) O3$...X4
.X1.B.B4.:.11850:.CO.13320.H..4.....4.**
****************************....4. MACHI
NE CODE EXECUTION.-..4.*****************
*************.?.F4. 12050:.AD:..C..7.***
***************************.{..7. MACHIN
E CODE SAVE....7.***********************
*******....7. 11250:.12050:.11200...#7T$
."N":. DEV.8 . ."OVERWRITE EXISTING FILE
(Y/N) : ";T$...$7. T$."Y" . IN$." @0".I
N$./.(7. DEV.8 . IN$.IN$.",S,W".C.-7. SA
.EA . 14190.C.27. 2,DEV,2,IN$:. 2,AD:. 2
,EA...F7. X.AD.EA:.2,B(X):.:.2: 2...N7.
....7.******************************.D..
7. MACHINE CODE LOAD....7.**************
****************....7. 11250:. DEV.8 . I
N$.IN$.",S,R".6..7. 2,DEV,0,IN$:. 2,SA,E
A:. ST . 2:..Y..8. X.TA . EA:. 2,T:.X,
T:.: 2:..}.8J.*************************
*****...9J. INITIALISE DECODER TABLES.A.
:J.******************************.M.=JBA
SE.16...?J.. DEC(X).X.48.(X.57).7...BJ.
TA$(4).#.CJT$. "0A22383838220238242202
3838220238".P.DJT$.T$."09223838382202380
D22383838220238".}.EJT$.T$."1C0138380601
27382601273806012738"...FJT$.T$."0701383
8380127382C01383838012738".W.GJT$.T$."29
17383838172038231720381B172038"...HJT$.T
$."0B173838381720380F17383838172038".1.I
JT$.T$."2A00383838002838250028381B002838
".H.JJ. 12200:TA$(0).T1$.U.KJT$. "0C00
3838380028382E00383838002838"...LJT$.T$.
"382F3838312F303816383538312F3038".O.MJT
$.T$."032F3838312F3038372F3638382F3838".
..NJT$.T$."1F1D1E381F1D1E38331D32381F1D1
E38".).OJT$.T$."041D38381F1D1E38101D3438
1F1D1E38".V.PJT$.T$."13113838131114381A1
1153813111438"...QJT$.T$."08113838381114
380E11383838111438"...RJ. 12200:TA$(0).T
A$(0).T1$.N.SJT$. "122B3838122B1838192
B2138122B1838"...TJT$.T$."052B3838382B18
382D2B3838382B18"...UJ. 12200:TA$(0).TA$
(0).T1$.D.VJT$. "1711166112011CC138111
4411B111AA1".Q.WJT$.T$."C71166611201CCC1
381114411B111AA1"...XJT$.T$."17111661120
1CCC1381114411B111AA1".K.YJT$.T$."171116
6112019CC1381114411B111AA1"...ZJT$.T$."1
71166611111CCC1381144511B111A11".%.[JT$.
T$."272166611211CCC1381144511B11AAB1".R.
\JT$.T$."271166611211CCC1381114411B111AA
1".}.]JT$.T$."271166611211CCC1381114411B
111A"...^J. 12200:TA$(1).T1$.G(160).W.`J
TA$(2). "ADCANDASLBCCBCSBEQBITBMIB
NEBPLBRKBVCBVS"...AJTA$(2).TA$(2)."CLCCL
DCLICLVCMPCPXCPYDECDEXDEYEORINCINX".O.BJ
TA$(2).TA$(2)."INYJMPJSRLDALDXLDYLSRNOPO
RAPHAPHPPLAPLP"...CJTA$(2).TA$(2)."ROLRO
RRTIRTSSBCSECSEDSEISTASTXSTYTAXTAY"...DJ
TA$(2).TA$(2)."TSXTXATXSTYA???"...FJ....
..T
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL