You can easily back up you load monitoring values using the Data Pip function
hy mr wizard, hy duivenhok para + extend + d-pip + output + tool data select + data select + T12 + T13 + T14 + close + maybe file name + maybe device select + output + close + close + leave para page
too many keystrokes also file name has to be managed, in order to reflect that the back-up is about ' load monitor values '
okye, now let's back-up in 2 keystrokes : program select + execute
please, consider next code + output sample below; execution will generate g-code
it considers only addresses with base <> 0
i just tested it, and i used some brakets, in order to disable the axis that are not available on the genos lathe; to configure it for your machine, i need infos asked at post 4; i may need to use G13 and G14, but i am not sure, since i have no experience with okuma's double saddle
Wondering what g code use you mean. If youd like to share...please do
pls check this code : is ( close to ) doing what you wish; if you like it the way it behaves, regardless of it's content, please consider that this is not the way that i am managing load monitoring addresses; there is more / kindly
Code:
( 18 . 5 . 2019 9 . 47 . 47 ) ( change extension to *.min )
NOEX VLMZB [ 1 ] = 30 VLMZ1 [ 1 ] = 30 VLMZ2 [ 1 ] = 30
NOEX VLMXB [ 64 ] = 80 VLMX1 [ 64 ] = 80 VLMX2 [ 64 ] = 80
NOEX VLMZB [ 64 ] = 80 VLMZ1 [ 64 ] = 80 VLMZ2 [ 64 ] = 80
NOEX VLMCB [ 64 ] = 80 VLMC1 [ 64 ] = 80 VLMC2 [ 64 ] = 80
NOEX VLMMB [ 64 ] = 80 VLMM1 [ 64 ] = 80 VLMM2 [ 64 ] = 80
M02
Code:
(
But with Xa Za Ys Samain Sasub W B Cmain Csub Xb Zb etc. In total 16 axis
Xa Za Ya B M
S C
Ssub Csub W
Xb Zb Yb M
)
(OSAVE)
FWRITC z-LM-previous.txt;C
NOEX(PUT ' ')
$ PUT $0D0A
$ PUT ' ( '
$ LV01 = VTIME [ 1 ] PUT ' '
$ PUT VTIME [ 3 ] , 2 PUT ' . '
$ PUT VTIME [ 2 ] , 2 PUT ' . '
$ PUT VTIME [ 1 ] , 4 PUT ' '
$ PUT VTIME [ 4 ] , 2 PUT ' . '
$ PUT VTIME [ 5 ] , 2 PUT ' . '
$ PUT VTIME [ 6 ] , 2
$ PUT ' )'
$ PUT ' ( change exten'
$ PUT 'sion to *.min )'
$ PUT $0D0A
$ (PUT ' ')
WRITE C
NOEX LV00 = 0
NHERE NOEX LV00 = LV00 + 1
CALL OMAIN LV01 = VLMXB [ LV00 ] LV02 = VLMX1 [ LV00 ] LV03 = VLMX2 [ LV00 ] LV04 = 0001
CALL OMAIN LV01 = VLMZB [ LV00 ] LV02 = VLMZ1 [ LV00 ] LV03 = VLMZ2 [ LV00 ] LV04 = 0002
CALL OMAIN LV01 = VLMCB [ LV00 ] LV02 = VLMC1 [ LV00 ] LV03 = VLMC2 [ LV00 ] LV04 = 0004
CALL OMAIN LV01 = VLMSB [ LV00 ] LV02 = VLMS1 [ LV00 ] LV03 = VLMS2 [ LV00 ] LV04 = 0008
CALL OMAIN LV01 = VLMMB [ LV00 ] LV02 = VLMM1 [ LV00 ] LV03 = VLMM2 [ LV00 ] LV04 = 0016
( CALL OMAIN LV01 = VLMWB [ LV00 ] LV02 = VLMW1 [ LV00 ] LV03 = VLMW2 [ LV00 ] LV04 = 0032
CALL OMAIN LV01 = VLMBB [ LV00 ] LV02 = VLMB1 [ LV00 ] LV03 = VLMB2 [ LV00 ] LV04 = 0064
CALL OMAIN LV01 = VLMYB [ LV00 ] LV02 = VLMY1 [ LV00 ] LV03 = VLMY2 [ LV00 ] LV04 = 0128
CALL OMAIN LV01 = VLMTB [ LV00 ] LV02 = VLMT1 [ LV00 ] LV03 = VLMT2 [ LV00 ] LV04 = 0256
CALL OMAIN LV01 = VLMDB [ LV00 ] LV02 = VLMD1 [ LV00 ] LV03 = VLMD2 [ LV00 ] LV04 = 0512 )
IF [ LV00 LT 64 ] NHERE
NOEX (PUT ' ') PUT $0D0A PUT 'M02'
WRITE C
CLOSE C
(
RTS)( . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . )
M02
OMAIN
IF [ LV01 EQ 0 ] NJUMP
NOEX PUT ' NOEX'
CALL OHLP
NOEX PUT 'B [ ' PUT LV00 , 2 PUT ' ] = ' PUT LV01 , 3
CALL OHLP
NOEX PUT '1 [ ' PUT LV00 , 2 PUT ' ] = ' PUT LV02 , 3
CALL OHLP
NOEX PUT '2 [ ' PUT LV00 , 2 PUT ' ] = ' PUT LV03 , 3
WRITE C
NJUMP NOEX
RTS ( . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . )
OHLP
IF [ LV04 EQ 0001 ] N0001
IF [ LV04 EQ 0002 ] N0002
IF [ LV04 EQ 0004 ] N0004
IF [ LV04 EQ 0008 ] N0008
IF [ LV04 EQ 0016 ] N0016
IF [ LV04 EQ 0032 ] N0032
IF [ LV04 EQ 0064 ] N0064
IF [ LV04 EQ 0128 ] N0128
IF [ LV04 EQ 0256 ] N0256
IF [ LV04 EQ 0512 ] N0512
N0001 NOEX PUT ' VLM' PUT $58 ( 'X' )
GOTO NEND
N0002 NOEX PUT ' VLM' PUT $5A ( 'Z' )
GOTO NEND
N0004 NOEX PUT ' VLM' PUT $43 ( 'C' )
GOTO NEND
N0008 NOEX PUT ' VLM' PUT $53 ( 'S' )
GOTO NEND
N0016 NOEX PUT ' VLM' PUT $4D ( 'M' )
GOTO NEND
N0032 NOEX PUT ' VLM' PUT $57 ( 'W' )
GOTO NEND
N0064 NOEX PUT ' VLM' PUT $42 ( 'B' )
GOTO NEND
N0128 NOEX PUT ' VLM' PUT $59 ( 'Y' )
GOTO NEND
N0256 NOEX PUT ' VLM' PUT $54 ( 'T' )
GOTO NEND
N0512 NOEX PUT ' VLM' PUT $44 ( 'D' )
GOTO NEND
NEND NOEX
RTS ( . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . )