Si tecleas este programa:
10 DEFINT A-Z
20 F=PEEK(&HF921)*256+PEEK(&HF920)
30 SCREEN 2:COLOR 15,1,15:CLS
40 FOR I=0 TO 2047:VPOKE I,PEEK(F+I):NEXT
50 GOTO 50
Aparecerá en pantalla algo curioso...
. ¿Como podemos cambiar el juego de carácteres en SC2?, pues basta con cambiar
antes de entrar al modo la dirección en la que se encuentra el juego de carácteres que va a usar, pokeando la nueva dirección en las variables de sistema $F920 y $F921.
Esto también es válido para los demás modos de pantalla, por lo que si modificamos con pokes esta dirección, al retornar al basic tendremos todo el juego de caracteres trastocado, para evitarlo no tendremos que olvidarnos de restaurar su valor original antes de salir.
Para demostrar esto podeis probar con:
POKE &HF920,&HC7:SCREEN 0
¡...y la pantalla se os encriptara!
a ciegas, si volveis a teclear:
POKE &HF920,&HBF:SCREEN 0
Volvereis al juego de caracteres normal.