Continue to Site

Welcome to MCAD Central

Join our MCAD Central community forums, the largest resource for MCAD (Mechanical Computer-Aided Design) professionals, including files, forums, jobs, articles, calendar, and more.

Fixture offset G43

the_real_jat

New member
wasup


i am in big trouble with my posprocessor. I am using


CIMFIL/ON, SET


IF(POSTF(6,5).EQ.1)THEN


FIXT=POSTF(7,5)


REPEAT/OFF


REPEAT/X,Y,G,FIXT,ALL


ENDIF


CIMFIL/OFF


and now i give a parametric value to my fixture offet in the Pro/NC while defining sequences.


For some reason, my output file gives warnings now. and it doesn't even show the G54 that its supposed to show.


Anyone aware of this?


thanks


~JAT
 
I didn't know the "REPEAT" command could be used for anything but text. But if it works, you might try this instead of your macro.


CIMFIL/ON,SET


WORD1=POSTF(7,4)


IF (WORD1.EQ.(ICODEF(OFSETL))) THEN


TYPE2=POSTF(6,5)


IF (TYPE2.EQ.1) $$ Is it a real number


FIXT=POSTF,7,5)


REPEAT/OFF


PREFUN/FIXT,NEXT


REPEAT/X,Y,G ,ALL


ENDIF


ENDIF


CIMFIL,OFF
 
I tried using the Repeat command, but I couldn't get it to work either. This is what I have in my FIL file. Why don't you try it and let me know how it works for you.


$$ **********************************


$$ S E T


$$ **********************************


CIMFIL/ON,SET


WORD1=POSTF(7,4)


IF (WORD1.EQ.(ICODEF(OFSETL))) THEN


WORD2=POSTF(7,5)


TYPE2=POSTF(6,5)


IF (TYPE2.EQ.1) THEN $$ IF ARGUMENT IS A REAL


WPC=WORD2


WPCMOD=-1


ENDIF


ENDIF


CIMFIL/OFF


$$ **********************************


$$ G O T O


$$ **********************************


CIMFIL/ON,GOTO


DMY=POSTF(20)


IF (WPCMOD.EQ.-1) THEN $$ First GOTO after WPC change


CURX=POSTF(1,3,344)


CURY=POSTF(1,3,345)


CURZ=POSTF(1,3,346)


PREFUN/WPC,NEXT


POSTN/OUT,X,CURX,Y,CURY


POSTN/OUT,Z,CURZ


WPCMOD=0


JUMPTO/G01


ENDIF


DMY=POSTF(21)


DMY=POSTF(13)


G01)CONTIN


CIMFIL/OFF
Edited by: appinmi
 

Sponsor

Articles From 3DCAD World

Back
Top