Colores parpadeantes
Es posible hacer que una tinta cambie intermitentemente de color. Para ello se debe añadir otro
número a la instrucción INK que asigna tintas a la pluma utilizada.
Vamos a hacer que los caracteres que escribamos alternen entre los colores blanco intenso y
rojo intenso. Reinicialice la máquina con [CONTROL] [MAYS] [ESC] y escriba lo siguiente:
ink 1, 26, 6 [RETURN]
En este caso el 1 es el número de la pluma, el 26 es el del color blanco intenso y el 6 es el del
segundo color, rojo intenso.
El mismo efecto de parpadeo se puede dar a los colores del fondo, para lo cual se añade un
segundo número de color a la instrucción INK que asigna tintas al papel actual. Para hacer que el
color del fondo alterne entre verde y amarillo intenso escriba:
ink 0,9,24 [RETURN]
En este caso 0 es el número del papel, 9 es el número del color verde y 24 es el número el
segundo color, el amarillo intenso.
Reinicialice el ordenador con [CONTROL] [MAYS] [ESC].
Observe en la tabla 2 que en modo 0 hay dos números de pluma y dos números de papel, el 14
y el 15, que tienen asignadas tintas parpadeantes. Es decir, sus correspondientes tintas están
preprogramadas con un color adicional.
Escriba lo siguiente:
mode 0 [RETURN]
pen 15 [RETURN]
y verá en la pantalla la palabra Ready parpadeando entre azul celeste y rosado. Escriba ahora:
paper 14 [RETURN]
cls
El texto continúa parpadeando como antes, pero además el fondo ha empezado a alternar entre
los colores amarillo y azul.
Los números de pluma y de papel 14 y 15 pueden ser reprogramados, mediante la adecuada
instrucción INK, para que parpadeen con otras tintas o bien para asignarles un color fijo.
Finalmente, se puede hacer parpadear el borde sin más que especificar un segundo número de
color en la instrucción BORDER. Escriba:
border 6,9 [RETURN]
El borde está parpadeando entre los colores rojo intenso y verde. Observe que al borde se le
puede asignar uno o dos colores cualesquiera de los 27 disponibles, independientemente del
modo en que esté la pantalla (0, 1 o 2).
Reinicialice el ordenador con [CONTROL] [MAYS] [ESC].
Introduzca y ejecute el siguiente programa, que demuestra los colores disponibles.
10 MODE 0 [RETURN]
20 velocidad=600: REM establece velocidad del programa [RETURN]
30 FOR b=0 TO 26 [RETURN]
40 LOCATE 1,12 [RETURN]
Manual de Amstrad CPC 6128 (revisión 2008) - Página 64