Incremental Numbering Suite

[BIIST]

hello

 

i got a lot of problem with that script...every time a load it ...a system variable has been changed

for exemple:

- cursor factor

- some time i can't select a text/line ...

- sometimes i can't even change a system variable (some become red only) and i can't get any option when using some standard command like rec,l etc... ( must reboot autocad to fix it)

 

what is the problem?

[Lee Mac]

I very much doubt that my program is the cause of your System Variables changing. My program only changes two System Variables: (DIMZIN / MODEMACRO), and these are only changed when the program is run and are reset when the program is completed, and also reset in the error handler.

[ragin]

Thanks a LOT Lee Mac for this time saver. It will help me a lot. Sometime ago my friend developed a small .fas file to quickly add Room Name, & the size of the Room. I just had to invoke the routine, It asked me for the scale, then Room Name, then asked me to click diagonally opposite corners of the room & I had the Room name & the size of the room printed where I clicked. Somehow it doesn't seem to work in Autocad 2012. In the last step where I click the location of text, it says unknown command & prints 0.00000000 & 0.00000000 one below the other where I was expecting BEDROOM & 12'-0" X 14'-0" below it. Can I find a similar lisp routine somewhere? Will you help me? Thanks a lot.

[Lee Mac]

Thank you ragin, I'm glad you like my program.

 

From your description, it sounds like your friend used the Text command in his/her program without accounting for variations in TextStyle Text height (since, if the height is zero there will be an extra prompt in the Text command). And so the program is perhaps printing the value of the rotation prompt as the text string. It is far safer / faster / more robust to use either entmake(x) or the AddText / AddMText methods for this purpose.

 

I'm sure there are similar programs to be found online.

[CAB]

Here is one I wrote when I first learned LISP.

http://www.theswamp.org/index.php?topic=149.msg1309#msg1309

 

The 4 picks do not have to be in corners nor do they need to be aligned with the x or y axis

But the room rectangle must be parallel to the x/y axis.

 

You may modify as needed.

[ragin]

Thanks a lot CAB. Will check it out. Might save me a LOT of time again.

 

Here is one I wrote when I first learned LISP.

http://www.theswamp.org/index.php?topic=149.msg1309#msg1309

 

The 4 picks do not have to be in corners nor do they need to be aligned with the x or y axis

But the room rectangle must be parallel to the x/y axis.

 

You may modify as needed.

 

well I saved your text to an lsp file, loaded it. Can't invoke it by typing rmsize. where am I going wrong?

Ok, THANKS, I got it to work. Is there a way to add a room name to it & align them in 2 lines? I am not really good at programming.

Edited November 23, 2011 by ragin

[ragin]

Can you suggest a good one please? I have tried searching but couldn't find any. Thanks.

 

PS : It worked perfectly till version 2011.

 

Thank you ragin, I'm glad you like my program.

 

From your description, it sounds like your friend used the Text command in his/her program without accounting for variations in TextStyle Text height (since, if the height is zero there will be an extra prompt in the Text command). And so the program is perhaps printing the value of the rotation prompt as the text string. It is far safer / faster / more robust to use either entmake(x) or the AddText / AddMText methods for this purpose.

 

I'm sure there are similar programs to be found online.

[Organic]

Is there a way to include a space character as part of the prefix? I.e. I would like a prefix of "Lot " so that the incremented text would be Lot 01, Lot 02 etc. I could get it to do Lot 1, although it would then go Lot02, Lot03 etc.

[Lee Mac]

Is there a way to include a space character as part of the prefix? I.e. I would like a prefix of "Lot " so that the incremented text would be Lot 01, Lot 02 etc. I could get it to do Lot 1, although it would then go Lot02, Lot03 etc.

 

Hi Dink,

 

After a quick test, I can enter a prefix of "Lot " with a 'Middle' text of "01" and the program will generate:

 

"Lot 01"

"Lot 02"

"Lot 03"

etc.

 

Is this not the desired result?

[nicpapa]

Hi there .. This is amazing software, the only thing if it possible to write the leters in greek ? like Α Β Γ Δ Ε ? If i put greek leter in numincl it holds the leter and it begin writes Αα , Βα , Cα, Dα.

[Lee Mac]

Thank you nicpapa

 

The increment engine in the current version will only support [A-Z, a-z, 0-9].

 

Lee

[nicpapa]

ok thanks , if you make anew version of lisp , can you add the greek letters?( if it easy , if not forget it) Thanks again. And congratulations for your work.

[Lee Mac]

Thank you nicpapa, I will keep your suggestion in mind

[BIIST]

HELLO

 

it's possible de change the increment number of this script Automatically Label Attributes from 1 to any other number...and how?

 

thanks in advance

[Lee Mac]

it's possible de change the increment number of this script Automatically Label Attributes from 1 to any other number...and how?

 

I haven't tried it, but change the 'setq' expression in Line 57 to:

 

(setq n (+ n <YourNumberHere>))

 

Where is the numberical increment you wish to use.

 

Also, change Line 114 to:

 

(setq n (+ n <YourNumberHere>))

[EBROWN]

Hi Lee,

 

Could the Automatically Lable Attributes handle Alphanumeric labeling.

 

Thanks

[Lee Mac]

Could the Automatically Lable Attributes handle Alphanumeric labeling.

 

A Prefix/Suffix text could be quite easily incorporated, but alphabetical labeling would take quite some more work.

[BIIST]

i changed the incrementable to 2 instead of 1, and used a number as a prefix ....wont work unfotinaley

plz check the attached file...may be i did a mistake

 

thanks

TEST.lsp

[Lee Mac]

You didn't follow my instructions. Re-read post #255.

 

Also, I would prefer if you did not post the modified version.

[paulsm11]

mr Lee Mac well done on a fantastic piece of work, im new to all this but this is gonna win me some brownie points, thanks a million!!

what other little snippets do you have!?