LISP to change UCS rotation

[oldsoftboss]

I have a project that has half the building square, and half is at an angle of 10 deg

 

I seem to be constantly typing:

 

UCS [enter]

Z [enter]

10 [enter]

 

then to change it back:

 

UCS [enter]

Z [enter]

-10 [enter]

 

Would like to make a couple of keyboard shorcuts to carry out theses commands.

Is this possible?

 

Thanks,

Dave.

[lpseifert]

(defun c:z+ () (command "ucs" "z" "10"))
(defun c:z- () (command "ucs" "z" "-10"))

[oldsoftboss]

Thanks for that, works a treat.