DATEIRETTER
FILE INFORMATION
FILENAME(S): DATEIRETTER
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 16:10:57
APPEARS ON: 1 disk(s)
FILE HASH
8e082f754fb29d794f46dff9144a28883cc9cf6af499e1e8c6faba2500774be9
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ADLER DISK C5 A | DATEIRETTER | PRG | BrainSkull, Sammlung | 13 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 0A 00 99 22 93 22 00 14 08 14 00 99 |......."."......| 00000010: 22 05 22 3B 00 33 08 46 00 9F 32 2C 38 2C 32 2C |".";.3.F..2,8,2,| 00000020: 22 23 22 3A 8F 20 44 49 52 45 4B 54 5A 55 47 52 |"#":. DIREKTZUGR| 00000030: 49 46 46 00 4F 08 50 00 9F 31 35 2C 38 2C 31 35 |IFF.O.P..15,8,15| 00000040: 3A 8F 20 4B 4F 4D 41 4E 44 4F 4B 41 4E 41 4C 00 |:. KOMANDOKANAL.| 00000050: 57 08 5A 00 99 3A 99 00 6B 08 64 00 85 22 46 49 |W.Z..:..k.d.."FI| 00000060: 4C 45 4E 41 4D 45 20 22 3B 46 24 00 89 08 6E 00 |LENAME ";F$...n.| 00000070: 54 B2 31 38 3A 53 B2 31 3A 8F 20 31 35 34 31 20 |T.18:S.1:. 1541 | 00000080: 44 49 52 45 43 54 4F 52 59 00 A5 08 78 00 98 31 |DIRECTORY...x..1| 00000090: 35 2C 22 55 31 20 32 20 30 22 54 3B 53 3A 8F 20 |5,"U1 2 0"T;S:. | 000000A0: 4C 45 53 45 4E 00 C9 08 82 00 53 24 B2 22 22 3A |LESEN.....S$."":| 000000B0: 8F 20 56 41 52 49 41 42 4C 45 20 46 55 45 52 20 |. VARIABLE FUER | 000000C0: 47 45 4C 45 53 45 4E 45 4E 00 DC 08 8C 00 3A 20 |GELESENEN.....: | 000000D0: 20 20 20 3A 8F 20 53 45 4B 54 4F 52 00 05 09 96 | :. SEKTOR....| 000000E0: 00 81 49 B2 31 A4 32 35 35 3A A1 23 32 2C 41 24 |..I.1.255:.#2,A$| 000000F0: 3A 53 24 B2 53 24 AA C8 28 41 24 AA C7 28 30 29 |:S$.S$..(A$..(0)| 00000100: 2C 31 29 3A 82 00 1E 09 A0 00 81 49 B2 30 A4 37 |,1):.......I.0.7| 00000110: 3A 8F 20 38 20 45 49 4E 54 52 41 45 47 45 00 3C |:. 8 EINTRAEGE.<| 00000120: 09 AA 00 58 24 B2 CA 28 53 24 2C 49 AC 33 32 AA |...X$..(S$,I.32.| 00000130: 36 2C 31 36 29 3A 58 31 24 B2 58 24 00 55 09 B4 |6,16):X1$.X$.U..| 00000140: 00 8F 20 46 49 4C 4E 41 4D 45 4E 20 49 53 4F 4C |.. FILNAMEN ISOL| 00000150: 49 45 52 45 4E 00 5D 09 BE 00 58 B2 31 00 84 09 |IEREN.]...X.1...| 00000160: C8 00 8B CA 28 58 24 2C 58 2C 31 29 B3 B1 C7 28 |....(X$,X,1)...(| 00000170: 31 36 30 29 A7 58 B2 58 AA 31 3A 8B 58 B3 31 37 |160).X.X.1:.X.17| 00000180: A7 32 30 30 00 97 09 D2 00 58 24 B2 C8 28 58 24 |.200.....X$..(X$| 00000190: 2C 58 AB 31 29 3A 99 00 AB 09 DC 00 8B 58 24 B2 |,X.1):.......X$.| 000001A0: 46 24 A7 45 B2 49 3A 89 33 30 30 00 B3 09 E6 00 |F$.E.I:.300.....| 000001B0: 82 20 49 00 CE 09 F0 00 54 B2 C6 28 53 24 29 3A |. I.....T..(S$):| 000001C0: 53 B2 C6 28 CA 28 53 24 2C 32 2C 31 29 29 00 EB |S..(.(S$,2,1))..| 000001D0: 09 FA 00 8F 20 4E 41 45 43 48 53 54 45 4E 20 53 |.... NAECHSTEN S| 000001E0: 45 4B 54 4F 52 20 4C 45 53 45 4E 00 F9 09 04 01 |EKTOR LESEN.....| 000001F0: 8B 54 B3 B1 30 A7 31 32 30 00 04 0A 0E 01 8F 20 |.T..0.120...... | 00000200: 45 4E 44 45 00 2F 0A 18 01 99 22 46 49 4C 45 20 |ENDE./...."FILE | 00000210: 22 46 24 22 20 4E 49 43 48 54 20 41 55 46 20 44 |"F$" NICHT AUF D| 00000220: 49 45 53 45 52 20 44 49 53 4B 45 54 54 45 22 00 |IESER DISKETTE".| 00000230: 3C 0A 22 01 A0 32 3A A0 31 35 3A 80 00 50 0A 2C |<."..2:.15:..P.,| 00000240: 01 54 24 B2 CA 28 53 24 2C 45 AC 33 32 AA 33 29 |.T$..(S$,E.32.3)| 00000250: 00 5F 0A 36 01 54 B2 C6 28 54 24 29 AF 31 35 00 |._.6.T..(T$).15.| 00000260: 70 0A 40 01 8B 54 B2 30 A7 82 49 3A 89 32 34 30 |p.@..T.0..I:.240| 00000270: 00 7E 0A 4A 01 8B 54 B3 B1 34 A7 33 34 30 00 BA |.~.J..T..4.340..| 00000280: 0A 4F 01 99 22 52 45 4C 41 54 49 56 45 20 46 49 |.O.."RELATIVE FI| 00000290: 4C 45 53 20 4B 4F 45 4E 4E 45 4E 20 4E 49 43 48 |LES KOENNEN NICH| 000002A0: 54 20 56 45 52 41 52 42 45 49 54 45 54 20 57 45 |T VERARBEITET WE| 000002B0: 52 44 45 4E 22 3A 89 32 39 30 00 D4 0A 54 01 54 |RDEN":.290...T.T| 000002C0: 59 24 B2 22 44 45 4C 53 45 51 50 52 47 55 53 52 |Y$."DELSEQPRGUSR| 000002D0: 52 45 4C 22 00 F5 0A 5E 01 99 22 46 49 4C 45 20 |REL"...^.."FILE | 000002E0: 22 58 31 24 22 20 22 CA 28 54 59 24 2C 54 AC 33 |"X1$" ".(TY$,T.3| 000002F0: AA 31 2C 33 29 00 09 0B 68 01 54 24 B2 C7 28 C6 |.1,3)...h.T$..(.| 00000300: 28 54 24 29 B0 31 32 38 29 00 2D 0B 72 01 53 24 |(T$).128).-.r.S$| 00000310: B2 C8 28 53 24 2C 45 AC 33 32 AA 31 29 AA 54 24 |..(S$,E.32.1).T$| 00000320: AA CA 28 53 24 2C 45 AC 33 32 AA 33 29 00 51 0B |..(S$,E.32.3).Q.| 00000330: 7C 01 8F 20 2A 20 4C 4F 45 53 43 48 45 4E 20 55 ||.. * LOESCHEN U| 00000340: 4E 44 20 52 55 45 43 4B 53 43 48 52 45 49 42 45 |ND RUECKSCHREIBE| 00000350: 4E 00 65 0B 86 01 98 31 35 2C 22 55 31 20 32 20 |N.e....15,"U1 2 | 00000360: 30 22 54 3B 53 00 70 0B 90 01 98 32 2C 53 24 3B |0"T;S.p....2,S$;| 00000370: 00 84 0B 9A 01 98 31 35 2C 22 55 32 20 32 20 30 |......15,"U2 2 0| 00000380: 22 54 3B 53 00 B9 0B A4 01 A0 32 3A A0 31 35 3A |"T;S......2:.15:| 00000390: 99 22 46 49 4C 45 44 41 54 45 4E 20 4B 4F 45 4E |."FILEDATEN KOEN| 000003A0: 4E 45 4E 20 4A 45 54 5A 54 20 47 45 4C 45 53 45 |NEN JETZT GELESE| 000003B0: 4E 20 57 45 52 44 45 4E 22 00 E6 0B AE 01 99 22 |N WERDEN"......"| 000003C0: 4E 41 43 48 20 44 45 4D 20 4B 4F 50 49 45 52 45 |NACH DEM KOPIERE| 000003D0: 4E 20 44 45 52 20 47 55 45 4C 54 49 47 45 4E 20 |N DER GUELTIGEN | 000003E0: 44 41 54 45 4E 22 00 13 0C B8 01 99 22 53 4F 4C |DATEN"......"SOL| 000003F0: 4C 54 45 4E 20 44 49 45 20 46 4F 4C 47 45 4E 44 |LTEN DIE FOLGEND| 00000400: 45 4E 20 42 45 46 45 48 4C 45 20 47 45 47 45 42 |EN BEFEHLE GEGEB| 00000410: 45 4E 22 00 23 0C C2 01 99 22 57 45 52 44 45 4E |EN".#...."WERDEN| 00000420: 20 3A 22 00 36 0C CC 01 99 22 4F 50 45 4E 31 35 | :".6...."OPEN15| 00000430: 2C 38 2C 31 35 22 00 58 0C D6 01 99 22 11 50 52 |,8,15".X....".PR| 00000440: 49 4E 54 23 31 35 2C 22 C7 28 33 34 29 22 53 3A |INT#15,".(34)"S:| 00000450: 22 46 24 C7 28 33 34 29 00 78 0C E0 01 99 22 11 |"F$.(34).x....".| 00000460: 50 52 49 4E 54 23 31 35 2C 22 C7 28 33 34 29 22 |PRINT#15,".(34)"| 00000470: 56 30 22 C7 28 33 34 29 00 88 0C EA 01 99 22 11 |V0".(34)......".| 00000480: 43 4C 4F 53 45 31 35 22 00 8E 0C F4 01 80 00 00 |CLOSE15"........| 00000490: 00 91 57 9E 45 47 B9 F7 FF |..W.EG... |
......."."......".";.3.F..2,8,2,"#":. DI REKTZUGRIFF.O.P..15,8,15:. KOMANDOKANAL. W.Z..:..K.D.."FILENAME ";F$...N.T.18:S.1 :. 1541 DIRECTORY...X..15,"U1 2 0"T;S:. LESEN.I...S$."":. VARIABLE FUER GELESENE N.....: :. SEKTOR......I.1.255:.#2,A$ :S$.S$.H(A$.G(0),1):.... ..I.0.7:. 8 EIN TRAEGE.<...X$.J(S$,I.32.6,16):X1$.X$.U.. .. FILNAMEN ISOLIEREN.]...X.1...H..J(X$, X,1)..G(160).X.X.1:.X.17.200...R.X$.H(X$ ,X.1):.......X$.F$.E.I:.300...... I.N... T.F(S$):S.F(J(S$,2,1))...... NAECHSTEN S EKTOR LESEN......T..0.120...... ENDE./.. .."FILE "F$" NICHT AUF DIESER DISKETTE". <.". 2: 15:..P.,.T$.J(S$,E.32.3)._.6.T.F (T$).15.P.@..T.0..I:.240.~.J..T..4.340.. .O.."RELATIVE FILES KOENNEN NICHT VERARB EITET WERDEN":.290.T.T.TY$."DELSEQPRGUSR REL"...^.."FILE "X1$" "J(TY$,T.3.1,3)... H.T$.G(F(T$).128).-.R.S$.H(S$,E.32.1).T$ .J(S$,E.32.3).Q.|.. * LOESCHEN UND RUECK SCHREIBEN.E....15,"U1 2 0"T;S.P....2,S$; ......15,"U2 2 0"T;S..... 2: 15:."FILEDA TEN KOENNEN JETZT GELESEN WERDEN"......" NACH DEM KOPIEREN DER GUELTIGEN DATEN".. ...."SOLLTEN DIE FOLGENDEN BEFEHLE GEGEB EN".#.B.."WERDEN :".6.L.."OPEN15,8,15".X .V..".PRINT#15,"G(34)"S:"F$G(34).X....". PRINT#15,"G(34)"V0"G(34)......".CLOSE15" ..........W.EG...
> CLICK IMAGE PREVIEW FOR FULL MODAL