TAPE BACKUP
FILE INFORMATION
FILENAME(S): TAPE BACKUP
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-12-02 23:24:26
APPEARS ON: 1 disk(s)
FILE HASH
05fe1ad65c2b16991bbac3d71ef4d0394560648685653f553bca5649a73a5fc2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COPY 1 | TAPE BACKUP | PRG | swasti, ernst | 11 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 0A 00 8F 2A 2A 2A 54 41 50 45 20 42 |.. ....***TAPE B|
00000010: 41 43 4B 55 50 20 50 52 4F 47 52 41 4D 2A 2A 2A |ACKUP PROGRAM***|
00000020: 00 49 08 64 00 97 35 33 32 38 30 2C 31 32 3A 97 |.I.d..53280,12:.|
00000030: 35 33 32 38 31 2C 30 3A 97 35 36 2C 32 33 3A 9C |53281,0:.56,23:.|
00000040: 3A 97 36 35 37 2C 31 32 38 00 77 08 69 00 86 41 |:.657,128.w.i..A|
00000050: 25 28 31 34 33 29 3A 50 41 24 28 31 29 B2 22 53 |%(143):PA$(1)."S|
00000060: 22 3A 50 41 24 28 32 29 B2 22 50 22 3A 50 41 24 |":PA$(2)."P":PA$|
00000070: 28 33 29 B2 22 55 22 00 94 08 6E 00 99 C7 28 31 |(3)."U"...n...(1|
00000080: 34 29 C7 28 31 34 37 29 C7 28 31 34 39 29 C7 28 |4).(147).(149).(|
00000090: 31 38 29 3B 00 B6 08 70 00 99 22 20 20 20 20 20 |18);...p.." |
000000A0: 20 20 20 20 20 20 20 52 55 4E 20 54 41 50 45 42 | RUN TAPEB|
000000B0: 41 43 4B 55 50 22 00 CD 08 73 00 99 C7 28 31 34 |ACKUP"...s...(14|
000000C0: 35 29 C7 28 33 31 29 C7 28 31 38 29 3B 00 F6 08 |5).(31).(18);...|
000000D0: 74 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |t.." |
000000E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 3A |--------------":|
000000F0: 97 36 34 36 2C 31 00 38 09 78 00 8B C2 28 35 38 |.646,1.8.x...(58|
00000100: 38 38 29 B3 B1 31 36 35 A7 99 22 4C 4F 41 44 49 |88)..165.."LOADI|
00000110: 4E 47 20 54 41 50 45 42 41 43 4B 55 50 2E 4F 42 |NG TAPEBACKUP.OB|
00000120: 4A 22 3A 93 22 54 41 50 45 42 41 43 4B 55 50 2E |J":."TAPEBACKUP.|
00000130: 4F 42 4A 22 2C 38 2C 31 00 5C 09 7D 00 99 3A 99 |OBJ",8,1.\.}..:.|
00000140: A3 35 29 22 31 20 2D 20 42 41 43 4B 55 50 20 44 |.5)"1 - BACKUP D|
00000150: 49 53 43 20 54 4F 20 54 41 50 45 22 00 80 09 82 |ISC TO TAPE"....|
00000160: 00 99 3A 99 A3 35 29 22 32 20 2D 20 42 41 43 4B |..:..5)"2 - BACK|
00000170: 55 50 20 54 41 50 45 20 54 4F 20 44 49 53 43 22 |UP TAPE TO DISC"|
00000180: 00 95 09 87 00 99 3A 99 A3 35 29 22 33 20 2D 20 |......:..5)"3 - |
00000190: 51 55 49 54 22 00 A0 09 8C 00 97 32 30 34 2C 30 |QUIT"......204,0|
000001A0: 00 B3 09 91 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 |......A$:.A$."".|
000001B0: 31 34 35 00 CE 09 96 00 99 41 24 3A 8B 41 24 B3 |145......A$:.A$.|
000001C0: 22 31 22 B0 41 24 B1 22 33 22 A7 31 34 35 00 E5 |"1".A$."3".145..|
000001D0: 09 9B 00 91 C5 28 41 24 29 89 31 36 30 2C 35 34 |.....(A$).160,54|
000001E0: 30 2C 37 30 30 00 10 0A A0 00 9E 36 33 34 31 3A |0,700......6341:|
000001F0: 99 22 13 11 11 52 45 41 44 49 4E 47 20 48 45 41 |."...READING HEA|
00000200: 44 45 52 20 2B 20 44 49 52 45 43 54 4F 52 59 22 |DER + DIRECTORY"|
00000210: 00 2D 0A A5 00 9F 31 35 2C 38 2C 31 35 2C 22 49 |.-....15,8,15,"I|
00000220: 30 22 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 43 0A |0":.2,8,2,"#".C.|
00000230: AA 00 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B 31 |...15,"U1";2;0;1|
00000240: 38 3B 30 00 57 0A AF 00 98 31 35 2C 22 42 2D 50 |8;0.W....15,"B-P|
00000250: 22 3B 32 3B 31 34 34 00 63 0A B4 00 81 49 B2 31 |";2;144.c....I.1|
00000260: A4 31 38 00 6D 0A B9 00 3A 8D 36 38 35 00 7D 0A |.18.m...:.685.}.|
00000270: BE 00 3A 48 44 24 B2 48 44 24 AA 41 24 00 84 0A |..:HD$.HD$.A$...|
00000280: C3 00 82 49 00 8F 0A C8 00 81 49 B2 31 A4 32 00 |...I......I.1.2.|
00000290: 99 0A CD 00 3A 8D 36 38 35 00 A9 0A D2 00 3A 49 |....:.685.....:I|
000002A0: 44 24 B2 49 44 24 AA 41 24 00 B0 0A D7 00 82 49 |D$.ID$.A$......I|
000002B0: 00 BD 0A DC 00 54 B2 31 38 3A 53 B2 31 00 D2 0A |.....T.18:S.1...|
000002C0: E1 00 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B 54 |...15,"U1";2;0;T|
000002D0: 3B 53 00 E4 0A E6 00 98 31 35 2C 22 42 2D 50 22 |;S......15,"B-P"|
000002E0: 3B 32 3B 30 00 F5 0A EB 00 8D 36 38 35 3A 54 B2 |;2;0......685:T.|
000002F0: C6 28 41 24 29 00 06 0B F0 00 8D 36 38 35 3A 53 |.(A$)......685:S|
00000300: B2 C6 28 41 24 29 00 11 0B F5 00 81 49 B2 30 A4 |..(A$)......I.0.|
00000310: 37 00 29 0B FA 00 3A 98 31 35 2C 22 42 2D 50 22 |7.)...:.15,"B-P"|
00000320: 3B 32 3B 49 AC 33 32 AA 32 00 3F 0B FF 00 3A 8D |;2;I.32.2.?...:.|
00000330: 36 38 35 3A 44 54 B2 C6 28 41 24 29 AF 31 35 00 |685:DT..(A$).15.|
00000340: 53 0B 04 01 3A 8B 44 54 B3 31 B0 44 54 B1 33 A7 |S...:.DT.1.DT.3.|
00000350: 32 38 35 00 6C 0B 09 01 3A 98 31 35 2C 22 42 2D |285.l...:.15,"B-|
00000360: 50 22 3B 32 3B 49 AC 33 32 AA 33 30 00 86 0B 0E |P";2;I.32.30....|
00000370: 01 3A 8D 36 38 35 3A 3A 8B C6 28 41 24 29 B1 31 |.:.685::..(A$).1|
00000380: 38 32 A7 32 38 35 00 9D 0B 13 01 3A 8D 36 38 35 |82.285.....:.685|
00000390: 3A 8B C6 28 41 24 29 B1 30 A7 32 38 35 00 B1 0B |:..(A$).0.285...|
000003A0: 18 01 3A 41 25 28 4B 29 B2 44 54 3A 4B B2 4B AA |..:A%(K).DT:K.K.|
000003B0: 31 00 B8 0B 1D 01 82 49 00 C6 0B 22 01 8B 54 B3 |1......I..."..T.|
000003C0: B1 30 A7 32 32 35 00 D1 0B 27 01 A0 32 3A A0 31 |.0.225...'..2:.1|
000003D0: 35 00 F6 0B 2C 01 3A 81 4A B2 31 A4 31 37 3A 97 |5...,.:.J.1.17:.|
000003E0: 38 32 37 AA 4A 2C C6 28 CA 28 48 44 24 2C 4A 2C |827.J,.(.(HD$,J,|
000003F0: 31 29 29 3A 82 4A 00 0E 0C 31 01 97 32 37 AC 32 |1)):.J...1..27.2|
00000400: 35 36 2C C6 28 C8 28 49 44 24 2C 31 29 29 00 28 |56,.(.(ID$,1)).(|
00000410: 0C 36 01 97 32 37 AC 32 35 36 AA 31 2C C6 28 C9 |.6..27.256.1,.(.|
00000420: 28 49 44 24 2C 31 29 29 00 3A 0C 3B 01 97 32 37 |(ID$,1)).:.;..27|
00000430: AC 32 35 36 AA 32 2C 4B AB 31 00 56 0C 40 01 97 |.256.2,K.1.V.@..|
00000440: 32 35 34 2C 32 37 3A 97 32 35 33 2C 34 AA 4B 3A |254,27:.253,4.K:|
00000450: 97 31 38 35 2C 30 00 63 0C 45 01 81 49 B2 30 A4 |.185,0.c.E..I.0.|
00000460: 4B AB 31 00 7A 0C 4A 01 3A 97 32 37 AC 32 35 36 |K.1.z.J.:.27.256|
00000470: AA 33 AA 49 2C 41 25 28 49 29 00 81 0C 4F 01 82 |.3.I,A%(I)...O..|
00000480: 49 00 AE 0C 54 01 9E 36 33 34 31 3A 99 22 13 11 |I...T..6341:."..|
00000490: 11 22 3B 3A 9E 36 33 35 34 34 3A 97 31 39 32 2C |.";:.63544:.192,|
000004A0: 32 35 35 3A 97 31 2C C2 28 31 29 B0 33 32 00 D9 |255:.1,.(1).32..|
000004B0: 0C 59 01 9E 36 33 34 31 3A 99 22 13 11 11 57 52 |.Y..6341:."...WR|
000004C0: 49 54 49 4E 47 20 48 45 41 44 45 52 3A 20 22 3B |ITING HEADER: ";|
000004D0: 48 44 24 22 2C 22 49 44 24 00 E9 0C 5E 01 81 49 |HD$","ID$...^..I|
000004E0: B2 31 A4 31 35 30 30 3A 82 00 FB 0C 63 01 9E 35 |.1.1500:....c..5|
000004F0: 38 38 38 3A 9E 36 33 34 31 3A 9C 00 08 0D 68 01 |888:.6341:....h.|
00000500: 54 B2 31 38 3A 53 B2 31 00 13 0D 6D 01 81 49 B2 |T.18:S.1...m..I.|
00000510: 30 A4 37 00 2C 0D 72 01 3A 9F 31 35 2C 38 2C 31 |0.7.,.r.:.15,8,1|
00000520: 35 3A 9F 32 2C 38 2C 32 2C 22 23 22 00 50 0D 77 |5:.2,8,2,"#".P.w|
00000530: 01 3A 98 31 35 2C 22 55 31 22 3B 32 3B 30 3B 54 |.:.15,"U1";2;0;T|
00000540: 3B 53 3A 98 31 35 2C 22 42 2D 50 22 3B 32 3B 30 |;S:.15,"B-P";2;0|
00000550: 00 63 0D 7C 01 3A 8D 36 38 35 3A 4E 54 B2 C6 28 |.c.|.:.685:NT..(|
00000560: 41 24 29 00 76 0D 81 01 3A 8D 36 38 35 3A 4E 53 |A$).v...:.685:NS|
00000570: B2 C6 28 41 24 29 00 8E 0D 86 01 3A 98 31 35 2C |..(A$).....:.15,|
00000580: 22 42 2D 50 22 3B 32 3B 49 AC 33 32 AA 32 00 BF |"B-P";2;I.32.2..|
00000590: 0D 8B 01 3A 8D 36 38 35 3A 44 54 B2 C6 28 41 24 |...:.685:DT..(A$|
000005A0: 29 AF 31 35 3A 8B 44 54 B3 31 B0 44 54 B1 33 A7 |).15:.DT.1.DT.3.|
000005B0: 8B 49 B3 37 A7 49 B2 49 AA 31 3A 89 33 39 30 00 |.I.7.I.I.1:.390.|
000005C0: D3 0D 90 01 3A 8B 44 54 B3 31 B0 44 54 B1 33 A7 |....:.DT.1.DT.3.|
000005D0: 35 32 30 00 EC 0D 95 01 3A 98 31 35 2C 22 42 2D |520.....:.15,"B-|
000005E0: 50 22 3B 32 3B 49 AC 33 32 AA 33 30 00 11 0E 9A |P";2;I.32.30....|
000005F0: 01 3A 8D 36 38 35 3A 4A B2 C6 28 41 24 29 3A 8D |.:.685:J..(A$):.|
00000600: 36 38 35 3A 4A B2 4A AA 32 35 36 AC C6 28 41 24 |685:J.J.256..(A$|
00000610: 29 00 2D 0E 9F 01 3A 8B 4A B1 31 38 32 A7 8B 49 |).-...:.J.182..I|
00000620: B3 37 A7 49 B2 49 AA 31 3A 89 33 39 30 00 3D 0E |.7.I.I.1:.390.=.|
00000630: A4 01 3A 8B 4A B1 31 38 32 A7 35 32 30 00 5C 0E |..:.J.182.520.\.|
00000640: A9 01 3A 98 31 35 2C 22 42 2D 50 22 3B 32 3B 49 |..:.15,"B-P";2;I|
00000650: AC 33 32 AA 35 3A 44 4E 24 B2 22 22 00 69 0E AE |.32.5:DN$."".i..|
00000660: 01 3A 81 4A B2 30 A4 31 35 00 73 0E B3 01 3A 8D |.:.J.0.15.s...:.|
00000670: 36 38 35 00 8D 0E B8 01 3A 8B C6 28 41 24 29 B2 |685.....:..(A$).|
00000680: 31 36 30 A7 4A B2 31 35 3A 89 34 35 30 00 9D 0E |160.J.15:.450...|
00000690: BD 01 3A 44 4E 24 B2 44 4E 24 AA 41 24 00 AC 0E |..:DN$.DN$.A$...|
000006A0: C2 01 3A 82 4A 3A A0 32 3A A0 31 35 00 CA 0E C7 |..:.J:.2:.15....|
000006B0: 01 3A 9E 36 33 34 31 3A 99 22 13 11 11 52 45 41 |.:.6341:."...REA|
000006C0: 44 49 4E 47 20 22 3B 44 4E 24 00 DF 0E CC 01 3A |DING ";DN$.....:|
000006D0: 9F 31 2C 38 2C 35 2C 44 4E 24 AA 22 2C 52 22 00 |.1,8,5,DN$.",R".|
000006E0: FA 0E D1 01 3A A1 23 31 2C 41 24 3A 8B 41 24 B2 |....:.#1,A$:.A$.|
000006F0: 22 22 A7 41 24 B2 C7 28 30 29 00 0B 0F D6 01 3A |"".A$..(0).....:|
00000700: 97 35 39 34 33 2C C6 28 41 24 29 00 26 0F DB 01 |.5943,.(A$).&...|
00000710: 3A A1 23 31 2C 41 24 3A 8B 41 24 B2 22 22 A7 41 |:.#1,A$:.A$."".A|
00000720: 24 B2 C7 28 30 29 00 37 0F E0 01 3A 97 35 39 34 |$..(0).7...:.594|
00000730: 38 2C C6 28 41 24 29 00 4B 0F E5 01 3A 97 32 35 |8,.(A$).K...:.25|
00000740: 31 2C 30 3A 97 32 35 32 2C 32 37 00 56 0F EA 01 |1,0:.252,27.V...|
00000750: 3A 9E 36 32 38 35 00 5D 0F EF 01 A0 31 00 71 0F |:.6285.]....1.q.|
00000760: F4 01 3A 99 22 57 52 49 54 49 4E 47 20 22 44 4E |..:."WRITING "DN|
00000770: 24 00 9B 0F F9 01 3A 49 24 B2 C8 28 44 4E 24 AA |$.....:I$..(DN$.|
00000780: C7 28 31 33 29 AA 22 20 20 20 20 20 20 20 20 20 |.(13)." |
00000790: 20 20 20 20 20 20 22 2C 31 36 29 00 C5 0F FE 01 | ",16).....|
000007A0: 3A 81 4A B2 31 A4 31 36 3A 97 38 32 37 AA 4A 2C |:.J.1.16:.827.J,|
000007B0: C6 28 CA 28 49 24 2C 4A 2C 31 29 29 3A 82 3A 97 |.(.(I$,J,1)):.:.|
000007C0: 31 38 35 2C 30 00 D6 0F 03 02 3A 9E 35 38 38 38 |185,0.....:.5888|
000007D0: 3A 9E 36 33 34 31 00 DD 0F 08 02 82 49 00 FE 0F |:.6341......I...|
000007E0: 0D 02 8B 4E 54 B3 B1 30 A7 54 B2 4E 54 3A 53 B2 |...NT..0.T.NT:S.|
000007F0: 4E 53 3A A0 32 3A A0 31 35 3A 89 33 36 35 00 0B |NS:.2:.15:.365..|
00000800: 10 12 02 A0 32 3A A0 31 35 3A 8A 00 37 10 1C 02 |....2:.15:..7...|
00000810: 9E 36 33 34 31 3A 99 22 13 11 22 3B 3A 9E 36 33 |.6341:."..";:.63|
00000820: 35 31 31 3A 97 31 39 32 2C 32 35 35 3A 97 31 2C |511:.192,255:.1,|
00000830: C2 28 31 29 B0 33 32 00 68 10 21 02 9E 36 33 34 |.(1).32.h.!..634|
00000840: 31 3A 99 22 13 11 11 53 45 41 52 43 48 49 4E 47 |1:."...SEARCHING|
00000850: 20 46 4F 52 20 48 45 41 44 45 52 3A 22 3A 81 49 | FOR HEADER:":.I|
00000860: B2 31 A4 37 30 30 3A 82 00 83 10 26 02 3A 9E 36 |.1.700:....&.:.6|
00000870: 33 38 33 3A 44 4E 24 B2 22 22 3A 49 44 24 B2 22 |383:DN$."":ID$."|
00000880: 58 58 22 00 93 10 27 02 3A 81 4A B2 38 32 38 A4 |XX"...'.:.J.828.|
00000890: 38 34 34 00 AC 10 28 02 3A 8B C2 28 4A 29 B2 31 |844...(.:..(J).1|
000008A0: 33 A7 4A B2 38 34 34 3A 89 35 35 34 00 C1 10 29 |3.J.844:.554...)|
000008B0: 02 3A 44 4E 24 B2 44 4E 24 AA C7 28 C2 28 4A 29 |.:DN$.DN$..(.(J)|
000008C0: 29 00 C9 10 2A 02 3A 82 4A 00 F2 10 30 02 3A 9E |)...*.:.J...0.:.|
000008D0: 36 33 34 31 3A 99 22 13 11 11 46 4F 55 4E 44 20 |6341:."...FOUND |
000008E0: 48 45 41 44 45 52 3A 20 22 44 4E 24 22 2C 22 49 |HEADER: "DN$","I|
000008F0: 44 24 00 02 11 35 02 81 49 B2 31 A4 31 35 30 30 |D$...5..I.1.1500|
00000900: 3A 82 00 37 11 3A 02 9E 36 33 34 31 3A 99 22 13 |:..7.:..6341:.".|
00000910: 11 11 50 4C 45 41 53 45 20 45 4E 54 45 52 20 53 |..PLEASE ENTER S|
00000920: 43 52 41 54 43 48 20 44 49 53 43 20 49 4E 20 44 |CRATCH DISC IN D|
00000930: 52 49 56 45 20 30 22 00 53 11 3F 02 99 3A 99 22 |RIVE 0".S.?..:."|
00000940: 52 45 41 44 59 3F 20 59 9D 05 22 3B 3A 97 32 30 |READY? Y..";:.20|
00000950: 34 2C 30 00 6A 11 44 02 A1 41 24 3A 8B 41 24 B3 |4,0.j.D..A$:.A$.|
00000960: B1 C7 28 31 33 29 A7 35 38 30 00 7A 11 49 02 99 |..(13).580.z.I..|
00000970: 22 59 22 3A 97 32 30 34 2C 31 00 89 11 4E 02 81 |"Y":.204,1...N..|
00000980: 49 B2 31 A4 38 30 30 3A 82 00 C3 11 53 02 9E 36 |I.1.800:....S..6|
00000990: 33 34 31 3A 99 22 13 11 11 49 54 20 57 49 4C 4C |341:."...IT WILL|
000009A0: 20 42 45 20 46 4F 52 4D 41 54 54 45 44 20 57 49 | BE FORMATTED WI|
000009B0: 54 48 22 3A 99 3A 99 A3 33 29 44 4E 24 22 2C 22 |TH":.:..3)DN$","|
000009C0: 49 44 24 00 D3 11 54 02 81 49 B2 31 A4 31 35 30 |ID$...T..I.1.150|
000009D0: 30 3A 82 00 F3 11 58 02 9F 31 2C 38 2C 31 35 2C |0:....X..1,8,15,|
000009E0: 22 4E 3A 22 AA 44 4E 24 AA 22 2C 22 AA 49 44 24 |"N:".DN$.",".ID$|
000009F0: 3A A0 31 00 FD 11 5D 02 9E 36 33 34 31 00 25 12 |:.1...]..6341.%.|
00000A00: 62 02 81 49 B2 30 A4 C2 28 36 39 31 34 29 3A 41 |b..I.0..(6914):A|
00000A10: 25 28 49 29 B2 C2 28 32 37 AC 32 35 36 AA 33 AA |%(I)..(27.256.3.|
00000A20: 49 29 3A 82 49 00 36 12 67 02 81 49 B2 30 A4 C2 |I):.I.6.g..I.0..|
00000A30: 28 36 39 31 34 29 00 47 12 6C 02 3A 9E 36 33 38 |(6914).G.l.:.638|
00000A40: 33 3A 41 24 B2 22 22 00 57 12 71 02 3A 81 4A B2 |3:A$."".W.q.:.J.|
00000A50: 38 32 38 A4 38 34 34 00 70 12 76 02 3A 8B C2 28 |828.844.p.v.:..(|
00000A60: 4A 29 B2 31 33 A7 4A B2 38 34 34 3A 89 36 34 30 |J).13.J.844:.640|
00000A70: 00 83 12 7B 02 3A 41 24 B2 41 24 AA C7 28 C2 28 |...{.:A$.A$..(.(|
00000A80: 4A 29 29 00 8B 12 80 02 3A 82 4A 00 A5 12 85 02 |J)).....:.J.....|
00000A90: 3A 9E 36 33 34 31 3A 99 22 13 11 11 46 4F 55 4E |:.6341:."...FOUN|
00000AA0: 44 20 22 41 24 00 B7 12 8A 02 3A 99 22 53 41 56 |D "A$.....:."SAV|
00000AB0: 49 4E 47 20 22 41 24 00 DA 12 8F 02 3A 9F 31 2C |ING "A$.....:.1,|
00000AC0: 38 2C 35 2C 41 24 AA 22 2C 22 AA 50 41 24 28 41 |8,5,A$.",".PA$(A|
00000AD0: 25 28 49 29 29 AA 22 2C 57 22 00 FB 12 94 02 3A |%(I)).",W".....:|
00000AE0: 98 31 2C C7 28 C2 28 38 34 35 29 29 3B 3A 98 31 |.1,.(.(845));:.1|
00000AF0: 2C C7 28 C2 28 38 34 36 29 29 3B 00 15 13 99 02 |,.(.(846));.....|
00000B00: 3A 97 32 35 33 2C 32 37 3A 97 32 35 32 2C 30 3A |:.253,27:.252,0:|
00000B10: 9E 36 32 33 30 00 1D 13 9E 02 3A A0 31 00 24 13 |.6230.....:.1.$.|
00000B20: A3 02 82 49 00 2A 13 A8 02 8A 00 44 13 AD 02 A1 |...I.*.....D....|
00000B30: 23 32 2C 41 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 |#2,A$:.A$."".A$.|
00000B40: C7 28 30 29 00 4A 13 B2 02 8E 00 50 13 BC 02 80 |.(0).J.....P....|
00000B50: 00 00 00 |... |
.. ....***TAPE BACKUP PROGRAM***.I.D..53
280,12:.53281,0:.56,23:.:.657,128.W.I..A
%(143):PA$(1)."S":PA$(2)."P":PA$(3)."U".
..N..G(14)G(147)G(149)G(18);...P.."
RUN TAPEBACKUP".M.S..G(145)G(31)G
(18);...T.." --------------":
.646,1.8.X..B(5888)..165.."LOADING TAPEB
ACKUP.OBJ":."TAPEBACKUP.OBJ",8,1.\.}..:.
.5)"1 - BACKUP DISC TO TAPE"......:..5)"
2 - BACKUP TAPE TO DISC"......:..5)"3 -
QUIT". ....204,0......A$:.A$."".145.N...
.A$:.A$."1".A$."3".145......E(A$).160,54
0,700... ..6341:."...READING HEADER + DI
RECTORY".-....15,8,15,"I0":.2,8,2,"#".C.
...15,"U1";2;0;18;0.W....15,"B-P";2;144.
C....I.1.18.M...:.685.}...:HD$.HD$.A$...
C..I...H..I.1.2...M.:.685...R.:ID$.ID$.A
$...W..I.....T.18:S.1.R....15,"U1";2;0;T
;S......15,"B-P";2;0......685:T.F(A$)...
...685:S.F(A$)......I.0.7.)...:.15,"B-P"
;2;I.32.2.?...:.685:DT.F(A$).15.S...:.DT
.1.DT.3.285.L...:.15,"B-P";2;I.32.30....
.:.685::.F(A$).182.285.....:.685:.F(A$).
0.285.....:A%(K).DT:K.K.1......I.F."..T.
.0.225.Q.'. 2: 15...,.:.J.1.17:.827.J,F(
J(HD$,J,1)):.J...1..27.256,F(H(ID$,1)).(
.6..27.256.1,F(I(ID$,1)).:.;..27.256.2,K
.1.V.@..254,27:.253,4.K:.185,0.C.E..I.0.
K.1.Z.J.:.27.256.3.I,A%(I)...O..I...T..6
341:."...";:.63544:.192,255:.1,B(1).32.Y
.Y..6341:."...WRITING HEADER: ";HD$","ID
$...^..I.1.1500:....C..5888:.6341:....H.
T.18:S.1...M..I.0.7.,.R.:.15,8,15:.2,8,2
,"#".P.W.:.15,"U1";2;0;T;S:.15,"B-P";2;0
.C.|.:.685:NT.F(A$).V...:.685:NS.F(A$)..
...:.15,"B-P";2;I.32.2.....:.685:DT.F(A$
).15:.DT.1.DT.3..I.7.I.I.1:.390.S...:.DT
.1.DT.3.520.....:.15,"B-P";2;I.32.30....
.:.685:J.F(A$):.685:J.J.256.F(A$).-...:.
J.182..I.7.I.I.1:.390.=...:.J.182.520.\.
..:.15,"B-P";2;I.32.5:DN$."".I...:.J.0.1
5.S...:.685.....:.F(A$).160.J.15:.450...
..:DN$.DN$.A$...B.:.J: 2: 15.J.G.:.6341:
."...READING ";DN$...L.:.1,8,5,DN$.",R".
..Q.:.#1,A$:.A$."".A$.G(0)...V.:.5943,F(
A$).&...:.#1,A$:.A$."".A$.G(0).7...:.594
8,F(A$).K...:.251,0:.252,27.V...:.6285.]
... 1.Q...:."WRITING "DN$.....:I$.H(DN$.
G(13)." ",16).E...:.J.1.16
:.827.J,F(J(I$,J,1)):.:.185,0.V...:.5888
:.6341......I......NT..0.T.NT:S.NS: 2: 1
5:.365..... 2: 15:..7....6341:."..";:.63
511:.192,255:.1,B(1).32.H.!..6341:."...S
EARCHING FOR HEADER:":.I.1.700:....&.:.6
383:DN$."":ID$."XX"...'.:.J.828.844...(.
:.B(J).13.J.844:.554.A.).:DN$.DN$.G(B(J)
).I.*.:.J...0.:.6341:."...FOUND HEADER:
"DN$","ID$...5..I.1.1500:..7.:..6341:.".
..PLEASE ENTER SCRATCH DISC IN DRIVE 0".
S.?..:."READY? Y..";:.204,0.J.D..A$:.A$.
.G(13).580.Z.I.."Y":.204,1...N..I.1.800:
..C.S..6341:."...IT WILL BE FORMATTED WI
TH":.:..3)DN$","ID$.S.T..I.1.1500:....X.
.1,8,15,"N:".DN$.",".ID$: 1...]..6341.%.
B..I.0.B(6914):A%(I).B(27.256.3.I):.I.6.
G..I.0.B(6914).G.L.:.6383:A$."".W.Q.:.J.
828.844.P.V.:.B(J).13.J.844:.640...{.:A$
.A$.G(B(J)).....:.J.....:.6341:."...FOUN
D "A$.....:."SAVING "A$.Z...:.1,8,5,A$."
,".PA$(A%(I)).",W".....:.1,G(B(845));:.1
,G(B(846));.....:.253,27:.252,0:.6230...
..: 1.$....I.*.....D....#2,A$:.A$."".A$.
G(0).J.....P.......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL