Dimensioning in Lisp

This is making me crazy(er?)! I have a nice, long, Lisp with almost every CAD command in it. It is basically a learning exercise to familiarize myself with the command applications in Lisp. I reach one of the last sections, and... nothing I try has worked. I simply want to replace some dims that were erased earlier. My lines are not p-lines. The code for this section is below. Can someone please give me a hint? The discussions I have found were concerning p-lines, or were completely over my rookie-Lisper head! Thanks for any ideas!

Doug

 
; add 3 new dimensions
(setq dim1 (getpoint "\nFirst dim. point :"))
(setq dim2 (getpoint "\nNext dim. point :"))
(command "._dimlinear" "_non" dim1 "_non" dim2) 

(alert "yes?")
(princ)
) ;end of program

You have to specify the end point of the Dim. Text.

Regards,

Tharwat

Try this in your command line .....

(command "_.dimlinear" '(0 0 0) '(100 0 0) '(0 10 0))

Thanks for the help, but as soon as I clicked on "dim2", it skipped right to my alert message. I'm only drawing in 2D- should I adjust something? I understand that there must be some method of aligning the text and lines, but just can't seem to find it...

Thanks again, tho!

Yes. that means you did not give it a try ... so take it completely.

(setq dim1 (getpoint "\nFirst dim. point :"))
(setq dim2 (getpoint "\nNext dim. point :"))
(setq dim3 (getpoint "\n dim. Text location :"))
(command "._dimlinear" "_non" dim1 "_non" dim2 "_non" dim3 ) 

Works like a charm now, and I understand where I went wrong- which makes it even better! I did not add the "dim3" line, just substituted your command line with the coordinates. A rookie mistake by a rookie programmer.

Thank you so much! I'm off to learn more now!

Doug

You're welcome any time ..

Regards,

Tharwat