00000000: 01 04 0F 04 0A 00 99 20 C7 28 31 34 37 29 3B 00 |....... .(147);.|
00000010: 1B 04 14 00 99 20 C7 28 35 29 3B 00 3B 04 46 00 |..... .(5);.;.F.|
00000020: 9F 20 32 2C 38 2C 32 2C 22 23 22 3A 8F 20 44 49 |. 2,8,2,"#":. DI|
00000030: 52 45 4B 54 5A 55 47 52 49 46 46 00 59 04 50 00 |REKTZUGRIFF.Y.P.|
00000040: 9F 20 31 35 2C 38 2C 31 35 3A 8F 20 4B 4F 4D 4D |. 15,8,15:. KOMM|
00000050: 41 4E 44 4F 4B 41 4E 41 4C 00 61 04 5A 00 99 3A |ANDOKANAL.a.Z..:|
00000060: 99 00 7A 04 64 00 85 20 22 46 49 4C 45 4E 41 4D |..z.d.. "FILENAM|
00000070: 45 20 22 3B 46 24 3A 99 3A 99 00 AC 04 6E 00 54 |E ";F$:.:....n.T|
00000080: B2 31 38 3A 53 B2 31 3A 8F 20 31 35 34 31 20 44 |.18:S.1:. 1541 D|
00000090: 49 52 45 43 54 4F 52 59 20 2A 2A 20 54 3D 33 39 |IRECTORY ** T=39|
000000A0: 20 42 45 49 20 43 42 4D 38 30 35 30 00 C8 04 78 | BEI CBM8050...x|
000000B0: 00 98 31 35 2C 22 55 31 20 32 20 30 22 54 3B 53 |..15,"U1 2 0"T;S|
000000C0: 3A 8F 20 4C 45 53 45 4E 00 EC 04 82 00 53 24 B2 |:. LESEN.....S$.|
000000D0: 22 22 3A 8F 20 56 41 52 49 41 42 4C 45 20 46 55 |"":. VARIABLE FU|
000000E0: 45 52 20 47 45 4C 45 53 45 4E 45 4E 00 FF 04 8C |ER GELESENEN....|
000000F0: 00 3A 20 20 20 20 3A 8F 20 53 45 4B 54 4F 52 00 |.: :. SEKTOR.|
00000100: 2B 05 96 00 81 20 49 B2 31 20 A4 20 32 35 35 3A |+.... I.1 . 255:|
00000110: A1 23 32 2C 41 24 3A 53 24 B2 53 24 AA C8 28 41 |.#2,A$:S$.S$..(A|
00000120: 24 AA C7 28 30 29 2C 31 29 3A 82 00 47 05 A0 00 |$..(0),1):..G...|
00000130: 81 20 49 B2 30 20 A4 20 37 3A 8F 20 38 20 45 49 |. I.0 . 7:. 8 EI|
00000140: 4E 54 52 41 45 47 45 00 65 05 AA 00 58 24 B2 CA |NTRAEGE.e...X$..|
00000150: 28 53 24 2C 49 AC 33 32 AA 36 2C 31 36 29 3A 58 |(S$,I.32.6,16):X|
00000160: 31 24 B2 58 24 00 7F 05 B4 00 8F 20 46 49 4C 45 |1$.X$...... FILE|
00000170: 4E 41 4D 45 4E 20 49 53 4F 4C 49 45 52 45 4E 00 |NAMEN ISOLIEREN.|
00000180: 87 05 BE 00 58 B2 31 00 B4 05 C8 00 8B 20 CA 28 |....X.1...... .(|
00000190: 58 24 2C 58 2C 31 29 B3 B1 C7 28 31 36 30 29 20 |X$,X,1)...(160) |
000001A0: A7 20 58 B2 58 AA 31 3A 8B 20 58 B3 31 37 20 A7 |. X.X.1:. X.17 .|
000001B0: 20 32 30 30 00 C5 05 D2 00 58 24 B2 C8 28 58 24 | 200.....X$..(X$|
000001C0: 2C 58 AB 31 29 00 DD 05 DC 00 8B 20 58 24 B2 46 |,X.1)...... X$.F|
000001D0: 24 20 A7 20 45 B2 49 3A 89 20 33 30 30 00 E5 05 |$ . E.I:. 300...|
000001E0: E6 00 82 20 49 00 00 06 F0 00 54 B2 C6 28 53 24 |... I.....T..(S$|
000001F0: 29 3A 53 B2 C6 28 CA 28 53 24 2C 32 2C 31 29 29 |):S..(.(S$,2,1))|
00000200: 00 1D 06 FA 00 8F 20 4E 41 45 43 48 53 54 45 4E |...... NAECHSTEN|
00000210: 20 53 45 4B 54 4F 52 20 4C 45 53 45 4E 00 2E 06 | SEKTOR LESEN...|
00000220: 04 01 8B 20 54 B3 B1 30 20 A7 20 31 32 30 00 39 |... T..0 . 120.9|
00000230: 06 0E 01 8F 20 45 4E 44 45 00 64 06 18 01 99 22 |.... ENDE.d...."|
00000240: 46 49 4C 45 20 22 46 24 22 20 4E 49 43 48 54 20 |FILE "F$" NICHT |
00000250: 41 55 46 20 44 49 45 53 45 52 20 44 49 53 4B 45 |AUF DIESER DISKE|
00000260: 54 54 45 22 00 73 06 22 01 A0 20 32 3A A0 20 31 |TTE".s.".. 2:. 1|
00000270: 35 3A 80 00 87 06 2C 01 54 24 B2 CA 28 53 24 2C |5:....,.T$..(S$,|
00000280: 45 AC 33 32 AA 33 29 00 99 06 36 01 54 59 B2 C6 |E.32.3)...6.TY..|
00000290: 28 54 24 29 20 AF 20 31 35 00 B0 06 40 01 8B 20 |(T$) . 15...@.. |
000002A0: 54 59 B2 30 20 A7 20 82 20 49 3A 89 20 32 34 30 |TY.0 . . I:. 240|
000002B0: 00 C2 06 4A 01 8B 20 54 59 B3 B1 34 20 A7 20 33 |...J.. TY..4 . 3|
000002C0: 34 30 00 F9 06 4F 01 99 22 52 45 4C 41 54 49 56 |40...O.."RELATIV|
000002D0: 45 20 46 49 4C 45 53 20 4B 4F 45 4E 4E 45 4E 20 |E FILES KOENNEN |
000002E0: 4E 49 43 48 54 20 56 45 52 41 52 42 45 49 54 45 |NICHT VERARBEITE|
000002F0: 54 20 57 45 52 44 45 4E 22 00 03 07 51 01 89 20 |T WERDEN"...Q.. |
00000300: 32 39 30 00 1D 07 54 01 54 59 24 B2 22 44 45 4C |290...T.TY$."DEL|
00000310: 53 45 51 50 52 47 55 53 52 52 45 4C 22 00 41 07 |SEQPRGUSRREL".A.|
00000320: 5E 01 99 22 46 49 4C 45 20 22 58 31 24 22 20 22 |^.."FILE "X1$" "|
00000330: CA 28 54 59 24 2C 54 59 AC 33 AA 31 2C 33 29 3A |.(TY$,TY.3.1,3):|
00000340: 99 00 57 07 68 01 54 24 B2 C7 28 C6 28 54 24 29 |..W.h.T$..(.(T$)|
00000350: 20 B0 20 31 32 38 29 00 7B 07 72 01 53 24 B2 C8 | . 128).{.r.S$..|
00000360: 28 53 24 2C 45 AC 33 32 AA 31 29 AA 54 24 AA CA |(S$,E.32.1).T$..|
00000370: 28 53 24 2C 45 AC 33 32 AA 33 29 00 9F 07 7C 01 |(S$,E.32.3)...|.|
00000380: 8F 20 2A 20 4C 4F 45 53 43 48 45 4E 20 55 4E 44 |. * LOESCHEN UND|
00000390: 20 52 55 45 43 4B 53 43 48 52 45 49 42 45 4E 00 | RUECKSCHREIBEN.|
000003A0: B4 07 86 01 98 31 35 2C 22 42 2D 50 20 32 20 30 |.....15,"B-P 2 0|
000003B0: 22 54 3B 53 00 BF 07 90 01 98 32 2C 53 24 3B 00 |"T;S......2,S$;.|
000003C0: D3 07 9A 01 98 31 35 2C 22 55 32 20 32 20 30 22 |.....15,"U2 2 0"|
000003D0: 54 3B 53 00 E0 07 A4 01 A0 20 32 3A A0 20 31 35 |T;S...... 2:. 15|
000003E0: 00 0F 08 A9 01 99 22 46 49 4C 45 44 41 54 45 4E |......"FILEDATEN|
000003F0: 20 4B 4F 45 4E 4E 45 4E 20 4A 45 54 5A 54 20 47 | KOENNEN JETZT G|
00000400: 45 4C 45 53 45 4E 20 57 45 52 44 45 4E 2E 22 00 |ELESEN WERDEN.".|
00000410: 3C 08 AE 01 99 22 4E 41 43 48 20 44 45 4D 20 4B |<...."NACH DEM K|
00000420: 4F 50 49 45 52 45 4E 20 44 45 52 20 47 55 45 4C |OPIEREN DER GUEL|
00000430: 54 49 47 45 4E 20 44 41 54 45 4E 22 00 69 08 B8 |TIGEN DATEN".i..|
00000440: 01 99 22 53 4F 4C 4C 54 45 4E 20 44 49 45 20 46 |.."SOLLTEN DIE F|
00000450: 4F 4C 47 45 4E 44 45 4E 20 42 45 46 45 48 4C 45 |OLGENDEN BEFEHLE|
00000460: 20 47 45 47 45 42 45 4E 22 00 7B 08 C2 01 99 22 | GEGEBEN".{...."|
00000470: 57 45 52 44 45 4E 20 3A 22 3A 99 00 8F 08 CC 01 |WERDEN :":......|
00000480: 99 22 4F 50 45 4E 20 31 35 2C 38 2C 31 35 22 00 |."OPEN 15,8,15".|
00000490: B6 08 D6 01 99 20 C7 28 31 37 29 22 50 52 49 4E |..... .(17)"PRIN|
000004A0: 54 23 31 35 2C 22 C7 28 33 34 29 22 53 3A 22 46 |T#15,".(34)"S:"F|
000004B0: 24 C7 28 33 34 29 00 DB 08 E0 01 99 20 C7 28 31 |$.(34)...... .(1|
000004C0: 37 29 22 50 52 49 4E 54 23 31 35 2C 22 C7 28 33 |7)"PRINT#15,".(3|
000004D0: 34 29 22 56 30 22 C7 28 33 34 29 00 F1 08 EA 01 |4)"V0".(34).....|
000004E0: 99 20 C7 28 31 37 29 22 43 4C 4F 53 45 20 31 35 |. .(17)"CLOSE 15|
000004F0: 22 00 F7 08 F4 01 80 00 00 00 |"......... |
....... G(147);...... G(5);.;.F.. 2,8,2,
"#":. DIREKTZUGRIFF.Y.P.. 15,8,15:. KOMM
ANDOKANAL.A.Z..:..Z.D.. "FILENAME ";F$:.
:....N.T.18:S.1:. 1541 DIRECTORY ** T=39
BEI CBM8050.H.X..15,"U1 2 0"T;S:. LESEN
.....S$."":. VARIABLE FUER GELESENEN....
.: :. SEKTOR.+.... I.1 . 255:.#2,A$:S
$.S$.H(A$.G(0),1):..G. .. I.0 . 7:. 8 EI
NTRAEGE.E...X$.J(S$,I.32.6,16):X1$.X$..
... FILENAMEN ISOLIEREN.....X.1...H.. J(
X$,X,1)..G(160) . X.X.1:. X.17 . 200.E.R
.X$.H(X$,X.1)...... X$.F$ . E.I:. 300...
... I.....T.F(S$):S.F(J(S$,2,1))...... N
AECHSTEN SEKTOR LESEN...... T..0 . 120.9
.... ENDE.D...."FILE "F$" NICHT AUF DIES
ER DISKETTE".S.". 2: 15:....,.T$.J(S$,
E.32.3)...6.TY.F(T$) . 15...@.. TY.0 . .
I:. 240.B.J.. TY..4 . 340...O.."RELATIV
E FILES KOENNEN NICHT VERARBEITET WERDEN
"...Q.. 290...T.TY$."DELSEQPRGUSRREL".A.
^.."FILE "X1$" "J(TY$,TY.3.1,3):..W.H.T$
.G(F(T$) . 128).{.R.S$.H(S$,E.32.1).T$.J
(S$,E.32.3)...|.. * LOESCHEN UND RUECKSC
HREIBEN......15,"B-P 2 0"T;S......2,S$;.
S....15,"U2 2 0"T;S..... 2: 15......"F
ILEDATEN KOENNEN JETZT GELESEN WERDEN.".
<...."NACH DEM KOPIEREN DER GUELTIGEN DA
TEN".I...."SOLLTEN DIE FOLGENDEN BEFEHLE
GEGEBEN".{.B.."WERDEN :":....L.."OPEN 1
5,8,15"...V.. G(17)"PRINT#15,"G(34)"S:"F
$G(34)...... G(17)"PRINT#15,"G(34)"V0"G(
34)...... G(17)"CLOSE 15".........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL