area turning cycle

[batenceto]

Hello, I'm trying to write a postprocessor for Fanuc
system to generate area turning cycle G70 and G71. After
generating Cl Data File with this postprocessor message I
get TERMINATED WITH FIL FILE ERRORS. What I wrote is as
follows:

CIMFIL/ON,CYCLE
CIMFIL/ON,GOTO
CLC=POSTF(7,2)&nbs p;$$ $FCLASS, 2D PARAMERER OF RECORD
SCL=POSTF(7,3)&nbs p;$$ $FSUBCL, 3RD PARAMETER OF RECORD
IF(CLC.EQ.2000.AND.SCL.EQ.(ICODEF(CYCLE))) THEN
ILOOP=12&nbs p; $$ EXIT THE LOOP
ELSE
XX=POSTF(13) $$ PROCESS
ENDIF
END02) CONTIN$$ END OF DO LOOP
$$ DBLCOM 442 : CURRENT SEQNO ( END OF PROFILE )
ENDN=POSTF(1,3,442)
$$ RE-DIRECT OUTPUT TO TAPE
XX=POSTF(25,0)
$$ OUTPUT CYCLE
SEQNO/OFF
DMY=POSTF(2,1,6,FREG) $$ ENABLE F
$$ OUTPUT ROUGHING CYCLE
POSTN/OUT,O,STARTN,G,71,P,
(START+INCR),Q,ENDN,U,UVAL,W,WVAL,D,DVAL,F,FVAL
$$ READ THE FINISH PROFILE FROM AUXILIARY TAPE
L10)CONTIN
T0=TEXT/READ,PUNCH
I1=CMPRF(T0,TEF)
IF(I1.EQ.1)JUMPTO/L90
INSERT/T0,'$'
JUMPTO/L10
L90/CONTIN
SEQNO/ON
$$ END OF CYCLE
$$ OUTPUT FINISH CYCLE
POSTN/OUT,G,70,P,(START+INCR),Q,ENDN
$$ DE-ACTIVE MACRO ON MOTION
XX=POSTF(26,5,5,0)


If anyone can help I would be very grateful.
Regards,
Batentseto

 

[dbrainsky]

To start with:


CIMFIL/ON,CYCLE
CIMFIL/ON,GOTO



Since CIMFIL/ON, GOTO is directly after the CIMFIL/ON,CYCLE. The cycle macro is being ignored. I don't see the CIMFIL/OFF either.


Open the *lst file with a wordpad type editor and look for the error.

 

[batenceto]

Thanks for the reply will check and give reply if there is
improvement and if things were fine. Once again thank you.

regards
batentseto

 

[paul_w]

2011-11-10_061509_areaturning.zip


see if this helps, i've never used it, but it looks like it addresses what you are trying to do.

 

[batenceto]

Thanks for the material. We'll look closely and hope to do
for me. Thanks once more.
regards