MEMORY MANAGER
FILE INFORMATION
FILENAME(S): MEMORY MANAGER
FILE TYPE(S): PRG
FILE SIZE: 3.3K
FIRST SEEN: 2025-11-30 21:05:29
APPEARS ON: 1 disk(s)
FILE HASH
ec996b15e12d1c2a280a51849dd7caf44ee996c77e4a67f27b730ffebaee4b8a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES | MEMORY MANAGER | PRG | DuncanTwain | 26 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 33 08 02 00 8F |**********.3....| 00000020: 20 2A 2A 20 20 4D 43 20 4D 41 4E 41 47 45 52 20 | ** MC MANAGER | 00000030: 20 2A 2A 00 4C 08 03 00 8F 20 2A 2A 20 42 59 20 | **.L.... ** BY | 00000040: 44 20 4D 20 42 52 4F 57 4E 20 2A 2A 00 65 08 04 |D M BROWN **.e..| 00000050: 00 8F 20 2A 2A 20 20 20 20 40 20 31 39 38 34 20 |.. ** @ 1984 | 00000060: 20 20 20 2A 2A 00 7E 08 05 00 8F 20 2A 2A 2A 2A | **.~.... ****| 00000070: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9C |**************..| 00000080: 08 0A 00 97 20 35 33 32 38 30 2C 31 31 3A 97 20 |.... 53280,11:. | 00000090: 35 33 32 38 31 2C 37 3A 99 22 5F 22 00 A2 08 0B |53281,7:."_"....| 000000A0: 00 8C 00 C7 08 0C 00 81 20 49 B2 34 39 31 35 36 |........ I.49156| 000000B0: 20 A4 20 34 39 32 31 36 3A 87 20 44 3A 20 97 20 | . 49216:. D: . | 000000C0: 49 2C 44 3A 82 20 49 00 F2 08 0F 00 96 A5 20 48 |I,D:. I....... H| 000000D0: 45 58 28 49 29 20 B2 20 28 49 20 AF 20 31 35 29 |EX(I) . (I . 15)| 000000E0: AA 34 38 AB 28 28 49 20 AF 20 31 35 29 B1 39 29 |.48.((I . 15).9)| 000000F0: AC 37 00 10 09 10 00 96 A5 20 44 45 43 28 49 29 |.7....... DEC(I)| 00000100: 20 B2 20 49 AB 34 38 AA 28 49 B1 35 37 29 AC 37 | . I.48.(I.57).7| 00000110: 00 2A 09 14 00 99 22 93 11 22 3B A3 31 36 29 22 |.*...."..";.16)"| 00000120: 12 4D 45 4E 55 92 22 20 3A 99 00 40 09 1E 00 99 |.MENU." :..@....| 00000130: 20 A3 31 33 29 22 11 11 31 2E 20 53 41 56 45 22 | .13)"..1. SAVE"| 00000140: 00 54 09 28 00 99 20 A3 31 33 29 22 32 2E 20 4C |.T.(.. .13)"2. L| 00000150: 4F 41 44 22 00 6E 09 32 00 99 20 A3 31 33 29 22 |OAD".n.2.. .13)"| 00000160: 33 2E 20 48 45 58 20 54 4F 20 44 45 43 22 00 88 |3. HEX TO DEC"..| 00000170: 09 3C 00 99 20 A3 31 33 29 22 34 2E 20 44 45 58 |.<.. .13)"4. DEX| 00000180: 20 54 4F 20 48 45 58 22 00 9E 09 3E 00 99 20 A3 | TO HEX"...>.. .| 00000190: 31 33 29 22 35 2E 20 48 45 41 44 45 52 22 00 B8 |13)"5. HEADER"..| 000001A0: 09 41 00 99 20 A3 31 33 29 22 36 2E 20 46 52 45 |.A.. .13)"6. FRE| 000001B0: 45 20 42 59 54 45 53 22 00 CC 09 46 00 99 20 A3 |E BYTES"...F.. .| 000001C0: 31 33 29 22 37 2E 20 45 58 49 54 22 00 F9 09 50 |13)"7. EXIT"...P| 000001D0: 00 85 20 22 11 11 1D 1D 1D 1D 1D 4E 55 4D 42 45 |.. ".......NUMBE| 000001E0: 52 20 4F 46 20 46 41 43 49 4C 49 54 59 20 52 45 |R OF FACILITY RE| 000001F0: 51 55 49 52 45 44 22 3B 4E 00 22 0A 5A 00 91 20 |QUIRED";N.".Z.. | 00000200: 4E 20 89 20 32 30 30 2C 34 30 30 2C 36 30 30 2C |N . 200,400,600,| 00000210: 38 30 30 2C 31 34 35 30 2C 31 33 30 30 2C 31 30 |800,1450,1300,10| 00000220: 30 30 00 3B 0A C8 00 8F 20 2A 2A 2A 53 41 56 45 |00.;.... ***SAVE| 00000230: 20 52 4F 55 54 49 4E 45 2A 2A 2A 00 5D 0A CA 00 | ROUTINE***.]...| 00000240: 99 22 93 22 3A 85 20 22 53 41 56 45 20 4D 45 54 |.".":. "SAVE MET| 00000250: 48 4F 44 20 31 20 4F 52 20 32 22 3B 4D 00 6E 0A |HOD 1 OR 2";M.n.| 00000260: CC 00 8B 20 4D B2 32 20 A7 20 31 31 30 30 00 8D |... M.2 . 1100..| 00000270: 0A CE 00 99 22 93 12 4D 45 54 48 4F 44 20 31 20 |...."..METHOD 1 | 00000280: 53 41 56 45 92 11 22 3A 46 24 B2 22 22 00 AB 0A |SAVE..":F$.""...| 00000290: D2 00 85 20 22 46 49 4C 45 20 4E 41 4D 45 20 22 |... "FILE NAME "| 000002A0: 3B 46 24 3A 4C B2 C3 28 46 24 29 00 CF 0A DC 00 |;F$:L..(F$).....| 000002B0: 8B 20 4C B1 31 36 20 A7 20 99 22 11 11 12 4E 41 |. L.16 . ."...NA| 000002C0: 4D 45 20 54 4F 4F 20 4C 4F 4E 47 92 22 3A 90 00 |ME TOO LONG.":..| 000002D0: EA 0A E6 00 99 3A 85 20 22 53 54 41 52 54 20 41 |.....:. "START A| 000002E0: 44 44 52 45 53 53 22 3B 53 41 00 07 0B FA 00 99 |DDRESS";SA......| 000002F0: 3A 85 20 22 46 49 4E 49 53 48 20 41 44 44 52 45 |:. "FINISH ADDRE| 00000300: 53 53 20 22 3B 46 41 00 26 0B 0E 01 99 3A 20 9F |SS ";FA.&....: .| 00000310: 20 31 2C 31 2C 32 2C 46 24 3A 20 98 31 2C 53 41 | 1,1,2,F$: .1,SA| 00000320: 3A 98 31 2C 46 41 00 40 0B 18 01 81 20 49 B2 53 |:.1,FA.@.... I.S| 00000330: 41 20 A4 20 46 41 3A 98 31 2C C2 28 49 29 3A 82 |A . FA:.1,.(I):.| 00000340: 00 4E 0B 22 01 98 31 3A A0 31 3A 89 32 30 00 67 |.N."..1:.1:.20.g| 00000350: 0B 90 01 8F 20 2A 2A 2A 4C 4F 41 44 20 52 4F 55 |.... ***LOAD ROU| 00000360: 54 49 4E 45 2A 2A 2A 00 89 0B 92 01 99 22 93 22 |TINE***......"."| 00000370: 3A 85 20 22 4C 4F 41 44 20 4D 45 54 48 4F 44 20 |:. "LOAD METHOD | 00000380: 31 20 4F 52 20 32 22 3B 4D 00 9A 0B 94 01 8B 20 |1 OR 2";M...... | 00000390: 4D B2 32 20 A7 20 31 34 30 30 00 B2 0B FE 01 99 |M.2 . 1400......| 000003A0: 22 93 12 4D 45 54 48 4F 44 20 31 20 4C 4F 41 44 |"..METHOD 1 LOAD| 000003B0: 92 22 00 E1 0B 08 02 9F 20 31 2C 31 2C 30 3A 20 |."...... 1,1,0: | 000003C0: 84 31 2C 53 41 2C 46 41 3A 8B 20 53 54 20 A7 20 |.1,SA,FA:. ST . | 000003D0: 99 22 12 54 41 50 45 20 45 52 52 4F 52 92 22 3A |.".TAPE ERROR.":| 000003E0: 90 00 03 0C 12 02 81 20 49 B2 53 41 20 A4 20 46 |....... I.SA . F| 000003F0: 41 3A 84 31 2C 50 3A 20 97 20 49 2C 50 3A 82 49 |A:.1,P: . I,P:.I| 00000400: 3A A0 31 00 22 0C 1C 02 99 20 A3 31 34 29 20 22 |:.1.".... .14) "| 00000410: 11 11 12 4C 4F 41 44 20 43 4F 4D 50 4C 45 54 45 |...LOAD COMPLETE| 00000420: 92 22 00 3A 0C 26 02 81 20 49 B2 31 20 A4 20 32 |.".:.&.. I.1 . 2| 00000430: 30 30 30 3A 82 3A 89 20 32 30 00 59 0C 58 02 8F |000:.:. 20.Y.X..| 00000440: 20 2A 2A 2A 48 45 58 20 54 4F 20 44 45 43 20 52 | ***HEX TO DEC R| 00000450: 4F 55 54 49 4E 45 2A 2A 2A 00 86 0C 5D 02 99 22 |OUTINE***...].."| 00000460: 93 11 45 4E 54 45 52 20 30 20 54 4F 20 45 58 49 |..ENTER 0 TO EXI| 00000470: 54 2C 20 28 44 45 43 20 30 20 3D 20 48 45 58 20 |T, (DEC 0 = HEX | 00000480: 30 29 11 11 11 22 00 9C 0C 62 02 85 20 22 48 45 |0)..."...b.. "HE| 00000490: 58 20 4E 55 4D 42 45 52 22 3B 48 24 00 A6 0C 6C |X NUMBER";H$...l| 000004A0: 02 8D 20 37 30 30 00 B5 0C 71 02 8B 20 44 B2 30 |.. 700...q.. D.0| 000004B0: 20 A7 20 32 30 00 EE 0C 72 02 81 49 B2 31 A4 34 | . 20...r..I.1.4| 000004C0: 3A 8B 20 C6 28 CA 28 48 24 2C 49 2C 31 29 29 B1 |:. .(.(H$,I,1)).| 000004D0: 37 30 20 A7 20 99 22 11 11 12 48 45 58 20 4E 55 |70 . ."...HEX NU| 000004E0: 4D 42 45 52 20 57 52 4F 4E 47 92 22 3A 90 00 14 |MBER WRONG.":...| 000004F0: 0D 73 02 82 20 49 3A 8B 20 C3 28 48 24 29 B1 34 |.s.. I:. .(H$).4| 00000500: 20 A7 20 48 24 B2 C7 28 31 31 38 29 AA 48 24 3A | . H$..(118).H$:| 00000510: 89 36 32 36 00 3F 0D 76 02 99 20 22 11 48 45 58 |.626.?.v.. ".HEX| 00000520: 20 22 3B 48 24 3B 22 20 3D 20 44 45 43 20 22 3B | ";H$;" = DEC ";| 00000530: 44 3A 8D 20 31 37 30 30 20 3A 89 20 36 30 30 00 |D:. 1700 :. 600.| 00000540: 5D 0D BC 02 8F 20 2A 2A 2A 48 45 58 2F 44 45 43 |].... ***HEX/DEC| 00000550: 20 53 2F 52 4F 55 54 49 4E 45 2A 2A 2A 00 74 0D | S/ROUTINE***.t.| 00000560: C6 02 44 B2 30 3A 20 81 20 49 B2 31 20 A4 20 C3 |..D.0: . I.1 . .| 00000570: 28 48 24 29 00 9E 0D D0 02 45 20 B2 20 A5 44 45 |(H$).....E . .DE| 00000580: 43 20 28 C6 28 CA 28 48 24 2C 49 2C 31 29 29 29 |C (.(.(H$,I,1)))| 00000590: 3A 44 B2 44 AC 31 36 AA 45 3A 20 82 20 49 00 A4 |:D.D.16.E: . I..| 000005A0: 0D DA 02 8E 00 C3 0D 20 03 8F 20 2A 2A 2A 44 45 |....... .. ***DE| 000005B0: 43 20 54 4F 20 48 45 58 20 52 4F 55 54 49 4E 45 |C TO HEX ROUTINE| 000005C0: 2A 2A 2A 00 F0 0D 25 03 99 22 93 11 45 4E 54 45 |***...%.."..ENTE| 000005D0: 52 20 30 20 54 4F 20 45 58 49 54 2C 20 28 48 45 |R 0 TO EXIT, (HE| 000005E0: 58 20 30 20 3D 20 44 45 43 20 30 29 11 11 11 22 |X 0 = DEC 0)..."| 000005F0: 00 09 0E 2A 03 85 20 22 44 45 43 49 4D 41 4C 20 |...*.. "DECIMAL | 00000600: 4E 55 4D 42 45 52 22 3B 44 00 33 0E 2F 03 8B 20 |NUMBER";D.3./.. | 00000610: 44 B1 36 35 35 33 35 20 A7 20 99 22 12 11 11 4E |D.65535 . ."...N| 00000620: 55 4D 42 45 52 20 54 4F 4F 20 4C 41 52 47 45 92 |UMBER TOO LARGE.| 00000630: 22 3A 90 00 3D 0E 34 03 8D 20 39 30 30 00 4C 0E |":..=.4.. 900.L.| 00000640: 39 03 8B 20 44 B2 30 20 A7 20 32 30 00 69 0E 3E |9.. D.0 . 20.i.>| 00000650: 03 99 20 22 11 44 45 43 20 22 3B 44 3B 22 20 3D |.. ".DEC ";D;" =| 00000660: 20 48 45 58 20 22 3B 48 24 00 74 0E 48 03 8D 20 | HEX ";H$.t.H.. | 00000670: 31 37 30 30 00 7E 0E 5C 03 89 20 38 30 30 00 9F |1700.~.\.. 800..| 00000680: 0E 84 03 8F 20 2A 2A 2A 44 45 43 20 54 4F 20 48 |.... ***DEC TO H| 00000690: 45 58 20 53 2F 52 4F 55 54 49 4E 45 2A 2A 2A 00 |EX S/ROUTINE***.| 000006A0: AE 0E 8E 03 45 B2 44 3A 20 48 24 B2 22 22 00 CE |....E.D: H$.""..| 000006B0: 0E 98 03 48 24 B2 C7 28 A5 48 45 58 28 45 AB B5 |...H$..(.HEX(E..| 000006C0: 28 45 AD 31 36 29 AC 31 36 29 29 AA 48 24 00 E9 |(E.16).16)).H$..| 000006D0: 0E A2 03 45 B2 B5 28 45 AD 31 36 29 3A 20 8B 20 |...E..(E.16): . | 000006E0: 45 B1 30 20 A7 20 39 32 30 00 EF 0E AC 03 8E 00 |E.0 . 920.......| 000006F0: 00 0F E8 03 8F 20 2A 2A 2A 45 58 49 54 2A 2A 2A |..... ***EXIT***| 00000700: 00 06 0F F2 03 80 00 28 0F 4C 04 8F 20 2A 2A 2A |.......(.L.. ***| 00000710: 4D 45 54 48 4F 44 20 32 20 53 41 56 45 20 52 4F |METHOD 2 SAVE RO| 00000720: 55 54 49 4E 45 2A 2A 2A 00 47 0F 51 04 99 22 93 |UTINE***.G.Q..".| 00000730: 12 4D 45 54 48 4F 44 20 32 20 53 41 56 45 92 11 |.METHOD 2 SAVE..| 00000740: 22 3A 4E 24 B2 22 22 00 5C 0F 56 04 85 20 22 46 |":N$."".\.V.. "F| 00000750: 49 4C 45 20 4E 41 4D 45 22 3B 4E 24 00 87 0F 5B |ILE NAME";N$...[| 00000760: 04 99 3A 4C B2 C3 28 4E 24 29 3A 8B 4C B1 31 36 |..:L..(N$):.L.16| 00000770: A7 20 99 20 22 12 4E 41 4D 45 20 54 4F 4F 20 4C |. . ".NAME TOO L| 00000780: 4F 4E 47 92 22 3A 90 00 A5 0F 60 04 81 20 49 B2 |ONG.":....`.. I.| 00000790: 34 39 32 33 31 20 A4 20 34 39 32 34 36 3A 97 49 |49231 . 49246:.I| 000007A0: 2C 33 32 3A 82 00 B3 0F 6A 04 97 20 34 39 32 33 |,32:....j.. 4923| 000007B0: 30 2C 4C 00 C4 0F 74 04 8B 20 4C B2 30 20 A7 20 |0,L...t.. L.0 . | 000007C0: 31 31 34 35 00 EC 0F 76 04 81 20 49 B2 20 31 20 |1145...v.. I. 1 | 000007D0: A4 20 4C 3A 97 20 34 39 32 33 30 AA 49 2C C6 28 |. L:. 49230.I,.(| 000007E0: CA 28 4E 24 2C 49 2C 31 29 29 3A 82 00 F2 0F 79 |.(N$,I,1)):....y| 000007F0: 04 99 00 0C 10 7E 04 85 20 22 53 54 41 52 54 20 |.....~.. "START | 00000800: 41 44 44 52 45 53 53 22 3B 53 3A 99 00 36 10 88 |ADDRESS";S:..6..| 00000810: 04 97 34 39 31 35 33 2C B5 28 53 AD 32 35 36 29 |..49153,.(S.256)| 00000820: 3A 97 34 39 31 35 32 2C 53 AB B5 28 53 AD 32 35 |:.49152,S..(S.25| 00000830: 36 29 AC 32 35 36 00 51 10 9C 04 85 20 22 46 49 |6).256.Q.... "FI| 00000840: 4E 49 53 48 20 41 44 44 52 45 53 53 22 3B 46 3A |NISH ADDRESS";F:| 00000850: 99 00 75 10 A1 04 8B 20 46 B3 53 20 A7 20 99 22 |..u.... F.S . ."| 00000860: 11 11 11 12 41 44 44 52 45 53 53 20 57 52 4F 4E |....ADDRESS WRON| 00000870: 47 92 22 3A 90 00 8F 10 A6 04 97 34 39 31 35 34 |G.":.......49154| 00000880: 2C 46 AB B5 28 46 AD 32 35 36 29 AC 32 35 36 00 |,F..(F.256).256.| 00000890: A3 10 B0 04 97 34 39 31 35 35 2C B5 28 46 AD 32 |.....49155,.(F.2| 000008A0: 35 36 29 00 AE 10 BA 04 9E 34 39 31 35 36 00 B6 |56)......49156..| 000008B0: 10 C4 04 89 32 30 00 D7 10 14 05 8F 20 2A 2A 2A |....20...... ***| 000008C0: 20 46 52 45 45 20 42 59 54 45 53 20 52 4F 55 54 | FREE BYTES ROUT| 000008D0: 49 4E 45 20 2A 2A 2A 00 0E 11 1E 05 99 22 93 11 |INE ***......"..| 000008E0: 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 46 52 45 45 |............FREE| 000008F0: 20 42 59 54 45 53 20 3D 20 22 3B B8 28 30 29 AB | BYTES = ";.(0).| 00000900: 28 B8 28 30 29 B3 30 29 AC 36 35 35 33 36 00 19 |(.(0).0).65536..| 00000910: 11 28 05 8D 20 31 37 30 30 00 22 11 3C 05 89 20 |.(.. 1700.".<.. | 00000920: 32 30 00 44 11 78 05 8F 20 2A 2A 2A 4D 45 54 48 |20.D.x.. ***METH| 00000930: 4F 44 20 32 20 4C 4F 41 44 20 52 4F 55 54 49 4E |OD 2 LOAD ROUTIN| 00000940: 45 2A 2A 2A 00 63 11 82 05 99 22 93 12 4D 45 54 |E***.c...."..MET| 00000950: 48 4F 44 20 32 20 4C 4F 41 44 92 22 3A 9E 34 39 |HOD 2 LOAD.":.49| 00000960: 31 39 37 00 83 11 8C 05 99 20 A3 31 35 29 3B 20 |197...... .15); | 00000970: 22 11 11 12 4C 4F 41 44 20 43 4F 4D 50 4C 45 54 |"...LOAD COMPLET| 00000980: 45 92 22 00 96 11 96 05 81 20 49 B2 31 20 A4 20 |E."...... I.1 . | 00000990: 32 30 30 30 3A 82 00 9F 11 A0 05 89 20 32 30 00 |2000:....... 20.| 000009A0: BA 11 AA 05 8F 20 2A 2A 2A 48 45 41 44 45 52 20 |..... ***HEADER | 000009B0: 52 4F 55 54 49 4E 45 2A 2A 2A 00 DD 11 B4 05 99 |ROUTINE***......| 000009C0: 22 93 22 3A 85 22 4D 45 54 48 4F 44 20 31 20 4F |".":."METHOD 1 O| 000009D0: 52 20 4D 45 54 48 4F 44 20 32 22 3B 4D 00 E7 11 |R METHOD 2";M...| 000009E0: BE 05 8D 31 36 30 30 00 03 12 D2 05 99 22 11 49 |...1600......".I| 000009F0: 2E 44 2E 20 20 20 20 20 20 20 20 20 20 3D 20 22 |.D. = "| 00000A00: 3B 49 44 00 1F 12 D3 05 99 22 11 53 54 41 52 54 |;ID......".START| 00000A10: 20 41 44 44 52 45 53 53 20 3D 20 22 3B 53 41 00 | ADDRESS = ";SA.| 00000A20: 3B 12 D4 05 99 22 11 45 4E 44 20 41 44 44 52 45 |;....".END ADDRE| 00000A30: 53 53 20 20 20 3D 20 22 3B 46 41 00 57 12 D6 05 |SS = ";FA.W...| 00000A40: 99 22 11 46 49 4C 45 20 4E 41 4D 45 20 20 20 20 |.".FILE NAME | 00000A50: 20 3D 20 22 3B 4E 24 00 7F 12 D8 05 8B 20 C2 28 | = ";N$...... .(| 00000A60: 42 AA 35 29 B2 33 32 20 A7 20 99 20 22 11 11 12 |B.5).32 . . "...| 00000A70: 4E 4F 20 4E 41 4D 45 20 46 4F 55 4E 44 92 22 00 |NO NAME FOUND.".| 00000A80: 8A 12 D9 05 8D 20 31 37 30 30 00 93 12 DA 05 89 |..... 1700......| 00000A90: 20 32 30 00 B7 12 DB 05 8F 20 2A 2A 2A 20 44 41 | 20...... *** DA| 00000AA0: 54 41 20 46 4F 52 20 4D 41 43 48 49 4E 45 20 43 |TA FOR MACHINE C| 00000AB0: 4F 44 45 20 2A 2A 2A 00 03 13 DC 05 83 20 31 36 |ODE ***...... 16| 00000AC0: 32 2C 31 2C 31 36 39 2C 31 2C 31 36 30 2C 33 2C |2,1,169,1,160,3,| 00000AD0: 33 32 2C 31 38 36 2C 32 35 35 2C 31 37 33 2C 37 |32,186,255,173,7| 00000AE0: 38 2C 31 39 32 2C 31 36 32 2C 37 39 2C 31 36 30 |8,192,162,79,160| 00000AF0: 2C 31 39 32 2C 33 32 2C 31 38 39 2C 32 35 35 2C |,192,32,189,255,| 00000B00: 31 37 33 00 3B 13 E6 05 83 20 30 2C 31 39 32 2C |173.;.... 0,192,| 00000B10: 31 33 33 2C 32 30 2C 31 37 33 2C 31 2C 31 39 32 |133,20,173,1,192| 00000B20: 2C 31 33 33 2C 32 31 2C 31 37 34 2C 32 2C 31 39 |,133,21,174,2,19| 00000B30: 32 2C 31 37 32 2C 33 2C 31 39 32 00 56 13 F0 05 |2,172,3,192.V...| 00000B40: 83 20 31 36 39 2C 32 30 2C 33 32 2C 32 31 36 2C |. 169,20,32,216,| 00000B50: 32 35 35 2C 39 36 00 9E 13 FA 05 83 20 31 36 30 |255,96...... 160| 00000B60: 2C 31 2C 31 36 39 2C 31 2C 31 36 32 2C 31 2C 33 |,1,169,1,162,1,3| 00000B70: 32 2C 31 38 36 2C 32 35 35 2C 31 36 39 2C 30 2C |2,186,255,169,0,| 00000B80: 33 32 2C 31 38 39 2C 32 35 35 2C 31 36 39 2C 30 |32,189,255,169,0| 00000B90: 2C 33 32 2C 32 31 33 2C 32 35 35 2C 39 36 00 BC |,32,213,255,96..| 00000BA0: 13 40 06 8F 20 2A 2A 2A 48 45 41 44 45 52 20 53 |.@.. ***HEADER S| 00000BB0: 55 42 52 4F 55 54 49 4E 45 2A 2A 2A 00 E8 13 4A |UBROUTINE***...J| 00000BC0: 06 99 22 93 12 4D 45 54 48 4F 44 22 3B 4D 3B 22 |.."..METHOD";M;"| 00000BD0: D9 20 48 45 41 44 45 52 92 11 11 22 3A 42 B2 38 |. HEADER...":B.8| 00000BE0: 32 38 3A 4E 24 B2 22 22 00 F0 13 54 06 9F 20 31 |28:N$.""...T.. 1| 00000BF0: 00 28 14 5E 06 49 44 20 B2 20 C2 28 42 29 3A 53 |.(.^.ID . .(B):S| 00000C00: 41 B2 C2 28 42 AA 31 29 AA 32 35 36 AC C2 28 42 |A..(B.1).256..(B| 00000C10: AA 32 29 3A 46 41 B2 C2 28 42 AA 33 29 AA 32 35 |.2):FA..(B.3).25| 00000C20: 36 AC C2 28 42 AA 34 29 00 4B 14 68 06 81 20 49 |6..(B.4).K.h.. I| 00000C30: B2 42 AA 35 20 A4 20 42 AA 32 30 3A 4E 24 B2 4E |.B.5 . B.20:N$.N| 00000C40: 24 AA C7 28 C2 28 49 29 29 3A 82 00 7A 14 6D 06 |$..(.(I)):..z.m.| 00000C50: 8B 20 4D B2 31 20 A7 20 84 31 2C 53 41 2C 46 41 |. M.1 . .1,SA,FA| 00000C60: 3A 8B 20 53 54 20 A7 20 99 20 22 12 54 41 50 45 |:. ST . . ".TAPE| 00000C70: 20 45 52 52 4F 52 92 22 3A 90 00 81 14 72 06 A0 | ERROR.":....r..| 00000C80: 31 00 87 14 7C 06 8E 00 AB 14 A4 06 8F 20 2A 2A |1...|........ **| 00000C90: 2A 57 41 49 54 20 46 4F 52 20 4B 45 59 20 53 55 |*WAIT FOR KEY SU| 00000CA0: 42 52 4F 55 54 49 4E 45 2A 2A 2A 00 EC 14 AE 06 |BROUTINE***.....| 00000CB0: 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 11 |."..............| 00000CC0: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 1D 1D |................| 00000CD0: 12 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 |.PRESS ANY KEY T| 00000CE0: 4F 20 43 4F 4E 54 49 4E 55 45 92 22 00 05 15 B8 |O CONTINUE."....| 00000CF0: 06 A1 20 41 24 3A 20 8B 20 41 24 B2 22 22 20 A7 |.. A$: . A$."" .| 00000D00: 20 31 37 32 30 00 0B 15 C2 06 8E 00 00 00 FF FF | 1720...........|
....... ******************.3.... ** MC MANAGER **.L.... ** BY D M BROWN **.E.. .. ** @ 1984 **.~.... ************ ******...... 53280,11:. 53281,7:."_".... ...G.... I.49156 . 49216:. D: . I,D:. I. ...... HEX(I) . (I . 15).48.((I . 15).9) .7....... DEC(I) . I.48.(I.57).7.*....". .";.16)".MENU." :..@.... .13)"..1. SAVE" .T.(.. .13)"2. LOAD".N.2.. .13)"3. HEX T O DEC"...<.. .13)"4. DEX TO HEX"...>.. . 13)"5. HEADER"...A.. .13)"6. FREE BYTES" .L.F.. .13)"7. EXIT"...P.. ".......NUMBE R OF FACILITY REQUIRED";N.".Z.. N . 200, 400,600,800,1450,1300,1000.;.H.. ***SAVE ROUTINE***.].J..".":. "SAVE METHOD 1 OR 2";M.N.L.. M.2 . 1100...N.."..METHOD 1 SAVE..":F$.""...R.. "FILE NAME ";F$:L.C( F$).O.... L.16 . ."...NAME TOO LONG.":.. .....:. "START ADDRESS";SA......:. "FINI SH ADDRESS ";FA.&....: . 1,1,2,F$: .1,SA :.1,FA.@.... I.SA . FA:.1,B(I):..N."..1: 1:.20.G.... ***LOAD ROUTINE***......"." :. "LOAD METHOD 1 OR 2";M...... M.2 . 14 00......"..METHOD 1 LOAD."...... 1,1,0: .1,SA,FA:. ST . .".TAPE ERROR.":....... I.SA . FA:.1,P: . I,P:.I: 1.".... .14) " ...LOAD COMPLETE.".:.&.. I.1 . 2000:.:. 20.Y.X.. ***HEX TO DEC ROUTINE***...].." ..ENTER 0 TO EXIT, (DEC 0 = HEX 0)...".. .B.. "HEX NUMBER";H$...L.. 700...Q.. D.0 . 20...R..I.1.4:. F(J(H$,I,1)).70 . .". ..HEX NUMBER WRONG.":....S.. I:. C(H$).4 . H$.G(118).H$:.626.?.V.. ".HEX ";H$;" = DEC ";D:. 1700 :. 600.].... ***HEX/DEC S/ROUTINE***.T.F.D.0: . I.1 . C(H$)...P .E . .DEC (F(J(H$,I,1))):D.D.16.E: . I.. .Z...C. .. ***DEC TO HEX ROUTINE***...%. ."..ENTER 0 TO EXIT, (HEX 0 = DEC 0)..." ...*.. "DECIMAL NUMBER";D.3./.. D.65535 . ."...NUMBER TOO LARGE.":..=.4.. 900.L. 9.. D.0 . 20.I.>.. ".DEC ";D;" = HEX ";H $.T.H.. 1700.~.\.. 800...... ***DEC TO H EX S/ROUTINE***.....E.D: H$."".N...H$.G( .HEX(E..(E.16).16)).H$.....E..(E.16): . E.0 . 920............ ***EXIT***.......( .L.. ***METHOD 2 SAVE ROUTINE***.G.Q..". .METHOD 2 SAVE..":N$."".\.V.. "FILE NAME ";N$...[..:L.C(N$):.L.16. . ".NAME TOO L ONG.":....`.. I.49231 . 49246:.I,32:.... J.. 49230,L.D.T.. L.0 . 1145...V.. I. 1 . L:. 49230.I,F(J(N$,I,1)):....Y.....~.. "START ADDRESS";S:..6....49153,.(S.256) :.49152,S..(S.256).256.Q.... "FINISH ADD RESS";F:..U.... F.S . ."....ADDRESS WRON G.":.......49154,F..(F.256).256......491 55,.(F.256)......49156...D..20.W.... *** FREE BYTES ROUTINE ***......".......... ....FREE BYTES = ";.(0).(.(0).0).65536.. .(.. 1700.".<.. 20.D.X.. ***METHOD 2 LOA D ROUTINE***.C...."..METHOD 2 LOAD.":.49 197...... .15); "...LOAD COMPLETE."..... . I.1 . 2000:.... .. 20...... ***HEADER ROUTINE***......".":."METHOD 1 OR METHOD 2";M......1600...R..".I.D. = " ;ID...S..".START ADDRESS = ";SA.;.T..".E ND ADDRESS = ";FA.W.V..".FILE NAME = ";N$..X.. B(B.5).32 . . "...NO NAME FOUND."...Y.. 1700...Z.. 20...... *** DA TA FOR MACHINE CODE ***...... 162,1,169, 1,160,3,32,186,255,173,78,192,162,79,160 ,192,32,189,255,173.;.... 0,192,133,20,1 73,1,192,133,21,174,2,192,172,3,192.V... . 169,20,32,216,255,96...... 160,1,169,1 ,162,1,32,186,255,169,0,32,189,255,169,0 ,32,213,255,96...@.. ***HEADER SUBROUTIN E***...J.."..METHOD";M;"Y HEADER...":B.8 28:N$.""...T.. 1.(.^.ID . B(B):SA.B(B.1) .256.B(B.2):FA.B(B.3).256.B(B.4).K.H.. I .B.5 . B.20:N$.N$.G(B(I)):..Z.M.. M.1 . .1,SA,FA:. ST . . ".TAPE ERROR.":....R. 1...|........ ***WAIT FOR KEY SUBROUTINE ***......".............................. .PRESS ANY KEY TO CONTINUE."...... A$: . A$."" . 1720...B.......
> CLICK IMAGE PREVIEW FOR FULL MODAL