- grüß Euch,
ich habe versucht in BASIC einen eigenen Zeichensatz zu erstellen.Ich habe das mit READA$ versucht.
Im DATA Abschnitt steht dann so etwas:
300 DATA "...##..."
310 DATA "..####--"
320 DATA ".##..##."
330 DATA ".##..##."
340 DATA ".######."
350 DATA ".##..##."
360 DATA ".##..##."
370 DATA "........"über
IF MID$(A$,K+1,1) ="#" then byte=byte+2^K
werden die Rauten in Zahlen umgewandelt.
Alle Zeichen sind jedoch spiegelverkehrt. Kann sich jemand denken warum ?
Hatte keine Fehlermeldung. Zeichensatz startet bei $3800
Mit POKE53272,30 lässt er sich darstellen. Nur Seitenverkehrt - seltsam.
Hallo Besucher, der Thread wurde 3k mal aufgerufen und enthält 16 Antworten
letzter Beitrag von Strider am
Eigener Zeichensatz
- Strider
- Erledigt
-
IF MID$(A$,K+1,1) ="#" then byte=byte+2^K
K zählt sicherlich mit 1 los, oder? Der Wert 1 (nicht die Position 1) ist der ganz rechts. 2 hoch K kommt dann zu einem inversen Ergebnis.
Arndt
-
8-K statt K+1 beim MID$
-
Vielen Dank.
Stimmt habe das K+1 in 8-k geändert und schon ist alles richtig.
Yeah. Das ging schnell. -
Dir ist schon klar, dass das maximal langsam ist?
Auf dem C64 empfiehlt es sich immer, so viel wie möglich vorzuberechnen. Rechnungen zur Laufzeit, die sowieso immer das gleiche Ergebnis haben, sind Verschwendung wertvoller Rechenzeit. Der Rechner ist einfach vergleichsweise langsam, und der BASIC-Interpreter ist nochmal ganz besonders langsam -- das beste was man in BASIC (ohne Maschinencode-Tricks) machen kann, ist zumindest die fertigen Byte-Werte in DATA-Zeilen packen und direkt POKEn
-
ganz zu schweigen vom platzverbrauch, gebe ich zrs1 vollkommenrecht.
64bytes vs ~24bytes pro char.
-
64bytes vs 8bytes pro char.
Nitpick: Die Rechnung stimmt in beiden Fällen nicht -- die Relation aber schon, also passt die Aussage qualitativ
Der hier gezeigte Code braucht 8 mal [8 (die "bits") + 3 (token und quotes) + 5 (overhead pro BASIC Zeile)], also ganze 128 Bytes für ein einziges Zeichen.
Mit vorberechneten DATA Werten dürfte man im Mittel mit 3,6*8 (für die Zahlen und Kommas) + 3 (token und platz für die BASIC-Zeile, bei zwei Zeichen pro Zeile) = gut 30 Bytes für ein Zeichen rechnen.Also ja, Platzverschwendung ist es auch. 8 Bytes pro Zeichen ginge aber nur, wenn die Daten direkt binär vorliegen und nicht in BASIC-Zeilen codiert.
-
wollte das nur deulich machen was man damit verschwendet, deine rechnung ist natuerlich praezieser.
unterschreib ich einfach mal -
Alles anzeigen
Laut C64-wiki soll der Befehl
POKE53272,(PEEK(53272)AND15) OR 224
c64-wiki.de/wiki/Bildschirmspeicher
Den Speicher verändern.
Aber am Screen passiert nach wie vor nichts.
Wenn man diesen POKE direkt nach dem Start eingibt, verändert sich der Screen durchaus. Evtl. funktioniert das in Deinem Programm deshalb nicht, weil direkt dahinter der POKE ausgeführt wird, welcher die Adresse des Zeichensatzes setzt - das ist ja exakt das gleiche Register, und wenn Du da POKE53272,{Konstante} statt der AND/OR-Gymnastik machst, wird die vorige Änderung überschrieben.
Wenn Du genau weißt, wo der Bildschirm und wo der Zeichensatz liegen soll, dann berechne den richtigen Wert für das Register und beschreib es mit einem Poke. -
Hier ist das Listing ohne DATA Abschnitt.
Vielleicht steht etwas darin was völlig falsch ist. -
Zeile 620 setzt den Zeichensatz-Zeiger auf Adresse $3800.
Zeile 630 setzt den Bildschirm-Zeiger auf Adresse $3800.
Willst Du da jetzt den Zeichensatz oder doch den Bildschirm plazieren?
Zeile 2110 setzt den Bildschirm zurück auf $0400 und den Zeichensatz auf $3800. -
Hi
Hier habe ich in Post 14 ein kleine Basicprogramm geschrieben wo man den Speicherbank 3 aktiviert.
Die kann man ganz leicht dann auf deine bedürfnisse anpassen.
Link zum Thema:
Laden eines externen PRG ZeichensatzesDabei ist auch ein kleine Anleidung wie man die richtigen Werte ermittelt in englischer Fassung.
So ich hoffe es hilft dir bei deinen Basicprogramm.Gruß
