Moving set ss to 0,0,0

Hi all...
What would the lisp command be to move my selection set entities "ss" from "pt1" to 0,0,0 ?
BTW....I want pt1 to be the "inbase" value of the drawing....whatever the value. Would the following line be correct...?
(setq pt1 (getvar "insbase"))
TIA
DP
Add pictures here
✖
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
(command "_.move" ss "" pt1 '(0 0 0)) ___

Add pictures here
✖
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
HiHo; Yes the setq pt1 is ok, BUT, When the command "move" is executed Where is the base point for said selection set? Also if pt1 is used in a command preface it with a ! symbol. i.e. !pt1

Add pictures here
✖
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
bestafor wrote:

Yes, and no. The full lisp routine would be something like:
(defun C:MOVE0 ( / ss pt1 pt2 ) (setq ss (ssget "X") pt1 (getvar "INSBASE") pt2 (list 0.0 0.0 0.0) );setq (command ".MOVE" ss "" pt1 pt2) );defun
If manually passing a variable to a command, then yes, precede it with an exclamation point. Within a lisp routine, no. (Just trying clarify.)
Add pictures here
✖
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
Thanks Tom for clarifying...
DP

Add pictures here
✖
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload
Thanks for you input
DP

from
the
Add pictures here
✖
<% if( /^image/.test(type) ){ %>
<% } %>
<%-name%>
Add image file
Upload

Site Timeline

Related Threads

Polytechforum.com is a website by engineers for engineers. It is not affiliated with any of manufacturers or vendors discussed here. All logos and trade names are the property of their respective owners.