If you use a lot of UCS's try this. (great for 3D work)
Instead of saving/recalling a UCS, it is easier to insert a text label in the drawing for each UCS.
While in the UCS you want to save, Use DT (dynamic text) to place a text label anchored at the origin.
Anytime you want to recall that UCS use a keyboard shortcut to align the ucs with that text entity:
(DEFUN C:uu () (COMMAND "UCS" "E")) ; Align ucs with entity
I usually copy the text into any layer that I might use it from.
An added advantage is that when I copy and insert these layers into a new drawing, the text (and therefore the UCS's) get inserted too.
Bill
I use something similar. I assign the keys of the keypad to the different isometric views. 5 = top, 2 = front, 4 = left, 1 = swiso .... Then I can change views with 1 key press.
(defun C:2 (/ )
(command "view" "front")
(princ)
)
Gerry
Mach3 2010 Screenset
http://home.comcast.net/~cncwoodworker/2010.html
(Note: The opinions expressed in this post are my own and are not necessarily those of CNCzone and its management)