Dry-run system variable?

[machzero]

Recently had a machine crash due to the dry-run function being left active. Is there a way to verify that the dry-run function is active/disabled in a program using system variables or perhaps interrogating a parameter value?

[Oti]

What type of machine and control?

[Superman]

Obviously, dry run was used to prove-out a program
Single step used as well ??

As newer controls usually have only 1 knob, and it only controls feedrate and rapid rate seperately while in single step.
If single block is OFF then the override only controls feedrates NOT rapids.

Get the operators into a habit of using single step and turning the feedrate override to ZERO after each block of code

1. knob to ZERO
2. single block ON
3, Dry run ON
4....prove the program #1. at each block
5. Dry run OFF
6. ..#1.

Leaving the machine-- #1. again
Turning OFF at the end of day --- guess what ---#1.

As for interrogating the parameter, not sure of the actual address
but the code should be written something like this ( in red = a guess )

...( Header info )
...( Safety code )
IF [VNDRYR = 0] GOTO NEND  (if dry run is OFF- jump over the warning)
  VNCOM[1]=1 (turns message screen on )
  MSG (          <<<< WARNING >>>>                        DRY RUN IS *** ON ***)
  M00 ( cycle start to continue WITH dry run )
NEND
....(Your Prog )
M30
%

[OkumaWiz]

There are all kinds of system variables available for your use. With a little creativity, you can make an LT machine safer than a cadet. Here's a program for an LT200-MY with a P200 control. It checks all of your switches and knobs to make sure you aren't forgetting anything. Being human, it's easy to do. This program also checks to make sure the feed rate is at 0 and single block is on when doing a restart. You can put parentheses around areas you don't need on your machine. It takes about 1/2 a second for the machine to check everything, so it's well worth it.

If you need something else, let me know. I have programs for the other controls too. They are different on these controls since Okuma uses different I/O methods and addressing on them.

Code:

G13 (WRITTEN FOR LT200MY WITH P200 CONTROL)
G140
(TURN FEED TO 0 AND SINGLE BLOCK ON FOR RESTART.)
( SWITCHES CAN BE ADJUSTED AFTER CHECK HAS OCCURED.
INDIVIDUAL MODE CAN ONLY BE USED DURING RESTART.)
G50S500
/CALL OCHKA (OR OCHK1 FOR NO BARFEED)
G14
G141
G50S500
/CALL OCHKB
M2


OCHKA
IF[VORD[0016]EQ 1]NRTS (IF MACHINE LOCK ON)
(IF[VTOFZ[2]EQ 0]NCK0
VUACM[1]='T-A2 NOT AT Z0.0'
VDOUT[992]=1)
NCK0 IF[VORD[0015]EQ 0]NCK1
VUACM[1]='DRY RUN ON'
VDOUT[992]=1
NCK1(IF[VORD[0014]EQ 0]NCK2
VUACM[1]='BLOCK DELETE ON'
VDOUT[992]=1)
NCK2 IF[VORD[0022]EQ 1]NCK4
VUACM[1]='SPINDLE OVERIDE'
VDOUT[992]=1
NCK4 IF[VORD[0031]EQ 1]NCK5
VUACM[1]='COOLANT OFF'
VDOUT[992]=1
NCK5 IF[VORD[011A]EQ 1]NCK6
VUACM[1]='R-SPNDL OVERRIDE'
VDOUT[992]=1
NCK6 IF[VRSTT NE 0]NCK7 (IF RESTART)
NCK IF[VORD[0011]EQ 0]NCK7
VUACM[1]='A INDIVIDUAL ON'
VDOUT[992]=1
NCK7 IF[VORD[001C]EQ 1]NCK8
VUACM[1]='LOAD MONITOR OFF'
VDOUT[992]=1
NCK8 IF[VORD[0110]EQ 1]NCK9
VUACM[1]='MA OVERRIDE'
VDOUT[992]=1
NCK9 IF[VORD[0106]EQ 1]NCK10
VUACM[1]='MB OVERRIDE'
VDOUT[992]=1
NCK10 IF[VORD[0143]EQ 0]NCK11
VUACM[1]='SYSTEM LINK ON'
VDOUT[992]=1
NCK11 IF[VRSTT NE 0]NCK12 (IF RESTART JUMP)
IF[VORD[0013]EQ 1]NCK12 (SINGLE BLOCK)
IF[VORD[0023]EQ 1]NCK12
VUACM[1]='FEEDRATE NOT 100'
VDOUT[992]=1
NCK12 IF[VRSTT EQ 0]NRTS (IF NOT RESTART JUMP)
NCKR1 IF[[VIRD[0030]+VIRD[0031]+VIRD[0032]]EQ 0]NCKR2
VUACM[1]='FEEDRATE TOO HI'
VDOUT[992]=1
NCKR2 IF[VORD[0013]EQ 1]NRTS
VUACM[1]='SINGLE BLK OFF'
VDOUT[992]=1
NRTS RTS
OCHKB
IF[VORD[0016]EQ 1]NRTS
(IF[VTOFZ[2]EQ 0]NCK1
VUACM[1]='T-B2 NOT AT Z0.0'
VDOUT[992]=1)
NCK1 IF[VRSTT NE 0]NRTS (IF RESTART)
NCK13 IF[VORD[0012]EQ 0]NRTS
VUACM[1]='B INDIVIDUAL ON'
VDOUT[992]=1
NRTS RTS
OCHK1 (WITHOUT BARFEEDER)
IF[VORD[0016]EQ 1]NRTS (IF MACHINE LOCK ON)
IF[VORD[0015]EQ 0]NCK0
VUACM[1]='DRY RUN ON'
VDOUT[992]=1
NCK0(IF[VORD[0014]EQ 0]NCK2
VUACM[1]='BLOCK DELETE ON'
VDOUT[992]=1)
NCK2 IF[VRSTT NE 0]NCK3 (IF RESTART)
NCK00 IF[[VIRD[0030]+VIRD[0031]+VIRD[0032]]EQ 0]NCK3
NCK IF[VORD[0023]EQ 1]NCK3
VUACM[1]='FEEDRATE NOT 100'
VDOUT[992]=1
NCK3 IF[VORD[0022]EQ 1]NCK4
VUACM[1]='SPINDLE OVERIDE'
VDOUT[992]=1
NCK4 IF[VORD[0031]EQ 1]NCK5
VUACM[1]='COOLANT OFF'
VDOUT[992]=1
NCK5 IF[VORD[011A]EQ 1]NCK6
VUACM[1]='R-SPNDL OVERRIDE'
VDOUT[992]=1
NCK6 IF[VRSTT NE 0]NCK7 (IF RESTART)
NCK IF[VORD[0011]EQ 0]NCK7
VUACM[1]='A INDIVIDUAL ON'
VDOUT[992]=1
NCK7 IF[VORD[001C]EQ 1]NCK8
VUACM[1]='LOAD MONITOR OFF'
VDOUT[992]=1
NCK8 IF[VORD[0110]EQ 1]NCK9
VUACM[1]='MA OVERRIDE'
VDOUT[992]=1
NCK9 IF[VORD[0106]EQ 1]NCK11
VUACM[1]='MB OVERRIDE'
VDOUT[992]=1
NCK10 IF[VORD[0143]EQ 0]NCK11
VUACM[1]='SYSTEM LINK ON'
VDOUT[992]=1
NCK11 IF[VRSTT EQ 0]NRTS (IF RESTART)
NCKR1 IF[[VIRD[0030]+VIRD[0031]+VIRD[0032]]EQ 0]NCKR2
VUACM[1]='FEEDRATE TOO HI'
VDOUT[992]=1
NCKR2 IF[VORD[0013]EQ 1]NRTS
VUACM[1]='SINGLE BLK OFF'
VDOUT[992]=1
NRTS RTS

Save this program in memory as something like LT200MY-P200.SSB, that way it will load on control boot and be available to all programs. Then all you need to do is write the CALL OCHKA into the A-side program and CALL OCHKB into the B-side.

Good luck!