Multiple names: CP/M TRANSLATOR, CP/M TERM2
FILE INFORMATION
FILENAME(S):
• CP/M TRANSLATOR<br>• CP/M TERM2
FILE TYPE(S): PRG
FILE SIZE: 4.3K
FIRST SEEN: 2025-10-20 14:32:07
APPEARS ON: 3 disk(s)
FILE HASH
aafef872970c1e5bed30f0ce0d972df1382c42e567b5edab6190fe43fc181b06
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A | CP/M TRANSLATOR | PRG | Treasure Chest - Klaus Der Suhler | 13 | 20 | DOWNLOAD FILE |
| 14 | CP/M TRANSLATOR | PRG | Treasure Chest - Plattfuss | 25 | 8 | DOWNLOAD FILE |
| JP | CP/M TERM2 | PRG | hedning, Martin L0fgren | 23 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 0B 1C 05 00 D7 20 39 35 30 00 47 1C 0A 00 |....... 950.G...| 00000010: 99 C7 28 31 34 29 3B 22 93 11 11 11 11 11 11 11 |..(14);"........| 00000020: 11 11 11 20 20 20 20 20 20 20 20 20 20 C3 31 32 |... .12| 00000030: 38 2D C3 D0 2F CD 20 D2 41 4D 20 C3 4F 4E 56 45 |8-../. .AM .ONVE| 00000040: 52 53 49 4F 4E 11 22 00 6C 1C 14 00 99 22 20 20 |RSION.".l...." | 00000050: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 D6 | .| 00000060: 45 52 53 49 4F 4E 20 32 2E 30 20 22 00 91 1C 1E |ERSION 2.0 "....| 00000070: 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." | 00000080: 20 20 42 59 20 CA 4F 45 20 C3 52 55 4D 4C 45 59 | BY .OE .RUMLEY| 00000090: 22 00 C9 1C 28 00 99 22 11 11 11 11 11 11 11 11 |"...(.."........| 000000A0: 11 2A C9 44 45 41 20 46 52 4F 4D 20 C3 D0 CD D4 |.*.DEA FROM ....| 000000B0: D2 C1 2E C4 CF C3 20 42 59 20 CA 4F 48 4E 20 CD |...... BY .OHN .| 000000C0: 43 CC 41 57 48 4F 52 4E 22 00 D2 1C 32 00 FE 0B |C.AWHORN"...2...| 000000D0: 20 32 00 E7 1C 3C 00 8F 20 20 20 20 20 20 54 52 | 2...<.. TR| 000000E0: 41 50 20 31 34 37 30 00 FA 1C 46 00 99 20 C7 28 |AP 1470...F.. .(| 000000F0: 31 34 29 3A 99 22 93 11 11 22 00 41 1D 50 00 99 |14):."...".A.P..| 00000100: 22 C1 55 54 4F 20 4F 52 20 CD 41 4E 55 41 4C 20 |".UTO OR .ANUAL | 00000110: CD 4F 44 45 3F 91 22 3A A1 F9 52 45 24 3A 8B 20 |.ODE?.":..RE$:. | 00000120: 52 45 24 20 B2 22 4D 22 A7 20 36 30 30 3A D5 3A |RE$ ."M". 600:.:| 00000130: 8B 52 45 24 B2 22 41 22 A7 39 30 3A D5 3A 89 38 |.RE$."A".90:.:.8| 00000140: 30 00 57 1D 5A 00 99 22 93 C1 55 54 4F 20 4D 4F |0.W.Z.."..UTO MO| 00000150: 44 45 22 3A FE 0B 31 00 9E 1D 64 00 41 44 24 B2 |DE":..1...d.AD$.| 00000160: 22 31 43 30 30 22 3A 42 4C B2 35 32 30 30 30 3A |"1C00":BL.52000:| 00000170: 8F 20 3E 42 59 54 45 53 20 4C 45 46 54 3C 20 49 |. >BYTES LEFT< I| 00000180: 4E 49 54 49 41 4C 49 5A 45 44 2E 2E 2E 45 58 50 |NITIALIZED...EXP| 00000190: 45 52 49 4D 45 4E 54 20 57 49 54 48 20 23 00 CC |ERIMENT WITH #..| 000001A0: 1D 6E 00 8B 4C 52 B3 B1 30 A7 99 22 11 11 12 C1 |.n..LR..0.."....| 000001B0: 4E 4F 54 48 45 52 3F 92 22 3A A1 F9 41 24 3A 8B |NOTHER?.":..A$:.| 000001C0: 41 24 B3 B1 22 59 22 A7 20 32 32 30 00 DD 1D 78 |A$.."Y". 220...x| 000001D0: 00 99 22 93 11 11 11 11 11 11 11 11 22 00 F7 1D |.."........."...| 000001E0: 82 00 46 46 24 B2 22 54 22 3A 46 49 24 B2 22 22 |..FF$."T":FI$.""| 000001F0: 3A 46 4C 24 B2 22 22 00 0D 1E 8C 00 8B 20 4C 52 |:FL$.""...... LR| 00000200: B1 30 A7 20 99 22 CE 45 58 54 20 22 3B 00 2E 1E |.0. .".EXT ";...| 00000210: 96 00 85 20 22 C6 49 4C 45 4E 41 4D 45 22 3B 46 |... ".ILENAME";F| 00000220: 4C 24 3A 8B 46 4C 24 B2 22 22 A7 31 35 30 00 58 |L$:.FL$."".150.X| 00000230: 1E A0 00 4C 52 B2 4C 52 AA 31 3A 99 22 11 11 C3 |...LR.LR.1:."...| 00000240: 48 45 43 4B 49 4E 47 20 44 49 52 45 43 54 4F 52 |HECKING DIRECTOR| 00000250: 59 22 3A 8D 20 33 35 30 00 8C 1E AA 00 8B 20 46 |Y":. 350...... F| 00000260: 49 24 B2 22 43 4B 53 20 46 52 45 45 22 A7 99 22 |I$."CKS FREE".."| 00000270: 11 11 12 C9 4E 43 4F 52 52 45 43 54 20 46 49 4C |....NCORRECT FIL| 00000280: 45 4E 41 4D 45 92 22 3A 89 31 31 30 00 B6 1E B4 |ENAME.":.110....| 00000290: 00 99 22 11 11 C6 4F 55 4E 44 20 22 3B 46 4C 24 |.."...OUND ";FL$| 000002A0: 3B C6 28 4C 42 24 29 3B 3A 99 22 C3 C2 CD 20 42 |;.(LB$);:."... B| 000002B0: 4C 4F 43 4B 53 22 00 00 1F BE 00 8B 28 C6 28 4C |LOCKS"......(.(L| 000002C0: 42 24 29 29 AC 32 35 34 B1 42 4C 20 B0 20 C6 28 |B$)).254.BL . .(| 000002D0: 48 42 24 29 B1 31 20 20 A7 20 99 22 93 11 11 11 |HB$).1 . ."....| 000002E0: 11 11 11 11 11 CE 4F 54 20 45 4E 4F 55 47 48 20 |......OT ENOUGH | 000002F0: CD 45 4D 4F 52 59 22 3A FE 0B 32 3A 89 31 31 30 |.EMORY":..2:.110| 00000300: 00 72 1F C8 00 8D 20 39 38 30 3A 42 4C B2 42 4C |.r.... 980:BL.BL| 00000310: AB C6 28 4C 42 24 29 AC 32 35 34 3A 42 41 24 28 |..(LB$).254:BA$(| 00000320: 4E 45 29 B2 41 44 24 3A 46 45 24 28 4E 45 29 B2 |NE).AD$:FE$(NE).| 00000330: 46 4C 24 3A 41 44 24 B2 D2 28 D1 28 41 44 24 29 |FL$:AD$..(.(AD$)| 00000340: AA 28 C6 28 4C 42 24 29 AC 32 35 34 29 29 3A 45 |.(.(LB$).254)):E| 00000350: 41 24 28 4E 45 29 B2 41 44 24 3A 4E 45 B2 4E 45 |A$(NE).AD$:NE.NE| 00000360: AA 31 3A 41 44 24 B2 D2 28 D1 28 41 44 24 29 AA |.1:AD$..(.(AD$).| 00000370: 31 29 00 82 1F D2 00 8B 20 4E 45 B3 31 32 A7 31 |1)...... NE.12.1| 00000380: 31 30 00 D8 1F DC 00 99 22 93 11 11 11 11 11 11 |10......".......| 00000390: 1D 1D 1D 1D 1D 1D 12 D7 52 49 54 45 20 44 4F 57 |........RITE DOW| 000003A0: 4E 20 54 48 45 53 45 20 46 49 4C 45 4E 41 4D 45 |N THESE FILENAME| 000003B0: 53 20 41 4E 44 20 41 44 44 52 45 53 53 45 53 20 |S AND ADDRESSES | 000003C0: 4F 52 20 50 52 45 53 53 20 27 50 27 20 54 4F 20 |OR PRESS 'P' TO | 000003D0: 50 52 49 4E 54 22 3A 99 00 FB 1F E6 00 99 22 20 |PRINT":......." | 000003E0: 20 20 20 20 20 20 20 20 C2 45 47 49 4E 4E 49 4E | .EGINNIN| 000003F0: 47 20 20 C5 4E 44 49 4E 47 20 22 00 20 20 F0 00 |G .NDING ". ..| 00000400: 99 22 C6 49 4C 45 20 20 20 20 20 C1 44 44 52 45 |.".ILE .DDRE| 00000410: 53 53 20 20 20 20 C1 44 44 52 45 53 53 22 3A 99 |SS .DDRESS":.| 00000420: 00 47 20 FA 00 81 20 49 B2 30 20 A4 20 4E 45 3A |.G ... I.0 . NE:| 00000430: 99 46 45 24 28 49 29 2C 42 41 24 28 49 29 2C 45 |.FE$(I),BA$(I),E| 00000440: 41 24 28 49 29 3A 82 00 6D 20 04 01 A1 F9 41 24 |A$(I):..m ....A$| 00000450: 3A 8B 41 24 B3 B1 22 50 22 AF 41 24 B1 B3 22 D0 |:.A$.."P".A$..".| 00000460: 22 A7 20 33 30 30 3A D5 20 9F 34 2C 34 00 92 20 |". 300:. .4,4.. | 00000470: 0E 01 98 34 2C 22 20 20 20 20 20 20 20 20 20 C2 |...4," .| 00000480: 45 47 49 4E 4E 49 4E 47 20 20 C5 4E 44 49 4E 47 |EGINNING .NDING| 00000490: 20 22 00 BA 20 18 01 98 34 2C 22 C6 49 4C 45 20 | ".. ...4,".ILE | 000004A0: 20 20 20 20 C1 44 44 52 45 53 53 20 20 20 20 C1 | .DDRESS .| 000004B0: 44 44 52 45 53 53 22 3A 98 34 00 E6 20 22 01 81 |DDRESS":.4.. "..| 000004C0: 20 49 B2 30 20 A4 20 4E 45 3A 98 34 2C 46 45 24 | I.0 . NE:.4,FE$| 000004D0: 28 49 29 2C 42 41 24 28 49 29 2C 45 41 24 28 49 |(I),BA$(I),EA$(I| 000004E0: 29 3A 82 3A A0 34 00 43 21 2C 01 99 22 11 11 11 |):.:.4.C!,.."...| 000004F0: C9 46 20 54 48 45 59 27 52 45 20 43 4F 50 49 45 |.F THEY'RE COPIE| 00000500: 44 20 44 4F 57 4E 2C 20 12 50 55 54 20 C3 D0 2F |D DOWN, .PUT ../| 00000510: CD 20 D3 59 53 54 45 4D 20 44 49 53 4B 20 49 4E |. .YSTEM DISK IN| 00000520: 20 44 52 49 56 45 20 41 4E 44 20 50 52 45 53 53 | DRIVE AND PRESS| 00000530: 20 41 4E 59 20 4B 45 59 20 54 4F 20 42 4F 4F 54 | ANY KEY TO BOOT| 00000540: 2E 92 22 00 9D 21 36 01 99 22 11 11 CF 4E 43 45 |.."..!6.."...NCE| 00000550: 20 49 4E 20 C3 D0 2F CD 2C 20 49 4E 53 45 52 54 | IN ../., INSERT| 00000560: 20 55 54 49 4C 49 54 59 20 44 49 53 4B 20 41 4E | UTILITY DISK AN| 00000570: 44 20 54 59 50 45 20 27 D3 C1 D6 C5 27 20 41 54 |D TYPE '....' AT| 00000580: 20 54 48 45 20 46 49 52 53 54 20 54 57 4F 20 27 | THE FIRST TWO '| 00000590: C1 3E 27 20 50 52 4F 4D 50 54 53 2E 22 00 D4 21 |.>' PROMPTS."..!| 000005A0: 40 01 99 22 41 4E 44 20 46 4F 4C 4C 4F 57 20 54 |@.."AND FOLLOW T| 000005B0: 48 45 20 4E 41 4D 45 20 41 4E 44 20 41 44 44 52 |HE NAME AND ADDR| 000005C0: 45 53 53 20 50 52 4F 4D 50 54 53 22 3A A1 F9 41 |ESS PROMPTS":..A| 000005D0: 24 3A FE 1B 00 DA 21 4A 01 80 00 E0 21 54 01 80 |$:....!J....!T..| 000005E0: 00 F7 21 5E 01 8F 20 46 49 4E 44 49 54 20 44 49 |..!^.. FINDIT DI| 000005F0: 52 45 43 54 4F 52 59 00 07 22 68 01 9F 20 38 2C |RECTORY.."h.. 8,| 00000600: 38 2C 30 2C 22 24 22 00 14 22 72 01 81 20 49 B2 |8,0,"$".."r.. I.| 00000610: 30 A4 33 32 00 32 22 7C 01 3A 20 20 A1 23 38 2C |0.32.2"|.: .#8,| 00000620: 41 24 3A 8B 41 24 B2 22 22 A7 20 41 24 B2 C7 28 |A$:.A$."". A$..(| 00000630: 30 29 00 39 22 86 01 82 49 00 5D 22 90 01 EB 20 |0).9"...I.]"... | 00000640: FC 46 49 24 B2 46 4C 24 AA C7 28 33 34 29 B0 46 |.FI$.FL$..(34).F| 00000650: 49 24 B2 22 43 4B 53 20 46 52 45 45 22 00 7A 22 |I$."CKS FREE".z"| 00000660: 9A 01 46 49 24 B2 22 22 3A 42 B2 30 3A 48 42 24 |..FI$."":B.0:HB$| 00000670: B2 22 22 3A 4C 42 24 B2 22 22 00 98 22 A4 01 3A |."":LB$."".."..:| 00000680: 20 20 A1 23 38 2C 48 42 24 3A 8B 41 24 B2 22 22 | .#8,HB$:.A$.""| 00000690: A7 41 24 B2 C7 28 30 29 00 B6 22 AE 01 3A 20 20 |.A$..(0).."..: | 000006A0: A1 23 38 2C 4C 42 24 3A 8B 41 24 B2 22 22 A7 41 |.#8,LB$:.A$."".A| 000006B0: 24 B2 C7 28 30 29 00 CC 22 B8 01 3A 20 20 8B C6 |$..(0).."..: ..| 000006C0: 28 4C 42 24 29 B1 39 A7 20 42 B2 31 00 05 23 C2 |(LB$).9. B.1..#.| 000006D0: 01 3A 20 20 81 20 4A B2 42 A4 33 3A A1 23 38 2C |.: . J.B.3:.#8,| 000006E0: 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 |A$:.A$."".A$..(0| 000006F0: 29 3A 8F 47 4F 45 53 20 54 4F 20 46 49 52 53 54 |):.GOES TO FIRST| 00000700: 20 46 49 4C 45 00 0F 23 CC 01 3A 20 20 82 4A 00 | FILE..#..: .J.| 00000710: 33 23 D6 01 3A 20 20 A1 23 38 2C 41 24 3A 20 8B |3#..: .#8,A$: .| 00000720: 20 41 24 B3 B1 C7 28 33 34 29 A7 20 46 46 24 B2 | A$...(34). FF$.| 00000730: 22 46 22 00 41 23 E0 01 3A 20 20 41 24 B2 22 22 |"F".A#..: A$.""| 00000740: 3A 00 61 23 EA 01 3A 20 20 EB 20 FC 41 24 B2 C7 |:.a#..: . .A$..| 00000750: 28 33 34 29 3A A1 23 38 2C 41 24 3A 43 B2 43 AA |(34):.#8,A$:C.C.| 00000760: 31 00 88 23 F4 01 3A 20 20 20 20 46 49 24 B2 46 |1..#..: FI$.F| 00000770: 49 24 AA 41 24 3A 8B 46 49 24 B2 22 43 4B 53 20 |I$.A$:.FI$."CKS | 00000780: 46 52 45 45 22 A7 20 ED 00 91 23 FE 01 3A 20 20 |FREE". ...#..: | 00000790: EC 00 A0 23 08 02 3A 20 20 43 4C 24 B2 22 54 22 |...#..: CL$."T"| 000007A0: 00 B4 23 1C 02 3A 20 20 81 20 49 B2 28 43 AB 42 |..#..: . I.(C.B| 000007B0: 29 A4 32 34 00 D4 23 26 02 3A 20 20 20 20 A1 23 |).24..#&.: .#| 000007C0: 38 2C 41 24 3A 8B 41 24 B2 22 22 A7 20 41 24 B2 |8,A$:.A$."". A$.| 000007D0: C7 28 30 29 00 E2 23 30 02 3A 20 20 82 49 3A 43 |.(0)..#0.: .I:C| 000007E0: B2 30 00 E8 23 3A 02 EC 00 F1 23 44 02 A0 38 3A |.0..#:....#D..8:| 000007F0: 8E 00 F7 23 4E 02 90 00 2B 24 58 02 99 22 93 11 |...#N...+$X.."..| 00000800: 11 11 11 C9 4E 53 54 52 55 43 54 49 4F 4E 53 3F |....NSTRUCTIONS?| 00000810: 20 28 D9 2F CE 29 22 3A A1 F9 52 24 3A 8B 20 52 | (./.)":..R$:. R| 00000820: 24 20 B3 B1 22 59 22 A7 37 39 30 00 34 24 62 02 |$ .."Y".790.4$b.| 00000830: 99 22 93 22 00 5B 24 6C 02 8B 20 CC 28 30 29 B2 |.".".[$l.. .(0).| 00000840: 35 A7 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |5.." | 00000850: 20 20 20 20 20 20 20 20 11 22 3B 00 7E 24 76 02 | .";.~$v.| 00000860: 99 22 20 20 20 20 20 20 20 20 20 20 20 C3 D0 2F |." ../| 00000870: CD 20 CD 45 4D 4F 52 59 20 D3 41 56 45 22 00 D6 |. .EMORY .AVE"..| 00000880: 24 80 02 99 22 20 20 20 20 20 D4 48 49 53 20 50 |$..." .HIS P| 00000890: 52 4F 47 52 41 4D 20 50 41 52 54 49 41 4C 4C 59 |ROGRAM PARTIALLY| 000008A0: 20 41 55 54 4F 4D 41 54 45 53 20 54 48 45 20 4D | AUTOMATES THE M| 000008B0: 45 54 48 4F 44 20 4F 46 20 C3 D0 2F CD 20 20 54 |ETHOD OF ../. T| 000008C0: 52 41 4E 53 4C 41 54 49 4F 4E 20 20 46 4F 55 4E |RANSLATION FOUN| 000008D0: 44 20 20 49 4E 22 00 2E 25 8A 02 99 22 54 48 45 |D IN"..%..."THE| 000008E0: 20 C4 CC 20 39 20 46 49 4C 45 20 C3 D0 CD D4 D2 | .. 9 FILE .....| 000008F0: C1 2E C4 CF C3 2E 20 20 C9 46 20 59 4F 55 20 41 |...... .F YOU A| 00000900: 52 45 20 4E 4F 54 20 46 41 4D 49 4C 49 41 52 20 |RE NOT FAMILIAR | 00000910: 57 49 54 48 20 54 48 45 20 4D 45 54 48 4F 44 2C |WITH THE METHOD,| 00000920: 20 52 45 41 44 49 4E 47 20 54 48 41 54 22 00 48 | READING THAT".H| 00000930: 25 94 02 99 22 46 49 4C 45 20 49 53 20 53 55 47 |%..."FILE IS SUG| 00000940: 47 45 53 54 45 44 2E 22 00 A0 25 9E 02 99 22 20 |GESTED."..%..." | 00000950: 20 20 20 20 C5 53 53 45 4E 54 49 41 4C 4C 59 2C | .SSENTIALLY,| 00000960: 20 59 4F 55 20 44 4F 57 4E 4C 4F 41 44 20 C3 D0 | YOU DOWNLOAD ..| 00000970: 2F CD 20 46 49 4C 45 53 20 46 52 4F 4D 20 4F 4E |/. FILES FROM ON| 00000980: 45 20 4F 46 20 54 48 45 20 C3 D0 2F CD 20 D3 C9 |E OF THE ../. ..| 00000990: C7 53 20 54 4F 20 41 20 20 C3 4F 4D 4D 4F 2D 22 |.S TO A .OMMO-"| 000009A0: 00 F8 25 A8 02 99 22 44 4F 52 45 20 46 4F 52 4D |..%..."DORE FORM| 000009B0: 41 54 20 44 49 53 4B 2C 20 54 48 45 4E 20 55 53 |AT DISK, THEN US| 000009C0: 45 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 54 |E THIS PROGRAM T| 000009D0: 4F 20 4C 4F 41 44 20 54 48 45 20 50 52 4F 47 52 |O LOAD THE PROGR| 000009E0: 41 4D 20 20 44 49 52 45 43 54 4C 59 20 20 49 4E |AM DIRECTLY IN| 000009F0: 54 4F 20 20 54 48 45 22 00 50 26 B2 02 99 22 4D |TO THE".P&..."M| 00000A00: 45 4D 4F 52 59 20 42 41 4E 4B 20 55 53 45 44 20 |EMORY BANK USED | 00000A10: 42 59 20 C3 D0 2F CD 2E 20 20 D4 48 45 4E 20 49 |BY ../.. .HEN I| 00000A20: 54 20 53 45 4E 44 53 20 59 4F 55 20 49 4E 54 4F |T SENDS YOU INTO| 00000A30: 20 54 48 45 20 4D 4F 4E 49 54 4F 52 2C 20 20 57 | THE MONITOR, W| 00000A40: 48 45 52 45 20 20 59 4F 55 20 20 4C 4F 4F 4B 22 |HERE YOU LOOK"| 00000A50: 00 A8 26 BC 02 99 22 46 4F 52 20 54 48 45 20 45 |..&..."FOR THE E| 00000A60: 4E 44 20 4F 46 20 54 48 45 20 46 49 4C 45 2E 20 |ND OF THE FILE. | 00000A70: 20 D4 48 45 4E 20 59 4F 55 20 42 4F 4F 54 20 C3 | .HEN YOU BOOT .| 00000A80: D0 2F CD 2C 20 41 4E 44 20 D3 C1 D6 C5 20 54 48 |./., AND .... TH| 00000A90: 45 20 46 49 4C 45 20 4F 4E 20 41 20 C3 D0 2F CD |E FILE ON A ../.| 00000AA0: 20 20 44 49 53 4B 2E 22 00 C2 26 C6 02 8B 20 CC | DISK."..&... .| 00000AB0: 28 30 29 B3 B1 35 20 A7 20 A1 F9 41 24 3A 99 22 |(0)..5 . ..A$:."| 00000AC0: 93 22 00 1A 27 D0 02 99 22 20 20 20 20 20 D4 48 |."..'..." .H| 00000AD0: 49 53 20 50 52 4F 47 52 41 4D 20 41 4C 4C 4F 57 |IS PROGRAM ALLOW| 00000AE0: 53 20 59 4F 55 20 54 4F 20 50 55 54 20 4D 55 4C |S YOU TO PUT MUL| 00000AF0: 54 49 50 4C 45 20 53 4D 41 4C 4C 20 46 49 4C 45 |TIPLE SMALL FILE| 00000B00: 53 20 49 4E 54 4F 20 4D 45 4D 4F 52 59 2E 20 20 |S INTO MEMORY. | 00000B10: CD 41 4B 45 20 53 55 52 45 22 00 5C 27 DA 02 99 |.AKE SURE".\'...| 00000B20: 22 54 4F 20 53 50 45 43 49 46 59 20 41 4E 20 41 |"TO SPECIFY AN A| 00000B30: 44 44 52 45 53 53 20 12 41 46 54 45 52 92 20 54 |DDRESS .AFTER. T| 00000B40: 48 45 20 45 4E 44 20 4F 46 20 54 48 45 20 50 52 |HE END OF THE PR| 00000B50: 45 56 49 4F 55 53 20 46 49 4C 45 2E 00 B4 27 E4 |EVIOUS FILE...'.| 00000B60: 02 99 22 20 20 20 20 20 D2 45 4D 45 4D 42 45 52 |.." .EMEMBER| 00000B70: 20 54 4F 20 4A 4F 54 20 44 4F 57 4E 20 54 48 45 | TO JOT DOWN THE| 00000B80: 20 46 49 4C 45 4E 41 4D 45 53 20 41 4E 44 20 42 | FILENAMES AND B| 00000B90: 45 47 49 4E 4E 49 4E 47 20 41 4E 44 20 20 45 4E |EGINNING AND EN| 00000BA0: 44 49 4E 47 20 20 41 44 44 52 45 53 53 45 53 20 |DING ADDRESSES | 00000BB0: 20 4F 46 22 00 0C 28 EE 02 99 22 41 4C 4C 20 46 | OF"..(..."ALL F| 00000BC0: 49 4C 45 53 2E 20 20 D9 4F 55 20 4F 4E 4C 59 20 |ILES. .OU ONLY | 00000BD0: 4E 45 45 44 20 54 48 45 20 4C 41 53 54 20 46 4F |NEED THE LAST FO| 00000BE0: 55 52 20 44 49 47 49 54 53 2C 20 49 4E 20 48 45 |UR DIGITS, IN HE| 00000BF0: 58 2C 20 4F 46 20 41 4C 4C 20 20 41 44 44 52 45 |X, OF ALL ADDRE| 00000C00: 53 53 45 53 2E 20 20 20 D4 48 45 22 00 64 28 F8 |SSES. .HE".d(.| 00000C10: 02 99 22 27 31 27 20 50 52 45 43 45 44 49 4E 47 |.."'1' PRECEDING| 00000C20: 20 54 48 45 53 45 20 41 44 44 52 45 53 53 45 53 | THESE ADDRESSES| 00000C30: 20 49 4E 20 54 48 45 20 4D 4F 4E 49 54 4F 52 20 | IN THE MONITOR | 00000C40: 52 45 46 45 52 53 20 54 4F 20 54 48 45 20 31 32 |REFERS TO THE 12| 00000C50: 38 20 42 41 4E 4B 20 4E 55 4D 42 45 52 2C 20 20 |8 BANK NUMBER, | 00000C60: 41 4E 44 22 00 AA 28 02 03 99 22 49 53 20 4E 4F |AND"..(..."IS NO| 00000C70: 54 20 55 53 45 44 20 49 4E 20 C3 D0 2F CD 2E 20 |T USED IN ../.. | 00000C80: 20 C1 4E 20 41 44 44 52 45 53 53 20 4C 4F 57 45 | .N ADDRESS LOWE| 00000C90: 52 20 54 48 41 4E 20 31 43 30 30 20 57 49 4C 4C |R THAN 1C00 WILL| 00000CA0: 20 42 45 20 4C 4F 53 54 2E 22 00 B3 28 0C 03 A1 | BE LOST."..(...| 00000CB0: F9 52 24 00 D8 28 16 03 99 20 C7 28 31 34 29 3A |.R$..(... .(14):| 00000CC0: 99 22 93 11 11 11 11 11 11 11 11 11 11 11 11 22 |."............."| 00000CD0: 3A 54 52 B2 54 52 AA 31 00 F1 28 20 03 8B 20 54 |:TR.TR.1..( .. T| 00000CE0: 52 B1 31 20 A7 20 20 20 99 22 CE 45 58 54 20 22 |R.1 . .".EXT "| 00000CF0: 3B 00 1A 29 2A 03 46 4C 24 B2 22 22 3A 85 20 22 |;..)*.FL$."":. "| 00000D00: C6 49 4C 45 4E 41 4D 45 22 3B 46 4C 24 3A 8B 20 |.ILENAME";FL$:. | 00000D10: 46 4C 24 B2 22 22 A7 38 31 30 00 72 29 34 03 8B |FL$."".810.r)4..| 00000D20: 20 54 52 B2 31 A7 20 85 20 22 C2 45 47 49 4E 4E | TR.1. . ".EGINN| 00000D30: 49 4E 47 20 48 45 58 20 41 44 44 52 45 53 53 20 |ING HEX ADDRESS | 00000D40: 20 20 20 20 31 43 30 30 9D 9D 9D 9D 9D 9D 22 3B | 1C00......";| 00000D50: 41 44 24 3A D5 20 85 22 C2 45 47 49 4E 4E 49 4E |AD$:. .".EGINNIN| 00000D60: 47 20 48 45 58 20 41 44 44 52 45 53 53 22 3B 41 |G HEX ADDRESS";A| 00000D70: 44 24 00 BB 29 3E 03 8B 20 D1 28 41 44 24 29 B3 |D$..)>.. .(AD$).| 00000D80: 37 31 36 38 A7 99 22 11 11 20 20 20 92 D4 4F 4F |7168..".. ..OO| 00000D90: 20 4C 4F 57 20 49 4E 20 4D 45 4D 4F 52 59 21 92 | LOW IN MEMORY!.| 00000DA0: 22 3A FE 0B 31 3A 99 22 93 11 11 11 11 11 11 11 |":..1:."........| 00000DB0: 11 11 11 11 11 22 3A 89 38 30 30 00 C4 29 48 03 |.....":.800..)H.| 00000DC0: 8D 39 38 30 00 43 2A 52 03 99 22 11 11 C4 4F 20 |.980.C*R.."...O | 00000DD0: 59 4F 55 20 57 41 4E 54 20 41 4E 4F 54 48 45 52 |YOU WANT ANOTHER| 00000DE0: 20 46 49 4C 45 20 49 4E 20 4D 45 4D 4F 52 59 3F | FILE IN MEMORY?| 00000DF0: 22 3A A1 F9 20 52 24 3A 8B 20 52 24 B2 22 59 22 |":.. R$:. R$."Y"| 00000E00: A7 99 22 12 CD 41 4B 45 20 53 55 52 45 20 59 4F |.."..AKE SURE YO| 00000E10: 55 20 50 55 54 20 49 54 20 41 46 54 45 52 20 54 |U PUT IT AFTER T| 00000E20: 48 45 20 45 4E 44 20 4F 46 20 54 48 45 20 4C 41 |HE END OF THE LA| 00000E30: 53 54 20 46 49 4C 45 21 92 22 3A FE 0B 32 3A 89 |ST FILE!.":..2:.| 00000E40: 37 39 30 00 49 2A 5C 03 99 00 73 2A 66 03 99 20 |790.I*\...s*f.. | 00000E50: 22 31 2E 20 12 3E D2 C5 D4 D5 D2 CE 3C 92 20 54 |"1. .>......<. T| 00000E60: 4F 20 42 45 47 49 4E 20 45 4F 46 20 53 45 41 52 |O BEGIN EOF SEAR| 00000E70: 43 48 22 00 A2 2A 70 03 99 20 22 32 2E 20 12 3E |CH"..*p.. "2. .>| 00000E80: CE CF A0 D3 C3 D2 CF CC CC 3C 92 20 54 4F 20 53 |.........<. TO S| 00000E90: 54 41 52 54 2F 53 54 4F 50 20 44 49 53 50 4C 41 |TART/STOP DISPLA| 00000EA0: 59 22 00 D2 2A 7A 03 99 20 22 33 2E 20 12 3E D3 |Y"..*z.. "3. .>.| 00000EB0: D4 CF D0 3C 92 2C 20 57 48 45 4E 20 34 2D 44 49 |...<., WHEN 4-DI| 00000EC0: 47 49 54 20 41 44 44 52 45 53 53 20 46 4F 55 4E |GIT ADDRESS FOUN| 00000ED0: 44 22 00 FE 2A 84 03 99 20 22 34 2E 20 12 CA 4F |D"..*... "4. ..O| 00000EE0: 54 20 44 4F 57 4E 20 41 44 44 52 45 53 53 20 57 |T DOWN ADDRESS W| 00000EF0: 49 54 48 20 46 49 4C 45 4E 41 4D 45 92 22 00 2F |ITH FILENAME."./| 00000F00: 2B 8E 03 99 20 22 35 2E 20 D4 59 50 45 20 27 58 |+... "5. .YPE 'X| 00000F10: 27 12 3E 52 45 54 55 52 4E 3C 92 20 41 4E 44 20 |'.>RETURN<. AND | 00000F20: 42 4F 4F 54 20 C3 D0 2F CD 20 44 49 53 4B 22 00 |BOOT ../. DISK".| 00000F30: 5F 2B 98 03 8B 20 CC 28 58 29 B2 35 A7 20 FE 1A |_+... .(X).5. ..| 00000F40: 20 30 2C 30 2C 37 39 2C 31 38 2C 31 3A D5 20 DE | 0,0,79,18,1:. .| 00000F50: 30 3A FE 1A 30 2C 30 2C 33 39 2C 31 38 2C 31 00 |0:..0,0,39,18,1.| 00000F60: A1 2B A2 03 99 22 11 11 11 12 D3 45 4E 44 49 4E |.+...".....ENDIN| 00000F70: 47 20 59 4F 55 20 54 4F 20 4D 4F 4E 49 54 4F 52 |G YOU TO MONITOR| 00000F80: 2E 2E 2E 2E 11 11 11 22 3A FE 0B 20 32 3A 99 22 |.......":.. 2:."| 00000F90: 4D 20 31 22 3B 41 53 24 3B 22 20 46 46 46 46 46 |M 1";AS$;" FFFFF| 00000FA0: 22 00 B1 2B AC 03 99 22 91 91 91 91 91 22 3B 3A |"..+...".....";:| 00000FB0: FA 00 E4 2B B6 03 99 22 93 11 11 11 11 11 11 11 |...+..."........| 00000FC0: 11 11 11 20 20 20 20 20 20 20 20 20 20 20 20 20 |... | 00000FD0: 22 3B D3 28 45 52 29 3B 22 20 45 52 52 4F 52 22 |";.(ER);" ERROR"| 00000FE0: 3A FE 0B 31 00 F5 2B C0 03 8B 20 54 52 B2 31 A7 |:..1..+... TR.1.| 00000FF0: 20 54 52 B2 30 00 06 2C CA 03 8B 52 45 24 B2 22 | TR.0..,...RE$."| 00001000: 4D 22 A7 36 30 30 00 17 2C CD 03 8B 52 45 24 B2 |M".600..,...RE$.| 00001010: 22 41 22 A7 31 31 30 00 1E 2C CF 03 89 35 00 3A |"A".110..,...5.:| 00001020: 2C D4 03 41 44 B2 D1 28 41 44 24 29 3A 8B 54 52 |,..AD..(AD$):.TR| 00001030: B2 31 A7 41 53 24 B2 41 44 24 00 50 2C DE 03 9F |.1.AS$.AD$.P,...| 00001040: 32 2C 38 2C 32 2C 46 4C 24 AA 22 2C 50 2C 52 22 |2,8,2,FL$.",P,R"| 00001050: 00 6A 2C E8 03 A1 23 32 2C 41 24 3A 8B 41 24 B2 |.j,...#2,A$:.A$.| 00001060: 22 22 A7 41 24 B2 C7 28 30 29 00 7E 2C F2 03 FE |"".A$..(0).~,...| 00001070: 02 20 31 3A 97 20 41 44 2C C6 28 41 24 29 00 98 |. 1:. AD,.(A$)..| 00001080: 2C FC 03 A1 23 32 2C 41 24 3A 8B 41 24 B2 22 22 |,...#2,A$:.A$.""| 00001090: A7 41 24 B2 C7 28 30 29 00 AE 2C 06 04 FE 02 20 |.A$..(0)..,.... | 000010A0: 31 3A 97 20 41 44 AA 31 2C C6 28 41 24 29 00 B5 |1:. AD.1,.(A$)..| 000010B0: 2C 10 04 A0 32 00 CD 2C 1A 04 FE 11 22 22 AA 46 |,...2..,...."".F| 000010C0: 4C 24 2C 42 31 2C 50 28 41 44 AA 32 29 00 D3 2C |L$,B1,P(AD.2)..,| 000010D0: 24 04 8E 00 00 00 0D 0D 20 20 20 20 20 20 20 20 |$....... | 000010E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000010F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
......W 950.G....G(14);"...........
C128-CP/M RAM CONVERSION.".L...."
VERSION 2.0 "......"
BY JOE CRUMLEY".I.(.."........
.*IDEA FROM CPMTRA.DOC BY JOHN MCLAWHORN
".R.2... 2...<.. TRAP 1470...F.. G(
14):."...".A.P.."AUTO OR MANUAL MODE?.":
..RE$:. RE$ ."M". 600:U:.RE$."A".90:U:.8
0.W.Z..".AUTO MODE":..1...D.AD$."1C00":B
L.52000:. >BYTES LEFT< INITIALIZED...EXP
ERIMENT WITH #.L.N..LR..0.."...ANOTHER?.
":..A$:.A$.."Y". 220...X.."........."...
..FF$."T":FI$."":FL$.""...... LR.0. ."NE
XT ";...... "FILENAME";FL$:.FL$."".150.X
. .LR.LR.1:."..CHECKING DIRECTORY":. 350
...... FI$."CKS FREE".."...INCORRECT FIL
ENAME.":.110......"..FOUND ";FL$;F(LB$);
:."CBM BLOCKS"......(F(LB$)).254.BL . F(
HB$).1 . .".........NOT ENOUGH MEMORY":
..2:.110.R.H.. 980:BL.BL.F(LB$).254:BA$(
NE).AD$:FE$(NE).FL$:AD$.R(Q(AD$).(F(LB$)
.254)):EA$(NE).AD$:NE.NE.1:AD$.R(Q(AD$).
1)...R.. NE.12.110.X...."..............W
RITE DOWN THESE FILENAMES AND ADDRESSES
OR PRESS 'P' TO PRINT":......."
BEGINNING ENDING ". ..."FILE ADDRE
SS ADDRESS":..G ... I.0 . NE:.FE$(I),
BA$(I),EA$(I):..M ....A$:.A$.."P".A$.."P
". 300:U .4,4.. ...4," BEGINNING
ENDING ".. ...4,"FILE ADDRESS A
DDRESS":.4.. ".. I.0 . NE:.4,FE$(I),BA$(
I),EA$(I):.: 4.C!,.."...IF THEY'RE COPIE
D DOWN, .PUT CP/M SYSTEM DISK IN DRIVE A
ND PRESS ANY KEY TO BOOT.."..!6.."..ONCE
IN CP/M, INSERT UTILITY DISK AND TYPE '
SAVE' AT THE FIRST TWO 'A>' PROMPTS.".T!
@.."AND FOLLOW THE NAME AND ADDRESS PROM
PTS":..A$:...Z!J....!T....!^.. FINDIT DI
RECTORY.."H.. 8,8,0,"$".."R.. I.0.32.2"|
.: .#8,A$:.A$."". A$.G(0).9"...I.]"...
.FI$.FL$.G(34).FI$."CKS FREE".Z"..FI$.""
:B.0:HB$."":LB$."".."..: .#8,HB$:.A$.""
.A$.G(0).."..: .#8,LB$:.A$."".A$.G(0).L
"..: .F(LB$).9. B.1..#B.: . J.B.3:.#8,
A$:.A$."".A$.G(0):.GOES TO FIRST FILE..#
L.: .J.3#V.: .#8,A$: . A$..G(34). FF$.
"F".A#..: A$."":.A#..: . .A$.G(34):.#8
,A$:C.C.1..#..: FI$.FI$.A$:.FI$."CKS
FREE". ...#..: .. #..: CL$."T"..#..:
. I.(C.B).24.T#&.: .#8,A$:.A$."". A$.
G(0)..#0.: .I:C.0..#:....#D. 8:...#N...
+$X..".....INSTRUCTIONS? (Y/N)":..R$:. R
$ .."Y".790.4$B..".".[$L.. L(0).5.."
.";.~$V.." CP/
M MEMORY SAVE".V$..." THIS PROGRAM P
ARTIALLY AUTOMATES THE METHOD OF CP/M T
RANSLATION FOUND IN"..%..."THE DL 9 FI
LE CPMTRA.DOC. IF YOU ARE NOT FAMILIAR
WITH THE METHOD, READING THAT".H%..."FIL
E IS SUGGESTED.". %..." ESSENTIALLY,
YOU DOWNLOAD CP/M FILES FROM ONE OF THE
CP/M SIGS TO A COMMO-"..%..."DORE FORM
AT DISK, THEN USE THIS PROGRAM TO LOAD T
HE PROGRAM DIRECTLY INTO THE".P&..."M
EMORY BANK USED BY CP/M. THEN IT SENDS
YOU INTO THE MONITOR, WHERE YOU LOOK"
..&..."FOR THE END OF THE FILE. THEN YO
U BOOT CP/M, AND SAVE THE FILE ON A CP/M
DISK.".B&F.. L(0)..5 . ..A$:."."..'P..
" THIS PROGRAM ALLOWS YOU TO PUT MUL
TIPLE SMALL FILES INTO MEMORY. MAKE SUR
E".\'Z.."TO SPECIFY AN ADDRESS .AFTER. T
HE END OF THE PREVIOUS FILE...'..."
REMEMBER TO JOT DOWN THE FILENAMES AND B
EGINNING AND ENDING ADDRESSES OF"..(.
.."ALL FILES. YOU ONLY NEED THE LAST FO
UR DIGITS, IN HEX, OF ALL ADDRESSES.
THE".D(..."'1' PRECEDING THESE ADDRESSES
IN THE MONITOR REFERS TO THE 128 BANK N
UMBER, AND"..(..."IS NOT USED IN CP/M.
AN ADDRESS LOWER THAN 1C00 WILL BE LOST
."..(....R$.X(... G(14):."............."
:TR.TR.1..( .. TR.1 . ."NEXT ";..)*.FL
$."":. "FILENAME";FL$:. FL$."".810.R)4..
TR.1. . "BEGINNING HEX ADDRESS 1C00
......";AD$:U ."BEGINNING HEX ADDRESS";A
D$..)>.. Q(AD$).7168..".. .TOO LOW IN
MEMORY!.":..1:.".............":.800.D)H.
.980.C*R.."..DO YOU WANT ANOTHER FILE IN
MEMORY?":.. R$:. R$."Y"..".MAKE SURE YO
U PUT IT AFTER THE END OF THE LAST FILE!
.":..2:.790.I*\...S*F.. "1. .>RETURN<. T
O BEGIN EOF SEARCH"..*P.. "2. .>NO SCROL
L<. TO START/STOP DISPLAY".R*Z.. "3. .>S
TOP<., WHEN 4-DIGIT ADDRESS FOUND"..*...
"4. .JOT DOWN ADDRESS WITH FILENAME."./
+... "5. TYPE 'X'.>RETURN<. AND BOOT CP/
M DISK"._+... L(X).5. .. 0,0,79,18,1:U .
0:..0,0,39,18,1..+..."....SENDING YOU TO
MONITOR.......":.. 2:."M 1";AS$;" FFFFF
"..+...".....";:...+..."...........
";S(ER);" ERROR":..1..+... TR.1.
TR.0..,J..RE$."M".600..,M..RE$."A".110.
.,O..5.:,T.AD.Q(AD$):.TR.1.AS$.AD$.P,...
2,8,2,FL$.",P,R".J,...#2,A$:.A$."".A$.G(
0).~,.... 1:. AD,F(A$)..,...#2,A$:.A$.""
.A$.G(0)..,.... 1:. AD.1,F(A$)..,.. 2.M,
...."".FL$,B1,P(AD.2).S,$.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL