Author Topic: Align Text Routine  (Read 21256 times)

0 Members and 1 Guest are viewing this topic.

Notsober

  • Guest
Re: Align Text Routine
« Reply #30 on: November 25, 2008, 11:59:32 AM »
here's before and after dwg's


CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Align Text Routine
« Reply #31 on: November 25, 2008, 12:08:56 PM »
OK, it appears as though you want 2-1/8" vertical spacing between the mtext objects.

I was thinking about a prompt for spacing, "Auto" "Fixed" "None"
Auto would be the formula I am using now.
Fixed would be a User entered distance.
None would be to use the existing vertical spacing.

Would that resolve the issue?
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

Notsober

  • Guest
Re: Align Text Routine
« Reply #32 on: November 25, 2008, 12:16:46 PM »
OK, it appears as though you want 2-1/8" vertical spacing between the mtext objects.

I was thinking about a prompt for spacing, "Auto" "Fixed" "None"
Auto would be the formula I am using now.
Fixed would be a User entered distance.
None would be to use the existing vertical spacing.

Would that resolve the issue?


PERFECT option!

CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Align Text Routine
« Reply #33 on: November 26, 2008, 05:35:38 PM »
Here is another version. I think the Spacing option is working correctly.
The routine always starts in the Auto Mode.
There is Help screen.
The Horizontal is not operational.

« Last Edit: November 26, 2008, 06:12:18 PM by CAB »
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

Pad

  • Bull Frog
  • Posts: 342
Re: Align Text Routine
« Reply #34 on: June 30, 2009, 08:32:29 AM »
Hi CAB

hope you don't mind me resurrecting this old post?
I use your text align group (in particular AT command) a lot.
I have a small problem.
The attached dwg, will hopefully clarify things.
The text is all centre justified, after running 'AT' the justified text moves slightly off.
autocad 2004, CAB013

Thanks
Pad

CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Align Text Routine
« Reply #35 on: June 30, 2009, 09:41:40 AM »
Thanks for the input.

Enter this at the command line
Code: [Select]
(setq atdebut t)Then run you test again.
You will see that the "Text Box" used to create the alignment is correct.
The problem is that the "Center Justification" for the word SURVEY does not agree exactly with the
text box created. Because my routine uses the Text Box & not the alignment point there can be
small variations.
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

Pad

  • Bull Frog
  • Posts: 342
Re: Align Text Routine
« Reply #36 on: June 30, 2009, 10:06:08 AM »
Ah I see.

I entered (setq atdebut t) and nothing different to before happened (no text box).
Searching the Text Align Group CAB013.LSP with notepad didn't show up any atdebut variable?

Everything is fine,can live with the slight variation.
Very useful routine, so thanks a lot!

CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Align Text Routine
« Reply #37 on: June 30, 2009, 10:25:16 AM »
See attached lisp with debug code.

Note that Tim Willey has a routine that uses the alignment point. I'll see it I can find it here.

« Last Edit: June 30, 2009, 01:45:11 PM by CAB »
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

T.Willey

  • Needs a day job
  • Posts: 5251
Re: Align Text Routine
« Reply #38 on: June 30, 2009, 11:16:57 AM »
Note that Tim Willey has a routine that uses the alignment point. I'll see it I can find it here.

I posted one in this thread here ( if that is the one you're thinking of ):
[ http://www.theswamp.org/index.php?topic=25824.msg310952#msg310952 ]
« Last Edit: June 30, 2009, 01:45:25 PM by CAB »
Tim

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

Please think about donating if this post helped you.

Pad

  • Bull Frog
  • Posts: 342
Re: Align Text Routine
« Reply #39 on: June 30, 2009, 01:26:25 PM »
Thanks Tim.
Your lu.lsp lines them up perfectly.
CAB what I really liked about yours is that it fixed the line spacing at the same time.
So i'lll stick with your routine and maybe run the lu.lsp after.

Cheers

CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Align Text Routine
« Reply #40 on: June 30, 2009, 01:52:23 PM »
That's the one Tim, right under my nose.  :?
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Align Text Routine
« Reply #41 on: October 14, 2009, 06:01:34 PM »
Minor update.

<edit : Modified version 14a>
« Last Edit: October 15, 2009, 10:25:53 AM by CAB »
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

antistar

  • Guest
Re: Align Text Routine
« Reply #42 on: April 03, 2012, 10:09:33 AM »
Minor update.

<edit : Modified version 14a>

CAB,
Great work, is very useful for me.
But does not support horizontal alignment?

GDF

  • Water Moccasin
  • Posts: 2081
Re: Align Text Routine
« Reply #43 on: April 03, 2012, 05:10:39 PM »
Check out this routine for stacking dtext:
TIP1483.LSP: TXTSTACK.LSP   Restack Text   (C)1998, Terry W. Dotson
Why is there never enough time to do it right, but always enough time to do it over?
BricsCAD 2020x64 Windows 10x64