What i am trying to do is to build a line and a circle in autocad using lisp.
The code:
( DEFUN C:myprog ()
( COMMAND "_erase" "_all" "" )
( COMMAND "_line" ( LIST 10 10 ) ( LIST 10 100 ) "" )
( COMMAND "_circle" "10.0,50.0" 30.0 "" )
)
As a result I get a correctly build line, but a wrong circle. The center of the circle is in the point (10,10) - the beginning of the line. But it's supposed to be in (10,50).
What am I doing wrong?
The code:
( DEFUN C:myprog ()
( COMMAND "_erase" "_all" "" )
( COMMAND "_line" ( LIST 10 10 ) ( LIST 10 100 ) "" )
( COMMAND "_circle" "10.0,50.0" 30.0 "" )
)
As a result I get a correctly build line, but a wrong circle. The center of the circle is in the point (10,10) - the beginning of the line. But it's supposed to be in (10,50).
What am I doing wrong?