Moving objects a distance based on dimscale

[scottPBYAJ]

Hello to you wonderful people. I have been dabbling with LISP and would like to know what is the correct routine for the following,

I want to simple move the previously selected objects direct up a distance equal to dimscale x8 

(defun c:MJ () (COMMAND "MOVE" "P" "" 0,0  0,(* 8 (getvar "dimscale"))) (princ) ;suppresses nil return )

The problem is it stops the command after getvar.

Your help is greatly appreciated

[Kent1Cooper · Accepted solution]

You're mixing AutoLisp list format and keyboard-entry format.  Comma-separated coordinates are keyboard entry format, and can't include an AutoLisp expression directly.  Try this:

(defun c:MJ () (COMMAND "MOVE" "P" "" '(0 0) (list 0 (* 8 (getvar "dimscale"))))

No comma between the coordinates in a list, including between the bold-italic zero and AutoLisp function.  You could also use "0,0" [with the comma but in quotes, as a text string as you would type in] for the start point.

[scottPBYAJ]

Thank you Kent works as intended. I'll need to do some more research on the '

[Kent1Cooper]

---

@scottPBYAJ wrote:
.... I'll need to do some more research on the '

---

On that subject, you should read in the AutoLisp Reference about both the (list) and (quote) functions, which are kind of inter-related in relation to that.