COM-TO-CPM
FILE INFORMATION
FILENAME(S): COM-TO-CPM
FILE TYPE(S): PRG
FILE SIZE: 6.6K
FIRST SEEN: 2025-11-30 19:36:54
APPEARS ON: 1 disk(s)
FILE HASH
838537c1852af1dc7055337f82d06b456a6c7488ceef9d0ed9b54ca3f2b8a30e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C 64 UTILITIES 2 | COM-TO-CPM | PRG | Curtcool, Bo | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 11 08 05 00 97 20 35 36 2C 36 34 3A 9C 3A |....... 56,64:.:|
00000010: 8C 00 2E 08 0A 00 81 49 B2 38 32 38 A4 39 38 31 |.......I.828.981|
00000020: 3A 87 20 41 3A 97 20 49 2C 41 3A 82 20 49 00 55 |:. A:. I,A:. I.U|
00000030: 08 14 00 52 42 B2 38 33 38 3A 42 53 B2 36 AC 34 |...RB.838:BS.6.4|
00000040: 30 39 36 3A 42 50 B2 42 53 3A 42 45 B2 42 53 AA |096:BP.BS:BE.BS.|
00000050: 31 36 33 38 33 00 70 08 1E 00 58 31 B2 38 32 38 |16383.p...X1.828|
00000060: 3A 8F 20 46 49 4C 45 20 50 4F 53 49 54 49 4F 4E |:. FILE POSITION|
00000070: 00 86 08 28 00 58 32 B2 38 33 30 3A 8F 20 46 49 |...(.X2.830:. FI|
00000080: 4C 45 20 45 4E 44 00 9E 08 32 00 58 33 B2 38 33 |LE END...2.X3.83|
00000090: 32 3A 8F 20 42 55 46 46 20 53 54 41 52 54 00 B4 |2:. BUFF START..|
000000A0: 08 3C 00 58 34 B2 38 33 34 3A 8F 20 42 55 46 46 |.<.X4.834:. BUFF|
000000B0: 20 45 4E 44 00 E1 08 46 00 58 B2 B5 28 42 53 AD | END...F.X..(BS.|
000000C0: 32 35 36 29 3A 59 B2 42 53 AB 28 32 35 36 AC 58 |256):Y.BS.(256.X|
000000D0: 29 3A 97 20 58 33 2C 59 3A 97 20 58 33 AA 31 2C |):. X3,Y:. X3.1,|
000000E0: 58 00 0E 09 50 00 58 B2 B5 28 42 45 AD 32 35 36 |X...P.X..(BE.256|
000000F0: 29 3A 59 B2 42 45 AB 28 32 35 36 AC 58 29 3A 97 |):Y.BE.(256.X):.|
00000100: 20 58 34 2C 59 3A 97 20 58 34 AA 31 2C 58 00 4B | X4,Y:. X4.1,X.K|
00000110: 09 69 00 86 20 55 25 28 36 34 29 2C 4E 24 28 36 |.i.. U%(64),N$(6|
00000120: 34 29 2C 54 24 28 36 34 29 2C 56 54 24 28 32 30 |4),T$(64),VT$(20|
00000130: 29 2C 41 25 28 32 35 35 29 2C 43 25 28 32 35 35 |),A%(255),C%(255|
00000140: 29 3A 97 35 39 34 36 38 2C 31 34 00 7A 09 6E 00 |):.59468,14.z.n.|
00000150: 44 31 B2 34 AC 34 30 39 36 3A 8F 20 41 44 44 52 |D1.4.4096:. ADDR|
00000160: 45 53 53 20 4F 46 20 43 50 2F 4D 20 44 49 52 45 |ESS OF CP/M DIRE|
00000170: 43 54 4F 52 59 20 49 4E 46 4F 00 AB 09 73 00 44 |CTORY INFO...s.D|
00000180: 32 B2 44 31 AA 32 30 34 38 3A 8F 20 41 44 44 52 |2.D1.2048:. ADDR|
00000190: 45 53 53 20 4F 46 20 43 50 2F 4D 20 44 49 53 4B |ESS OF CP/M DISK|
000001A0: 20 52 45 43 4F 52 44 20 4D 41 50 00 E1 09 78 00 | RECORD MAP...x.|
000001B0: 44 33 B2 44 32 AA 33 32 36 34 3A 8F 20 41 44 44 |D3.D2.3264:. ADD|
000001C0: 52 45 53 53 20 4F 46 20 43 50 2F 4D 20 44 49 53 |RESS OF CP/M DIS|
000001D0: 4B 20 42 4C 4F 43 4B 20 41 4C 4C 4F 43 20 4D 41 |K BLOCK ALLOC MA|
000001E0: 50 00 1A 0A 7D 00 81 20 49 B2 30 A4 31 32 3A 41 |P...}.. I.0.12:A|
000001F0: 25 28 30 29 B2 30 3A 82 20 49 3A 41 25 28 31 33 |%(0).0:. I:A%(13|
00000200: 29 B2 31 33 3A 81 20 49 B2 31 34 A4 33 31 3A 41 |).13:. I.14.31:A|
00000210: 25 28 49 29 B2 30 3A 82 20 49 00 4E 0A 82 00 81 |%(I).0:. I.N....|
00000220: 20 49 B2 33 32 A4 36 34 3A 41 25 28 49 29 B2 49 | I.32.64:A%(I).I|
00000230: 3A 82 20 49 3A 81 20 49 B2 36 35 A4 39 30 3A 41 |:. I:. I.65.90:A|
00000240: 25 28 49 29 B2 49 AA 31 32 38 3A 82 20 49 00 8C |%(I).I.128:. I..|
00000250: 0A 87 00 81 20 49 B2 39 31 A4 39 35 3A 41 25 28 |.... I.91.95:A%(|
00000260: 49 29 B2 49 3A 82 20 49 3A 41 25 28 39 36 29 B2 |I).I:. I:A%(96).|
00000270: 34 34 3A 81 20 49 B2 39 37 A4 31 32 32 3A 41 25 |44:. I.97.122:A%|
00000280: 28 49 29 B2 49 AB 33 32 3A 82 20 49 00 C9 0A 8C |(I).I.32:. I....|
00000290: 00 41 25 28 31 32 33 29 B2 31 37 39 3A 41 25 28 |.A%(123).179:A%(|
000002A0: 31 32 34 29 B2 31 32 35 3A 41 25 28 31 32 35 29 |124).125:A%(125)|
000002B0: B2 31 37 31 3A 41 25 28 31 32 36 29 B2 39 36 3A |.171:A%(126).96:|
000002C0: 41 25 28 31 32 37 29 B2 30 00 ED 0A 91 00 81 20 |A%(127).0...... |
000002D0: 49 B2 31 32 38 A4 32 35 35 3A 41 25 28 49 29 B2 |I.128.255:A%(I).|
000002E0: 41 25 28 49 AB 31 32 38 29 3A 82 20 49 00 1F 0B |A%(I.128):. I...|
000002F0: 96 00 81 20 49 B2 30 A4 36 34 3A 43 25 28 49 29 |... I.0.64:C%(I)|
00000300: B2 49 3A 82 20 49 3A 81 20 49 B2 36 35 A4 39 30 |.I:. I:. I.65.90|
00000310: 3A 43 25 28 49 29 B2 49 AA 33 32 3A 82 20 49 00 |:C%(I).I.32:. I.|
00000320: 56 0B 9B 00 81 20 49 B2 39 31 A4 31 32 37 3A 43 |V.... I.91.127:C|
00000330: 25 28 49 29 B2 49 3A 82 20 49 3A 81 20 49 B2 31 |%(I).I:. I:. I.1|
00000340: 32 38 A4 32 35 35 3A 43 25 28 49 29 B2 49 AB 31 |28.255:C%(I).I.1|
00000350: 32 38 3A 82 20 49 00 80 0B A0 00 81 20 49 B2 30 |28:. I...... I.0|
00000360: A4 32 30 3A 87 20 56 54 24 28 49 29 3A 8B 20 56 |.20:. VT$(I):. V|
00000370: 54 24 28 49 29 B2 22 2A 2A 2A 22 A7 49 B2 32 30 |T$(I)."***".I.20|
00000380: 00 88 0B A5 00 82 20 49 00 AA 0B AA 00 99 20 C7 |...... I...... .|
00000390: 28 31 34 29 AA 22 93 05 22 3B 3A 44 4B B2 AB 31 |(14)."..";:DK..1|
000003A0: 3A 44 4E B2 30 3A 8D 38 30 30 00 C5 0B D2 00 9F |:DN.0:.800......|
000003B0: 20 31 35 2C 38 2C 31 35 3A 98 31 35 2C 22 49 30 | 15,8,15:.15,"I0|
000003C0: 22 3A A0 31 35 00 E6 0B D7 00 99 22 93 D2 45 41 |":.15......"..EA|
000003D0: 44 49 4E 47 20 C3 D0 2F CD 20 C4 49 52 45 43 54 |DING ../. .IRECT|
000003E0: 4F 52 59 22 3A 99 00 00 0C DC 00 9F 20 31 2C 38 |ORY":....... 1,8|
000003F0: 2C 32 2C 22 23 22 3A 9F 20 31 35 2C 38 2C 31 35 |,2,"#":. 15,8,15|
00000400: 00 1F 0C E1 00 44 B2 44 31 3A 81 20 53 B2 30 A4 |.....D.D1:. S.0.|
00000410: 37 3A 98 31 35 2C 22 42 2D 50 22 3B 32 3B 30 00 |7:.15,"B-P";2;0.|
00000420: 34 0C E6 00 98 31 35 2C 22 55 31 22 3B 32 3B 30 |4....15,"U1";2;0|
00000430: 3B 33 3B 53 00 46 0C EB 00 81 20 49 B2 31 A4 38 |;3;S.F.... I.1.8|
00000440: 3A 99 22 2E 22 3B 00 69 0C F0 00 81 20 4A B2 31 |:.".";.i.... J.1|
00000450: A4 33 32 3A A1 23 31 2C 58 24 3A 8B 58 24 B2 22 |.32:.#1,X$:.X$."|
00000460: 22 A7 58 24 B2 C7 28 30 29 00 7D 0C F5 00 97 20 |".X$..(0).}.... |
00000470: 44 2C C6 28 58 24 29 3A 44 B2 44 AA 31 00 90 0C |D,.(X$):D.D.1...|
00000480: FA 00 82 20 4A 2C 49 2C 53 3A A0 31 3A A0 31 35 |... J,I,S:.1:.15|
00000490: 00 AC 0C FF 00 44 B2 44 32 3A 8F 20 42 55 49 4C |.....D.D2:. BUIL|
000004A0: 44 20 52 45 43 4F 52 44 20 4D 41 50 00 C2 0C 04 |D RECORD MAP....|
000004B0: 01 81 20 54 B2 33 A4 31 37 3A 81 20 53 B2 30 A4 |.. T.3.17:. S.0.|
000004C0: 31 36 00 F0 0C 09 01 97 44 2C 54 3A 97 44 AA 31 |16......D,T:.D.1|
000004D0: 2C 53 3A 97 44 AA 32 2C 30 3A 97 44 AA 33 2C 54 |,S:.D.2,0:.D.3,T|
000004E0: 3A 97 44 AA 34 2C 53 3A 97 44 AA 35 2C 31 32 38 |:.D.4,S:.D.5,128|
000004F0: 00 00 0D 0E 01 44 B2 44 AA 36 3A 82 20 53 2C 54 |.....D.D.6:. S,T|
00000500: 00 17 0D 13 01 81 20 54 B2 31 39 A4 33 35 3A 81 |...... T.19.35:.|
00000510: 20 53 B2 30 A4 31 36 00 45 0D 18 01 97 44 2C 54 | S.0.16.E....D,T|
00000520: 3A 97 44 AA 31 2C 53 3A 97 44 AA 32 2C 30 3A 97 |:.D.1,S:.D.2,0:.|
00000530: 44 AA 33 2C 54 3A 97 44 AA 34 2C 53 3A 97 44 AA |D.3,T:.D.4,S:.D.|
00000540: 35 2C 31 32 38 00 55 0D 1D 01 44 B2 44 AA 36 3A |5,128.U...D.D.6:|
00000550: 82 20 53 2C 54 00 71 0D 22 01 81 49 B2 44 33 AA |. S,T.q."..I.D3.|
00000560: 32 A4 44 33 AA 31 33 35 3A 97 49 2C 30 3A 82 20 |2.D3.135:.I,0:. |
00000570: 49 00 9A 0D 27 01 97 44 33 2C 32 35 35 3A 97 44 |I...'..D3,255:.D|
00000580: 33 AA 31 2C 32 35 35 3A 8F 20 44 49 52 45 43 54 |3.1,255:. DIRECT|
00000590: 4F 52 59 20 42 4C 4F 43 4B 53 00 C6 0D 2C 01 44 |ORY BLOCKS...,.D|
000005A0: B2 44 31 3A 81 20 49 B2 31 A4 36 34 3A 55 25 28 |.D1:. I.1.64:U%(|
000005B0: 49 29 B2 C2 28 44 29 3A 8B 55 25 28 49 29 B2 32 |I)..(D):.U%(I).2|
000005C0: 32 39 A7 33 33 30 00 F5 0D 31 01 4E 24 28 49 29 |29.330...1.N$(I)|
000005D0: B2 22 22 3A 81 20 4A B2 31 A4 38 3A 4E 24 28 49 |."":. J.1.8:N$(I|
000005E0: 29 B2 4E 24 28 49 29 AA C7 28 C2 28 44 AA 4A 29 |).N$(I)..(.(D.J)|
000005F0: 29 3A 82 20 4A 00 25 0E 36 01 54 24 28 49 29 B2 |):. J.%.6.T$(I).|
00000600: 22 22 3A 81 20 4A B2 39 A4 31 31 3A 54 24 28 49 |"":. J.9.11:T$(I|
00000610: 29 B2 54 24 28 49 29 AA C7 28 C2 28 44 AA 4A 29 |).T$(I)..(.(D.J)|
00000620: 29 3A 82 20 4A 00 44 0E 3B 01 81 20 4A B2 31 36 |):. J.D.;.. J.16|
00000630: A4 33 31 3A 8B 20 C2 28 44 AA 4A 29 B2 30 20 A7 |.31:. .(D.J).0 .|
00000640: 20 33 32 35 00 5A 0E 40 01 58 B2 C2 28 44 AA 4A | 325.Z.@.X..(D.J|
00000650: 29 3A 97 20 44 33 AA 58 2C 49 00 62 0E 45 01 82 |):. D3.X,I.b.E..|
00000660: 20 4A 00 71 0E 4A 01 44 B2 44 AA 33 32 3A 82 20 | J.q.J.D.D.32:. |
00000670: 49 00 A5 0E 4F 01 99 3A 99 22 11 C6 49 4E 49 53 |I...O..:."..INIS|
00000680: 48 45 44 21 22 3A 99 22 11 D0 52 45 53 53 20 41 |HED!":."..RESS A|
00000690: 4E 59 20 4B 45 59 20 54 4F 20 47 4F 20 54 4F 20 |NY KEY TO GO TO |
000006A0: 4D 45 4E 55 22 00 B8 0E 54 01 A1 41 24 3A 8B 41 |MENU"...T..A$:.A|
000006B0: 24 B2 22 22 A7 33 34 30 00 C1 0E 59 01 89 35 30 |$."".340...Y..50|
000006C0: 30 00 D0 0E 5E 01 8B 42 50 B1 42 45 A7 33 36 35 |0...^..BP.BE.365|
000006D0: 00 F0 0E 63 01 58 24 B2 C7 28 C2 28 42 50 29 29 |...c.X$..(.(BP))|
000006E0: 3A 8B 20 42 50 B2 46 45 20 A7 20 43 53 B2 36 34 |:. BP.FE . CS.64|
000006F0: 00 FE 0E 68 01 42 50 B2 42 50 AA 31 3A 8E 00 1E |...h.BP.BP.1:...|
00000700: 0F 6D 01 44 4E B2 31 3A 8D 38 30 30 3A 9F 33 2C |.m.DN.1:.800:.3,|
00000710: 38 2C 33 2C 43 42 24 AA 22 2C 53 2C 52 22 00 4F |8,3,CB$.",S,R".O|
00000720: 0F 72 01 99 20 22 90 D2 45 41 44 49 4E 47 20 41 |.r.. "..EADING A|
00000730: 20 31 36 CB 20 C2 55 46 46 45 52 20 46 52 4F 4D | 16. .UFFER FROM|
00000740: 20 C3 C2 CD 20 C4 49 53 4B 05 22 3A 9E 52 42 00 | ... .ISK.":.RB.|
00000750: 6A 0F 77 01 46 45 B2 C2 28 58 32 29 AA 28 C2 28 |j.w.FE..(X2).(.(|
00000760: 58 32 AA 31 29 AC 32 35 36 29 00 7B 0F 7C 01 42 |X2.1).256).{.|.B|
00000770: 50 B2 42 53 3A A0 33 3A A0 31 35 00 8E 0F 81 01 |P.BS:.3:.15.....|
00000780: 44 4E B2 30 3A 8D 38 30 30 3A 89 33 35 30 00 AA |DN.0:.800:.350..|
00000790: 0F F4 01 99 22 93 C3 C2 CD 20 2D 2D 20 C3 D0 2F |....".... -- ../|
000007A0: CD 20 D5 54 49 4C 49 54 59 22 00 C1 0F FE 01 99 |. .TILITY"......|
000007B0: 22 11 C6 55 4E 43 54 49 4F 4E 53 20 41 52 45 3A |"..UNCTIONS ARE:|
000007C0: 22 00 E4 0F 08 02 99 22 11 20 12 31 92 20 2D 20 |"......". .1. - |
000007D0: CC 49 53 54 20 C3 D0 2F CD 20 C4 49 52 45 43 54 |.IST ../. .IRECT|
000007E0: 4F 52 59 22 00 02 10 12 02 99 22 11 20 12 32 92 |ORY"......". .2.|
000007F0: 20 2D 20 CC 49 53 54 20 C3 D0 2F CD 20 C6 49 4C | - .IST ../. .IL|
00000800: 45 22 00 2C 10 1C 02 99 22 11 20 12 33 92 20 2D |E".,....". .3. -|
00000810: 20 C3 4F 50 59 20 C3 C2 CD 20 46 49 4C 45 20 54 | .OPY ... FILE T|
00000820: 4F 20 C3 D0 2F CD 20 46 49 4C 45 22 00 5C 10 44 |O ../. FILE".\.D|
00000830: 02 99 22 11 20 12 38 92 20 2D 20 C9 4E 49 54 49 |..". .8. - .NITI|
00000840: 41 4C 49 5A 45 20 46 4F 52 20 41 4E 4F 54 48 45 |ALIZE FOR ANOTHE|
00000850: 52 20 C3 D0 2F CD 20 C4 49 53 4B 22 00 78 10 4E |R ../. .ISK".x.N|
00000860: 02 99 22 11 20 12 39 92 20 2D 20 C5 58 49 54 20 |..". .9. - .XIT |
00000870: D5 54 49 4C 49 54 59 22 00 9F 10 58 02 99 22 11 |.TILITY"...X..".|
00000880: D0 52 45 53 53 20 4B 45 59 20 46 4F 52 20 44 45 |.RESS KEY FOR DE|
00000890: 53 49 52 45 44 20 46 55 4E 43 54 49 4F 4E 22 00 |SIRED FUNCTION".|
000008A0: B2 10 62 02 A1 41 24 3A 8B 41 24 B2 22 22 A7 36 |..b..A$:.A$."".6|
000008B0: 31 30 00 E5 10 6C 02 91 20 C5 28 41 24 29 20 89 |10...l.. .(A$) .|
000008C0: 20 31 30 30 30 2C 32 30 30 30 2C 33 30 30 30 2C | 1000,2000,3000,|
000008D0: 35 30 30 2C 35 30 30 2C 35 30 30 2C 35 30 30 2C |500,500,500,500,|
000008E0: 35 2C 36 34 30 00 EF 10 76 02 89 20 35 30 30 00 |5,640...v.. 500.|
000008F0: 00 11 80 02 97 20 35 36 2C 31 36 30 3A 9C 3A 80 |..... 56,160:.:.|
00000900: 00 10 11 20 03 8B 20 44 4B B2 44 4E 20 A7 20 8E |... .. DK.DN . .|
00000910: 00 44 11 2A 03 8B 20 44 4E B2 30 20 A7 20 99 3A |.D.*.. DN.0 . .:|
00000920: 99 22 11 C9 4E 53 45 52 54 20 90 C3 D0 2F CD 05 |."..NSERT .../..|
00000930: 20 C4 49 53 4B 20 49 4E 20 C4 52 49 56 45 22 3A | .ISK IN .RIVE":|
00000940: 89 38 33 30 00 69 11 34 03 99 3A 99 22 11 C9 4E |.830.i.4..:."..N|
00000950: 53 45 52 54 20 90 C3 C2 CD 05 20 C4 49 53 4B 20 |SERT ..... .ISK |
00000960: 49 4E 20 C4 52 49 56 45 22 00 93 11 3E 03 99 22 |IN .RIVE"...>.."|
00000970: 11 D0 52 45 53 53 20 5B C6 31 5D 20 57 48 45 4E |..RESS [.1] WHEN|
00000980: 20 52 45 41 44 59 20 54 4F 20 43 4F 4E 54 49 4E | READY TO CONTIN|
00000990: 55 45 22 00 A7 11 43 03 A1 41 24 3A 8B 41 24 B3 |UE"...C..A$:.A$.|
000009A0: B1 22 22 A7 38 33 35 00 B8 11 48 03 A1 41 24 3A |."".835...H..A$:|
000009B0: 99 22 3F 9D 20 9D 22 3B 00 CC 11 4D 03 8B 41 24 |."?. .";...M..A$|
000009C0: B3 B1 C7 28 31 33 33 29 A7 38 34 30 00 E0 11 52 |...(133).840...R|
000009D0: 03 5A 5A B2 B8 28 30 29 3A 44 4B B2 44 4E 3A 8E |.ZZ..(0):DK.DN:.|
000009E0: 00 F8 11 84 03 84 31 35 2C 45 31 24 2C 45 32 24 |......15,E1$,E2$|
000009F0: 2C 45 33 24 2C 45 34 24 00 08 12 8E 03 44 53 B2 |,E3$,E4$.....DS.|
00000A00: C5 28 45 31 24 29 3A 8E 00 39 12 E8 03 99 22 93 |.(E1$):..9....".|
00000A10: 12 D5 D3 D2 20 20 CE C1 CD C5 20 20 20 20 20 20 |.... .... |
00000A20: 20 D4 D9 D0 20 20 20 C5 D8 D4 20 20 20 D2 C5 C3 | ... ... ...|
00000A30: D3 20 20 20 D3 C9 DA C5 22 00 4F 12 F2 03 42 B2 |. ....".O...B.|
00000A40: 32 3A 44 B2 44 31 3A 81 20 49 B2 31 A4 36 34 00 |2:D.D1:. I.1.64.|
00000A50: 64 12 FC 03 8B 20 C2 28 44 29 B3 B1 30 20 A7 20 |d.... .(D)..0 . |
00000A60: 31 31 32 30 00 7E 12 06 04 55 24 B2 C9 28 22 20 |1120.~...U$..(" |
00000A70: 20 22 AA C4 28 55 25 28 49 29 29 2C 32 29 00 8B | "..(U%(I)),2)..|
00000A80: 12 10 04 4E 24 B2 4E 24 28 49 29 00 98 12 1A 04 |...N$.N$(I).....|
00000A90: 54 24 B2 54 24 28 49 29 00 BB 12 24 04 45 B2 C2 |T$.T$(I)...$.E..|
00000AA0: 28 44 AA 31 32 29 AA 31 3A 45 24 B2 C9 28 22 20 |(D.12).1:E$..(" |
00000AB0: 20 20 22 AA C4 28 45 29 2C 32 29 00 DC 12 2E 04 | "..(E),2).....|
00000AC0: 53 B2 C2 28 44 AA 31 35 29 3A 53 24 B2 C9 28 22 |S..(D.15):S$..("|
00000AD0: 20 20 20 22 AA C4 28 53 29 2C 33 29 00 00 13 38 | "..(S),3)...8|
00000AE0: 04 4B B2 30 3A 81 20 4A B2 31 36 A4 33 31 3A 8B |.K.0:. J.16.31:.|
00000AF0: 20 C2 28 44 AA 4A 29 B3 B1 30 A7 4B B2 4B AA 31 | .(D.J)..0.K.K.1|
00000B00: 00 17 13 42 04 4B 24 B2 C9 28 22 20 20 20 22 AA |...B.K$..(" ".|
00000B10: C4 28 4B 29 2C 33 29 00 25 13 4C 04 82 20 4A 3A |.(K),3).%.L.. J:|
00000B20: 42 B2 42 AA 4B 00 61 13 56 04 99 20 55 24 3B 22 |B.B.K.a.V.. U$;"|
00000B30: 20 20 20 22 3B 4E 24 3B 22 20 20 20 22 3B 54 24 | ";N$;" ";T$|
00000B40: 3B 22 20 20 20 22 3B 45 24 3B 22 20 20 20 20 22 |;" ";E$;" "|
00000B50: 3B 53 24 3B 22 20 20 20 20 22 3B 4B 24 3B 22 4B |;S$;" ";K$;"K|
00000B60: 22 00 70 13 60 04 44 B2 44 AA 33 32 3A 82 20 49 |".p.`.D.D.32:. I|
00000B70: 00 9A 13 6A 04 99 22 12 22 3B C4 28 31 33 36 AB |...j..".";.(136.|
00000B80: 42 29 3B 22 20 31 CB 20 C2 4C 4F 43 4B 53 20 C1 |B);" 1. .LOCKS .|
00000B90: 56 41 49 4C 41 42 4C 45 20 22 00 B9 13 74 04 99 |VAILABLE "...t..|
00000BA0: 22 11 D0 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |"..RESS ANY KEY |
00000BB0: 46 4F 52 20 4D 45 4E 55 22 00 CD 13 7E 04 A1 41 |FOR MENU"...~..A|
00000BC0: 24 3A 8B 41 24 B2 22 22 A7 31 31 35 30 00 D6 13 |$:.A$."".1150...|
00000BD0: 88 04 89 35 30 30 00 F3 13 D0 07 9F 34 2C 33 3A |...500......4,3:|
00000BE0: 8F 20 44 45 46 41 55 4C 54 20 54 4F 20 53 43 52 |. DEFAULT TO SCR|
00000BF0: 45 45 4E 00 24 14 DA 07 99 22 93 C3 D0 2F CD 20 |EEN.$....".../. |
00000C00: C6 49 4C 45 20 D0 52 49 4E 54 22 3A 99 22 11 D5 |.ILE .RINT":."..|
00000C10: 53 45 52 2C 20 C6 49 4C 45 20 CE 41 4D 45 2C 20 |SER, .ILE .AME, |
00000C20: D4 D9 D0 22 00 33 14 E4 07 85 20 55 24 2C 41 24 |...".3.... U$,A$|
00000C30: 2C 42 24 00 65 14 EE 07 55 25 B2 C5 28 55 24 29 |,B$.e...U%..(U$)|
00000C40: 3A 8B 55 25 B3 30 B0 55 B1 31 35 A7 99 22 11 12 |:.U%.0.U.15.."..|
00000C50: D5 53 45 52 20 23 20 C9 CE D6 C1 CC C9 C4 22 3A |.SER # .......":|
00000C60: 89 32 34 30 30 00 92 14 F8 07 58 B2 32 31 3A 81 |.2400.....X.21:.|
00000C70: 20 49 B2 30 A4 32 30 3A 8B 20 42 24 B2 56 54 24 | I.0.20:. B$.VT$|
00000C80: 28 49 29 A7 58 B2 49 3A 49 B2 32 30 3A 89 32 30 |(I).X.I:I.20:.20|
00000C90: 36 30 00 A9 14 02 08 8B 56 54 24 28 49 29 B2 22 |60......VT$(I)."|
00000CA0: 2A 2A 2A 22 A7 49 B2 32 30 00 D4 14 0C 08 82 20 |***".I.20...... |
00000CB0: 49 3A 8B 58 B2 32 31 A7 99 22 11 12 C6 49 4C 45 |I:.X.21.."...ILE|
00000CC0: 20 D4 D9 D0 C5 20 C9 CE D6 C1 CC C9 C4 22 3A 89 | .... .......":.|
00000CD0: 32 34 30 30 00 EE 14 16 08 41 24 B2 C8 28 41 24 |2400.....A$..(A$|
00000CE0: AA 22 20 20 20 20 20 20 20 20 22 2C 38 29 00 12 |." ",8)..|
00000CF0: 15 20 08 46 B2 30 3A 45 B2 30 3A 81 49 B2 31 A4 |. .F.0:E.0:.I.1.|
00000D00: 36 34 3A 8B 55 25 28 49 29 B2 32 32 39 A7 32 31 |64:.U%(I).229.21|
00000D10: 30 30 00 3B 15 2A 08 8B 55 25 B2 55 25 28 49 29 |00.;.*..U%.U%(I)|
00000D20: AF 41 24 B2 4E 24 28 49 29 AF 42 24 B2 54 24 28 |.A$.N$(I).B$.T$(|
00000D30: 49 29 A7 46 B2 49 3A 49 B2 36 34 00 43 15 34 08 |I).F.I:I.64.C.4.|
00000D40: 82 20 49 00 66 15 3E 08 8B 46 B2 30 A7 99 22 11 |. I.f.>..F.0..".|
00000D50: 12 C6 49 4C 45 20 CE CF D4 20 C6 CF D5 CE C4 22 |..ILE ... ....."|
00000D60: 3A 89 32 34 30 30 00 96 15 48 08 50 52 B2 30 3A |:.2400...H.PR.0:|
00000D70: 85 22 11 D3 43 52 45 45 4E 20 28 53 29 20 4F 52 |."..CREEN (S) OR|
00000D80: 20 D0 52 49 4E 54 45 52 20 28 50 29 20 20 53 9D | .RINTER (P) S.|
00000D90: 9D 9D 22 3B 41 24 00 C2 15 52 08 8B 41 24 B2 22 |..";A$...R..A$."|
00000DA0: 50 22 A7 9F 37 2C 34 2C 37 3A 98 37 3A A0 37 3A |P"..7,4,7:.7:.7:|
00000DB0: A0 34 3A 9F 34 2C 34 3A 50 52 B2 31 3A 89 32 31 |.4:.4,4:PR.1:.21|
00000DC0: 36 30 00 D3 15 5C 08 8B 41 24 B2 22 53 22 A7 32 |60...\..A$."S".2|
00000DD0: 31 36 30 00 DD 15 66 08 89 32 31 32 30 00 EE 15 |160...f..2120...|
00000DE0: 70 08 98 34 2C 22 93 22 3B 3A 42 43 B2 30 00 12 |p..4,".";:BC.0..|
00000DF0: 16 7A 08 44 4E B2 30 3A 8D 38 30 30 3A 9F 20 31 |.z.DN.0:.800:. 1|
00000E00: 2C 38 2C 32 2C 22 23 22 3A 9F 20 31 35 2C 38 2C |,8,2,"#":. 15,8,|
00000E10: 31 35 00 24 16 84 08 44 B2 44 31 AA 28 46 AB 31 |15.$...D.D1.(F.1|
00000E20: 29 AC 33 32 00 4E 16 8E 08 81 4B B2 44 AA 31 36 |).32.N....K.D.16|
00000E30: A4 44 AA 33 31 3A 42 B2 C2 28 4B 29 3A 8B 42 B2 |.D.31:B..(K):.B.|
00000E40: 30 A7 4B B2 44 AA 33 31 3A 89 32 33 35 30 00 5E |0.K.D.31:.2350.^|
00000E50: 16 98 08 42 B2 44 32 AA 28 42 29 AC 32 34 00 87 |...B.D2.(B).24..|
00000E60: 16 A2 08 81 49 B2 42 A4 42 AA 31 38 A9 36 3A 54 |....I.B.B.18.6:T|
00000E70: B2 C2 28 49 29 3A 53 B2 C2 28 49 AA 31 29 3A 50 |..(I):S..(I.1):P|
00000E80: B2 C2 28 49 AA 32 29 00 99 16 AC 08 98 31 35 2C |..(I.2)......15,|
00000E90: 22 42 2D 50 22 3B 32 3B 30 00 AE 16 B6 08 98 31 |"B-P";2;0......1|
00000EA0: 35 2C 22 55 31 22 3B 32 3B 30 3B 54 3B 53 00 BB |5,"U1";2;0;T;S..|
00000EB0: 16 C0 08 81 4A B2 31 A4 32 35 36 00 D5 16 CA 08 |....J.1.256.....|
00000EC0: A1 23 31 2C 58 24 3A 8B 58 24 B2 22 22 A7 58 24 |.#1,X$:.X$."".X$|
00000ED0: B2 C7 28 30 29 00 FD 16 D4 08 8B C6 28 58 24 29 |..(0).......(X$)|
00000EE0: B2 32 36 A7 4A B2 32 35 36 3A 49 B2 42 AA 31 38 |.26.J.256:I.B.18|
00000EF0: 3A 4B B2 44 AA 33 31 3A 89 32 33 33 30 00 10 17 |:K.D.31:.2330...|
00000F00: DE 08 8B C6 28 58 24 29 B3 B1 39 A7 32 33 30 30 |....(X$)..9.2300|
00000F10: 00 42 17 E8 08 58 B2 B5 28 42 43 AD 38 29 AC 38 |.B...X..(BC.8).8|
00000F20: 3A 58 B2 42 43 AB 58 3A 58 B2 38 AB 58 3A 81 58 |:X.BC.X:X.8.X:.X|
00000F30: 58 B2 31 A4 58 3A 98 34 2C 22 20 22 3B 3A 82 20 |X.1.X:.4," ";:. |
00000F40: 58 58 00 54 17 F2 08 42 43 B2 42 43 AA 58 3A 89 |XX.T...BC.BC.X:.|
00000F50: 32 33 33 30 00 71 17 FC 08 8B C6 28 58 24 29 B2 |2330.q.....(X$).|
00000F60: 31 32 A7 98 34 2C 22 13 93 22 3B 3A 89 32 33 33 |12..4,"..";:.233|
00000F70: 30 00 9C 17 06 09 98 34 2C C7 28 41 25 28 C6 28 |0......4,.(A%(.(|
00000F80: 58 24 29 29 29 3B 3A 8B 41 25 28 C6 28 58 24 29 |X$)));:.A%(.(X$)|
00000F90: 29 B3 B1 30 A7 42 43 B2 42 43 AA 31 00 AF 17 10 |)..0.BC.BC.1....|
00000FA0: 09 8B C6 28 58 24 29 B2 31 33 A7 42 43 B2 30 00 |...(X$).13.BC.0.|
00000FB0: B7 17 1A 09 82 20 4A 00 BF 17 24 09 82 20 49 00 |..... J...$.. I.|
00000FC0: C7 17 2E 09 82 20 4B 00 D2 17 38 09 A0 31 3A A0 |..... K...8..1:.|
00000FD0: 31 35 00 F9 17 42 09 46 46 B2 46 3A 45 B2 45 AA |15...B.FF.F:E.E.|
00000FE0: 31 3A 81 49 B2 46 A4 36 34 3A 8B 55 25 28 49 29 |1:.I.F.64:.U%(I)|
00000FF0: B2 32 32 39 A7 32 33 39 30 00 38 18 4C 09 8B 55 |.229.2390.8.L..U|
00001000: 25 B2 55 25 28 49 29 AF 41 24 B2 4E 24 28 49 29 |%.U%(I).A$.N$(I)|
00001010: AF 42 24 B2 54 24 28 49 29 AF C2 28 44 31 AA 28 |.B$.T$(I)..(D1.(|
00001020: 28 49 AB 31 29 AC 33 32 29 AA 31 32 29 B2 45 A7 |(I.1).32).12).E.|
00001030: 46 B2 49 3A 49 B2 36 34 00 4B 18 56 09 82 20 49 |F.I:I.64.K.V.. I|
00001040: 3A 8B 46 B1 46 46 A7 32 31 37 30 00 6C 18 60 09 |:.F.FF.2170.l.`.|
00001050: 99 3A 99 22 11 D0 52 45 53 53 20 41 4E 59 20 4B |.:."..RESS ANY K|
00001060: 45 59 20 46 4F 52 20 4D 45 4E 55 22 00 80 18 6A |EY FOR MENU"...j|
00001070: 09 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 34 31 30 |..A$:.A$."".2410|
00001080: 00 9D 18 74 09 98 34 3A 98 34 2C 22 13 22 AA C7 |...t..4:.4,"."..|
00001090: 28 31 34 31 29 AA 22 93 22 3B 3A A0 34 00 B6 18 |(141).".";:.4...|
000010A0: 7E 09 8B 50 52 A7 9F 31 30 2C 34 2C 31 30 3A 98 |~..PR..10,4,10:.|
000010B0: 31 30 3A A0 31 30 00 BF 18 88 09 89 35 30 30 00 |10:.10......500.|
000010C0: E4 18 B8 0B 99 22 93 C3 4F 50 59 20 41 20 C3 C2 |....."..OPY A ..|
000010D0: CD 20 46 49 4C 45 20 54 4F 20 C3 D0 2F CD 20 46 |. FILE TO ../. F|
000010E0: 49 4C 45 22 00 04 19 C2 0B 85 22 11 C3 C2 CD 20 |ILE"......".... |
000010F0: 46 49 4C 45 20 4E 41 4D 45 20 20 A0 9D 9D 9D 22 |FILE NAME ...."|
00001100: 3B 43 42 24 00 34 19 CC 0B 99 22 11 C3 D0 2F CD |;CB$.4....".../.|
00001110: 20 55 53 45 52 2C 20 46 49 4C 45 20 4E 41 4D 45 | USER, FILE NAME|
00001120: 2C 20 54 59 50 45 22 3A 85 20 55 24 2C 43 50 24 |, TYPE":. U$,CP$|
00001130: 2C 54 59 24 00 61 19 D6 0B 8B C5 28 55 24 29 B3 |,TY$.a.....(U$).|
00001140: 30 B0 C5 28 55 24 29 B1 31 35 A7 99 22 11 C9 4E |0..(U$).15.."..N|
00001150: 56 41 4C 49 44 20 D5 53 45 52 22 3A 89 33 30 32 |VALID .SER":.302|
00001160: 30 00 8F 19 E0 0B 58 B2 32 31 3A 81 20 49 B2 30 |0.....X.21:. I.0|
00001170: A4 32 30 3A 8B 20 54 59 24 B2 56 54 24 28 49 29 |.20:. TY$.VT$(I)|
00001180: A7 58 B2 49 3A 49 B2 32 30 3A 89 33 30 36 30 00 |.X.I:I.20:.3060.|
00001190: A6 19 EA 0B 8B 56 54 24 28 49 29 B2 22 2A 2A 2A |.....VT$(I)."***|
000011A0: 22 A7 49 B2 32 30 00 D0 19 F4 0B 82 20 49 3A 8B |".I.20...... I:.|
000011B0: 58 B2 32 31 A7 99 22 11 C6 49 4C 45 20 D4 59 50 |X.21.."..ILE .YP|
000011C0: 45 20 C9 4E 56 41 4C 49 44 22 3A 89 33 30 32 30 |E .NVALID":.3020|
000011D0: 00 F8 19 FE 0B 4E B2 30 3A 81 20 49 B2 31 A4 36 |.....N.0:. I.1.6|
000011E0: 34 3A 8B 20 55 25 28 49 29 B2 32 32 39 20 A7 20 |4:. U%(I).229 . |
000011F0: 4E B2 49 3A 49 B2 36 34 00 27 1A 08 0C 82 20 49 |N.I:I.64.'.... I|
00001200: 3A 8B 20 4E B2 30 20 A7 20 99 22 11 12 C3 D0 2F |:. N.0 . ."..../|
00001210: CD 20 C4 49 52 45 43 54 4F 52 59 20 C6 55 4C 4C |. .IRECTORY .ULL|
00001220: 22 3A 89 33 35 36 30 00 62 1A 12 0C 45 B2 30 3A |":.3560.b...E.0:|
00001230: 44 4E B2 31 3A 8D 38 30 30 3A 9F 31 35 2C 38 2C |DN.1:.800:.15,8,|
00001240: 31 35 3A 98 31 35 2C 22 49 30 22 3A 9F 33 2C 38 |15:.15,"I0":.3,8|
00001250: 2C 33 2C 43 42 24 AA 22 2C 53 2C 52 22 3A 8D 39 |,3,CB$.",S,R":.9|
00001260: 30 30 00 94 1A 1C 0C A0 33 3A A0 31 35 3A 8B 44 |00......3:.15:.D|
00001270: 53 B2 36 32 20 A7 20 99 22 11 12 C3 C2 CD 20 C6 |S.62 . ."..... .|
00001280: 49 4C 45 20 CE 4F 54 20 C6 4F 55 4E 44 22 3A 89 |ILE .OT .OUND":.|
00001290: 33 35 36 30 00 BB 1A 21 0C 42 50 B2 42 45 AA 31 |3560...!.BP.BE.1|
000012A0: 3A 46 45 B2 30 3A 97 20 58 31 2C 30 3A 97 20 58 |:FE.0:. X1,0:. X|
000012B0: 31 AA 31 2C 30 3A 99 22 93 22 3B 00 EB 1A 30 0C |1.1,0:.".";...0.|
000012C0: 44 B2 44 31 AA 28 4E AB 31 29 AC 33 32 3A 97 44 |D.D1.(N.1).32:.D|
000012D0: 2C C5 28 55 24 29 3A 81 49 B2 44 AA 31 A4 44 AA |,.(U$):.I.D.1.D.|
000012E0: 38 3A 97 49 2C 33 32 3A 82 20 49 00 12 1B 3A 0C |8:.I,32:. I...:.|
000012F0: 81 49 B2 31 A4 C3 28 43 50 24 29 3A 97 44 AA 49 |.I.1..(CP$):.D.I|
00001300: 2C C6 28 CA 28 43 50 24 2C 49 2C 31 29 29 3A 82 |,.(.(CP$,I,1)):.|
00001310: 20 49 00 3F 1B 44 0C 81 49 B2 39 A4 31 31 3A 97 | I.?.D..I.9.11:.|
00001320: 44 AA 49 2C C6 28 CA 28 54 59 24 2C 49 AB 38 2C |D.I,.(.(TY$,I.8,|
00001330: 31 29 29 3A 82 20 49 3A 97 44 AA 31 32 2C 45 00 |1)):. I:.D.12,E.|
00001340: 53 1B 4E 0C 97 44 AA 31 33 2C 30 3A 97 44 AA 31 |S.N..D.13,0:.D.1|
00001350: 34 2C 30 00 87 1B 58 0C 55 25 28 4E 29 B2 C5 28 |4,0...X.U%(N)..(|
00001360: 55 24 29 3A 4E 24 28 4E 29 B2 C8 28 43 50 24 AA |U$):N$(N)..(CP$.|
00001370: 22 20 20 20 20 20 20 20 20 22 2C 38 29 3A 54 24 |" ",8):T$|
00001380: 28 4E 29 B2 54 59 24 00 A1 1B 62 0C 4E 52 B2 44 |(N).TY$...b.NR.D|
00001390: AA 31 35 3A 42 41 B2 44 AA 31 36 3A 97 4E 52 2C |.15:BA.D.16:.NR,|
000013A0: 30 00 BB 1B 6C 0C 81 20 49 B2 42 41 A4 42 41 AA |0...l.. I.BA.BA.|
000013B0: 31 35 3A 97 49 2C 30 3A 82 20 49 00 E5 1B 76 0C |15:.I,0:. I...v.|
000013C0: 4E 42 B2 31 33 36 3A 81 49 B2 30 A4 31 33 35 3A |NB.136:.I.0.135:|
000013D0: 8B C2 28 44 33 AA 49 29 B2 30 A7 4E 42 B2 49 3A |..(D3.I).0.NB.I:|
000013E0: 49 B2 31 33 35 00 16 1C 80 0C 82 20 49 3A 8B 4E |I.135...... I:.N|
000013F0: 42 B2 31 33 36 A7 97 44 2C 32 32 39 3A 99 22 11 |B.136..D,229:.".|
00001400: 12 C3 D0 2F CD 20 C4 49 53 4B 20 C6 55 4C 4C 22 |.../. .ISK .ULL"|
00001410: 3A 89 33 35 36 30 00 23 1C 8A 0C 97 44 33 AA 4E |:.3560.#....D3.N|
00001420: 42 2C 4E 00 36 1C 94 0C 97 42 41 2C 4E 42 3A 81 |B,N.6....BA,NB:.|
00001430: 20 52 B2 31 A4 38 00 40 1C 9E 0C 59 24 B2 22 22 | R.1.8.@...Y$.""|
00001440: 00 5F 1C A8 0C 8B 58 B2 31 A7 59 24 B2 59 24 AA |._....X.1.Y$.Y$.|
00001450: C7 28 31 30 29 3A 58 B2 30 3A 89 33 32 39 30 00 |.(10):X.0:.3290.|
00001460: 77 1C B2 0C 8D 33 35 30 3A 8B 58 24 B2 22 22 A7 |w....350:.X$."".|
00001470: 58 24 B2 C7 28 30 29 00 97 1C BC 0C 41 B2 C6 28 |X$..(0).....A..(|
00001480: 58 24 29 3A 59 24 B2 59 24 AA C7 28 43 25 28 41 |X$):Y$.Y$..(C%(A|
00001490: 29 29 3A 99 58 24 3B 00 A9 1C D0 0C 8B 58 24 B2 |)):.X$;......X$.|
000014A0: C7 28 31 33 29 A7 58 B2 31 00 C1 1C DA 0C 59 B2 |.(13).X.1.....Y.|
000014B0: C3 28 59 24 29 3A 8B 59 B2 31 32 38 A7 33 33 33 |.(Y$):.Y.128.333|
000014C0: 30 00 D5 1C E4 0C 8B 43 53 B2 36 34 AF 58 B2 30 |0......CS.64.X.0|
000014D0: A7 33 33 32 30 00 DF 1C EE 0C 89 33 32 34 30 00 |.3320......3240.|
000014E0: FE 1C F8 0C 81 49 B2 59 AA 31 A4 31 32 38 3A 59 |.....I.Y.1.128:Y|
000014F0: 24 B2 59 24 AA C7 28 32 36 29 3A 82 20 49 00 38 |$.Y$..(26):. I.8|
00001500: 1D 02 0D 52 41 B2 44 32 AA 28 28 4E 42 29 AC 32 |...RA.D2.((NB).2|
00001510: 34 29 AA 28 28 52 AB 31 29 AC 33 29 3A 54 B2 C2 |4).((R.1).3):T..|
00001520: 28 52 41 29 3A 53 B2 C2 28 52 41 AA 31 29 3A 50 |(RA):S..(RA.1):P|
00001530: B2 C2 28 52 41 AA 32 29 00 65 1D 07 0D 44 4E B2 |..(RA.2).e...DN.|
00001540: 30 3A 8D 38 30 30 3A 9F 20 31 35 2C 38 2C 31 35 |0:.800:. 15,8,15|
00001550: 3A 98 31 35 2C 22 49 30 22 3A 9F 20 31 2C 38 2C |:.15,"I0":. 1,8,|
00001560: 32 2C 22 23 22 00 88 1D 0C 0D 98 31 35 2C 22 55 |2,"#"......15,"U|
00001570: 31 22 3B 32 3B 30 3B 54 3B 53 3A 98 31 35 2C 22 |1";2;0;T;S:.15,"|
00001580: 42 2D 50 22 3B 32 3B 50 00 B9 1D 16 0D 98 31 2C |B-P";2;P......1,|
00001590: 59 24 3B 3A 8B 43 53 B2 36 34 A7 98 31 35 2C 22 |Y$;:.CS.64..15,"|
000015A0: 55 32 22 3B 32 3B 30 3B 54 3B 53 3A 98 31 35 2C |U2";2;0;T;S:.15,|
000015B0: 22 42 2D 50 22 3B 32 3B 30 00 E3 1D 20 0D 98 31 |"B-P";2;0... ..1|
000015C0: 35 2C 22 55 32 22 3B 32 3B 30 3B 54 3B 53 3A 97 |5,"U2";2;0;T;S:.|
000015D0: 4E 52 2C 28 C2 28 4E 52 29 AA 31 29 3A A0 31 3A |NR,(.(NR).1):.1:|
000015E0: A0 31 35 00 F2 1D 2A 0D 8B 43 53 B2 36 34 A7 52 |.15...*..CS.64.R|
000015F0: B2 38 00 06 1E 34 0D 82 20 52 3A 8B 43 53 B2 36 |.8...4.. R:.CS.6|
00001600: 34 A7 33 34 35 30 00 12 1E 3E 0D 42 41 B2 42 41 |4.3450...>.BA.BA|
00001610: AA 31 00 26 1E 48 0D 8B C2 28 4E 52 29 B3 31 32 |.1.&.H...(NR).12|
00001620: 38 A7 33 31 39 30 00 4E 1E 52 0D 4E B2 30 3A 81 |8.3190.N.R.N.0:.|
00001630: 20 49 B2 31 A4 36 34 3A 8B 20 55 25 28 49 29 B2 | I.1.64:. U%(I).|
00001640: 32 32 39 20 A7 20 4E B2 49 3A 49 B2 36 34 00 7D |229 . N.I:I.64.}|
00001650: 1E 5C 0D 82 20 49 3A 8B 20 4E B2 30 20 A7 20 99 |.\.. I:. N.0 . .|
00001660: 22 11 12 C3 D0 2F CD 20 C4 49 52 45 43 54 4F 52 |"..../. .IRECTOR|
00001670: 59 20 C6 55 4C 4C 22 3A 89 33 35 36 30 00 8D 1E |Y .ULL":.3560...|
00001680: 66 0D 45 B2 45 AA 31 3A 89 33 31 32 30 00 B0 1E |f.E.E.1:.3120...|
00001690: 7A 0D 99 3A 99 22 11 D7 52 49 54 49 4E 47 20 C3 |z..:."..RITING .|
000016A0: D0 2F CD 20 C4 49 52 45 43 54 4F 52 59 22 3A 99 |./. .IRECTORY":.|
000016B0: 00 DD 1E 84 0D 44 4E B2 30 3A 8D 38 30 30 3A 9F |.....DN.0:.800:.|
000016C0: 20 31 35 2C 38 2C 31 35 3A 98 31 35 2C 22 49 30 | 15,8,15:.15,"I0|
000016D0: 22 3A 9F 20 31 2C 38 2C 32 2C 22 23 22 00 FC 1E |":. 1,8,2,"#"...|
000016E0: 8E 0D 44 B2 44 31 3A 81 20 53 B2 30 A4 37 3A 98 |..D.D1:. S.0.7:.|
000016F0: 31 35 2C 22 42 2D 50 22 3B 32 3B 30 00 0E 1F 98 |15,"B-P";2;0....|
00001700: 0D 81 20 49 B2 31 A4 38 3A 99 22 2E 22 3B 00 3D |.. I.1.8:.".";.=|
00001710: 1F A2 0D 58 24 B2 22 22 3A 81 20 4A B2 31 A4 33 |...X$."":. J.1.3|
00001720: 32 3A 58 B2 C2 28 44 29 3A 58 24 B2 58 24 AA C7 |2:X..(D):X$.X$..|
00001730: 28 58 29 3A 44 B2 44 AA 31 3A 82 20 4A 00 75 1F |(X):D.D.1:. J.u.|
00001740: AC 0D 98 31 2C 58 24 3B 3A 8B 53 B2 37 AF 49 B2 |...1,X$;:.S.7.I.|
00001750: 38 AF 4A B2 33 32 A7 98 31 35 2C 22 55 32 22 3B |8.J.32..15,"U2";|
00001760: 32 3B 30 3B 33 3B 53 3A 98 31 35 2C 22 42 2D 50 |2;0;3;S:.15,"B-P|
00001770: 22 3B 32 2C 30 00 7D 1F B6 0D 82 20 49 00 92 1F |";2,0.}.... I...|
00001780: C0 0D 98 31 35 2C 22 55 32 22 3B 32 3B 30 3B 33 |...15,"U2";2;0;3|
00001790: 3B 53 00 A1 1F CA 0D 82 20 53 3A A0 31 3A A0 31 |;S...... S:.1:.1|
000017A0: 35 00 C2 1F E8 0D 99 3A 99 22 11 D0 52 45 53 53 |5......:."..RESS|
000017B0: 20 41 4E 59 20 4B 45 59 20 46 4F 52 20 4D 45 4E | ANY KEY FOR MEN|
000017C0: 55 22 00 D6 1F F2 0D A1 41 24 3A 8B 41 24 B2 22 |U"......A$:.A$."|
000017D0: 22 A7 33 35 37 30 00 DF 1F FC 0D 89 35 30 30 00 |".3570......500.|
000017E0: 23 20 28 23 83 20 30 2C 30 2C 30 2C 30 2C 30 2C |# (#. 0,0,0,0,0,|
000017F0: 30 2C 30 2C 30 2C 30 2C 30 2C 31 36 39 2C 30 2C |0,0,0,0,0,169,0,|
00001800: 31 34 31 2C 36 38 2C 33 2C 31 34 31 2C 36 39 2C |141,68,3,141,69,|
00001810: 33 2C 31 34 31 2C 36 32 2C 33 2C 31 34 31 2C 36 |3,141,62,3,141,6|
00001820: 33 2C 33 00 67 20 32 23 83 20 31 37 33 2C 36 34 |3,3.g 2#. 173,64|
00001830: 2C 33 2C 31 34 31 2C 31 34 33 2C 33 2C 31 37 33 |,3,141,143,3,173|
00001840: 2C 36 35 2C 33 2C 31 34 31 2C 31 34 34 2C 33 2C |,65,3,141,144,3,|
00001850: 31 37 33 2C 36 38 2C 33 2C 32 30 35 2C 36 30 2C |173,68,3,205,60,|
00001860: 33 2C 32 30 38 2C 38 00 AD 20 3C 23 83 20 31 37 |3,208,8.. <#. 17|
00001870: 33 2C 36 39 2C 33 2C 32 30 35 2C 36 31 2C 33 2C |3,69,3,205,61,3,|
00001880: 32 34 30 2C 32 32 2C 31 36 32 2C 33 2C 33 32 2C |240,22,162,3,32,|
00001890: 31 39 38 2C 32 35 35 2C 33 32 2C 32 32 38 2C 32 |198,255,32,228,2|
000018A0: 35 35 2C 33 32 2C 32 30 34 2C 32 35 35 00 F1 20 |55,32,204,255.. |
000018B0: 46 23 83 20 32 33 38 2C 36 38 2C 33 2C 32 30 38 |F#. 238,68,3,208|
000018C0: 2C 32 32 34 2C 32 33 38 2C 36 39 2C 33 2C 37 36 |,224,238,69,3,76|
000018D0: 2C 39 36 2C 33 2C 31 36 32 2C 33 2C 33 32 2C 31 |,96,3,162,3,32,1|
000018E0: 39 38 2C 32 35 35 2C 33 32 2C 32 32 38 2C 32 35 |98,255,32,228,25|
000018F0: 35 00 35 21 50 23 83 20 31 34 31 2C 32 35 35 2C |5.5!P#. 141,255,|
00001900: 32 35 35 2C 33 32 2C 32 30 34 2C 32 35 35 2C 32 |255,32,204,255,2|
00001910: 33 38 2C 36 38 2C 33 2C 32 30 38 2C 33 2C 32 33 |38,68,3,208,3,23|
00001920: 38 2C 36 39 2C 33 2C 32 33 38 2C 36 30 2C 33 2C |8,69,3,238,60,3,|
00001930: 32 30 38 2C 33 00 77 21 5A 23 83 20 32 33 38 2C |208,3.w!Z#. 238,|
00001940: 36 31 2C 33 2C 33 32 2C 31 38 33 2C 32 35 35 2C |61,3,32,183,255,|
00001950: 32 30 31 2C 36 34 2C 32 34 30 2C 33 30 2C 31 37 |201,64,240,30,17|
00001960: 33 2C 36 36 2C 33 2C 32 30 35 2C 31 34 33 2C 33 |3,66,3,205,143,3|
00001970: 2C 32 30 38 2C 31 31 00 BB 21 64 23 83 20 31 37 |,208,11..!d#. 17|
00001980: 33 2C 36 37 2C 33 2C 32 30 35 2C 31 34 34 2C 33 |3,67,3,205,144,3|
00001990: 2C 32 30 38 2C 33 2C 37 36 2C 32 31 33 2C 33 2C |,208,3,76,213,3,|
000019A0: 32 33 38 2C 31 34 33 2C 33 2C 32 30 38 2C 31 39 |238,143,3,208,19|
000019B0: 35 2C 32 33 38 2C 31 34 34 2C 33 00 F3 21 6E 23 |5,238,144,3..!n#|
000019C0: 83 20 37 36 2C 31 33 34 2C 33 2C 31 37 33 2C 31 |. 76,134,3,173,1|
000019D0: 34 33 2C 33 2C 31 34 31 2C 36 32 2C 33 2C 31 37 |43,3,141,62,3,17|
000019E0: 33 2C 31 34 34 2C 33 2C 31 34 31 2C 36 33 2C 33 |3,144,3,141,63,3|
000019F0: 2C 39 36 00 3D 22 10 27 83 20 32 5A 42 2C 41 53 |,96.=".'. 2ZB,AS|
00001A00: 4D 2C 42 41 4B 2C 42 41 53 2C 42 49 4E 2C 44 41 |M,BAK,BAS,BIN,DA|
00001A10: 54 2C 44 4F 43 2C 48 45 58 2C 4C 49 42 2C 4C 53 |T,DOC,HEX,LIB,LS|
00001A20: 54 2C 4D 41 43 2C 50 52 4E 2C 50 52 54 2C 53 52 |T,MAC,PRN,PRT,SR|
00001A30: 43 2C 53 59 4D 2C 54 45 58 2C 54 58 54 00 47 22 |C,SYM,TEX,TXT.G"|
00001A40: 1A 27 83 20 2A 2A 2A 00 00 00 |.'. ***... |
....... 56,64:.:.......I.828.981:. A:. I
,A:. I.U...RB.838:BS.6.4096:BP.BS:BE.BS.
16383.P...X1.828:. FILE POSITION...(.X2.
830:. FILE END...2.X3.832:. BUFF START..
.<.X4.834:. BUFF END...F.X..(BS.256):Y.B
S.(256.X):. X3,Y:. X3.1,X...P.X..(BE.256
):Y.BE.(256.X):. X4,Y:. X4.1,X.K.I.. U%(
64),N$(64),T$(64),VT$(20),A%(255),C%(255
):.59468,14.Z.N.D1.4.4096:. ADDRESS OF C
P/M DIRECTORY INFO...S.D2.D1.2048:. ADDR
ESS OF CP/M DISK RECORD MAP...X.D3.D2.32
64:. ADDRESS OF CP/M DISK BLOCK ALLOC MA
P...}.. I.0.12:A%(0).0:. I:A%(13).13:. I
.14.31:A%(I).0:. I.N.... I.32.64:A%(I).I
:. I:. I.65.90:A%(I).I.128:. I...... I.9
1.95:A%(I).I:. I:A%(96).44:. I.97.122:A%
(I).I.32:. I.I...A%(123).179:A%(124).125
:A%(125).171:A%(126).96:A%(127).0......
I.128.255:A%(I).A%(I.128):. I...... I.0.
64:C%(I).I:. I:. I.65.90:C%(I).I.32:. I.
V.... I.91.127:C%(I).I:. I:. I.128.255:C
%(I).I.128:. I... .. I.0.20:. VT$(I):. V
T$(I)."***".I.20...... I...... G(14)."..
";:DK..1:DN.0:.800.E.R.. 15,8,15:.15,"I0
": 15...W..".READING CP/M DIRECTORY":...
.... 1,8,2,"#":. 15,8,15.....D.D1:. S.0.
7:.15,"B-P";2;0.4....15,"U1";2;0;3;S.F..
.. I.1.8:.".";.I.... J.1.32:.#1,X$:.X$."
".X$.G(0).}.... D,F(X$):D.D.1...... J,I,
S: 1: 15.....D.D2:. BUILD RECORD MAP.B..
.. T.3.17:. S.0.16......D,T:.D.1,S:.D.2,
0:.D.3,T:.D.4,S:.D.5,128.....D.D.6:. S,T
...... T.19.35:. S.0.16.E....D,T:.D.1,S:
.D.2,0:.D.3,T:.D.4,S:.D.5,128.U...D.D.6:
. S,T.Q."..I.D3.2.D3.135:.I,0:. I...'..D
3,255:.D3.1,255:. DIRECTORY BLOCKS.F.,.D
.D1:. I.1.64:U%(I).B(D):.U%(I).229.330..
.1.N$(I)."":. J.1.8:N$(I).N$(I).G(B(D.J)
):. J.%.6.T$(I)."":. J.9.11:T$(I).T$(I).
G(B(D.J)):. J.D.;.. J.16.31:. B(D.J).0 .
325.Z.@.X.B(D.J):. D3.X,I.B.E.. J.Q.J.D
.D.32:. I...O..:.".FINISHED!":.".PRESS A
NY KEY TO GO TO MENU"...T..A$:.A$."".340
.A.Y..500.P.^..BP.BE.365...C.X$.G(B(BP))
:. BP.FE . CS.64...H.BP.BP.1:....M.DN.1:
.800:.3,8,3,CB$.",S,R".O.R.. ".READING A
16K BUFFER FROM CBM DISK.":.RB.J.W.FE.B
(X2).(B(X2.1).256).{.|.BP.BS: 3: 15.....
DN.0:.800:.350......".CBM -- CP/M UTILIT
Y".A....".FUNCTIONS ARE:"......". .1. -
LIST CP/M DIRECTORY"......". .2. - LIST
CP/M FILE".,....". .3. - COPY CBM FILE T
O CP/M FILE".\.D..". .8. - INITIALIZE FO
R ANOTHER CP/M DISK".X.N..". .9. - EXIT
UTILITY"...X..".PRESS KEY FOR DESIRED FU
NCTION"...B..A$:.A$."".610...L.. E(A$) .
1000,2000,3000,500,500,500,500,5,640...
V.. 500...... 56,160:.:.... .. DK.DN . .
.D.*.. DN.0 . .:.".INSERT .CP/M. DISK IN
DRIVE":.830.I.4..:.".INSERT .CBM. DISK
IN DRIVE"...>..".PRESS [F1] WHEN READY T
O CONTINUE"...C..A$:.A$.."".835...H..A$:
."?. .";.L.M..A$..G(133).840...R.ZZ..(0)
:DK.DN:.......15,E1$,E2$,E3$,E4$.....DS.
E(E1$):..9...."..USR NAME TYP E
XT RECS SIZE".O...B.2:D.D1:. I.1.64.
D.... B(D)..0 . 1120.~...U$.I(" ".D(U%(
I)),2).....N$.N$(I).....T$.T$(I)...$.E.B
(D.12).1:E$.I(" ".D(E),2).....S.B(D.15
):S$.I(" ".D(S),3)...8.K.0:. J.16.31:.
B(D.J)..0.K.K.1...B.K$.I(" ".D(K),3).
%.L.. J:B.B.K.A.V.. U$;" ";N$;" ";T$
;" ";E$;" ";S$;" ";K$;"K".P.`.D.
D.32:. I...J..".";D(136.B);" 1K BLOCKS A
VAILABLE "...T..".PRESS ANY KEY FOR MENU
".M.~..A$:.A$."".1150.V....500...P..4,3:
. DEFAULT TO SCREEN.$.Z..".CP/M FILE PRI
NT":.".USER, FILE NAME, TYP".3.... U$,A$
,B$.E...U%.E(U$):.U%.0.U.15.."..USER # I
NVALID":.2400.....X.21:. I.0.20:. B$.VT$
(I).X.I:I.20:.2060......VT$(I)."***".I.2
0.T.... I:.X.21.."..FILE TYPE INVALID":.
2400.....A$.H(A$." ",8)... .F.0:E
.0:.I.1.64:.U%(I).229.2100.;.*..U%.U%(I)
.A$.N$(I).B$.T$(I).F.I:I.64.C.4.. I.F.>.
.F.0.."..FILE NOT FOUND":.2400...H.PR.0:
.".SCREEN (S) OR PRINTER (P) S...";A$.B
.R..A$."P"..7,4,7:.7: 7: 4:.4,4:PR.1:.21
60.S.\..A$."S".2160...F..2120...P..4,"."
;:BC.0...Z.DN.0:.800:. 1,8,2,"#":. 15,8,
15.$...D.D1.(F.1).32.N....K.D.16.D.31:B.
B(K):.B.0.K.D.31:.2350.^...B.D2.(B).24..
....I.B.B.18.6:T.B(I):S.B(I.1):P.B(I.2).
.....15,"B-P";2;0......15,"U1";2;0;T;S..
....J.1.256.U.J..#1,X$:.X$."".X$.G(0)...
T..F(X$).26.J.256:I.B.18:K.D.31:.2330...
...F(X$)..9.2300.B...X..(BC.8).8:X.BC.X:
X.8.X:.XX.1.X:.4," ";:. XX.T...BC.BC.X:.
2330.Q....F(X$).12..4,"..";:.2330......4
,G(A%(F(X$)));:.A%(F(X$))..0.BC.BC.1....
..F(X$).13.BC.0...... J...$.. I.G.... K.
R.8. 1: 15...B.FF.F:E.E.1:.I.F.64:.U%(I)
.229.2390.8.L..U%.U%(I).A$.N$(I).B$.T$(I
).B(D1.((I.1).32).12).E.F.I:I.64.K.V.. I
:.F.FF.2170.L.`..:.".PRESS ANY KEY FOR M
ENU"...J..A$:.A$."".2410...T..4:.4,".".G
(141).".";: 4...~..PR..10,4,10:.10: 10..
....500......".COPY A CBM FILE TO CP/M F
ILE"...B..".CBM FILE NAME ...";CB$.4.L
..".CP/M USER, FILE NAME, TYPE":. U$,CP$
,TY$.A.V..E(U$).0.E(U$).15..".INVALID US
ER":.3020.....X.21:. I.0.20:. TY$.VT$(I)
.X.I:I.20:.3060......VT$(I)."***".I.20.P
.... I:.X.21..".FILE TYPE INVALID":.3020
.....N.0:. I.1.64:. U%(I).229 . N.I:I.64
.'.... I:. N.0 . ."..CP/M DIRECTORY FULL
":.3560.B...E.0:DN.1:.800:.15,8,15:.15,"
I0":.3,8,3,CB$.",S,R":.900..... 3: 15:.D
S.62 . ."..CBM FILE NOT FOUND":.3560...!
.BP.BE.1:FE.0:. X1,0:. X1.1,0:.".";...0.
D.D1.(N.1).32:.D,E(U$):.I.D.1.D.8:.I,32:
. I...:..I.1.C(CP$):.D.I,F(J(CP$,I,1)):.
I.?.D..I.9.11:.D.I,F(J(TY$,I.8,1)):. I:
.D.12,E.S.N..D.13,0:.D.14,0...X.U%(N).E(
U$):N$(N).H(CP$." ",8):T$(N).TY$.
..B.NR.D.15:BA.D.16:.NR,0...L.. I.BA.BA.
15:.I,0:. I...V.NB.136:.I.0.135:.B(D3.I)
.0.NB.I:I.135...... I:.NB.136..D,229:.".
.CP/M DISK FULL":.3560.#....D3.NB,N.6...
.BA,NB:. R.1.8.@...Y$.""._....X.1.Y$.Y$.
G(10):X.0:.3290.W....350:.X$."".X$.G(0).
....A.F(X$):Y$.Y$.G(C%(A)):.X$;...P..X$.
G(13).X.1.A.Z.Y.C(Y$):.Y.128.3330.U....C
S.64.X.0.3320......3240......I.Y.1.128:Y
$.Y$.G(26):. I.8...RA.D2.((NB).24).((R.1
).3):T.B(RA):S.B(RA.1):P.B(RA.2).E...DN.
0:.800:. 15,8,15:.15,"I0":. 1,8,2,"#"...
...15,"U1";2;0;T;S:.15,"B-P";2;P......1,
Y$;:.CS.64..15,"U2";2;0;T;S:.15,"B-P";2;
0... ..15,"U2";2;0;T;S:.NR,(B(NR).1): 1:
15...*..CS.64.R.8...4.. R:.CS.64.3450..
.>.BA.BA.1.&.H..B(NR).128.3190.N.R.N.0:.
I.1.64:. U%(I).229 . N.I:I.64.}.\.. I:.
N.0 . ."..CP/M DIRECTORY FULL":.3560...
F.E.E.1:.3120...Z..:.".WRITING CP/M DIRE
CTORY":......DN.0:.800:. 15,8,15:.15,"I0
":. 1,8,2,"#".....D.D1:. S.0.7:.15,"B-P"
;2;0...... I.1.8:.".";.=...X$."":. J.1.3
2:X.B(D):X$.X$.G(X):D.D.1:. J.U....1,X$;
:.S.7.I.8.J.32..15,"U2";2;0;3;S:.15,"B-P
";2,0.}.... I......15,"U2";2;0;3;S...J..
S: 1: 15.B....:.".PRESS ANY KEY FOR MEN
U".V....A$:.A$."".3570......500.# (#. 0,
0,0,0,0,0,0,0,0,0,169,0,141,68,3,141,69,
3,141,62,3,141,63,3.G 2#. 173,64,3,141,1
43,3,173,65,3,141,144,3,173,68,3,205,60,
3,208,8.. <#. 173,69,3,205,61,3,240,22,1
62,3,32,198,255,32,228,255,32,204,255..
F#. 238,68,3,208,224,238,69,3,76,96,3,16
2,3,32,198,255,32,228,255.5!P#. 141,255,
255,32,204,255,238,68,3,208,3,238,69,3,2
38,60,3,208,3.W!Z#. 238,61,3,32,183,255,
201,64,240,30,173,66,3,205,143,3,208,11.
.!D#. 173,67,3,205,144,3,208,3,76,213,3,
238,143,3,208,195,238,144,3..!N#. 76,134
,3,173,143,3,141,62,3,173,144,3,141,63,3
,96.=".'. 2ZB,ASM,BAK,BAS,BIN,DAT,DOC,HE
X,LIB,LST,MAC,PRN,PRT,SRC,SYM,TEX,TXT.G"
.'. ***...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL