Beiträge von Endurion im Thema „Laden eines externen PRG Zeichensatzes“

    So wie der Code aussieht, musst du pro Zeichen 8 Bytes in die Datas packen. Binär kann der BASIC-Interpreter nicht, nur dezimal. Wenn du den Zeichenindex vorne mit angeben möchtest, genügt ein Byte, dazu muss aber dann auch der Code angepasst werden. Ich habe das meistens so gemacht:

    • 10 rem ...charset to 57344($e000) & screen to 52224($cc00)
    • 20 poke56576,peek(56576)and252:rem vic-ii to bank 3
    • 30 poke53272,56:rem switch to new charset & screen
    • 40 poke648,204:printchr$(147):rem kernel to new screen (204=$cc)
    • 50 readz:ifz=-1thenend
    • 55 fora=0to7:readb:poke57344+z*8+a,b:next:goto50
    • 60 data 0 : rem Zeichen für @ glaube...
    • 61 data 60,60,24,126,153,165,66,195
    • 69 data 1 : Rem Zeichen für A glaube....
    • 70 rem usw.
    • 999 data -1 :rem letztes Zeichen