Part of a lisp file I am working on is intended to rotate a rectangle by 90deg about the 'Y' axis.
Sound simple enough.
Here is the code, ENT_L1 is the object & 'rxl' is 225, with 'ag_l' being 90deg
Code: Select all
(command "_Rotate3D" ENT_L1 "" (strcat (rtos rxl) ",0,0") (strcat (rtos rxl) ",500,0") ag_l "")
The result was not as I expected!
OK, so I'll draw a line to represent the rotation axis:
Code: Select all
(command "_Line" (strcat (rtos rxl) ",0,0") (strcat (rtos rxl) ",500,0") "")
So why does the line state at @0,0,0?
Command line:
Command: _Line
ENTER to use last point/[Follow]/<Start of line>: 225,0,0
[Angle/Length]/<End point>: 225,500,0
[Angle/Length/Follow/Undo]/<End point>:
rxl = 225
Command: '_PMTHIST