Rotate UCS Twice?

I have the need to rotate the UCS twice in order to dimension easier.

I need to Rotate the UCS to an object, and then rotate it 90 on the Z axis.

I ahve tried to run this as a script, but can not figure out how to break the command to allow me to select a line in the middle.

Any help would be great thanks!

(defun c:u2 ( )
   (command "_.ucs" "_OB" "\\" "_.ucs" "_Z" 90)
   (princ)
)

Hahaha. 2 back slahes was all I needed?

Maybe one day I will actually learn this crazy lisp language.

Thanks for the help Lee Mac!!

Hahaha. 2 back slahes was all I needed?

 

Maybe one day I will actually learn this crazy lisp language.

Or alternatively, you could use the pause symbol, which is predefined to hold the value of "\\" (note: "\\" is a single backslash in LISP, since "\" is an escape character).

Hence the code could also become:

(defun c:u2 ( )
   (command "_.ucs" "_OB" pause "_.ucs" "_Z" 90)
   (princ)
)

However, I prefer to use the literal backslash since the pause symbol cannot be localised by the calling function and hence could potentially be redefined to hold another value by other programs that are running.