PROGRAM REDDER
FILE INFORMATION
FILENAME(S): PROGRAM REDDER
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-12-01 02:26:31
APPEARS ON: 1 disk(s)
FILE HASH
7ebe2c1df4d675e6cfbed01d3dd6089e87a2c6a0c172bfd1f53d5b216ab406ec
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JARVIS 02 A | PROGRAM REDDER | PRG | hedning, shine | 17 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 18 08 0A 00 97 20 35 33 32 38 31 2C 38 3A |....... 53281,8:| 00000010: 97 35 33 32 38 30 2C 38 00 2E 08 64 00 99 C7 28 |.53280,8...d...(| 00000020: 31 34 29 3A 8D 36 32 30 3A 52 45 25 B2 30 00 56 |14):.620:RE%.0.V| 00000030: 08 6E 00 99 22 93 90 C2 45 47 49 4E 20 4F 50 20 |.n.."...EGIN OP | 00000040: 54 52 41 43 4B 20 2C 53 45 43 54 4F 52 22 44 49 |TRACK ,SECTOR"DI| 00000050: 25 22 2C 31 11 22 00 75 08 78 00 53 50 25 B2 31 |%",1.".u.x.SP%.1| 00000060: 3A 54 52 25 B2 44 49 25 3A 9F 31 35 2C 38 2C 31 |:TR%.DI%:.15,8,1| 00000070: 35 2C 22 49 30 00 8B 08 82 00 9F 38 2C 38 2C 32 |5,"I0......8,8,2| 00000080: 2C 22 23 32 22 3A 46 49 25 B2 30 00 A9 08 8C 00 |,"#2":FI%.0.....| 00000090: 98 31 35 2C 22 55 31 3A 22 32 3B 30 3B 54 52 25 |.15,"U1:"2;0;TR%| 000000A0: 3B 53 50 25 3A 8D 35 36 30 00 D7 08 96 00 81 49 |;SP%:.560......I| 000000B0: B2 30 A4 31 3A A1 23 38 2C 41 24 3A 8D 35 33 30 |.0.1:.#8,A$:.530| 000000C0: 3A 50 25 28 49 29 B2 C6 28 41 24 29 3A 82 3A 41 |:P%(I)..(A$):.:A| 000000D0: B2 32 3A 8D 35 35 30 00 F1 08 A0 00 A1 23 38 2C |.2:.550......#8,| 000000E0: 41 24 3A 8D 35 33 30 3A 41 B2 C6 28 41 24 29 AF |A$:.530:A..(A$).| 000000F0: 37 00 1C 09 AA 00 48 24 B2 22 22 3A 81 49 B2 30 |7.....H$."":.I.0| 00000100: A4 31 3A A1 23 38 2C 41 24 3A 8D 35 33 30 3A 4C |.1:.#8,A$:.530:L| 00000110: 25 28 49 29 B2 C6 28 41 24 29 3A 82 00 3B 09 B4 |%(I)..(A$):..;..| 00000120: 00 81 49 B2 33 A4 31 38 3A A1 23 38 2C 41 24 3A |..I.3.18:.#8,A$:| 00000130: 48 24 B2 48 24 AA 41 24 3A 82 3A 00 4A 09 BE 00 |H$.H$.A$:.:.J...| 00000140: 8B 48 24 B2 22 22 A7 32 31 30 00 81 09 C8 00 99 |.H$."".210......| 00000150: 20 4B 49 24 28 41 29 3B 22 20 22 3B 43 4F 24 3B | KI$(A);" ";CO$;| 00000160: 48 24 3B A3 31 31 29 43 4F 24 3B 3B 4C 25 28 30 |H$;.11)CO$;;L%(0| 00000170: 29 3B 4C 25 28 31 29 3A 8B 41 B2 30 A7 89 33 38 |);L%(1):.A.0..38| 00000180: 30 00 AB 09 D2 00 46 49 25 B2 46 49 25 AA 31 3A |0.....FI%.FI%.1:| 00000190: 8B 46 49 25 B3 38 A7 41 B2 46 49 25 AC 33 32 AA |.FI%.8.A.FI%.32.| 000001A0: 32 3A 8D 35 35 30 3A 89 31 36 30 00 BC 09 DC 00 |2:.550:.160.....| 000001B0: 8B 50 25 28 30 29 B2 30 A7 32 34 30 00 01 0A E6 |.P%(0).0.240....| 000001C0: 00 99 22 11 D7 49 53 53 45 4C 20 4F 50 20 54 52 |.."..ISSEL OP TR| 000001D0: 41 43 4B 20 22 3B 3A 54 52 25 B2 50 25 28 30 29 |ACK ";:TR%.P%(0)| 000001E0: 3A 53 50 25 B2 50 25 28 31 29 3A 46 49 25 B2 30 |:SP%.P%(1):FI%.0| 000001F0: 3A 99 54 52 25 3B 53 50 25 22 11 22 3A 89 31 34 |:.TR%;SP%".":.14| 00000200: 30 00 3D 0A F0 00 A0 38 3A 99 22 12 11 C4 49 52 |0.=....8:."...IR| 00000210: 45 43 54 4F 52 59 20 C5 4E 44 45 92 22 2C 3A 8B |ECTORY .NDE.",:.| 00000220: 52 45 25 A7 99 22 C3 4F 4C 4C 45 43 54 20 C4 52 |RE%..".OLLECT .R| 00000230: 49 56 45 20 31 22 3A 98 31 35 2C 22 56 00 5A 0A |IVE 1":.15,"V.Z.| 00000240: F1 00 81 41 B2 31 A4 31 30 30 30 3A 82 41 3A 20 |...A.1.1000:.A: | 00000250: 20 20 20 20 9E 36 34 37 33 38 00 69 0A FA 00 8D | .64738.i....| 00000260: 35 36 30 3A A0 31 35 3A 80 00 71 0A 04 01 8F 2A |560:.15:..q....*| 00000270: 2A 00 90 0A 0E 01 98 31 35 2C 22 55 31 3A 22 32 |*......15,"U1:"2| 00000280: 3B 30 3B 4C 25 28 30 29 3B 4C 25 28 31 29 3A 8E |;0;L%(0);L%(1):.| 00000290: 00 AB 0A 18 01 44 25 B2 32 3A 99 22 11 D3 50 55 |.....D%.2:."..PU| 000002A0: 52 2C 20 D3 45 4B 54 4F 52 22 3B 00 D3 0A 22 01 |R, .EKTOR";...".| 000002B0: 8D 32 37 30 3A 81 49 B2 30 A4 31 3A A1 23 38 2C |.270:.I.0.1:.#8,| 000002C0: 41 24 3A 8D 35 33 30 3A 5A 25 28 49 29 B2 C6 28 |A$:.530:Z%(I)..(| 000002D0: 41 24 29 00 F9 0A 2C 01 99 5A 25 28 49 29 22 9D |A$)...,..Z%(I)".| 000002E0: 20 22 3B 3A 82 3A 99 3A 99 22 91 D3 50 55 52 2C | ";:.:.:."..PUR,| 000002F0: 20 D3 45 4B 54 4F 52 22 3B 00 0A 0B 36 01 8B 5A | .EKTOR";...6..Z| 00000300: 25 28 30 29 B2 30 A7 99 3A 8E 00 4A 0B 40 01 98 |%(0).0..:..J.@..| 00000310: 31 35 2C 22 42 2D 46 22 30 3B 5A 25 28 30 29 3B |15,"B-F"0;Z%(0);| 00000320: 5A 25 28 31 29 3A 4C 25 28 30 29 B2 5A 25 28 30 |Z%(1):L%(0).Z%(0| 00000330: 29 3A 4C 25 28 31 29 B2 5A 25 28 31 29 3A 5A 25 |):L%(1).Z%(1):Z%| 00000340: 28 44 25 29 B2 5A 25 28 30 29 00 65 0B 4A 01 5A |(D%).Z%(0).e.J.Z| 00000350: 25 28 44 25 AA 31 29 B2 5A 25 28 31 29 3A 44 25 |%(D%.1).Z%(1):D%| 00000360: B2 44 25 AA 32 00 73 0B 54 01 8B 44 53 B2 30 A7 |.D%.2.s.T..DS.0.| 00000370: 32 39 30 00 B9 0B 5E 01 99 3A 99 22 12 C4 41 53 |290...^..:."..AS| 00000380: 20 C6 49 4C 45 20 57 55 52 44 45 20 42 45 52 45 | .ILE WURDE BERE| 00000390: 49 54 53 20 55 45 42 45 52 53 43 48 52 49 45 42 |ITS UEBERSCHRIEB| 000003A0: 45 4E 92 21 22 3A 58 25 B2 A8 28 58 25 29 3A 41 |EN.!":X%..(X%):A| 000003B0: B2 46 49 25 AC 33 32 AA 32 00 E5 0B 68 01 81 49 |.FI%.32.2...h..I| 000003C0: B2 32 A4 44 25 AB 34 A9 32 3A 98 31 35 2C 22 42 |.2.D%.4.2:.15,"B| 000003D0: 2D 46 3A 22 30 3B 5A 25 28 49 29 3B 5A 25 28 49 |-F:"0;Z%(I);Z%(I| 000003E0: AA 31 29 3A 82 00 07 0C 72 01 4C 25 28 30 29 B2 |.1):....r.L%(0).| 000003F0: 54 52 25 3A 4C 25 28 31 29 B2 53 50 25 3A 8D 32 |TR%:L%(1).SP%:.2| 00000400: 37 30 3A 89 35 35 30 00 25 0C 7C 01 99 22 DA 55 |70:.550.%.|..".U| 00000410: 52 55 45 43 4B 48 4F 4C 45 4E 3F 20 28 CA 2F CE |RUECKHOLEN? (./.| 00000420: 29 A0 A0 A0 A0 00 3C 0C 81 01 A1 20 41 24 3A 8B |).....<.... A$:.| 00000430: 20 41 24 B2 22 22 20 A7 20 33 38 35 00 4E 0C 86 | A$."" . 385.N..| 00000440: 01 8B 20 41 24 B3 B1 22 4A 22 A7 32 31 30 00 8C |.. A$.."J".210..| 00000450: 0C 90 01 58 25 B2 30 3A 99 22 11 C2 4C 4F 43 4B |...X%.0:."..LOCK| 00000460: 53 20 57 49 45 44 45 52 42 45 4C 45 47 45 4E 2E |S WIEDERBELEGEN.| 00000470: 2E 2E 22 3A 5A 25 28 30 29 B2 4C 25 28 30 29 3A |..":Z%(0).L%(0):| 00000480: 8D 32 38 30 3A 8B 58 25 A7 32 31 30 00 C4 0C 9A |.280:.X%.210....| 00000490: 01 99 22 11 C9 53 54 20 44 49 45 53 20 45 49 4E |.."..ST DIES EIN| 000004A0: 20 12 D0 92 52 4F 47 52 41 4D 4D 2C 12 D3 92 45 | ...ROGRAMM,...E| 000004B0: 51 55 45 4E 49 45 4C 4C 45 53 2C 20 12 D5 92 53 |QUENIELLES, ...S| 000004C0: 45 52 2C 22 00 E2 0C A4 01 99 22 4F 44 45 52 20 |ER,"......"ODER | 000004D0: 12 D2 92 45 4C 41 54 49 56 45 53 20 C6 49 4C 45 |...ELATIVES .ILE| 000004E0: 22 3B 00 15 0D AE 01 A1 20 4A 41 24 3A 8B 4A 41 |";...... JA$:.JA| 000004F0: 24 B3 B1 22 50 22 AF 4A 41 24 B3 B1 22 53 22 AF |$.."P".JA$.."S".| 00000500: 4A 41 24 B3 B1 22 55 22 AF 4A 41 24 B3 B1 22 52 |JA$.."U".JA$.."R| 00000510: 22 A7 34 33 30 00 1D 0D B3 01 99 3A 99 00 48 0D |".430......:..H.| 00000520: B8 01 99 3A 8B 4A 41 24 B2 22 50 22 A7 99 22 12 |...:.JA$."P"..".| 00000530: D0 52 4F 47 52 41 4D 4D 92 2D 22 3A 4B 49 25 B2 |.ROGRAMM.-":KI%.| 00000540: 31 33 30 3A 89 34 38 30 00 6D 0D C2 01 8B 4A 41 |130:.480.m....JA| 00000550: 24 B2 22 55 22 A7 99 22 12 D5 53 45 52 92 2D 22 |$."U".."..SER.-"| 00000560: 3A 4B 49 25 B2 31 33 31 3A 89 34 38 30 00 97 0D |:KI%.131:.480...| 00000570: CC 01 8B 4A 41 24 B2 22 52 22 A7 99 22 12 D2 45 |...JA$."R".."..E| 00000580: 4C 41 54 49 56 45 53 92 2D 22 3A 4B 49 25 B2 31 |LATIVES.-":KI%.1| 00000590: 33 32 3A 89 34 38 30 00 B7 0D D6 01 99 22 12 D3 |32:.480......"..| 000005A0: 45 51 55 45 4E 54 49 45 4C 4C 45 53 92 2D 22 3A |EQUENTIELLES.-":| 000005B0: 4B 49 25 B2 31 32 39 00 D2 0D E0 01 99 22 C6 49 |KI%.129......".I| 000005C0: 4C 45 20 57 49 45 44 45 52 48 4F 4C 45 4E 2E 2E |LE WIEDERHOLEN..| 000005D0: 2E 22 00 EF 0D EA 01 4C 25 28 30 29 B2 54 52 25 |.".....L%(0).TR%| 000005E0: 3A 4C 25 28 31 29 B2 53 50 25 3A 8D 32 37 30 00 |:L%(1).SP%:.270.| 000005F0: 0E 0E F4 01 41 B2 46 49 25 AC 33 32 AA 32 3A 8D |....A.FI%.32.2:.| 00000600: 35 35 30 3A 98 38 2C C7 28 4B 49 25 29 3B 00 35 |550:.8,.(KI%);.5| 00000610: 0E FE 01 42 4C 25 B2 28 28 44 25 AB 32 29 AD 32 |...BL%.((D%.2).2| 00000620: 29 AA 31 3A 99 22 11 22 42 4C 25 22 C2 4C 4F 43 |).1:."."BL%".LOC| 00000630: 4B 53 20 22 3B 00 69 0E 08 02 98 31 35 2C 22 55 |KS ";.i....15,"U| 00000640: 32 3A 22 32 3B 30 3B 54 52 25 3B 53 50 25 3A 99 |2:"2;0;TR%;SP%:.| 00000650: 22 48 45 52 53 54 45 4C 44 20 20 21 11 22 3A 52 |"HERSTELD !.":R| 00000660: 45 25 B2 31 3A 89 32 31 30 00 7C 0E 12 02 8B 41 |E%.1:.210.|....A| 00000670: 24 B2 22 22 A7 41 24 B2 C7 28 30 29 00 82 0E 1C |$."".A$..(0)....| 00000680: 02 8E 00 94 0E 26 02 98 31 35 2C 22 42 2D 50 3A |.....&..15,"B-P:| 00000690: 22 32 3B 41 00 B5 0E 30 02 84 31 35 2C 45 4E 25 |"2;A...0..15,EN%| 000006A0: 2C 45 4D 24 2C 45 54 25 2C 45 53 25 3A 8B 45 4E |,EM$,ET%,ES%:.EN| 000006B0: 25 B2 30 A7 8E 00 CA 0E 3A 02 99 22 11 11 12 44 |%.0.....:.."...D| 000006C0: 49 53 4B 20 46 4F 55 54 20 92 00 F9 0E 44 02 99 |ISK FOUT ....D..| 000006D0: 22 11 C6 4F 55 54 20 CD 45 4C 44 49 4E 47 92 20 |"..OUT .ELDING. | 000006E0: 20 3A 20 22 45 4E 25 22 20 22 45 4D 24 22 2C 22 | : "EN%" "EM$","| 000006F0: 45 54 25 22 2C 22 45 53 25 00 13 0F 4E 02 99 22 |ET%","ES%...N.."| 00000700: 41 2E 55 2E 42 20 27 C3 CF CE D4 27 20 54 59 50 |A.U.B '....' TYP| 00000710: 45 4E 2E 00 19 0F 58 02 80 00 1F 0F 62 02 8E 00 |EN....X.....b...| 00000720: 49 0F 6C 02 86 50 25 28 31 29 2C 4C 25 28 31 29 |I.l..P%(1),L%(1)| 00000730: 2C 5A 25 28 33 30 30 29 2C 4B 49 24 28 34 29 3A |,Z%(300),KI$(4):| 00000740: 43 4F 24 B2 C7 28 33 34 29 00 5E 0F 76 02 81 49 |CO$..(34).^.v..I| 00000750: B2 30 A4 34 3A 87 4B 49 24 28 49 29 3A 82 00 83 |.0.4:.KI$(I):...| 00000760: 0F 80 02 83 22 12 C4 C5 CC 92 22 2C 22 D3 C5 D1 |....".....","...| 00000770: 22 2C 22 D0 D2 C7 22 2C 22 D5 D3 D2 22 2C 22 D2 |","...","...",".| 00000780: C5 CC 22 00 90 0F 8A 02 8F 20 20 20 20 50 47 24 |.."...... PG$| 00000790: 00 9F 0F 94 02 99 50 47 24 22 11 22 3A 99 22 00 |......PG$".":.".| 000007A0: AC 0F EE 02 44 49 25 B2 31 38 3A 8E 00 BD 0F F8 |....DI%.18:.....| 000007B0: 02 99 22 91 91 91 91 22 3A 89 37 34 30 00 00 00 |.."....":.740...|
....... 53281,8:.53280,8...D..G(14):.620 :RE%.0.V.N.."..BEGIN OP TRACK ,SECTOR"DI %",1.".U.X.SP%.1:TR%.DI%:.15,8,15,"I0... ...8,8,2,"#2":FI%.0......15,"U1:"2;0;TR% ;SP%:.560.W....I.0.1:.#8,A$:.530:P%(I).F (A$):.:A.2:.550... ..#8,A$:.530:A.F(A$). 7.....H$."":.I.0.1:.#8,A$:.530:L%(I).F(A $):..;....I.3.18:.#8,A$:H$.H$.A$:.:.J... .H$."".210...H.. KI$(A);" ";CO$;H$;.11)C O$;;L%(0);L%(1):.A.0..380...R.FI%.FI%.1: .FI%.8.A.FI%.32.2:.550:.160......P%(0).0 .240......".WISSEL OP TRACK ";:TR%.P%(0) :SP%.P%(1):FI%.0:.TR%;SP%".":.140.=... 8 :."..DIRECTORY ENDE.",:.RE%.."COLLECT DR IVE 1":.15,"V.Z....A.1.1000:.A: .647 38.I....560: 15:..Q....**......15,"U1:"2 ;0;L%(0);L%(1):......D%.2:.".SPUR, SEKTO R";.S."..270:.I.0.1:.#8,A$:.530:Z%(I).F( A$)...,..Z%(I)". ";:.:.:.".SPUR, SEKTOR" ;...6..Z%(0).0..:..J.@..15,"B-F"0;Z%(0); Z%(1):L%(0).Z%(0):L%(1).Z%(1):Z%(D%).Z%( 0).E.J.Z%(D%.1).Z%(1):D%.D%.2.S.T..DS.0. 290...^..:.".DAS FILE WURDE BEREITS UEBE RSCHRIEBEN.!":X%..(X%):A.FI%.32.2...H..I .2.D%.4.2:.15,"B-F:"0;Z%(I);Z%(I.1):.... R.L%(0).TR%:L%(1).SP%:.270:.550.%.|.."ZU RUECKHOLEN? (J/N) .<.... A$:. A$."" . 385.N.... A$.."J".210.....X%.0:.".BLOCK S WIEDERBELEGEN...":Z%(0).L%(0):.280:.X% .210.D....".IST DIES EIN .P.ROGRAMM,.S.E QUENIELLES, .U.SER,"......"ODER .R.ELATI VES FILE";...... JA$:.JA$.."P".JA$.."S". JA$.."U".JA$.."R".430......:..H....:.JA$ ."P"..".PROGRAMM.-":KI%.130:.480.M.B..JA $."U"..".USER.-":KI%.131:.480...L..JA$." R"..".RELATIVES.-":KI%.132:.480...V..".S EQUENTIELLES.-":KI%.129.R...."FILE WIEDE RHOLEN...".....L%(0).TR%:L%(1).SP%:.270. ....A.FI%.32.2:.550:.8,G(KI%);.5...BL%.( (D%.2).2).1:."."BL%"BLOCKS ";.I....15,"U 2:"2;0;TR%;SP%:."HERSTELD !.":RE%.1:.21 0.|....A$."".A$.G(0).........&..15,"B-P: "2;A...0..15,EN%,EM$,ET%,ES%:.EN%.0...J. :.."...DISK FOUT ....D..".FOUT MELDING. : "EN%" "EM$","ET%","ES%...N.."A.U.B 'C ONT' TYPEN....X.....B...I.L..P%(1),L%(1) ,Z%(300),KI$(4):CO$.G(34).^.V..I.0.4:.KI $(I):.......".DEL.","SEQ","PRG","USR","R EL"...... PG$......PG$".":.".....DI%. 18:......."....":.740...
> CLICK IMAGE PREVIEW FOR FULL MODAL