run
Orden. Determina si la <expresión lógica> tiene el valor 'verdadero'. Si es así, ejecuta la primera
<opción>. Si la <expresión lógica> tiene el valor 'falso', ejecuta la <opción> especificada
después de ELSE; si no se ha incluido ELSE, BASIC pasa a la siguiente línea del programa.
Las órdenes IF THEN ... se pueden anidar, sin más límite que la longitud de la línea. La orden (o
la serie de órdenes anidadas) termina en el final de la línea, de modo que no es posible poner en
la misma línea instrucciones que sean independientes de la orden IF THEN .
Si la <opción> especificada consiste en un salto de línea, la orden puede tener cualquiera de las
tres formas siguientes:
IF a=1 THEN 100
IF a=1 GOTO 100
IF a=1 THEN GOTO 100
Palabras clave asociadas: ELSE, GOTO, THEN.
INK
Sintaxis: INK <tinta>, <color> [, <color>]
Ejemplo:
10 MODE 1:PAPER 0:PEN 1
20 FOR p=0 TO 1
30 FOR i=0 TO 26
40 INK p,i
50 LOCATE 16,12:PRINT "ink";p;",";i
60 FOR t=1 TO 400:NEXT t,i,p
70 INK 0,1:INK 1,24:CLS
run
Orden. Asigna uno o dos colores a la <tinta> dada. El parámetro <tinta> es el número de
referencia de la tinta (margen de 0 a 15), por el que se la cita en las órdenes PEN y PAPER. El
primer <color> debe ser una expresión entera cuyo valor esté comprendido entre 0 y 26. Si se
incluye el segundo <color>, la tinta alterna entre los dos colores, a una velocidad que se
controla con la orden SPEED INK.
Palabras clave asociadas: GRAPHICS PAPER, GRAPHICS PEN, PAPER, PEN, SPEED INK.
INKEY
Sintaxis: INKEY ( <expresión entera>)
Ejemplo:
10 IF INKEY(55)<>32 THEN 10
20 PRINT "Ha pulsado [SHIFT] y V"
30 CLEAR INPUT
run
Función. Examina el teclado para determinar si se ha pulsado una tecla determinada. La
exploración se realiza una vez cada 0.02 s.
Este función es útil para averiguar si se ha pulsado cierta tecla, comprobando si el número
generado por INKEY es -1 (el cual es independiente de la situación de [SHIFT] y [CTRL]).
Manual de Amstrad CPC 6128 (revisión 2008) - Página 135