I think this might be an answer. Try something like this...

@START
#EVAL(#U8=0)<FOR DEBUG HEADINGS U8 IS 1,SET TO 0 FOR NO DEBUG>
#IF(#U8=1)<**** START >
#EVAL(#C1=1)
#EVAL(#U0=1)
#EVAL(#U2=#BLK+70)
#EVAL(#U3=1750)
#EVAL(#U4=60)
#OFFBLK
%
#S0 #C5
<#C4 #S1 #C5>
<#C4 #S2 #C5>
<#C4 #S3 #C5>
<#C4 #S4 #C5>
( INPUT G92X20.676 Z )

#ONBLK
#C3G20G90G95#TLID
#IF(#SPMODE=1)<#CALL(START-CSS)>#ELSE<#CALL(START-RPM)>

@START-CSS
#IF(#U8=1)<**** START-CSS >
#EVAL(#V2=(#SPEED*3.82)/#XPOS)
#C3G97S#FMT(#V2,T4.0)#SPNDL
#C3#MOVX#XPOSZ#ZPOST#FMT(#XSET,F4.0)  <------------------------------- USE
XPOS & ZPOS FOR 1ST TOOL
#C3G92S#FMT(#ZSET,T4.0)
#C3#SPMODES#SPEED
#C3G04X1.0T#FMT(#TOOL,F2.0)#FMT(#XSET,F2.0)( #TLCMT )
#IF(#TOOL<7)<#C3G00M08>#ELSE<#C3G00M12>

@START-RPM
#IF(#U8=1)<**** START-RPM >
#C3#SPMODES#SPEED#SPNDL
#C3#MOVX#XPOSZ#ZPOST#FMT(#XSET,F4.0)  <-------------------------------USE
XPOS & ZPOS FOR 1ST TOOL
#C3G04X1.0T#FMT(#TOOL,F2.0)#FMT(#XSET,F2.0)( #TLCMT )
#IF(#TOOL<7)<#C3G00M08>#ELSE<#C3G00M12>

@TOOLCHG
#IF(#U8=1)<**** TOOLCHG >
#EVAL(#U4=60)
#IF(#SPMODE=1)<#CALL(TOOLCHG-CSS)>#ELSE<#CALL(TOOLCHG-RPM)>

@TOOLCHG-CSS
#IF(#U8=1)<**** T00LCHG-CSS >
#C0
#C3#MOVX#XHOMEZ#ZHOMET#FMT(#XSET,F4.0)#SPOFF
#IF(#C1=0)<#C3#C1( #S9 )>#ELSE<#C3#C1>
#EVAL(#C1=1)
#OFFBLK

#ONBLK
#EVAL(#V2=(#SPEED*3.82)/#XHOME)
#C3G95#TLID
#C3G97S#FMT(#V2,T4.0)#SPNDL
#C3#MOVX#XHOMEZ#ZHOMET#FMT(#XSET,F4.0)  <-------------------------------
THEN USE XHOME & ZHOME ON REST OF TOOLS
#C3G92S#FMT(#ZSET,T4.0)
#C3#SPMODES#SPEED
#C3G04X1.0T#FMT(#TOOL,F2.0)#FMT(#XSET,F2.0)( #TLCMT )
#IF(#TOOL<7)<#C3G00M08>#ELSE<#C3G00M12>
#EVAL(#C1=1)

@TOOLCHG-RPM
#IF(#U8=1)<**** TOOLCHG-RPM >
#C0
#C3#MOVX#XHOMEZ#ZHOMET#FMT(#XSET,F4.0)#SPOFF
#IF(#C1=0)<#C3#C1( #S9 )>#ELSE<#C3#C1>
#EVAL(#C1=1)
#OFFBLK

#ONBLK
#C3G95#TLID
#C3#SPMODES#SPEED#SPNDL
#C3#MOVX#XHOMEZ#ZHOMET#FMT(#XSET,F4.0)
#C3G04X1.0T#FMT(#TOOL,F2.0)#FMT(#XSET,F2.0)( #TLCMT )
#IF(#TOOL<7)<#C3G00M08>#ELSE<#C3G00M12>
#EVAL(#C1=1)

@END
#IF(#U8=1)<**** END >
#C0
#C3#MOVX#XHOMEZ#ZHOMET#FMT(#U0,F4.0)#SPOFF
#C3M30
#OFFBLK
%

In order to make the above template work I put a point with the first tool
in my shape file at my x & zhome tool change position. This is coded using
the x & zpos line and outputs the proper tool change position. Then when I
do a tool change, the template picks up the x & zhome position using x &
zhome from the 1st point in the shape data base. Each tool that comes after
the 1st tool all begin with a clearance point in the shape file.

Bye.

-----Original Message-----
From: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
Date: Tuesday, June 20, 2000 8:16 AM
Subject: [mfg-smartcam] TMP FILE


>HERE IS CODE ON A MILL TURN AND THE SECOND TOOL X ZND Z COME OUT WITH HOME
>POSITION NOT CLEARANCE POSITION WHAT DO I NEED TO ADD TO MY TMP FILE TO
>CORRECT IS PROBLEM.
>
>
>N06 (#3 C'DRILL )
> M45
> G28 H0
> G00 T0606
>G97 S3000 M13
>G98 X0.9285 Z0.1 ******
>*****
>Z-0.63 C-0.0 M8********
> G87 X0.5098 P100 F9.0
> G00 X0.9285 C90.0
> G87 X0.5098 P100
> G00 X0.9285 C180.0
> G87 X0.5098 P100
> G00 X0.9285 C270.0
> G87 X0.5098 P100
> G80 M09
> G00 G99 X6.0 Z6.0 M5
> T0600
> M1
>
> N07 (3/16 STUB DRILL )
> M45
> G28 H0
> G00 T0707
>G97 S3000 M13
>G98 X6.0 Z0.1 *****
>*****
>Z6.0 C0.0 M8*******
> G87 X0.4328 Z-0.63 Q900 F9.0
> G00 X0.9285 C90.0
> G87 X0.4328 Q900
> G00 X0.9285 C180.0
> G87 X0.4328 Q900
> G00 X0.9285 C270.0
> G87 X0.4328 Q900
> G00 G99 X6.0 Z6.0 M05
> T0700
> M9
>M46
> M1
>
>======================================================================
>To find out more about this mailing list including how to unsubscribe,
>send the message "info mfg-smartcam" to [EMAIL PROTECTED]
>======================================================================

======================================================================
To find out more about this mailing list including how to unsubscribe,
send the message "info mfg-smartcam" to [EMAIL PROTECTED]
======================================================================

Reply via email to