Visual LISP, AutoLISP and General Customization

Visual LISP, AutoLISP and General Customization

Valued Contributor
Posts: 98
Registered: ‎06-11-2004
Message 1 of 4 (739 Views)

AutoLisp Script to Move Points

739 Views, 3 Replies
11-05-2010 08:17 AM
It has been a long time since I used Lisp. I have a file with 820 points. These points were generated by the laser inspection machine. We have scanned the shape of the part so that we can mace drawings for the mating part. The problem is that these points are at different heights in "Z" plane. I have to move all of them to "Z" zero so I can "connect the dots" and create the the basic shape/lines. I would like to make Autolisp routine to select all of the 820 points and keep their "X" and "Y" values but move the only in "Z". If you have any ideas could you please e-mail it to me: By the way this web page looks horrible on my computer; does anybody else have the same issue?
Distinguished Mentor
Posts: 889
Registered: ‎08-08-2006
Message 2 of 4 (725 Views)

Re: AutoLisp Script to Move Points

11-06-2010 10:40 AM in reply to: A_James_A

Have you tried to select the points and edit the Z value (Position Z) to 0 in Properties?

~~~Civil 3D 2008~~~
*Expert Elite*
Posts: 2,459
Registered: ‎11-24-2009
Message 3 of 4 (710 Views)

Re: AutoLisp Script to Move Points

11-07-2010 03:15 AM in reply to: lpseifert

if you have Express Tools , use FLATTEN...


just curios though.. are you taliking about "POINT" the entity type?

in that case just change tjhe elevation to 0...  via properties.


come to think of it, either way properties (ctrl+1) should work if its and single entity with varying z elevation


I'm confuse

now i'm not making sense


Posts: 846
Registered: ‎12-26-2005
Message 4 of 4 (707 Views)

Re: AutoLisp Script to Move Points

11-07-2010 04:00 AM in reply to: A_James_A
The are plenty of routines to flatten, or make Z to be 0, in the autolisp world. Search on this forum, and by Google. If the point data is imported as coordinate data, You could also make the Z changes in data, before making the points; post a small data file, if possible.
Are you familiar with the Autodesk Expert Elites? The Expert Elite program is made up of customers that help other customers by sharing knowledge and exemplifying an engaging style of collaboration. To learn more, please visit our Expert Elite website.
Need installation help?

Start with some of our most frequented solutions or visit the Installation and Licensing Forum to get help installing your software.