HEADER
FILE INFORMATION
FILENAME(S): HEADER
FILE TYPE(S): PRG
FILE SIZE: 1.3K
FIRST SEEN: 2025-12-01 19:06:18
APPEARS ON: 1 disk(s)
FILE HASH
ad97685c7f113570278a72a66fd713fa15649965c523384a73c491dd113ff216
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TRA DISK 27 | HEADER | PRG | Icebreaker | 8 | 19 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 01 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 99 22 93 22 00 4C 08 05 |53281,0:.".".L..|
00000020: 00 99 22 1F 54 52 41 27 53 20 48 45 41 44 45 52 |..".TRA'S HEADER|
00000030: 20 43 48 41 4E 47 45 52 20 28 43 29 20 31 39 38 | CHANGER (C) 198|
00000040: 39 20 54 52 41 20 47 52 4F 55 50 22 00 7B 08 06 |9 TRA GROUP".{..|
00000050: 00 99 22 9A 57 52 49 54 54 45 4E 20 42 59 20 49 |..".WRITTEN BY I|
00000060: 43 45 20 42 52 45 41 4B 45 52 20 4F 46 20 54 52 |CE BREAKER OF TR|
00000070: 41 20 49 4E 20 31 39 38 39 21 22 00 A3 08 14 00 |A IN 1989!".....|
00000080: 99 20 22 11 20 44 49 53 4B 20 55 4E 49 54 20 4E |. ". DISK UNIT N|
00000090: 52 20 28 38 2D 31 35 29 20 3F A0 38 20 9D 9D 9D |R (8-15) ?.8 ...|
000000A0: 9D 22 3B 00 C9 08 1E 00 85 20 55 3A 20 8B 20 55 |.";...... U: . U|
000000B0: B3 38 20 B0 20 55 B1 31 35 20 A7 20 99 20 22 91 |.8 . U.15 . . ".|
000000C0: 91 91 22 3A 20 89 20 32 30 00 EF 08 28 00 99 20 |..": . 20...(.. |
000000D0: 22 11 20 44 49 53 4B 20 44 52 49 56 45 20 4E 52 |". DISK DRIVE NR|
000000E0: 20 28 30 2F 31 29 20 3F A0 30 9D 9D 9D 22 3B 00 | (0/1) ?.0...";.|
000000F0: 14 09 32 00 85 20 44 3A 20 8B 20 44 B3 30 20 B0 |..2.. D: . D.0 .|
00000100: 20 44 B1 31 20 A7 20 99 20 22 91 91 91 22 3A 20 | D.1 . . "...": |
00000110: 89 20 34 30 00 44 09 3C 00 99 20 22 11 11 20 50 |. 40.D.<.. ".. P|
00000120: 55 54 20 54 41 52 47 45 54 20 44 49 53 4B 20 49 |UT TARGET DISK I|
00000130: 4E 20 55 4E 49 54 22 3B 55 3B 22 20 44 52 49 56 |N UNIT";U;" DRIV|
00000140: 45 22 3B 44 00 6C 09 46 00 99 20 22 20 54 48 45 |E";D.l.F.. " THE|
00000150: 4E 20 50 52 45 53 53 20 41 4E 59 20 4B 45 59 20 |N PRESS ANY KEY |
00000160: 54 4F 20 43 4F 4E 54 49 4E 55 45 22 00 82 09 50 |TO CONTINUE"...P|
00000170: 00 A1 20 58 24 3A 20 8B 20 58 24 B2 22 22 A7 20 |.. X$: . X$."". |
00000180: 38 30 00 A5 09 5A 00 41 B2 31 3A 20 56 B2 31 36 |80...Z.A.1: V.16|
00000190: 3A 20 51 24 B2 C7 28 33 34 29 3A 20 50 24 B2 C7 |: Q$..(34): P$..|
000001A0: 28 31 36 30 29 00 C5 09 64 00 54 B2 31 38 3A 20 |(160)...d.T.18: |
000001B0: 53 B2 30 3A 20 49 24 B2 22 49 22 AA C9 28 C4 28 |S.0: I$."I"..(.(|
000001C0: 44 29 2C 31 29 00 DC 09 6E 00 9F 20 31 2C 55 2C |D),1)...n.. 1,U,|
000001D0: 31 35 2C 49 24 3A 20 8D 20 33 35 30 00 FE 09 78 |15,I$: . 350...x|
000001E0: 00 8D 20 33 31 30 3A 20 46 24 B2 48 24 3A 20 A1 |.. 310: F$.H$: .|
000001F0: 23 32 2C 58 24 2C 58 24 2C 41 24 2C 42 24 00 28 |#2,X$,X$,A$,B$.(|
00000200: 0A 82 00 99 20 22 93 11 11 20 43 55 52 52 45 4E |.... "... CURREN|
00000210: 54 20 48 45 41 44 45 52 2D 4E 41 4D 45 20 22 3B |T HEADER-NAME ";|
00000220: 51 24 3B 46 24 3B 51 24 00 49 0A 8C 00 99 20 22 |Q$;F$;Q$.I.... "|
00000230: 20 44 49 53 4B 45 54 54 45 20 49 44 20 49 53 3A | DISKETTE ID IS:|
00000240: 20 20 22 3B 41 24 3B 42 24 00 7A 0A 96 00 99 20 | ";A$;B$.z.... |
00000250: 22 11 20 4E 45 57 20 4E 41 4D 45 20 28 4D 41 58 |". NEW NAME (MAX|
00000260: 20 31 36 20 43 48 41 52 41 43 54 45 52 53 29 20 | 16 CHARACTERS) |
00000270: 4F 52 20 27 51 55 49 54 27 22 00 A9 0A A0 00 85 |OR 'QUIT'"......|
00000280: 20 22 20 3F 20 51 55 49 54 9D 9D 9D 9D 9D 9D 22 | " ? QUIT......"|
00000290: 3B 4E 24 3A 20 4C B2 C3 28 4E 24 29 3A 20 8B 20 |;N$: L..(N$): . |
000002A0: 4C B1 56 20 A7 20 31 33 30 00 C9 0A AA 00 8B 20 |L.V . 130...... |
000002B0: 4E 24 B2 22 51 55 49 54 22 20 A7 20 99 20 22 93 |N$."QUIT" . . ".|
000002C0: 22 3B 3A 20 89 20 33 37 30 00 FD 0A B4 00 99 20 |";: . 370...... |
000002D0: 22 11 20 4F 4B 20 54 4F 20 57 52 49 54 45 20 4E |". OK TO WRITE N|
000002E0: 45 57 20 48 45 41 44 45 52 2D 4E 41 4D 45 20 28 |EW HEADER-NAME (|
000002F0: 59 2F 4E 29 20 3F 20 59 9D 9D 9D 22 3B 00 17 0B |Y/N) ? Y...";...|
00000300: BE 00 85 20 58 24 3A 20 8B 20 58 24 B3 B1 22 59 |... X$: . X$.."Y|
00000310: 22 20 A7 20 31 33 30 00 27 0B C8 00 8B 20 4C B2 |" . 130.'.... L.|
00000320: 56 20 A7 20 32 32 30 00 44 0B D2 00 81 20 58 B2 |V . 220.D.... X.|
00000330: 4C AA 41 20 A4 20 56 3A 20 4E 24 B2 4E 24 AA 50 |L.A . V: N$.N$.P|
00000340: 24 3A 20 82 00 60 0B DC 00 98 31 2C 22 42 2D 50 |$: ..`....1,"B-P|
00000350: 3A 22 3B 32 3B 31 34 34 3A 20 98 32 2C 4E 24 3B |:";2;144: .2,N$;|
00000360: 00 7C 0B E6 00 98 31 2C 22 55 32 3A 22 3B 32 3B |.|....1,"U2:";2;|
00000370: 44 3B 54 3B 53 3A 20 8D 20 33 35 30 00 92 0B F0 |D;T;S: . 350....|
00000380: 00 98 31 2C 49 24 3A 20 8D 20 33 35 30 3A 20 A0 |..1,I$: . 350: .|
00000390: 20 32 00 B6 0B FA 00 99 20 22 11 20 4F 4C 44 20 | 2...... ". OLD |
000003A0: 48 45 41 44 45 52 2D 4E 41 4D 45 20 22 3B 51 24 |HEADER-NAME ";Q$|
000003B0: 3B 46 24 3B 51 24 00 CA 0B 04 01 8D 20 33 31 30 |;F$;Q$...... 310|
000003C0: 3A 20 A0 20 32 3A 20 A0 20 31 00 EE 0B 0E 01 99 |: . 2: . 1......|
000003D0: 20 22 11 20 4E 45 57 20 48 45 41 44 45 52 2D 4E | ". NEW HEADER-N|
000003E0: 41 4D 45 20 22 3B 51 24 3B 48 24 3B 51 24 00 1E |AME ";Q$;H$;Q$..|
000003F0: 0C 18 01 99 20 22 11 20 43 48 41 4E 47 45 20 41 |.... ". CHANGE A|
00000400: 4E 4F 54 48 45 52 20 44 49 53 4B 45 54 54 45 20 |NOTHER DISKETTE |
00000410: 28 59 2F 4E 29 20 3F 20 59 9D 9D 9D 22 3B 00 36 |(Y/N) ? Y...";.6|
00000420: 0C 22 01 85 20 58 24 3A 20 8B 20 58 24 B2 22 59 |.".. X$: . X$."Y|
00000430: 22 20 A7 20 36 30 00 44 0C 2C 01 99 20 22 93 22 |" . 60.D.,.. "."|
00000440: 3B 3A 20 80 00 62 0C 36 01 9F 20 32 2C 55 2C 32 |;: ..b.6.. 2,U,2|
00000450: 2C 22 23 22 3A 20 8D 20 33 35 30 3A 20 48 24 B2 |,"#": . 350: H$.|
00000460: 22 22 00 7E 0C 40 01 98 31 2C 22 55 31 3A 22 3B |"".~.@..1,"U1:";|
00000470: 32 3B 44 3B 54 3B 53 3A 20 8D 20 33 35 30 00 9D |2;D;T;S: . 350..|
00000480: 0C 4A 01 98 31 2C 22 42 2D 50 3A 22 3B 32 3B 31 |.J..1,"B-P:";2;1|
00000490: 34 34 3A 20 81 20 58 B2 41 20 A4 20 56 00 B8 0C |44: . X.A . V...|
000004A0: 54 01 A1 23 32 2C 54 24 3A 20 48 24 B2 48 24 AA |T..#2,T$: H$.H$.|
000004B0: 54 24 3A 20 82 3A 20 8E 00 D2 0C 5E 01 84 31 2C |T$: .: ....^..1,|
000004C0: 45 2C 4D 24 2C 4A 2C 4B 3A 8B 20 45 B2 30 20 A7 |E,M$,J,K:. E.0 .|
000004D0: 20 8E 00 ED 0C 68 01 99 20 22 11 20 45 52 52 4F | ....h.. ". ERRO|
000004E0: 52 3A 20 22 3B 45 3B 4D 24 3B 4A 3B 4B 00 FD 0C |R: ";E;M$;J;K...|
000004F0: 72 01 A0 20 32 3A 20 A0 20 31 3A 20 80 00 00 00 |r.. 2: . 1: ....|
.......53280,0:.53281,0:.".".L....".TRA'
S HEADER CHANGER (C) 1989 TRA GROUP".{..
..".WRITTEN BY ICE BREAKER OF TRA IN 198
9!"...... ". DISK UNIT NR (8-15) ? 8 ...
.";.I.... U: . U.8 . U.15 . . "...": . 2
0...(.. ". DISK DRIVE NR (0/1) ? 0...";.
..2.. D: . D.0 . D.1 . . "...": . 40.D.<
.. ".. PUT TARGET DISK IN UNIT";U;" DRIV
E";D.L.F.. " THEN PRESS ANY KEY TO CONTI
NUE"...P.. X$: . X$."". 80...Z.A.1: V.16
: Q$.G(34): P$.G(160).E.D.T.18: S.0: I$.
"I".I(D(D),1)...N.. 1,U,15,I$: . 350...X
.. 310: F$.H$: .#2,X$,X$,A$,B$.(.... "..
. CURRENT HEADER-NAME ";Q$;F$;Q$.I.... "
DISKETTE ID IS: ";A$;B$.Z.... ". NEW N
AME (MAX 16 CHARACTERS) OR 'QUIT'"... ..
" ? QUIT......";N$: L.C(N$): . L.V . 13
0.I.... N$."QUIT" . . ".";: . 370......
". OK TO WRITE NEW HEADER-NAME (Y/N) ? Y
...";...... X$: . X$.."Y" . 130.'.H.. L.
V . 220.D.R.. X.L.A . V: N$.N$.P$: ..`..
..1,"B-P:";2;144: .2,N$;.|....1,"U2:";2;
D;T;S: . 350......1,I$: . 350: 2......
". OLD HEADER-NAME ";Q$;F$;Q$.J.... 310
: 2: 1...... ". NEW HEADER-NAME ";Q$
;H$;Q$...... ". CHANGE ANOTHER DISKETTE
(Y/N) ? Y...";.6.".. X$: . X$."Y" . 60.D
.,.. ".";: ..B.6.. 2,U,2,"#": . 350: H$.
"".~.@..1,"U1:";2;D;T;S: . 350...J..1,"B
-P:";2;144: . X.A . V...T..#2,T$: H$.H$.
T$: .: ..R.^..1,E,M$,J,K:. E.0 . ....H..
". ERROR: ";E;M$;J;K...R. 2: 1: ....
> CLICK IMAGE PREVIEW FOR FULL MODAL