Basic Hilfe bei "Das Rätsel um die 7. Kolonie"

Hallo zusammen,

ich würde gerne dieses Spiel abändern, so dass es auf Diskete speichert und nicht auf Tape.

Kann mir jemand mal bitte den Code umändern? Ich habe die "Open" Befehle mit ,8 versehen bei einem Test,
aber so wirklich will er nicht auf Diskette speichern. Hier im original:

117 open1,1,1,"kolonie1":poke65286,peek(
65286)and239
118 print#1,r1:print#1,r2:print#1,k:prin
t#1,k1:print#1,k2:print#1,k3
119 print#1,k4:print#1,k5:print#1,k6:pri
nt#1,k7:print#1,k8:print#1,k9
120 print#1,g1:print#1,g2:print#1,g3:pri
nt#1,g4:print#1,g5:print#1,g6
121 print#1,g7:print#1,g8:print#1,g9
122 close1:open2,1,1,"kolonie2":forx=1to
8
123 print#2,l$(x,1):print#2,l$(x,2):prin
t#2,l$(x,3):print#2,l$(x,4):nextx
124 print#2,i$:close2
125 open3,1,1,"kolonie3":forx=1to8
126 print#3,f(x,1):print#3,f(x,2):print#
3,f(x,3):print#3,f(x,4):nextx
127 close3:print"Q ":poke65286,peek(65
286)or16:goto544
128 print"Q":open4,1,0,"kolonie1":poke65
286,peek(65286)and239
129 input#4,r1,r2,k,k1,k2,k3
130 input#4,k4,k5,k6,k7,k8,k9
131 input#4,g1,g2,g3,g4,g5,g6
132 input#4,g7,g8,g9
133 close4:open5,1,0,"kolonie2":forx=1to
8
134 input#5,l$(x,1),l$(x,2),l$(x,3),l$(x
,4):nextx:input#5,i$:close5
135 open6,1,0,"kolonie3":forx=1to8
136 input#6,f(x,1),f(x,2),f(x,3),f(x,4)
137 nextx
138 close6:print"S":poke65286,peek(65286
)or16:goto15
139 print"Qnichts yu sehen":goto62

Danke

Zitat von phillipfry

Und wer soll das sein? Ist er als User hier aktiv?

https://www.forum64.de/index.php?user/18543-stephan-scheuer/

Der hat Lust drauf meinte, @Ace ?

Ich habe die Befehle abgeändert

Open 1,1,1 bzw. Open 1,1,0 nach
Open 1,8,1 bzw. Open 1,8,0

Lädt man das Spiel rein und speichert es, legt er 3 Dateien an:

"Kolonie1" - "Kolonie3"

Das Speichern funktioniert also nur 1x, da wie es @Mac Bacon sagte, zu einem File Exists Error kommt, wenn man dann nochmal Speichern möchte. Was mich jetzt beschäftigt ist:

- Wieso werden 3 Dateien beim speichern erzeugt. ich vermute mal weil das ganze ursprünglich ein Tape-Game ist ?

- Was muss ich umändern damit ich jedesmal vernünftig speichern kann und es nicht zu einem File Exists Error kommt. Ggf. ein "Scratch "Kolonie1" einfügen ? (wobei was soll das dann mit den 2 anderen Save Files?)

Zitat von Mac Bacon

Ja, genau. Vor jede der drei OPEN-Anweisungen zum Schreiben kommt ein passendes scratch"filename" und fertig ist das Moped.

So ist es auch. ich habe ganz zum Anfang den fehler gemacht, änderungen im Hauptprogramm direkt in das .d64 via Emulator zu schreiben. Alle Änderungen hat er trotz erfolgreichen Saven nicht übernommen.

In der Tat ist das jetzt so gefixt, danke nochmal für den Tip. Allerdings steige ich immer noch nicht durch, was der Programmierer dort mit den 3 Save.Files annstellen. Pokes, Peeks, Print und Variablen. Aber egal, so kann es der User künftig ganz bequem auf Diskette speichern

Zitat von detlef

Setz doch mal hier rein, was du versuchst hast? Dann kann man doch geziehlter helfen.In den Open-Befehlen muss übrigens natürlich auch noch Read und Write angegeben werden.

Auch Dir besten Dank @detlef

Zitat von cbm-warrior

Ich sehe mir gerade mal ein anderes Adventure von dem guten Herrn von der Schulenburg an.

Dort ist wohl speichern auf Kassette oder Diskette möglich. Könnte man ja mal als Referenz heranziehen.

Wenn man das entsprechend anpassen möchte, sollte das Programm aber vorher neu durchmeriert werden wg. der Zeilennr., da dort ja alles in 1er Schritte gemacht wurde.

Unabhängig davon sind die 4 Titel von dem allerdings der letzte Schrott. Grafik nix halbes und nix ganzes, die Storys allesamt ein Witz.

Nachtrag: Nur bei Rätsel der 7. Kolonie wurde das Speichern auf Diskette nicht miteingebaut … bei allen 3 anderen Adventures von dem schon ...

Alles anzeigen

Naja mal schauen, ich hab Langeweile gehabt, deswegen habe ich das jetzt gefixt und mit einem Original Kingsoft Loading Screen versehen.