viernes, 23 de mayo de 2008

WINLOGO. PULSACIÓN TECLAS

Vamos a poner un ejemplo de un procedimiento para que haga diversas acciones en función de la tecla que hemos pulsado. Utilizaremos la primitiva LEECARACTER (LC) y el operador lógico O.

Para Pulsa_Tecla
BT
ES [PROCEDIMIENTO DETECCIÓN DE TECLA]
REPITE 3 [ES []]
ES [Pulsa la tecla 1 o 2]
ES [Si quieres acabar pulsa la tecla F]
Haz "Tecla LC
Si :Tecla ="1 [ES [Pulsaste la tecla 1]]
Si :Tecla ="2 [ES [Pulsaste la tecla 2]]
Si O :Tecla ="f :Tecla = "F [ES [Pulsaste la tecla (F)IN, el programa se detendrá] ALTO]
ESPERA 100 BP
Pulsa_Tecla
FIN

Pulsa_Tecla

....

No hay comentarios: