Have you tried putting the string for #VAR1 in quotes?
STRING: #VAR1
#VAR1=".pm4 +Y"
==================================================
Fred Lauzus, CAM Programming Coordinator
High Steel Structures, Incorporated
mailto:[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
http://www.highsteel.com <http://www.highsteel.com/>
==================================================
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Michael Senack
Sent: Monday, March 29, 2004 8:07 PM
To: [EMAIL PROTECTED]
Subject: [mfg-smartcam] How do insert spaces
When I concatenate the =STRTMP("%#HEADING%#VAR1") in the macro below,
the space in #VAR1=.pm4 +Y gets deleted.
Instead of .pm4 +Y I get .pm4+Y
Is there a way of getting this space back in?
// Advanced_Wedm 11.5 Windows 10/16/98 16:48:10 Macro File
// w:\mcl\NEWBLOCK.mcl NEW carbide die section or punch BLOCK
// CREATED: 09/27/01
//
// Instructions:
// ============
// 1) edit the three variables #HEADING, #LENGTH and #WIDTH
//
// 2) open any latest die section block ie W:\360\KZ94\KZ94-8
// and macro, execute
VAR_REMOVE_ALL[]
//PAUSE[TX="The so far so good macro pause!", LR=10, LC=5, SR=2, SC=40,
PT=1]
STRING: #HEADING
STRING: #VAR1
#VAR1=.pm4 +Y
// *********** modify these next three variables *************
#HEADING = W:\360\KZ94\KZ94-10
#LENGTH=8+3/32
#WIDTH=5.330
#THICKNESS=1.312
GRAPHICS_OFF[]
SELECT_ALL[]// ++
LAYER_GRP[AR=1, LY="22"]// remove L22 from the selection set
GRP_DELETE[]// Ctrl & D
MOD_LINE[EL=1, XS=0, YS=0, ZS=0, XE=#LENGTH, YE=0, ZE=0, SE=2, SS=2]
MOD_LINE[EL=2, XS=#LENGTH, YS=0, ZS=0, XE=#LENGTH, YE=#WIDTH, ZE=0, SE=2,
SS=2]
MOD_LINE[EL=3, XS=#LENGTH, YS=#WIDTH, ZS=0, XE=-0, YE=#WIDTH, ZE=0, SE=2,
SS=2]
MOD_LINE[EL=4, XS=0, YS=#WIDTH, ZS=0, XE=0, YE=0, ZE=0, SE=2, SS=2]
MOD_TEX[EL=5, LV=0, XE=-0.0, YE=#WIDTH+.15, TX=STRTMP("%#HEADING%#VAR1"),
HT=0.25, AN=360]
RANGE_GRP[AR=0, E1=1, E2=4]// select outside profile
PCHG_LY[PN=1, PT=-#THICKNESS ]// change the profile top to be the thickness
NEW_GRP[]
// save the file
AUTO_ANSWER[AA="OK"]
SAVE[FN=STRTMP("%#HEADING"), FT=3, WF=0, GS=0, WP="XY_PLANE"]
AUTO_ANSWER[AA="OFF"]
GRAPHICS_On[]
FULL[]
Regards,
Michael Senack
======================================================================
To find out more about this mailing list including how to unsubscribe,
send the message "info mfg-smartcam" to [EMAIL PROTECTED]
======================================================================
