用這幾個FIL 取代 原來的FIL 試試看
CIMFIL/ON,LOADTL
IF (OKCOM.EQ.0) THEN
rslt=POSTF(20) $$ Save current Record
INSERT/' G91 G28 Z0.$'
XX=POSTF(21) $$ Load the save Record
XX=POSTF(13) $$ Process current CL
ELSE
$$ Tool name programmed
XX=POSTF(2,1,1867,1) $$ no tape output
DMY=POSTF(13) $$ process tool change
TNUM=POSTF(7,4) $$ Tool number
XX=POSTF(2,1,1867,0) $$ re-activate tape output
INSERT/' G91 G28 Z0.$'
INSERT/'T',TNUM,'M6(',NMESS,')$'
ENDIF
CIMFIL/OFF |