REDISK

FILE INFORMATION

FILENAME(S): REDISK

FILE TYPE(S): PRG

FILE SIZE: 1.7K

FIRST SEEN: 2025-12-01 13:49:22

APPEARS ON: 1 disk(s)

FILE HASH

70c6636f866105b7e2a61bf62100d35d674f9458303e4f8ad1ce143dc7b020e4

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
7LOB KOP HJ LPPR	REDISK	PRG	hedning, Helsinborg	15	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 2E 08 64 00 97 35  35 2C 30 3A 97 35 36 2C  |....d..55,0:.56,|
00000010: C2 28 34 34 29 AA 38 3A  9C 3A 99 22 93 12 52 45  |.(44).8:.:."..RE|
00000020: 44 49 53 4B 92 11 11 22  3A 50 B2 38 38 30 00 6E  |DISK...":P.880.n|
00000030: 08 6E 00 46 31 B2 35 33  32 34 37 3A 46 32 B2 31  |.n.F1.53247:F2.1|
00000040: 3A 46 24 B2 22 20 20 20  20 20 20 20 20 20 20 20  |:F$."           |
00000050: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000060: 20 20 20 20 20 20 20 20  20 20 20 20 91 22 00 8B  |            ."..|
00000070: 08 78 00 87 41 3A 8B 41  B1 AB 31 A7 97 50 2C 41  |.x..A:.A..1..P,A|
00000080: 3A 50 B2 50 AA 31 3A 89  31 32 30 00 C5 08 82 00  |:P.P.1:.120.....|
00000090: 97 39 30 39 2C 28 46 31  AA 31 29 AD 32 35 36 3A  |.909,(F1.1).256:|
000000A0: 97 39 31 37 2C 46 32 3A  97 39 35 30 2C 46 32 3A  |.917,F2:.950,F2:|
000000B0: 97 38 38 31 2C C2 28 35  36 29 3A 97 39 31 39 2C  |.881,.(56):.919,|
000000C0: C2 28 35 36 29 00 FD 08  8C 00 99 22 11 44 4F 20  |.(56)......".DO |
000000D0: 59 4F 55 20 57 41 4E 54  20 54 4F 20 46 4F 52 4D  |YOU WANT TO FORM|
000000E0: 41 54 20 54 48 45 20 44  45 53 54 2E 20 44 49 53  |AT THE DEST. DIS|
000000F0: 4B 20 20 4E 9D 9D 9D 22  3B 3A 85 41 24 00 1B 09  |K  N...";:.A$...|
00000100: 96 00 9F 31 35 2C 38 2C  31 35 3A 8B C9 28 41 24  |...15,8,15:..(A$|
00000110: 2C 31 29 B2 22 59 22 A7  32 39 30 00 54 09 A0 00  |,1)."Y".290.T...|
00000120: 99 22 11 4E 41 4D 45 2C  54 59 50 45 20 28 50 52  |.".NAME,TYPE (PR|
00000130: 47 20 4F 52 20 53 45 51  29 20 4F 46 20 46 49 4C  |G OR SEQ) OF FIL|
00000140: 45 20 54 4F 20 43 4F 50  59 2E 22 3A 85 50 24 2C  |E TO COPY.":.P$,|
00000150: 54 24 3A 99 00 8B 09 AA  00 54 24 B2 C8 28 54 24  |T$:......T$..(T$|
00000160: 2C 31 29 3A 8B 28 54 24  B3 B1 22 50 22 AF 54 24  |,1):.(T$.."P".T$|
00000170: B3 B1 22 53 22 29 B0 C3  28 50 24 29 B1 31 36 A7  |.."S")..(P$).16.|
00000180: 99 22 91 91 91 22 3A 89  31 36 30 00 C4 09 B4 00  |."...":.160.....|
00000190: 4D 24 B2 22 49 4E 53 45  52 54 20 53 4F 55 52 43  |M$."INSERT SOURC|
000001A0: 45 20 44 49 53 4B 22 3A  8D 33 33 30 3A 50 54 24  |E DISK":.330:PT$|
000001B0: B2 22 30 3A 22 AA 50 24  AA 22 2C 22 AA 54 24 AA  |."0:".P$.",".T$.|
000001C0: 22 2C 52 22 00 F8 09 BE  00 97 31 30 30 30 2C C3  |",R"......1000,.|
000001D0: 28 50 54 24 29 3A 81 58  B2 31 A4 C3 28 50 54 24  |(PT$):.X.1..(PT$|
000001E0: 29 3A 97 38 32 37 AA 58  2C C6 28 CA 28 50 54 24  |):.827.X,.(.(PT$|
000001F0: 2C 58 2C 31 29 29 3A 82  00 27 0A C8 00 9E 39 35  |,X,1)):..'....95|
00000200: 36 3A 9E 39 38 32 3A 9E  38 38 30 3A 50 B2 C2 28  |6:.982:.880:P..(|
00000210: 32 34 37 29 AA 32 35 36  AC C2 28 32 34 38 29 3A  |247).256..(248):|
00000220: A0 35 3A 8D 33 37 30 00  5C 0A D2 00 8B 50 B1 46  |.5:.370.\....P.F|
00000230: 31 A7 99 22 11 12 46 49  4C 45 20 48 41 53 20 4F  |1.."..FILE HAS O|
00000240: 56 45 52 46 4C 4F 57 45  44 20 20 20 54 48 45 20  |VERFLOWED   THE |
00000250: 42 55 46 46 45 52 2E 22  89 32 37 30 00 88 0A DC  |BUFFER.".270....|
00000260: 00 99 22 11 12 46 49 4C  45 20 49 53 20 4E 4F 57  |.."..FILE IS NOW|
00000270: 20 4C 4F 41 44 45 44 20  20 20 20 49 4E 54 4F 20  | LOADED    INTO |
00000280: 42 55 46 46 45 52 2E 22  00 B8 0A E6 00 99 22 11  |BUFFER."......".|
00000290: 45 4E 54 45 52 20 4E 45  57 20 46 49 4C 45 20 4E  |ENTER NEW FILE N|
000002A0: 41 4D 45 2E 22 3A 99 22  1D 1D 22 AA 50 24 3A 85  |AME.":."..".P$:.|
000002B0: 22 91 22 3B 50 24 3A 99  00 F1 0A F0 00 4D 24 B2  |".";P$:......M$.|
000002C0: 22 49 4E 53 45 52 54 20  44 45 53 54 2E 20 44 49  |"INSERT DEST. DI|
000002D0: 53 4B 22 3A 8D 33 33 30  3A 50 54 24 B2 22 40 30  |SK":.330:PT$."@0|
000002E0: 3A 22 AA 50 24 AA 22 2C  22 AA 54 24 AA 22 2C 57  |:".P$.",".T$.",W|
000002F0: 22 00 25 0B FA 00 97 31  30 30 30 2C C3 28 50 54  |".%....1000,.(PT|
00000300: 24 29 3A 81 58 B2 31 A4  C3 28 50 54 24 29 3A 97  |$):.X.1..(PT$):.|
00000310: 38 32 37 AA 58 2C C6 28  CA 28 50 54 24 2C 58 2C  |827.X,.(.(PT$,X,|
00000320: 31 29 29 3A 82 00 5F 0B  04 01 9E 39 35 38 3A 9E  |1)):.._....958:.|
00000330: 39 38 39 3A 9E 39 31 34  3A 9F 31 35 2C 38 2C 31  |989:.914:.15,8,1|
00000340: 35 3A 8D 33 37 30 3A 99  22 11 12 46 49 4C 45 20  |5:.370:."..FILE |
00000350: 49 53 20 4E 4F 57 20 43  4F 50 49 45 44 2E 22 00  |IS NOW COPIED.".|
00000360: 88 0B 0E 01 A0 31 35 3A  9F 31 35 2C 38 2C 31 35  |.....15:.15,8,15|
00000370: 3A A0 31 35 3A 85 22 11  41 4E 4F 54 48 45 52 20  |:.15:.".ANOTHER |
00000380: 46 49 4C 45 22 3B 41 24  00 A7 0B 18 01 91 AB 28  |FILE";A$.......(|
00000390: C8 28 41 24 2C 31 29 B2  22 59 22 29 89 31 34 30  |.(A$,1)."Y").140|
000003A0: 3A 99 22 93 22 3A 80 00  D8 0B 22 01 99 22 11 4E  |:.".":...."..".N|
000003B0: 41 4D 45 2C 49 44 20 4F  46 20 44 49 53 4B 20 54  |AME,ID OF DISK T|
000003C0: 4F 20 42 45 20 46 4F 52  4D 41 54 54 45 44 22 3A  |O BE FORMATTED":|
000003D0: 85 50 24 2C 54 24 3A 99  00 F8 0B 2C 01 4D 24 B2  |.P$,T$:....,.M$.|
000003E0: 22 49 4E 53 45 52 54 20  44 45 53 54 2E 20 44 49  |"INSERT DEST. DI|
000003F0: 53 4B 22 3A 8D 33 33 30  00 25 0C 36 01 99 22 11  |SK":.330.%.6..".|
00000400: 12 46 4F 52 4D 41 54 54  49 4E 47 20 44 49 53 4B  |.FORMATTING DISK|
00000410: 22 3A 98 31 35 2C 22 4E  30 3A 22 AA 50 24 AA 22  |":.15,"N0:".P$."|
00000420: 2C 22 AA 54 24 00 42 0C  40 01 8D 33 37 30 3A 99  |,".T$.B.@..370:.|
00000430: 22 11 12 44 49 53 4B 20  46 4F 52 4D 41 54 54 45  |"..DISK FORMATTE|
00000440: 44 22 00 6A 0C 4A 01 99  4D 24 22 91 22 3A 81 54  |D".j.J..M$".":.T|
00000450: B2 30 A4 35 30 3A A1 41  24 3A 91 AB 28 41 24 B3  |.0.50:.A$:..(A$.|
00000460: B1 22 22 29 89 33 35 30  3A 82 00 94 0C 54 01 99  |."").350:....T..|
00000470: 46 24 3A 81 54 B2 30 A4  35 30 3A A1 41 24 3A 91  |F$:.T.0.50:.A$:.|
00000480: AB 28 41 24 B3 B1 22 22  29 89 33 35 30 3A 82 3A  |.(A$.."").350:.:|
00000490: 89 33 33 30 00 A6 0C 5E  01 8B 41 24 B2 C7 28 31  |.330...^..A$..(1|
000004A0: 33 29 A7 99 3A 8E 00 AF  0C 68 01 89 33 33 30 00  |3)..:....h..330.|
000004B0: CE 0C 72 01 84 31 35 2C  41 24 2C 42 24 2C 43 24  |..r..15,A$,B$,C$|
000004C0: 2C 44 24 3A 8B 42 24 B2  22 4F 4B 22 A7 8E 00 FD  |,D$:.B$."OK"....|
000004D0: 0C 7C 01 99 3A 99 41 24  22 2C 12 22 42 24 22 92  |.|..:.A$",."B$".|
000004E0: 2C 22 43 24 22 2C 22 44  24 3A 99 22 11 11 54 52  |,"C$","D$:."..TR|
000004F0: 59 20 41 47 41 49 4E 2E  22 89 32 37 30 00 47 0D  |Y AGAIN.".270.G.|
00000500: 86 01 83 31 36 30 2C 31  36 2C 31 33 32 2C 32 34  |...160,16,132,24|
00000510: 38 2C 31 36 30 2C 30 2C  31 33 32 2C 32 34 37 2C  |8,160,0,132,247,|
00000520: 33 32 2C 32 30 37 2C 32  35 35 2C 31 34 35 2C 32  |32,207,255,145,2|
00000530: 34 37 2C 32 30 30 2C 32  34 30 2C 38 2C 33 32 2C  |47,200,240,8,32,|
00000540: 31 38 33 2C 32 35 35 00  91 0D 90 01 83 32 34 30  |183,255......240|
00000550: 2C 32 34 33 2C 31 33 32  2C 32 34 37 2C 39 36 2C  |,243,132,247,96,|
00000560: 32 33 30 2C 32 34 38 2C  31 36 35 2C 32 34 38 2C  |230,248,165,248,|
00000570: 32 30 31 2C 32 30 38 2C  32 30 38 2C 32 34 30 2C  |201,208,208,240,|
00000580: 39 36 2C 32 33 34 2C 31  36 39 2C 35 34 2C 31 33  |96,234,169,54,13|
00000590: 33 00 DB 0D 9A 01 83 31  2C 31 36 30 2C 31 36 2C  |3......1,160,16,|
000005A0: 31 33 32 2C 32 35 34 2C  31 36 30 2C 30 2C 31 33  |132,254,160,0,13|
000005B0: 32 2C 32 35 33 2C 31 37  37 2C 32 35 33 2C 33 32  |2,253,177,253,32|
000005C0: 2C 32 31 30 2C 32 35 35  2C 32 30 30 2C 32 34 30  |,210,255,200,240|
000005D0: 2C 31 38 2C 31 39 36 2C  32 34 37 00 26 0E A4 01  |,18,196,247.&...|
000005E0: 83 32 30 38 2C 32 34 34  2C 31 36 36 2C 32 35 34  |.208,244,166,254|
000005F0: 2C 32 32 38 2C 32 34 38  2C 32 30 38 2C 32 33 38  |,228,248,208,238|
00000600: 2C 33 32 2C 32 33 31 2C  32 35 35 2C 31 36 39 2C  |,32,231,255,169,|
00000610: 35 35 2C 31 33 33 2C 31  2C 39 36 2C 32 33 30 2C  |55,133,1,96,230,|
00000620: 32 35 34 2C 37 36 00 70  0E AE 01 83 31 36 36 2C  |254,76.p....166,|
00000630: 33 2C 32 33 34 2C 31 36  39 2C 35 2C 31 36 32 2C  |3,234,169,5,162,|
00000640: 38 2C 31 36 30 2C 35 2C  33 32 2C 31 38 36 2C 32  |8,160,5,32,186,2|
00000650: 35 35 2C 31 37 33 2C 32  33 32 2C 33 2C 31 36 32  |55,173,232,3,162|
00000660: 2C 36 30 2C 31 36 30 2C  33 2C 33 32 2C 31 38 39  |,60,160,3,32,189|
00000670: 00 BA 0E B8 01 83 32 35  35 2C 33 32 2C 31 39 32  |......255,32,192|
00000680: 2C 32 35 35 2C 39 36 2C  32 33 34 2C 31 36 32 2C  |,255,96,234,162,|
00000690: 35 2C 33 32 2C 31 39 38  2C 32 35 35 2C 39 36 2C  |5,32,198,255,96,|
000006A0: 32 33 34 2C 31 36 32 2C  35 2C 33 32 2C 32 30 31  |234,162,5,32,201|
000006B0: 2C 32 35 35 2C 39 36 2C  2D 31 00 00 00 C5        |,255,96,-1....  |

....D..55,0:.56,B(44).8:.:."..REDISK..."
:P.880.N.N.F1.53247:F2.1:F$."           
                            ."...X..A:.A
..1..P,A:P.P.1:.120.E....909,(F1.1).256:
.917,F2:.950,F2:.881,B(56):.919,B(56)...
...".DO YOU WANT TO FORMAT THE DEST. DIS
K  N...";:.A$......15,8,15:.I(A$,1)."Y".
290.T. ..".NAME,TYPE (PRG OR SEQ) OF FIL
E TO COPY.":.P$,T$:......T$.H(T$,1):.(T$
.."P".T$.."S").C(P$).16.."...":.160.D...
M$."INSERT SOURCE DISK":.330:PT$."0:".P$
.",".T$.",R"......1000,C(PT$):.X.1.C(PT$
):.827.X,F(J(PT$,X,1)):..'.H..956:.982:.
880:P.B(247).256.B(248): 5:.370.\.R..P.F
1.."..FILE HAS OVERFLOWED   THE BUFFER."
.270......"..FILE IS NOW LOADED    INTO 
BUFFER."......".ENTER NEW FILE NAME.":."
..".P$:.".";P$:......M$."INSERT DEST. DI
SK":.330:PT$."@0:".P$.",".T$.",W".%....1
000,C(PT$):.X.1.C(PT$):.827.X,F(J(PT$,X,
1)):.._....958:.989:.914:.15,8,15:.370:.
"..FILE IS NOW COPIED."..... 15:.15,8,15
: 15:.".ANOTHER FILE";A$.......(H(A$,1).
"Y").140:.".":..X."..".NAME,ID OF DISK T
O BE FORMATTED":.P$,T$:....,.M$."INSERT 
DEST. DISK":.330.%.6.."..FORMATTING DISK
":.15,"N0:".P$.",".T$.B.@..370:."..DISK 
FORMATTED".J.J..M$".":.T.0.50:.A$:..(A$.
."").350:....T..F$:.T.0.50:.A$:..(A$..""
).350:.:.330...^..A$.G(13)..:....H..330.
N.R..15,A$,B$,C$,D$:.B$."OK".....|..:.A$
",."B$".,"C$","D$:."..TRY AGAIN.".270.G.
...160,16,132,248,160,0,132,247,32,207,2
55,145,247,200,240,8,32,183,255......240
,243,132,247,96,230,248,165,248,201,208,
208,240,96,234,169,54,133......1,160,16,
132,254,160,0,132,253,177,253,32,210,255
,200,240,18,196,247.&....208,244,166,254
,228,248,208,238,32,231,255,169,55,133,1
,96,230,254,76.P....166,3,234,169,5,162,
8,160,5,32,186,255,173,232,3,162,60,160,
3,32,189......255,32,192,255,96,234,162,
5,32,198,255,96,234,162,5,32,201,255,96,
-1...E

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL