Inserting text, and editing it Lisp...

[Guest lesliematt]

Revamp:

 

I need a program to do somethimg like this....

 

Text size=0.1875

Width Factor=0.8

 

Pick point

Offset from that point 1" down

Start text box "Quantity= (user input)"

Start text box just below previous one "Material= (user input)"

Start text box just below previous one "Thickness = (user input)"

Start text box just below previous one "Name= (user input)-1"

Start text box just below previous one "Machine=Trumf L2530 PLUS"

Repeat

 

Pick point

Offset from that point 1" down

Start text box "Quantity= (user input)"

Start text box just below previous one "Material= (user input)"

Start text box just below previous one "Thickness = (user input)"

Start text box just below previous one "Name= (user input)-2"

Start text box just below previous one "Machine=Trumf L2530 PLUS"

Repeat

...

...

To exit, hit esc and the increment value will reset to 0

 

Now the tricky part is that in the 'Name' text box, the user will input the Drawing Name and it will be stored as a variable (lets call it 'dname'). Then every time the program repeats and comes to the point where the user is to put in a 'Name', the program will automatically insert 'dname'. The '-1' will increment by 1 everytime a new point is picked as well. I am not sure how to interact with text in this way, and not even sure if it is possible. Any help is appreciated.

Text to insert.dwg

Edited July 29, 2010 by lesliematt
Revamp

[alanjt]

Seems like you have it figured out. Just prompt the user for each change you want (thickness, etc.) and create your text object.

[alanjt]

Break the text up at that point and increment from there.

[Guest lesliematt]

This is what I have so far. It is a DCL/Lisp combo and I have no idea how to do anything with text in visual lisp. Any pointers are always helpful.

 

-M

SFMNT Data 2.lsp