Fühlt sich jemand in der Lage, dieses rl-init-1.2 an den C128 anzupassen? Ich habe mich daran probiert, aber meine Basic-Kenntnisse reichen dazu einfach nicht aus
https://gitlab.com/mkslack/Are…eases/rl-init/rl-init-1.2
Pusti64
Du bist in Begriff, Forum64 zu verlassen, um auf die folgende Adresse weitergeleitet zu werden:
Bitte beachte, dass wir für den Inhalt der Zielseite nicht verantwortlich sind und unsere Datenschutzbestimmungen dort keine Anwendung finden.
letzter Beitrag von Pusti64 am
Fühlt sich jemand in der Lage, dieses rl-init-1.2 an den C128 anzupassen? Ich habe mich daran probiert, aber meine Basic-Kenntnisse reichen dazu einfach nicht aus
https://gitlab.com/mkslack/Are…eases/rl-init/rl-init-1.2
Pusti64
Wieso Basic-Kenntnisse? Da muss man doch nur eine Handvoll POKE-Adressen anpassen, soweit ich das jetzt gesehen habe.
Welche wären denn das?
Pusti64
Welche wären denn das?
100 xt = 49152
xt bestimmt die Startadresse eines Speicherblocks, beim 128er würde ich da 4864 nehmen.
29040 poke 198, 0: [...]
30030 poke 144, 0:open 15, a0, 15:close 15:if st <> 0 then goto 30090
31020 poke 144, 0:open 15, id, 15:close 15
32300 poke 198, 0:wait 198, 1:get sp$
32710 poke 198, 0:wait 198, 1
Diese POKE- bzw. WAIT-Adressen muss man prüfen und ggfs. an die 128er-Zeropage anpassen. Aus 198 würde z.B. 208, IIRC.
61010 sys 57513
61060 sys 65057
61110 sys 57513
61160 sys 65057
Diese beiden Einsprungadressen müssen untersucht werden...
...und ganz am Anfang des Programms sollte noch "bank15" hinzugefügt werden.
Wie weit war Dein Versuch denn schon gediehen?
Bin nicht mal halb soweit gekommen wie Du
Ich kann etwas Assembler bzw. einfache Sachen unter GEOS programmieren.
Siehe es mir bitte jetzt schon nach, wenn ich Dich daher zu diesem Thema sicherlich noch ein paar Mal befragen werde.
Danke und Gruß Pusti64
Wie weit war Dein Versuch denn schon gediehen?
Mittlerweile funktioniert das Programm dank Deiner Hilfe auch im 80Z-Modus einwandfrei.
Wie kann man denn beim C128 mit Basic am einfachsten testen, ob ich mich im 40 oder 80 Zeichenmodus befinde?
Danke und Gruß
Pusti64
Wie kann man denn beim C128 mit Basic am einfachsten testen, ob ich mich im 40 oder 80 Zeichenmodus befinde?
if rgr(0)>4 then print "cursor is on vdc"
EDIT: bei meinen eigenen Basic7-Programmen stand in der ersten Zeile meist if rgr(0)>4then fast, aus naheliegenden Gründen.
Wie kann man denn beim C128 mit Basic am einfachsten testen, ob ich mich im 40 oder 80 Zeichenmodus befinde?
if rgr(0)>4 then print "cursor is on vdc"
EDIT: bei meinen eigenen Basic7-Programmen stand in der ersten Zeile meist if rgr(0)>4then fast, aus naheliegenden Gründen.
Sehr interessant.
Habe es in der Zwischenzeit so gelöst (siehe Anhang). Das Programm funktioniert mit dem C128 im C64/40Z/80Z Modus.
Danke und Gruß
Pusti64
Mit ?PEEK(238) da steht in der Zerropage die Maximale Anzahl der Bildschirmspalten.
Mit ?PEEK(238) da steht in der Zerropage die Maximale Anzahl der Bildschirmspalten.
Stimmt, dass ginge auch.
Pusti64