0
mode
run
verá que el hombre se ha ido al extremo superior derecho de la pantalla. Esto ha ocurrido
porque la coordenada x= 20 es la última columna en modo 0. Escriba:
mode
2
run
Vuelva a modo 1 con:
mode
1
Ahora pruebe usted con diferentes posiciones en locate y diferentes números en chr$( ). Por
ejemplo, escriba:
locate 20,12:print
y verá una flecha en el centro de la pantalla. Observe que en esta instrucción:
• 20 es la coordenada x (horizontal) (margen: 1 a 40)
• 12 es la coordenada y (vertical) (margen: 1 a 25)
• 240 es el número del carácter (margen: 32 a 255)
Para mover el carácter 250 de izquierda a derecha de la pantalla, escriba lo siguiente:
10
CLS
20
FOR
x=1
TO
30
LOCATE
x,20
50
PRINT
CHR$(250)
60
NEXT x
70
10
GOTO
run
Pulse [ESC] dos veces para abandonar el programa.
Si queremos borrar el carácter recién escrito antes de escribir el siguiente, debemos hacer
50
PRINT
"
"; CHR$(250)
(Esta nueva línea 50 reemplaza automáticamente la que teníamos antes.) Escriba:
run
FRAME
Para mejorar la ilusión de movimiento del carácter por la pantalla, añada al programa anterior la
siguiente línea:
40
frame
La instrucción FRAME sincroniza el movimiento de objetos por la pantalla con la frecuencia a la
que se envían las imágenes al monitor. La explicación es demasiado técnica, pero basta con que
recordemos que esta instrucción se debe utilizar siempre que queramos mover objetos
suavemente por la pantalla.
chr$(240)
39
Manual de Amstrad CPC 6128 (revisión 2008) - Página 68