Haas 96-8000, Operator'S Manual

Page: 219 / 269

210 96-8000 Rev AC
May 2010
N10 (A Y was entered)
M95 (00:01)
GOTO30
N20 (An N was entered)
G04 P1. (Do nothing for 1 second)
N30 (Stop)
M30
The following sample program will ask the user to select a number, then wait
for a 1, 2, 3, 4 or a 5 to be entered; all other characters will be ignored.
%
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)