Mode:
Duration:
1
2
3
4
5
6
7
(defun c:MoveObjects ()
(setq ss (ssget))
(setq base (getpoint "\nBase point: "))
(setq target (getpoint "\nTarget point: "))
(command "_.MOVE" ss "" base target)
(princ)
)Coding works best on desktop or with an external keyboard.