letzter Beitrag von freakedenough am
Hallo,
bin Basic-Anfänger und hab da eine Frage:
Wie kann ich eine Variable, C%, in einer Datei auf der Floppy speichern (dabei vorhandenen Inhalt üüberschreiben)?
Also C% als reiner Text in einer z.B. SCORE.SEQ-Datei auf der Floppy?
Wie kann man den dann wieder auslesen und in D% festlegen?
Leider werd ich aus dem C64 Wiki nicht schlau mit den Floppybefehlen. Aber sicher was mit OPEN 
Aus hier vereinfacht, um nur genau einen Wert zu lesen:
Zeile 20-30: Befehlskanal 1 auf Floppy öffnen, Datenfile löschen (S:DATENFILE S = Scratch) von Disk und Kanal 1 schliessen. (Löschen/Scratch weil Replace ja nicht so eine gute Idee ist)
Zeile 50: Befehlskanal auf Floppy für öffnen, Datenfile vom Typ S (SEQ) und Operation W (Write) auf Disk öffnen
Zeile 60: Variable A$ bekommt hier einen Fixwert
Zeile 70: Schreiben der Variablen-Inhaltes von A$ in Kanal 2
Zeile 80: Kanal 2 schliessen
Zeile 110: Befehlskanal 2 auf Floppy öffnen, Datenfile vom Typ S (SEQ) und Operation R (Read) auf Disk öffnen
Zeile 120: Variablen A$ initialisieren
Zeile 130: Lesen des Kanals 2 in Variable A$
Zeile 140: Kanal 2 schliessen
Zeile 150: Inhalt der Variable A$ anzeigen
Danke, aber ich finde meinen Fehler nicht.
Wieso öfnnest Du mit OPEN 1,8,0, "HIGHSCORE,SEQ,W"
Für den Befehlskanal muss es doch 15 sein?
<Edit>: Ja, für das Scratchen muss es 15 sein. Bei Dir muss es 2-14 sein, siehe Link:
Der OPEN-Befehl hat das Format:
OPENlfn,8,sa,"fn,ft,modus"
lfn : Logische Filenammer
8 : Geräteadresse
sa : Sekundäradresse (eine Zahl zwischen 2 und 14) (*)
fn : Filename
ft : Filetyp SEQ bzw.S (Sequentiell); USR bzw.U-(User)
mode: READ bzw. R (lesen) ; WRITE bzw. W (schreiben)
APPEND bzw. A (anhängen von Daten)
Und das mit SEQ geht statt S? Ok, das geht, sehe ich gerade
Statt OPEN 1,8,0 --> OPEN 1,8,2 damit das File zum Schreiben geöffnet wird. Außerdem statt SEQ nur S.
Gesendet von meinem CBM 3032 mit gemischten Gefühlen.
15 nicht nehmen.
Guck mal, was hier über die Sekundäradresse steht 
Davon ab ist es immer hilfreich, zum Debuggen nach jeder Dateioperation die Fehlermeldung des DOS abzufragen, z.B. via
(das hätte bei deinem Problem nach Zeile 303 ausgeführt wohl "file not found" ausgegeben, was zugegebenermassen auch nur bedingt hilfreich wäre :))
Guck mal, was hier über die Sekundäradresse steht
Danke....Ich hatte dort auch gesucht, aber leider ist die Suchfunktion manchmal zum 
Guck mal, was hier über die Sekundäradresse steht
Davon ab ist es immer hilfreich, zum Debuggen nach jeder Dateioperation die Fehlermeldung des DOS abzufragen, z.B. via
(das hätte bei deinem Problem nach Zeile 303 ausgeführt wohl "file not found" ausgegeben, was zugegebenermassen auch nur bedingt hilfreich wäre :))
Um darauf noch näher einzugehen:
Ich erlaubte dem User die Laufwerksnummer anzugeben für den Speicherstand - zwischen 8 und 12 angenommen. Es sind jetzt 8 und 12 verbunden, der User gibt aber 9 an, dann bricht das Programm mit DEVICE NOT PRESENT ab. Wie fängt man das ab?
Ok, habs gefunden. Device not present/file not found error abfangen
Dieses Forum ist eine Bibel
Dieses Forum ist eine Bibel
zum Glück nicht.
Wenn schon eine Enzyklopädie. 
Neue Frage
Ich speichere nun mit mehreren PRINT# mehrere Zeilen
- Spielstand C%
- Schwierigkeitstufe GR
und lese es auch mit INPUT# so wieder aus.
Ich habe drei Schwierigkeitsstufen in der Variable GR definiert (wählt der Spieler), Zahlen zwischen 1-3.
Nun hat ein "Highscore"-File keinen Sinn, wenn alles ständig überschrieben wird. Ich will nun so in die Datei schreiben:
- Spielstand Stufe 1
- Spielstand Stufe 2
- Spielstand Stufe 3
Ich will aber dann, nachdem der Spieler z.B. Schwierigkeitsstufe 2 (GR) gewählt hat nur Zeile 2 aus der Datei auslesen lassen und eine Ausgabe PRINT"Rekord fuer Stufe GR ist C%".. und wenn ein neuer Rekord geknackt wird nur Zeile 2 überschreiben.
Hab ich das Wiki so richtig verstanden?
PRINT#1,A$,B$,C$
Dateiinhalt Alt:
300
20
40
...
=> Auswahl Schwierigkeitsstufe 2:
INPUT#1,A$,B$,C$
... PRINT B$ => "Bisherige Punkte 20
=> Neuer Rekord mit 30 Punkten für Stufe 2
PRINT#1,A$,BNEU$,C$
Dateiinhalt Neu:
300
30
40
Was mir die ganze Zeit auffällt: Die Prozent-Variablen sind Integer-Werte, keine Strings. Für Strings musst du $ als Postfix nehmen.
nur Zeile 2 aus der Datei auslesen lassen und eine Ausgabe PRINT"Rekord fuer Stufe GR ist C%".. und wenn ein neuer Rekord geknackt wird nur Zeile 2 überschreiben.
Was du willst, ist Zugriff auf einen beliebigen Ort der Datei, also nicht SEQuentiell, sondern RELativ.
Bei sequentiellen Dateien fängst du am Anfang an zu lesen und liest soweit weiter bis Du die entsprechende Stelle gefunden hast.
Ditto beim Schreiben.
Für die REL Dateien:
https://www.c64-wiki.de/index.php/REL
Die Datensatzlänge von 100 Bytes setzt nicht die Größe der Datei, sondern die Größe jedes Eintrags, also: Stufe 1 => erste 100 Byte, Stufe 2 => zweite 100 Byte und so weiter. Die REL-Datei erlaubt dann den Zugriff auf jeden Datensatz einzeln über dessen Nummer.
Solange es nur um eine Highscoreliste mit zehn Einträgen geht, ist eine REL-Datei aber mit Kanonen auf Spatzen geschossen. Der vorige Ansatz mit einer SEQ-Datei, die jedes Mal komplett neu geschrieben wird, geht ebenso gut.
Noch ein anderer Gedanke:
Wenn Du eine kleine Anzahl an Spielständen (z.B. typischerweise 10 Stände) hast, wäre es vermutlich einfacher, 10 SEQ Dateien auf der Diskette zu verwalten und du liest und schreibst nur das, was du eben brauchst.
Ansonsten gibt es noch das folgende Englische Datei-Datenstrukturen-Buch, welches u.a. die Prinzipien von SEQ und REL erklärt:
http://www.1000bit.it/support/…iles_A_Basic_Tutorial.pdf
steht im SEQ File jeder Wert mit Komma getrennt
Nein. Du hast einen Zeilenumbruch (CHR$(13)), wie auch beim normalen PRINT Befehl für die Bildschirmausgabe.
Das kannst du gut mit DirMaster 3.0.0 anschauen, was die Dateien beinhalten.
Ich habe mal testweise 10 Datensätze mit einem FOR Loop reingeschrieben, einmal mit :
PRINT#2, A$ --> Zeilenumbruch
PRINT#2, A$; --> aneinandergereiht
Mit Dirmaster und als HexDump angeschaut:
