1. Home
  2. AutoCAD discussions
  3. Moving set ss to 0,0,0

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
Reply to
David Penney
Loading thread data ...
(command "_.move" ss "" pt1 '(0 0 0)) ___
Reply to
Paul Turvill
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
Reply to
bestafor
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.)
Reply to
TomD
Thanks for you input
DP
Reply to
David Penney
Thanks Tom for clarifying...
DP
Reply to
David Penney

Further Reading

  • Welding SS to CRS

  • I thought there was a post on this recently but I can't find it, so...

  • Welding neodymium magnets to SS

  • I'm looking to build chip trays for my lathe with a minimum ofmodification...

  • hi to all

  • What gets compressed? Loudness? File size? Air?Jerry

  • What would you use to lubricate drawer slides

  • I Would like to lubricate drawer slides (friction, not ball bearing),and wanted...

  • Command exist or not !!! How to find?? LISP

  • Hi,i want to know if the command exist in the autocad or not. Actually iam using...

  • Lisp?

  • Yardz a écrit :It looks like you need a specific application LISP or VBA, I...

  • Moving object along an axis command?

  • Hi,I am looking for the command in a lisp that would move and another commandto...

  • Free lisp program to replace Acad distance command

  • HowFar lisp is a FREE lisp program to measure the exactdistance and the X and Y...

  • *Free* lisp program to replace Acad distance command

  • HowFar lisp is a FREE lisp program to measure the exactdistance and the X and Y...

  • Free lisp program to replace Acad distance command

  • HowFar lisp is a free lisp program to measurethe exact distance and the X and...

  • Free lisp program to replace Acad distance command

  • HowFar lisp is a free lisp program to measure the exact distance and the X and...

  • Move UCS with Lisp

  • Howdy,I know this has been asked in the past. I haven't been using lisp to...

  • bond UHMW to SS

  • I need to bond a small stip of UHMW plastic to 304 stainless steel. How?Karl

  • LISP - Extract all blocks with atrributes to file

  • I need to write a lisp routine(to use in console command) to list allthe blocks...

  • weirdness in move command

  • I should know this butrelease 2000, I have to use a starting coordinate and then...

  • AUTOCAD 2004 from 5 users till 25

  • hi there, I can sell my programms and if you interesting mailto: Solidworks 2004...
  • « previous thread

  • file help

  • is it possible to get a drawing back if I overwrite it? TIA Rob It depends. If...
  • next thread »

PolyTech Forum website is not affiliated with any of the manufacturers or service providers discussed here. All logos and trade names are the property of their respective owners.