UTILITIES
FILE INFORMATION
FILENAME(S): UTILITIES
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-12-01 01:48:19
APPEARS ON: 2 disk(s)
FILE HASH
bf318fa8134f770decefff173aea1d88b74463af3b4e67e5a13dc8668d9ce7a7
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMAL 2 | UTILITIES | PRG | hedning, Mattias H00r | 25 | 6 | DOWNLOAD FILE |
| CCS COMAL 2 | UTILITIES | PRG | hedning, Mattias H00r | 25 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: DD 05 B9 06 D0 07 00 0A 13 00 53 41 56 45 22 55 |..........SAVE"U|
00000010: 54 49 4C 49 54 49 45 53 22 00 14 04 00 00 1E 14 |TILITIES".......|
00000020: 8C 8F 01 00 02 00 01 93 8F 02 00 02 00 28 93 94 |.............(..|
00000030: C5 00 28 04 00 00 32 09 E9 03 00 00 00 7C 00 3C |..(...2......|.<|
00000040: 0A 07 04 02 00 C6 D8 3A 00 46 29 68 04 04 69 00 |.......:.F)h..i.|
00000050: 00 00 20 41 4E 59 20 43 48 41 52 41 43 54 45 52 |.. ANY CHARACTER|
00000060: 53 20 49 4E 20 4B 42 44 2D 42 55 46 46 45 52 20 |S IN KBD-BUFFER |
00000070: 3F 00 50 1F E4 02 00 C6 E5 02 00 00 E6 00 20 59 |?.P........... Y|
00000080: 45 53 2C 20 4E 4F 57 20 4E 4F 20 43 48 41 52 53 |ES, NOW NO CHARS|
00000090: 00 5A 0C EF 02 02 76 04 04 27 D8 F2 00 64 06 6E |.Z....v..'...d.n|
000000A0: 00 00 00 6E 16 EF 02 00 00 F2 00 20 4E 4F 20 43 |...n....... NO C|
000000B0: 48 41 52 41 43 54 45 52 00 78 04 6F 00 82 05 EC |HARACTER.x.o....|
000000C0: 03 00 8C 04 00 00 96 21 70 05 00 00 01 77 01 7B |.......!p....w.{|
000000D0: 00 20 57 41 49 54 20 46 4F 52 20 41 20 43 48 41 |. WAIT FOR A CHA|
000000E0: 52 41 43 54 45 52 00 A0 1B E4 02 00 CC E5 02 00 |RACTER..........|
000000F0: 00 E6 00 20 45 4E 41 42 4C 45 20 43 55 52 53 4F |... ENABLE CURSO|
00000100: 52 00 AA 23 95 00 20 57 41 49 54 20 55 4E 54 49 |R..#.. WAIT UNTI|
00000110: 4C 20 4E 4F 54 20 4E 55 4C 4C 20 43 48 41 52 41 |L NOT NULL CHARA|
00000120: 43 54 45 52 00 B4 09 09 01 04 03 4B 3C 00 BE 0E |CTER.......K<...|
00000130: DA 06 01 02 00 00 4B 33 96 00 00 00 C8 1C E4 02 |......K3........|
00000140: 00 CC E5 02 00 01 E6 00 20 44 49 53 41 42 4C 45 |........ DISABLE|
00000150: 20 43 55 52 53 4F 52 00 D2 05 7D 05 00 DC 04 00 | CURSOR...}.....|
00000160: 00 E6 0D 70 06 00 00 02 72 07 72 08 7B 00 F0 0F |...p....r.r.{...|
00000170: E4 02 00 D6 E5 04 07 02 00 01 29 E6 00 FA 2E 07 |..........).....|
00000180: 07 02 04 00 04 07 02 00 01 29 47 02 00 28 24 27 |.........)G..($'|
00000190: 3A 00 20 53 54 41 52 54 20 4F 46 20 20 20 20 20 |:. START OF |
000001A0: 20 20 4E 45 57 20 4C 49 4E 45 01 04 0F E4 02 00 | NEW LINE......|
000001B0: D1 E5 04 07 02 01 00 26 E6 01 0E 0F E4 02 00 D2 |.......&........|
000001C0: E5 04 07 02 01 00 25 E6 01 18 0F E4 02 00 D3 E5 |......%.........|
000001D0: 04 08 02 00 01 29 E6 01 22 05 7D 06 01 2C 04 00 |.....)..".}..,..|
000001E0: 01 36 09 E9 09 00 00 00 7B 01 40 0D EF 02 00 D6 |.6......{.@.....|
000001F0: D8 02 00 01 27 F2 01 4A 05 EC 09 01 54 04 00 01 |....'..J....T...|
00000200: 5E 09 E9 0B 00 00 00 7B 01 68 0D EF 02 00 D3 D8 |^......{.h......|
00000210: 02 00 01 27 F2 01 72 05 EC 0B 01 7C 04 00 01 86 |...'..r....|....|
00000220: 09 70 0D 00 00 00 7B 01 90 2F E4 02 00 C6 E5 02 |.p....{../......|
00000230: 00 00 E6 00 20 4E 4F 20 43 48 41 52 41 43 54 45 |.... NO CHARACTE|
00000240: 52 53 20 49 4E 20 4B 42 44 20 20 20 20 20 20 2D |RS IN KBD -|
00000250: 42 55 46 46 45 52 01 9A 05 7D 0D 01 A4 04 00 01 |BUFFER...}......|
00000260: AE 0D 70 0E 00 00 02 74 0F 77 01 7B 01 B8 06 7F |..p....t.w.{....|
00000270: 0D 81 01 C2 09 5F 06 0F 65 67 61 01 CC 04 95 01 |....._..ega.....|
00000280: D6 08 7F 05 09 01 18 01 E0 0E DA 06 01 03 02 59 |...............Y|
00000290: 4E 36 96 00 00 01 EA 0D 68 06 01 03 01 59 2D 69 |N6......h....Y-i|
000002A0: 00 00 01 F4 0C 5F 03 03 59 45 53 65 60 61 01 FE |....._..YESe`a..|
000002B0: 06 6E 00 00 02 08 0B 5F 03 02 4E 4F 65 60 61 02 |.n....._..NOe`a.|
000002C0: 12 04 6F 02 1C 05 7D 0E 02 26 04 00 02 30 0B 70 |..o...}..&...0.p|
000002D0: 10 00 00 01 74 11 7B 02 3A 06 06 11 7E 02 44 07 |....t.{.:...~.D.|
000002E0: 09 02 80 3C 02 4E 16 68 0C 02 02 00 01 1F 02 00 |...<.N.h........|
000002F0: 02 13 03 02 30 30 33 69 00 00 02 58 12 7F 12 03 |....003i...X....|
00000300: 02 12 20 06 02 28 03 02 20 92 28 15 02 62 04 6F |.. ..(.. .(..b.o|
00000310: 02 6C 05 7D 10 02 76 04 00 02 80 0F 70 13 00 00 |.l.}..v.....p...|
00000320: 03 72 14 74 15 74 16 7B 02 8A 1B 7F 10 03 01 4E |.r.t.t.{.......N|
00000330: 04 17 4B 28 03 01 3A 28 06 15 28 03 01 2C 28 06 |..K(..:(..(..,(.|
00000340: 16 28 15 02 94 05 7D 13 02 9E 04 00 02 A8 0D 70 |.(....}........p|
00000350: 18 00 00 02 72 14 74 15 7B 02 B2 14 7F 10 03 01 |....r.t.{.......|
00000360: 4E 04 17 4B 28 03 01 3A 28 06 15 28 15 02 BC 05 |N..K(..:(..(....|
00000370: 7D 18 02 C6 04 00 02 D0 0B 70 19 00 00 01 72 14 |}........p....r.|
00000380: 7B 02 DA 0D 7F 10 03 01 56 04 17 4B 28 15 02 E4 |{.......V..K(...|
00000390: 05 7D 19 02 EE 04 00 02 F8 0B 70 1A 00 00 01 72 |.}........p....r|
000003A0: 14 7B 03 02 15 7F 10 03 01 44 04 1B 4B 28 03 01 |.{.......D..K(..|
000003B0: 3D 28 04 17 4B 28 15 03 0C 05 7D 1A 03 16 04 00 |=(..K(....}.....|
000003C0: 03 20 0D 70 1C 00 00 02 72 14 74 1D 7B 03 2A 23 |. .p....r.t.{.*#|
000003D0: 7F 10 03 01 43 04 1B 4B 28 03 01 3A 28 06 1D 28 |....C..K(..:(..(|
000003E0: 03 01 3D 28 04 17 4B 28 03 01 3A 28 06 1D 28 15 |..=(..K(..:(..(.|
000003F0: 03 34 05 7D 1C 03 3E 04 00 03 48 0B 70 1E 00 00 |.4.}..>...H.p...|
00000400: 01 72 14 7B 03 52 15 7F 10 03 01 43 04 1B 4B 28 |.r.{.R.....C..K(|
00000410: 03 01 3D 28 04 17 4B 28 15 03 5C 05 7D 1E 03 66 |..=(..K(..\.}..f|
00000420: 04 00 03 70 0F 70 1F 00 00 03 72 14 74 20 74 21 |...p.p....r.t t!|
00000430: 7B 03 7A 1B 7F 10 03 01 52 04 17 4B 28 03 01 3A |{.z.....R..K(..:|
00000440: 28 06 21 28 03 01 3D 28 06 20 28 15 03 84 05 7D |(.!(..=(. (....}|
00000450: 1F 03 8E 04 00 03 98 0B 70 22 00 00 01 72 14 7B |........p"...r.{|
00000460: 03 A2 0D 7F 10 03 01 49 04 17 4B 28 15 03 AC 05 |.......I..K(....|
00000470: 7D 22 03 B6 04 00 03 C0 09 E9 17 00 00 00 7B 03 |}"............{.|
00000480: CA 1A EF 04 14 03 01 30 49 27 F2 00 20 53 4F 55 |.......0I'.. SOU|
00000490: 52 43 45 20 44 52 49 56 45 03 D4 05 EC 17 03 DE |RCE DRIVE.......|
000004A0: 04 00 03 E8 09 E9 1B 00 00 00 7B 03 F2 26 EF 02 |..........{..&..|
000004B0: 00 00 02 00 01 27 04 14 29 47 03 01 30 49 27 F2 |.....'..)G..0I'.|
000004C0: 00 20 54 48 45 20 4F 54 48 45 52 20 44 52 49 56 |. THE OTHER DRIV|
000004D0: 45 03 FC 05 EC 1B 04 06 04 00 04 10 0B 70 12 00 |E............p..|
000004E0: 00 01 74 24 7B 04 1A 06 5F 60 61 04 24 09 5F 06 |..t${..._`a.$._.|
000004F0: 24 65 60 61 04 2E 06 5F 60 61 04 38 05 7D 12 04 |$e`a..._`a.8.}..|
00000500: 42 04 00 04 4C 25 70 25 00 00 01 72 26 7C 00 20 |B...L%p%...r&|. |
00000510: 44 45 4C 41 59 20 27 44 55 52 41 54 49 4F 4E 27 |DELAY 'DURATION'|
00000520: 20 53 45 43 4F 4E 44 53 04 56 15 82 27 13 00 02 | SECONDS.V..'...|
00000530: 00 01 84 04 26 02 03 07 24 85 88 F4 89 04 60 05 |....&...$.....`.|
00000540: 7D 25 04 6A 04 00 04 74 0B E9 28 00 00 01 74 29 |}%.j...t..(...t)|
00000550: 7C 04 7E 09 07 2A 02 00 00 3A 04 88 10 82 27 00 ||.~..*...:....'.|
00000560: 00 02 00 01 84 09 29 51 85 87 04 92 25 07 2A 04 |......)Q....%.*.|
00000570: 2A 02 00 10 24 0C 29 07 27 16 03 0F 31 32 33 34 |*...$.).'...1234|
00000580: 35 36 37 38 39 41 42 43 44 45 46 36 47 27 3A 04 |56789ABCDEF6G':.|
00000590: 9C 07 8A 27 00 00 04 A6 07 EF 04 2A F2 04 B0 05 |...'.......*....|
000005A0: EC 28 04 BA 04 00 04 C4 09 70 2B 00 00 00 7C 04 |.(.......p+...|.|
000005B0: CE 0F 68 02 00 98 D8 02 00 00 2C 69 00 00 04 D8 |..h.......,i....|
000005C0: 0B 5F 02 00 93 4B 65 66 61 04 E2 06 6E 00 00 04 |._...Kefa...n...|
000005D0: EC 0B 5F 02 00 0C 4B 65 66 61 04 F6 04 6F 05 00 |.._...Kefa...o..|
000005E0: 05 7D 2B 00 00 00 00 00 00 00 00 00 00 00 00 00 |.}+.............|
000005F0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000600: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000610: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000620: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000630: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000640: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000650: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000660: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000670: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000680: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
00000690: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000006A0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 |................|
000006B0: 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 04 |................|
000006C0: 43 48 41 52 04 53 54 41 54 03 47 45 54 06 43 48 |CHAR.STAT.GET.CH|
000006D0: 41 52 4E 4F 04 57 41 49 54 06 43 55 52 53 4F 52 |ARNO.WAIT.CURSOR|
000006E0: 03 52 4F 57 03 43 4F 4C 0B 43 55 52 52 45 4E 54 |.ROW.COL.CURRENT|
000006F0: 27 52 4F 57 03 43 55 52 0A 43 55 52 45 4E 54 27 |'ROW.CUR.CURENT'|
00000700: 43 4F 4C 02 45 4D 0B 45 4D 54 59 27 42 55 46 46 |COL.EM.EMTY'BUFF|
00000710: 45 52 06 59 45 53 27 4E 4F 06 50 52 4F 4D 50 54 |ER.YES'NO.PROMPT|
00000720: 04 44 49 53 4B 07 43 4F 4D 4D 41 4E 44 05 45 52 |.DISK.COMMAND.ER|
00000730: 52 4F 52 06 46 4F 52 4D 41 54 05 44 52 49 56 45 |ROR.FORMAT.DRIVE|
00000740: 09 44 49 53 43 27 4E 41 4D 45 02 49 44 03 53 52 |.DISC'NAME.ID.SR|
00000750: 43 08 52 45 46 4F 52 4D 41 54 07 43 4F 4C 4C 45 |C.REFORMAT.COLLE|
00000760: 43 54 06 42 41 43 4B 55 50 04 44 45 53 54 04 43 |CT.BACKUP.DEST.C|
00000770: 4F 50 59 08 46 49 4C 45 4E 41 4D 45 08 43 4F 50 |OPY.FILENAME.COP|
00000780: 59 27 41 4C 4C 06 52 45 4E 41 4D 45 07 4F 4C 44 |Y'ALL.RENAME.OLD|
00000790: 4E 41 4D 45 07 4E 45 57 4E 41 4D 45 04 49 4E 49 |NAME.NEWNAME.INI|
000007A0: 54 03 43 4C 52 07 4D 45 53 53 41 47 45 05 44 45 |T.CLR.MESSAGE.DE|
000007B0: 4C 41 59 08 44 55 52 41 54 49 4F 4E 01 49 03 44 |LAY.DURATION.I.D|
000007C0: 45 43 03 48 45 58 05 56 41 4C 55 45 04 50 41 47 |EC.HEX.VALUE.PAG|
000007D0: 45 03 53 45 51 00 00 |E.SEQ.. |
....P.....SAVE"UTILITIES"...............
.....(..E.(...2......|.<.....FX:.F)H..I.
.. ANY CHARACTERS IN KBD-BUFFER ?.P....F
...... YES, NOW NO CHARS.Z....V..'X..D.N
...N....... NO CHARACTER.X.O...........!
P....W.{. WAIT FOR A CHARACTER. ....L...
... ENABLE CURSOR..#.. WAIT UNTIL NOT NU
LL CHARACTER.......K<...Z.....K3....H...
.L...... DISABLE CURSOR.R.}........P....
R.R.{......V......)..............)G..($'
:. START OF NEW LINE......Q......&
.......R......%.......S......)..".}..,..
.6......{.@....VX...'..J....T...^......{
.H....SX...'..R....|.....P....{../...F..
.... NO CHARACTERS IN KBD -BUFFER..
.}........P....T.W.{......B._..EGA.L...
V........Z....YN6......H....Y-I....._..
YESE`A...N....._..NOE`A...O...}..&...0.P
....T.{.:...~.D....<.N.H............003I
...X..... ..(.. .(..B.O.L.}..V.....P...
.R.T.T.{......N..K(..:(..(..,(..(....}.
.......P....R.T.{......N..K(..:(..(....
}..F...P.P....R.{.Z....V..K(....}......
..P....R.{......D..K(..=(..K(....}.....
. .P....R.T.{.*#...C..K(..:(..(..=(..K(
..:(..(..4.}..>...H.P....R.{.R....C..K(
..=(..K(..\.}..F...P.P....R.T T!{.Z....
R..K(..:(.!(..=(. (....}........P"...R.{
......I..K(....}"............{.J......0
I'.. SOURCE DRIVE.T...............{..&..
.....'..)G..0I'.. THE OTHER DRIVE.......
.....P....T${..._`A.$._.$E`A..._`A.8.}..
B...L%P%...R&|. DELAY 'DURATION' SECONDS
.V..'.......&...$.....`.}%.J...T..(...T)
|.~..*...:....'.......)Q....%.*.*...$.).
'...123456789ABCDEF6G':....'.......*....
.(.....D.P+...|.N.H...X...,I...X._...KEF
A...N....._...KEFA...O...}+.............
........................................
........................................
........................................
........................................
........................................
........CHAR.STAT.GET.CHARNO.WAIT.CURSOR
.ROW.COL.CURRENT'ROW.CUR.CURENT'COL.EM.E
MTY'BUFFER.YES'NO.PROMPT.DISK.COMMAND.ER
ROR.FORMAT.DRIVE.DISC'NAME.ID.SRC.REFORM
AT.COLLECT.BACKUP.DEST.COPY.FILENAME.COP
Y'ALL.RENAME.OLDNAME.NEWNAME.INIT.CLR.ME
SSAGE.DELAY.DURATION.I.DEC.HEX.VALUE.PAG
E.SEQ..
> CLICK IMAGE PREVIEW FOR FULL MODAL