I dont know if this will work with standard variables
in a tmp file. But here is how I use variables between
a macro, tmp, and shape file.
In the mcl file set your variables to a certains
value (see example below)
F_OPEN[FN=c:\abtemp\Mikesk1.len, TY=R]
//
if(#total_prof_ele>=1)
#elelen1=0
#elepro1=0
F_read[FN=c:\abtemp\Mikesk1.len,FMT="%D3.4
%D3.4~n",VR="elelen1,elepro1"]
#eltype1=TYP(GRP(1))
#elstrx1=STX(GRP(1))
#elstry1=STY(GRP(1))
#elendx1=ENX(GRP(1))
#elendy1=ENY(GRP(1))
if(#eltype1=3)
#elcenx1=CEX(GRP(1))
#elceny1=CEY(GRP(1))
#elerad1=RAD(GRP(1))
else
#elcenx1=0
#elceny1=0
#elerad1=0
endif
else
#eltype1=0
#elelen1=0
#elstrx1=0
#elstry1=0
#elendx1=0
#elendy1=0
#elcenx1=0
#elceny1=0
#elerad1=0
#ellen1=0
#elpro1=0
endif
//
IN the TMP file you need a @declare section. Define
your variable type there (see example below)
Then in the @start section set the variables you want to
use in the tmp file to the variables in the mcl output
file (Mikesk1.len from above
exampe). (see example below for variable declaration in
tmp file)
@DECLARE
#INT #gum
#INT #s_on_off
#INT #s_in_out
#INT #x_sign
//
#DEC #pi
#DEC #el1type
#DEC #el1leng
#DEC #el1prof
#DEC #el1strx
#DEC #el1stry
#DEC #el1endx
#DEC #el1endy
#DEC #el1cenx
@START
EVAL(#el1type=#eltype1)
#EVAL(#el1leng=#elelen1)
#EVAL(#el1strx=#elstrx1)
#EVAL(#el1stry=#elstry1)
#EVAL(#el1endx=#elendx1)
#EVAL(#el1endy=#elendy1)
#EVAL(#el1cenx=#elcenx1)
#EVAL(#el1ceny=#elceny1)
#EVAL(#el1arad=#elerad1)
#EVAL(#el1prof=#elepro1)
> If I'm thinking what you're asking then maybe this might help...
>
> Template File:
> @START
> #EVAL(#U8=0)<FOR DEBUG HEADINGS SET U8 TO 1,SET TO 0 FOR NO DEBUG>
> #IF(#U8=1)<**** START>
> <#EVAL(#U2=0)>
> % #FILE <#S4>
> % #DATE - #SYSTIME
> %
> % CHANGE V6 ON LINE N105 TO ACCOMODATE
> % DIFFERENCE BETWEEN PRINT THICKNESS AND PART THICKNESS
> %
> #ONBLKG1G90G97F
> V6D0
> <#S1>
> <#S2>
> <#S3>
> M0 T#TOOL #TLCMT
> T#TOOL
> G39D0.0
> #IF(#TLDIA=0)<G1F#FEED>#ELSE<G1M3S#SPEEDF#FEED>
> <#EVAL(#U9=0)>
> <#EVAL(#V6=0)>
> <#EVAL(#U7=1)>
> #EVAL(#RFEED=R)
> <#EVAL(#LOFF=(#SPEED+9)/10)>
> <#EVAL(#LOFF=ABS(#LOFF))>
> <#EVAL(#LOFF=INT(#LOFF))>
> #IF(#LOFF<5)<#EVAL(#LOFF=5)>
> #IF(#TLDIA=0)<>#ELSE<G4X#LOFF.>
> G48R
> #RESET(#MOV)
> #EVAL(#V4=.03)
> #EVAL(#C0=1)
>
> @TOOLCHG
> #IF(#U8=1)<**** TOOLCHG>
> #RESET(#MOV,#XPOS,#YPOS,#FXD)
> G1Z#ZHOMERM5M9
> #IF(#U9=1)<G97F>
> <#EVAL(#V9=0)>
> <#EVAL(#V0=2)>
> <#EVAL(#V7=0)>
> <#EVAL(#V6=0)>
> <#EVAL(#C1=0)>
> <#EVAL(#PECK=0)>
> G49R
> G39D0.
> <#S1>
> <#S2>
> <#S3>
> M0 T#TOOL #TLCMT
> T#TOOL
> #IF(#U9=1)<G97F>
> #IF(#TLOP=2,AND#U9=1)<#EVAL(#FEED=#FEED*.5)>
> #IF(#TLOP=2,AND#U9=1)<G96F#FEEDD#FEED>
> #IF(#TLOP=2,AND#U9=1)<#EVAL(#FEED=#FEED*2)>
> #IF(#TLOP=2,AND#U9=1)<G96F#FEEDD#FEED>
> G39D0.0
> G1#IF(#TLDIA=0)<F#FEED>#ELSE<M3S#SPEEDF#FEED>
> <#EVAL(#LOFF=(#SPEED+9)/10)>
> <#EVAL(#LOFF=ABS(#LOFF))>
> <#EVAL(#LOFF=INT(#LOFF))>
> #IF(#LOFF<5)<#EVAL(#LOFF=5)>
> #IF(#TLDIA=0)<>#ELSE<G4X#LOFF.>
> G48R
> #IF(#TLDIA=0)<>#ELSE<#EVAL(#C0=1)>
> #RESET(#MOV)
> #EVAL(#V4=.03)
> #IF(#TLDIA<.065)<#EVAL(#V4=.05)>
> #EVAL(#U7=1)
> #EVAL(#C0=1)
> #EVAL(#ZCHK=#ZHOME)
> #EVAL(#ZPOS=#ZHOME)
> #UPDATE(#XPOS,#YPOS,#ZPOS,#ZCHK)
> #RESET(#XPOS,#YPOS,#ZCHK,#ZPOS,#C0)
>
> @END
> #IF(#U8=1)<**** END>
> G1Z#ZHOMERM5M9
> G49R
> X0.Y0.R
> G39D0.
> M30
> #OFFBLK
> %
>
>
> Mcl File:
> // Production_Milling 11.5 Windows 10/16/98 16:52:40 Macro File
> // w:\mcl\1.mcl
> // CREATED: 06/29/00
> //
> // turns debug headings on for T5 & T1
> ELMT_SEQ[BA=1, EL="1", ME=1]
> UEVENT[XS=ENX(1), YS=ENY(1), LV=2, TX="#EVAL(#U8=1)"]
> //
> // turns debug headings for all remaining tools
> ELMT_SEQ[BA=1, EL="28", ME=1]
> UEVENT[XS=ENX(28), YS=ENY(28), LV=0, TX="#EVAL(#U8=0)"]
>
> Coded File:
> % 1 CD245265-022 REV.AC OP.1
> % 06/29/00 - 11:14AM
> %
> % CHANGE V6 ON LINE N105 TO ACCOMODATE
> % DIFFERENCE BETWEEN PRINT THICKNESS AND PART THICKNESS
> %
> N100G1G90G97F
> N105V6D0
> N110M0 T5 5/8 X 90 SPOT DRILL L
> N115T5
> N120G39D0.0
> N125G1M3S54F1.2
> N130G4X6.
> N135G48R
> N140 G1Z2.0R
> N145X-0.25Y-0.75R
> N150**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N155V60D0.1005
> N160V64D.1
> N165V66D0.03
> N170V67D12
> N175X-0.25Y-0.75R
> N180Z0.1R
> N185M8
> N190M2008
> N195**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N200V60D0.2109
> N205X-1.0Y-0.75R
> N210M2008
> N215**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N220X-2.25Y-3.0R
> N225M2008
> N230**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N235V60D0.25
> N240X-3.75Y-0.75R
> N245M2008
> N250**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N255V60D0.2109
> N260X-6.0Y-0.75R
> N265M2008
> N270**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N275V60D0.25
> N280X-9.25Y-0.75R
> N285M2008
> N290**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N295V60D0.1005
> N300X-9.75Y-0.75R
> N305M2008
> N310**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N315V60D0.2109
> N320X-10.5Y-0.75R
> N325M2008
> N330**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N335X-11.5Y-5.25R
> N340M2008
> N345**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N350V60D0.1005
> N355X-9.75Y-5.25R
> N360M2008
> N365**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N370V60D0.25
> N375X-9.25Y-5.25R
> N380M2008
> N385**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N390V60D0.2109
> N395X-6.0Y-5.25R
> N400M2008
> N465**** TOOLCHG
> N470 G1Z2.0RM5M9
> N475G49R
> N480G39D0.
> N485M0 T1 1/8 CENTER DRILL H
> N490T1
> N495G39D0.0
> N500G1M3S68F1.0
> N505G4X7.
> N510G48R
> N515**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N520V60D0.15
> N525V64D.1
> N530V66D0.03
> N535V67D10
> N540X-3.2585Y-3.0R
> N545Z0.1R
> N550M8
> N555M2008
> N560**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N565X-11.133Y-2.405R
> N570M2008
> N575**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N580X-4.631Y-2.83R
> N585M2008
> N695**** FXD2=Type Spot Drill=M2008 Bostomatic Drill Cycle with Dwell
> N700X-11.133R
> N705M2008
> N710 G1Z2.0RM5M9
> N715G49R
> N720G39D0.
> N725M0 T14 11/32 DRILL(.344) L
> N730T14
> N735G39D0.0
> N740G1M3S98F1.3
> N745G4X10.
> N750G48R
> N755V60DV6+1.7033
> N760V63D0.25
> N765V64D.1
> N770V66D0.04
> N775V67D13
> N780X-3.2585Y-3.0R
> N785Z0.1R
> N790M8
> N795M2000
> N800X-11.133Y-2.405R
> N805M2000
> N810 G1Z2.0RM5M9
> N815G49R
> N820G39D0.
> N825M0 T15 23/64 DRILL(.359) L
> N830T15
> N835G39D0.0
> N840G1M3S94F1.3
> N845G4X10.
> N850G48R
> N855V60D1.708
> N860V64D.1
> N865V66D0.04
> N870V67D13
> N875X-3.2585Y-3.0R
> N880Z0.1R
> N885M8
> N890M2007
> N895X-11.133Y-2.405R
> N900M2007
> N905 G1Z2.0RM5M9
> N910G49R
> N915G39D0.
> N920M0 T16 15/32 DRILL(.469) L
> N925T16
> N930G39D0.0
> N935G1M3S72F1.5
> N940G4X8.
> N945G48R
> N950V60DV6+1.7408
> N955V63D0.25
> N960V64D.1
> N965V66D0.04
> N970V67D15
> N975X-3.75Y-0.75R
> N980Z0.1R
> N985M8
> N990M2000
> N995X-9.25R
>
> In the .pm4 file I'm using user_cmd to eval #U8 to turn on and off debug
> headings via a .mcl file.
>
> -----Original Message-----
> From: Joe Geraci [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, June 29, 2000 11:08 AM
> To: 'Michael Senack'; 'Smartcam' (E-mail)
> Subject: RE: [mfg-smartcam] tmp variable initialized
> from a macro
>
>
> Sorry,
>
> User defined template variable, although in this case I
> would be using
> #U0-#U19
> -----Original Message-----
> From: Michael Senack [mailto:[EMAIL PROTECTED]]
> <mailto:[mailto:[EMAIL PROTECTED]]>
> Sent: Thursday, June 29, 2000 11:04 AM
> To: 'Joe Geraci'; 'Smartcam' (E-mail)
> Subject: RE: [mfg-smartcam] tmp variable initialized
> from a macro
>
>
> Exactly what is a " udtv variable"?
> -----Original Message-----
> From: Joe Geraci
> [mailto:[EMAIL PROTECTED]] <mailto:[mailto:[EMAIL PROTECTED]]>
> Sent: Thursday, June 29, 2000 10:37 AM
> To: 'Smartcam' (E-mail)
> Subject: [mfg-smartcam] tmp variable
> initialized
> from
> a macro
>
> Hi Everyone,
> Can anyone show me a example of how to set a udtv
> variable
> from a macro,
> I'm looking to test (In the tmp file) for a given
> situation
> (macro
> created usr_cmd) in the shape file.
> Thanks,
>
> J.G.
>
>
> ======================================================================
> To find out more about this mailing list including how
> to
> unsubscribe,
> send the message "info mfg-smartcam" to
> [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
>
>
> ======================================================================
> ======================================================================
> 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]
======================================================================
