|
Not that I’ve found.
I’ve assigned this DIM.mcl to my F4 function key
// Advanced_Wedm 11.0 Windows 02/19/98 15:39:49 Macro File // W:\MCL\DIM.mcl // CREATED: 05/11/98 // // This macro sets up the Dimension Paramenters for dimensioning. // You have to enter the dimension height and the number of decimal places. // The macro puts the dimensions on layer 44, in white on Z_Level of zero. // Note: I used layer 44 so you can read it in to SmartCam V4.5 // only after you have exploded layer 44 ! // VAR_REMOVE_ALL[] //PAUSE[TX="The so far so good macro pause!", LR=10, LC=5, SR=2, SC=40, PT=1]
// check HEIGHT variable // WHILE(#HEIGHT<=0)// check HEIGHT to see if it is bigger then zero // the \n acts a c/r page 66 Automating SmartCAM with Macros PAUSE[TX="ERROR: The HEIGTH of the dimension must\n be greater then zero!", PT=1] // Include box cancel option #HEIGHT=1000000 // this resets HEIGHT variable to an unknown value ENDW
// check DECIMAL variable
WHILE(#DECIMAL<1,OR#DECIMAL>6)// check DECIMAL to see if it is between 1 and 4 PAUSE[TX="ERROR: The number of decimal\n places must be between 1 and 4", PT=1] // Include box cancel option #DECIMAL=1000000 // this resets DECIMAL variable to an unknown value ENDW
GRAPHICS_OFF[]
DIM_RECT[XE=0, YE=0, XS=0, YS=0, XI=0, YI=0, LV=0, TX="0.0000", AL=0, DT=0, NF=#DECIMAL, EG=0, ED=0, DG=#HEIGHT/4, L1=1, L2=1, HT=#HEIGHT, LA=#HEIGHT/1.2, AR=1, FN="D:\\SM11\\shared\\fonts\\Afont.sh2", AF="D:\\SM11\\shared\\fonts\\arrow.sh2"] UNDO[]
DIM_TEX[XE=0, YE=0, LV=0, AL=0, AN=0, DG=#HEIGHT/4, HT=#HEIGHT, LA=#HEIGHT/1.2, AR=1, FN="D:\\sm11\\shared\\fonts\\Afont.SH2", AF="D:\\sm11\\shared\\fonts\\arrow.SH2", CL={0, 0, 0} ] UNDO[]
COLOR_CHG[CO=7, TY=1, TL=44, ST=0]
COLOR_CHG[CO=7, TY=1, TL=20, ST=0]// change x0y0 & wire start holes on die section blocks from dark red to white NEW_GRP[]
ELMT_SEQ[BA=1, EL="TOTEL()", ME=0]
LAYER_GRP[AR=0, LY="44"] ON_LAYER[LY=44, WP="XY_PLANE", PT=0] PCHG_LY[ PN=1, PT=0] PCHG_LY[ PN=0]
NEW_GRP[]
GRAPHICS_ON[]
When I print a setup sheet I do this
1) File, Save As, hold down the Shift down and press the Home to highlight the whole file name i.e. W:\AG4000\AG4265A and press Ctrl & C to copy it 2) Press the F4 key to run the DIM.mcl macro and enter in a size that I think is appropriate to my file 3) Then I click the “Open Dimensions Toolbox” Icon 4) In the “Dimen Text” panel Text box I press Ctrl & V to paste the file name 5) Click the on words “Text/Leader Point(s):” for double coordinates and click on the screen where I want my file name to be displayed. 6) If I do not like the size I press the “Undo” button and repeat steps 2,3,4 and 5
Looks like a lot of work but after doing it a few times it is nice way to document your Print Graphic. All our dimensioning is on Layer 44 color White so you can change the macro to suit your preferences.
Regards, Michael Senack
-----Original Message-----
Is there anyway when I do a Print Graphics for the File Name to be printed out like it was in some of the early versions?
I know that I could use text but I thought there might be another way.
Thanks for the help
Tony Gossett CNC programmer Kays Engineering Inc. Marshall, MO 65340
|
- [mfg-smartcam] A question for all Tony Gossett
- RE: [mfg-smartcam] A question for all Michael Senack
- RE: [mfg-smartcam] A question for all Dave Hayden
