TAPEIT

FILE INFORMATION

FILENAME(S): TAPEIT

FILE TYPE(S): PRG

FILE SIZE: 1.1K

FIRST SEEN: 2025-11-30 16:57:25

APPEARS ON: 1 disk(s)

FILE HASH

40234742b4038da7cdbcd60ec24dca1061172704af752e64bfbfaa55bc024417

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
FREDDY BANANA	TAPEIT	PRG	High Voltage Complete C64 Collection, Markus Merz	4	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 20 08 0A 00 8F 20  54 48 49 53 20 57 49 4C  |.. .... THIS WIL|
00000010: 4C 20 52 45 41 44 20 54  48 45 20 46 49 4C 45 53  |L READ THE FILES|
00000020: 00 3A 08 14 00 8F 20 43  4F 4E 54 41 49 4E 45 44  |.:.... CONTAINED|
00000030: 20 49 4E 20 42 24 20 41  4E 44 00 53 08 1E 00 8F  | IN B$ AND.S....|
00000040: 20 43 4F 50 59 20 54 48  45 4D 20 54 4F 20 54 41  | COPY THEM TO TA|
00000050: 50 45 2E 00 6E 08 28 00  8F 20 54 48 45 20 53 43  |PE..n.(.. THE SC|
00000060: 52 45 45 4E 20 45 44 49  54 4F 52 20 49 53 00 8D  |REEN EDITOR IS..|
00000070: 08 32 00 8F 20 55 53 45  44 20 54 4F 20 50 45 52  |.2.. USED TO PER|
00000080: 46 4F 52 4D 20 54 48 45  20 4C 4F 41 44 00 93 08  |FORM THE LOAD...|
00000090: 3C 00 8F 00 AF 08 46 00  8F 20 46 49 4E 44 20 4F  |<.....F.. FIND O|
000000A0: 55 54 20 49 46 20 50 45  54 20 4F 52 20 36 34 00  |UT IF PET OR 64.|
000000B0: BE 08 50 00 41 B2 C2 28  34 39 31 35 32 29 00 CC  |..P.A..(49152)..|
000000C0: 08 5A 00 97 34 39 31 35  32 2C 34 35 00 E1 08 64  |.Z..49152,45...d|
000000D0: 00 8B C2 28 34 39 31 35  32 29 B2 34 35 A7 31 32  |...(49152).45.12|
000000E0: 30 00 F5 08 6E 00 89 31  33 30 3A 8F 20 50 45 54  |0...n..130:. PET|
000000F0: 20 44 41 54 41 00 07 09  78 00 97 34 39 31 35 32  | DATA...x..49152|
00000100: 2C 41 3A 89 31 39 30 00  1C 09 82 00 8F 20 53 45  |,A:.190...... SE|
00000110: 54 55 50 20 46 4F 52 20  50 45 54 53 00 33 09 8C  |TUP FOR PETS.3..|
00000120: 00 4B 51 B2 31 35 38 3A  4B 42 B2 36 32 33 3A 44  |.KQ.158:KB.623:D|
00000130: 44 B2 30 00 52 09 96 00  99 22 93 20 20 20 20 20  |D.0.R....".     |
00000140: 20 20 20 20 20 44 49 53  4B 20 54 4F 20 54 41 50  |     DISK TO TAP|
00000150: 45 22 00 71 09 A0 00 99  22 20 20 20 20 20 20 20  |E".q...."       |
00000160: 20 20 52 55 4E 4E 49 4E  47 20 4F 4E 20 50 45 54  |  RUNNING ON PET|
00000170: 22 00 81 09 AA 00 81 54  B2 31 A4 31 30 30 30 3A  |"......T.1.1000:|
00000180: 82 00 8A 09 B4 00 89 32  35 30 00 9E 09 BE 00 8F  |.......250......|
00000190: 20 53 45 54 55 50 20 46  4F 52 20 43 36 34 00 B7  | SETUP FOR C64..|
000001A0: 09 C8 00 4B 51 B2 31 39  38 3A 4B 42 B2 36 33 31  |...KQ.198:KB.631|
000001B0: 3A 44 44 B2 32 35 31 00  DB 09 D2 00 99 22 93 20  |:DD.251......". |
000001C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 44 49  |              DI|
000001D0: 53 4B 20 54 4F 20 54 41  50 45 22 00 00 0A DC 00  |SK TO TAPE".....|
000001E0: 99 22 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |."              |
000001F0: 52 55 4E 4E 49 4E 47 20  4F 4E 20 43 2D 36 34 22  |RUNNING ON C-64"|
00000200: 00 10 0A E6 00 81 54 B2  31 A4 31 30 30 30 3A 82  |......T.1.1000:.|
00000210: 00 16 0A F0 00 8F 00 2B  0A FA 00 8F 20 52 45 41  |.......+.... REA|
00000220: 44 20 46 49 4C 45 4E 41  4D 45 53 00 4B 0A 04 01  |D FILENAMES.K...|
00000230: 86 41 24 28 32 30 29 3A  8F 20 4D 41 58 20 4E 55  |.A$(20):. MAX NU|
00000240: 4D 2E 20 4F 46 20 46 49  4C 45 53 00 53 0A 0E 01  |M. OF FILES.S...|
00000250: 49 B2 31 00 5C 0A 18 01  87 42 42 24 00 6F 0A 22  |I.1.\....BB$.o."|
00000260: 01 8B 42 42 24 B2 22 45  4E 44 22 A7 33 31 30 00  |..BB$."END".310.|
00000270: 88 0A 2C 01 41 24 28 49  29 B2 42 42 24 3A 49 B2  |..,.A$(I).BB$:I.|
00000280: 49 AA 31 3A 89 32 38 30  00 A9 0A 36 01 4D 58 B2  |I.1:.280...6.MX.|
00000290: 49 AA 31 3A 8F 20 4F 44  44 20 4E 55 4D 42 45 52  |I.1:. ODD NUMBER|
000002A0: 20 4F 46 20 46 49 4C 45  53 00 BD 0A 40 01 8B C2  | OF FILES...@...|
000002B0: 28 44 44 29 B1 4D 58 A7  97 44 44 2C 31 00 C3 0A  |(DD).MX..DD,1...|
000002C0: 4A 01 8F 00 E3 0A 54 01  8F 20 4E 4F 57 20 47 45  |J.....T.. NOW GE|
000002D0: 54 20 54 48 45 20 46 49  4C 45 20 41 4E 44 20 53  |T THE FILE AND S|
000002E0: 41 56 45 00 F4 0A 5E 01  8F 20 49 54 20 54 4F 20  |AVE...^.. IT TO |
000002F0: 54 41 50 45 00 FA 0A 68  01 8F 00 06 0B 72 01 41  |TAPE...h.....r.A|
00000300: B2 C2 28 44 44 29 00 17  0B 7C 01 8B 41 B2 49 A7  |..(DD)...|..A.I.|
00000310: 97 44 44 2C 31 3A 90 00  34 0B 86 01 42 24 B2 41  |.DD,1:..4...B$.A|
00000320: 24 28 41 29 3A 8F 20 47  45 54 20 46 49 4C 45 20  |$(A):. GET FILE |
00000330: 4E 41 4D 45 00 44 0B 90  01 41 B2 41 AA 31 3A 97  |NAME.D...A.A.1:.|
00000340: 44 44 2C 41 00 4F 0B 9A  01 99 22 93 11 11 22 00  |DD,A.O...."...".|
00000350: 6F 0B A4 01 99 22 4C 4F  41 44 22 3B C7 28 33 34  |o...."LOAD";.(34|
00000360: 29 3B 42 24 3B C7 28 33  34 29 3B 22 2C 38 22 00  |);B$;.(34);",8".|
00000370: 7A 0B AE 01 99 22 11 11  11 22 00 95 0B B8 01 99  |z...."..."......|
00000380: 22 53 41 56 45 22 3B C7  28 33 34 29 3B 42 24 3B  |"SAVE";.(34);B$;|
00000390: C7 28 33 34 29 00 9F 0B  C2 01 99 22 11 11 22 00  |.(34)......"..".|
000003A0: C4 0B CC 01 99 22 4C 4F  41 44 22 3B C7 28 33 34  |....."LOAD";.(34|
000003B0: 29 3B 22 54 41 50 45 49  54 22 3B C7 28 33 34 29  |);"TAPEIT";.(34)|
000003C0: 22 2C 38 22 00 CF 0B D6  01 99 22 11 11 11 22 00  |",8"......"...".|
000003D0: DA 0B E0 01 99 22 52 55  4E 22 00 E3 0B EA 01 99  |....."RUN"......|
000003E0: 22 13 22 00 ED 0B F4 01  97 4B 51 2C 37 00 F8 0B  |"."......KQ,7...|
000003F0: FE 01 97 4B 42 2C 31 33  00 05 0C 08 02 97 4B 42  |...KB,13......KB|
00000400: AA 31 2C 31 33 00 12 0C  12 02 97 4B 42 AA 32 2C  |.1,13......KB.2,|
00000410: 31 33 00 1F 0C 1C 02 97  4B 42 AA 33 2C 31 33 00  |13......KB.3,13.|
00000420: 2C 0C 26 02 97 4B 42 AA  34 2C 31 33 00 39 0C 30  |,.&..KB.4,13.9.0|
00000430: 02 97 4B 42 AA 34 2C 31  33 00 46 0C 3A 02 97 4B  |..KB.4,13.F.:..K|
00000440: 42 AA 31 2C 31 33 00 4C  0C 44 02 80 00 5A 0C 4E  |B.1,13.L.D...Z.N|
00000450: 02 83 20 22 50 52 4F 47  31 22 00 68 0C 58 02 83  |.. "PROG1".h.X..|
00000460: 20 22 50 52 4F 47 31 22  00 76 0C 62 02 83 20 22  | "PROG1".v.b.. "|
00000470: 50 52 4F 47 31 22 00 84  0C 6C 02 83 20 22 50 52  |PROG1"...l.. "PR|
00000480: 4F 47 31 22 00 90 0C 76  02 83 20 22 45 4E 44 22  |OG1"...v.. "END"|
00000490: 00 00 00                                          |...             |

.. .... THIS WILL READ THE FILES.:.... C
ONTAINED IN B$ AND.S.... COPY THEM TO TA
PE..N.(.. THE SCREEN EDITOR IS...2.. USE
D TO PERFORM THE LOAD...<.....F.. FIND O
UT IF PET OR 64...P.A.B(49152).L.Z..4915
2,45...D..B(49152).45.120...N..130:. PET
 DATA...X..49152,A:.190...... SETUP FOR 
PETS.3...KQ.158:KB.623:DD.0.R....".     
     DISK TO TAPE".Q. .."         RUNNIN
G ON PET"......T.1.1000:.......250......
 SETUP FOR C64...H.KQ.198:KB.631:DD.251.
..R..".               DISK TO TAPE".....
."              RUNNING ON C-64"......T.
1.1000:........+.... READ FILENAMES.K...
.A$(20):. MAX NUM. OF FILES.S...I.1.\...
.BB$.O."..BB$."END".310...,.A$(I).BB$:I.
I.1:.280...6.MX.I.1:. ODD NUMBER OF FILE
S...@..B(DD).MX..DD,1.C.J.....T.. NOW GE
T THE FILE AND SAVE...^.. IT TO TAPE...H
.....R.A.B(DD)...|..A.I..DD,1:..4...B$.A
$(A):. GET FILE NAME.D...A.A.1:.DD,A.O..
.."...".O...."LOAD";G(34);B$;G(34);",8".
Z...."..."......"SAVE";G(34);B$;G(34)...
B.."..".D.L.."LOAD";G(34);"TAPEIT";G(34)
",8".O.V.."...".Z...."RUN"......".".....
.KQ,7......KB,13......KB.1,13......KB.2,
13......KB.3,13.,.&..KB.4,13.9.0..KB.4,1
3.F.:..KB.1,13.L.D...Z.N.. "PROG1".H.X..
 "PROG1".V.B.. "PROG1"...L.. "PROG1"...V
.. "END"...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL