Función e Instruccion PEN 

Objetivo:

Leer el lápiz óptico.

Sintaxis:

Como una instruccion: 

PEN ON
PEN OFF
PEN STOP

Como una función: 

 x = PEN(n)

Comentarios:

PEN ON permite a PEN la función lectura .

PEN OFF incapacita PEN la función lectura.

PEN STOP incapacita atrapar. Esto recuerda el acontecimiento entonces atrapar inmediato ocurre cuando PEN ON es ejecutada.

La función PEN es al principio desconectada.Una instruccion PEN ON debe ser ejecutada antes de cualquier PEN las llamadas de función leídas pueden ser hechas,o una llamada PEN la función leída causa un error "Illegal function call".

x = PEN(n) lee las coordenadas de lápiz óptico.

x es la variable numérica que recibe el valor PEN.

n es un número entero dentro de la variedad de 0 a 9.

Coordenadas de lápiz óptico:

n = 0 Si la PLUMA estuviera abajo desde la última encuesta, vueltas-1; si no, vueltas 0.
n = 1 Devuelve la coordenada de x-pixel cuando la PLUMA era última activado. La variedad es dentro de 0 a 319 para la resolución media; 0 a 639, para resolución alta.
n = 2 Devuelve la coordenada de y-pixel cuando la PLUMA era última activado. La variedad es dentro de 0 a 199.
n = 3 Devuelve el valor de interruptor de PLUMA corriente. Vueltas-1 si abajo; 0 si.
n = 4 Devuelve la última coordenada de x-pixel válida conocida. La variedad es dentro de 0 a 319 para la resolución media; o 0 a 639 para resolución alta.
n = 5 Devuelve la última coordenada de y-pixel válida conocida. La variedad es dentro de 0 a 199.
n = 6 Devuelve la posición de fila de carácter cuando la PLUMA era última activado. La variedad es dentro de 1 a 24.
n = 7 Devuelve la posición de columna de carácter cuando la PLUMA era última activado. La variedad es dentro de 1 a 40, o 1 a 80, según la anchura de pantalla.
n = 8 Devuelve la última fila de carácter válida conocida. La variedad es dentro de 1 a 24.
n = 9 Devuelve la última posición de columna de carácter válida conocida. La variedad es dentro de 1 a 40, o 1 a 80, según la anchura de pantalla.

Para mejoras de velocidad de ejecución, apague la pluma con la instruccion PEN OFF  para aquellos programas no usando el lápiz óptico.

Cuando la pluma está en la zona del borde de la pantalla, los valores devueltos serán inexactos.

Ejemplos: 

50 PEN ON
60 FOR I=1 to 500
70 X=PEN(0): X1=PEN(3)
80 PRINT X, X1
90 NEXT
100 PEN OFF

Este ejemplo imprime el valor de pluma desde la última encuesta y el valor corriente.

1