Vielleicht in Zeile 2025 mal print d$(ds,f) eingeben. Dann siehst du, wo er hängen bleibt.
Leider nicht, Zeile 2025 wird erst gar nicht ausgeführt, das Programm hängt sich weiterhin unmittelbar vor Beginn der Doppelschleife auf!
Vorhin habe ich mal mit einfacher strukturierten Dateiein- und -ausgaben experimentiert, als Erstes das Lesen und Schreiben einer einzelnen Textzeile, Eingabe als Literal:
Bitte melde dich an, um diesen Anhang zu sehen.
Wie man sieht, läuft das Programm einwandfrei - das Stringliteral wird auf Diskette geschrieben, anschließend in eine Variable eingelesen und auf den Bildschirm ausgegeben.
Dann als Nächstes Eingabe, Schreiben, Lesen und Ausgabe eines kleinen zweidimensionalen Arrays, diesmal durchgehend via Variablen:
Das Listing:
Bitte melde dich an, um diesen Anhang zu sehen.
...und ein Testlauf des Programms:
Bitte melde dich an, um diesen Anhang zu sehen.
Auch hier funktioniert alles wie beabsichtigt... der einzige Unterschied zu "tele-disk(un so)" ist, dass ich sämtliche Schleifen unverschachtelt gelassen habe (eine zweite Schleifenebene wäre bei nur 2 Elementen in der zweiten Arraydimension ja auch Overkill...). Könnte es eventuell sein, dass der interne Dateizeiger mit verschachtelten Schleifen nicht zurechtkommt?
Bis bald im Khyberspace!
Yadgar