Author Topic: Text Styles  (Read 3344 times)

0 Members and 1 Guest are viewing this topic.

Luke

  • Guest
Text Styles
« on: September 15, 2009, 09:51:45 AM »
Can anybody help me out with a lisp or script that will do the following...
 
Everything should happen when you open the drawing.  I can not require my guys to run something when they open AutoCAD ( I mean I can it just won’t happen). I need it to happen automagically. 
 
1) Text Style is called LCC
Change the font from Arial to Romans .85%Width x 0height
 
2) Text Style is called LCC_Romanm2
Change the font from Arial to Romanm2 .95%Width x 0height
 
3) Text Style is called LCC_Romanm2
Rename it to be called LCC_BOLD
 
I already have #1 & # 2 working through simple lisps.
 
The problem I am now having is with #3.  If only LCC_Romanm2 text style exists I can rename it super easy with a simple lisp.  But if LCC_BOLD already exists I need it merge the 2 different styles and hold the properties described in #2.
 
I know I should probably be using the standards checker but I have a hard enough time getting my guys to stick to the simple drawing standards I ask of them, there is now way I'm going to be able to get them to run and use the standards checker on every drawing.

T.Willey

  • Needs a day job
  • Posts: 5251
Re: Text Styles
« Reply #1 on: September 15, 2009, 11:16:32 AM »
If you want to merge text styles, then you can use this
[ http://www.theswamp.org/index.php?topic=17659.0 ]
Tim

I don't want to ' end-up ', I want to ' become '. - Me

Please think about donating if this post helped you.

Luke

  • Guest
Re: Text Styles
« Reply #2 on: September 15, 2009, 11:19:58 AM »
I swear Tim I just finished looking at that like 1 minute ago.

It will totally work for me but I'm never going to get the other guys in the office to actually use it.  They could care less if there are 1 or 500 text style in their drawings.  I'm trying to make it all happen behind the sceens. 

T.Willey

  • Needs a day job
  • Posts: 5251
Re: Text Styles
« Reply #3 on: September 15, 2009, 11:29:36 AM »
Maybe you could just recode it then to not use the dialog box.  I forget how it is coded, but hopefully it won't be too hard to do.  I might be able to help, if needs be.  A little busy with real w*rk though.
Tim

I don't want to ' end-up ', I want to ' become '. - Me

Please think about donating if this post helped you.

GDF

  • Water Moccasin
  • Posts: 2082
Re: Text Styles
« Reply #4 on: September 15, 2009, 12:14:52 PM »
I guess you could have a routine to run in your startup function (see enclosed lisp). I have my cleanup in a dialog box.
It cleans up the drawing to the correct dimstyles, textstyles, layers, etc...by checking off what you want to cleanup.

You will need to modify it to meet your own requirements of course. It just to give you an idea.

Why is there never enough time to do it right, but always enough time to do it over?
BricsCAD 2020x64 Windows 10x64