hy not my issue, but can pls someone explain what is this about ?
it seems to me a gauging & origins setting program, that "checks something" to do "something else "...
I want to ask if there is another "fixing offset function" is not ( CALL OO88 (PX=___) (PY=___) (PZ=___) PC=___ PA=___ PH=___ (PP=___) )
On another machine using a subprogram (o351) which is an extension (.ssb), but once I move it on this machine have a gap axes (apparently does not want to count it). If someone can tell me why I would be grateful. (I apologize if there are errors, but write it through Google Translate)
Code:CALL O351 PX=.... PY=..... PZ=..... PA=.... PC=..... PH=..... PP=..... O351 VNCOM[1]=1 CHK1=VSPCD[14] AND #08H (A-AXIS CHECK) CHK3=VSPCD[14] AND #20H (C-AXIS CHECK) IF[CHK1 EQ 0]NER01 IF[CHK3 EQ 0]NER05 ( ************************ ) ( *** C&A AXIS PROGRAM *** ) ( ************************ ) NJP2 IF[PA EQ EMPTY]NER02 IF[PH EQ EMPTY]NER03 IF[PC EQ EMPTY]NER14 NA013 IF[PP NE EMPTY]NA014 PP=VACOD NA014 IF[PP EQ PH]NER06 IF[PP EQ 0]NER06 IF[PX NE EMPTY]NJP10 PX=0 NJP10 IF[PY NE EMPTY]NJP11 PY=0 NJP11 IF[PZ NE EMPTY]NJP12 PZ=0 NJP12 NA015 ( ***** UNIT CHECK ***** ) BIN1=VOPRB[3] AND 66 BIN2=VOPRB[4] AND 1 IF[BIN1 NE 0] NB011 IF[BIN2 EQ 0] NB012 TANA=10000 TANC=10000 GOTO NA018 NB011 TANA=1 TANC=1 GOTO NA018 NB012 TANA=1000 TANC=1000 NA018 PC1=PC*TANC PA1=PA*TANA NA019 ( ***** OFFSET VAL ***** ) XN=VZOFX[PH] YN=VZOFY[PH] ZN=VZOFZ[PH] () AN=VZOFA[PH] CN=VZOFC[PH] () XL=VPVDX YL=VPVDY ZL=VPVDZ () ( ***** CONVERT TO MACHINE ORIGIN ***** ) XX=XN+PX YY=YN+PY ZZ=ZN+PZ AA=AN CC=CN () XX1=XL*[1-COS[CC]]-YL*SIN[CC]*[1-COS[AA]]-ZL*SIN[AA]*SIN[CC] YY1=-XL*SIN[CC]+YL*COS[CC]*[1-COS[AA]]+ZL*SIN[AA]*COS[CC] ZZ1=-YL*SIN[AA]+ZL*[1-COS[AA]] XX2=XX*COS[CC]-YY*COS[AA]*SIN[CC]+ZZ*SIN[AA]*SIN[CC] YY2=XX*SIN[CC]+YY*COS[AA]*COS[CC]-ZZ*SIN[AA]*COS[CC] ZZ2=YY*SIN[AA]+ZZ*COS[AA] XX0=XX1+XX2 YY0=YY1+YY2 ZZ0=ZZ1+ZZ2 () ( ***** CONVERT TO NEW ORIGIN ***** ) XX=XX0 YY=YY0 ZZ=ZZ0 AA=AN+PA CC=CN+PC () XX1=XL*[1-COS[CC]] YY1=XL*COS[AA]*SIN[CC]+YL*[1-COS[AA]]-ZL*SIN[AA] ZZ1=-XL*SIN[CC]*SIN[AA]+YL*SIN[AA]+ZL*[1-COS[AA]] XX2=XX*COS[CC]+YY*SIN[CC] YY2=-XX*COS[AA]*SIN[CC]+YY*COS[AA]*COS[CC]+ZZ*SIN[AA] ZZ2=XX*SIN[AA]*SIN[CC]-YY*SIN[AA]*COS[CC]+ZZ*COS[AA] XP=XX1+XX2 YP=YY1+YY2 ZP=ZZ1+ZZ2 ( ***** ZERO OFFSET ***** ) VZOFX[PP]=XP VZOFY[PP]=YP VZOFZ[PP]=ZP VZOFA[PP]=VZOFA[PH]+PA VZOFC[PP]=VZOFC[PH]+PC G15H=PP VNCOM[1]=0 GOTO NRTS ( ***** ERROR MSG ***** ) NER01 VUACM[1]='NO-SPEC."A"' VDOUT[992]=1001 M0 NER02 VUACM[1]='NO-DATA "A"' VDOUT[992]=1002 M0 NER03 VUACM[1]='NO-DATA "H"' VDOUT[992]=1003 M0 NER04 VUACM[1]='NO-DATA "B"' VDOUT[992]=1004 M0 NER05 VUACM[1]='NO-SPEC."B OR C"' VDOUT[992]=1005 M0 NER06 VUACM[1]='WRONG NO."P"' VDOUT[992]=1006 M0 NER14 VUACM[1]='NO-DATA "C"' VDOUT[992]=1007 M0 NRTS RTS
Similar Threads:
hy not my issue, but can pls someone explain what is this about ?
it seems to me a gauging & origins setting program, that "checks something" to do "something else "...
we are merely at the start of " Internet of Things / Industrial Revolution 4.0 " era : a mix of AI, plastics, human estrangement, powerful non-state actors ...
It has nothing to do with gauging..... it is a library file that is called up within a NC file
PDF manual attached
It is for calculating the work origin shift when the rotary axes are used .....( when using 3+2 positioning toolpath strategies.... not for when using full 5 axis paths )
- allows for not having to place the part relative to the pivot point on the machine table
It is meant to be used on MU400 / MU500 machines that have an A & C axis
What is the other machine type are you trying to use this subroutine on ?
- any alarms or messages ?
I try to ride on Okuma MU 400V II (there's a 5 axes A & C), do not any alarms or messages. Just make bills but lose some 30 mm approximately, and this same subprogram (o351) use it in Okuma MU 400VA (there's a 5 axes A & C ) I guess I have to find pivot point and to change the values, but can not find it in the machine parameters.
Last edited by RumenR; 03-28-2017 at 10:19 AM.
Hi, I found this parameter (Pivot Distance) and everything went normally. Thanks for your attention. Have a nice day.