ENTRADA DE USUARIO INTERACTIVA Haas M109:Molino Haas

ENTRADA DE USUARIO INTERACTIVA Haas M109

El código M109 M permite que un programa de código G coloque un breve aviso (mensaje) en la pantalla. Una variable de macro en el rango de 500 a 599 debe especificarse mediante un código P. El programa puede verificar cualquier carácter que se pueda ingresar desde el teclado comparándolo con el equivalente decimal del carácter ASCII (G47, Grabado de texto, tiene una lista de caracteres ASCII).

Cómo borrar todas las compensaciones en una máquina herramienta Haas

M109 Programas de ejemplo

El siguiente programa de muestra le hará al usuario una pregunta de Sí o No, luego esperará a que se ingrese una "S" o una "N". Todos los demás caracteres serán ignorados.

N1 #501= 0. (Clear the variable)
N5 M109 P501 (Sleep 1 min?)
IF [ #501 EQ 0. ] GOTO5 (Wait for a key)
IF [ #501 EQ 89. ] GOTO10 (Y)
IF [ #501 EQ 78. ] GOTO20 (N)
GOTO1 (Keep checking)
N10 (A Y was entered)
M95 (00:01)
GOTO30
N20 (An N was entered)
G04 P1. (Do nothing for 1 second)
N30 (Stop)
M30

El siguiente programa de muestra le pedirá al usuario que seleccione un número, luego espere a que se ingrese un 1, 2, 3, 4 o 5; todos los demás caracteres serán ignorados.

%
O01234 (M109 Program)
N1 #501= 0 (Clear Variable #501)
(Variable #501 will be checked)
(Operator enters one of the following selections)
N5 M109 P501 (1,2,3,4,5)
IF [ #501 EQ 0 ] GOTO5
(Wait for keyboard entry loop until entry)
(Decimal equivalent from 49-53 represent 1-5)
IF [ #501 EQ 49 ] GOTO10 (1 was entered go to N10)
IF [ #501 EQ 50 ] GOTO20 (2 was entered go to N20)
IF [ #501 EQ 51 ] GOTO30 (3 was entered go to N30)
IF [ #501 EQ 52 ] GOTO40 (4 was entered go to N40)
IF [ #501 EQ 53 ] GOTO50 (5 was entered go to N50)
GOTO1 (Keep checking for user input loop until found)
N10
(If 1 was entered run this sub-routine)
(Go to sleep for 10 minutes)
#3006= 25 (Cycle start sleeps for 10 minutes)
M95 (00:10)
GOTO100
N20
(If 2 was entered run this sub routine)
(Programmed message)
#3006= 25 (Programmed message cycle start)
GOTO100
N30
(If 3 was entered run this sub routine)
(Run sub program 20)
#3006= 25 (Cycle start program 20 will run)
G65 P20 (Call sub-program 20)
GOTO100
N40
(If 4 was entered run this sub routine)
(Run sub program 22)
#3006= 25 (Cycle start program 22 will be run)
M98 P22 (Call sub program 22)
GOTO100
N50
(If 5 was entered run this sub-routine)
(Programmed message)
#3006= 25 (Reset or cycle start will turn power off)
#1106= 1
N100
M30
%