Visual LISP, AutoLISP and General Customization

Visual LISP, AutoLISP and General Customization

Reply
Distinguished Contributor
kpennell
Posts: 521
Registered: ‎04-14-2004
Message 1 of 4 (149 Views)
Accepted Solution

Getangle with two getpoints

149 Views, 3 Replies
06-01-2012 05:23 AM

I thought this could do it:

 

 (setq rotate1 (getpoint))
 (setq rotate2 (getpoint))
 (setq ang (getangle rotate1 rotate2))
 (princ ang)

 

Or this:

 

 (setq rotate1 (getpoint))
 (setq rotate2 (getpoint))
 (setq ang (getangle "(rotate1 rotate2)))
 (princ ang)

 

Or this:

 

 (setq rotate1 (getpoint))
 (setq rotate2 (getpoint))
 (setq ang (getangle (list rotate1 rotate2)))
 (princ ang)

 

Do I have to do the trig calculations?

 

Thanks

KP

*Expert Elite*
pbejse
Posts: 2,462
Registered: ‎11-24-2009
Message 2 of 4 (148 Views)

Re: Getangle with two getpoints

06-01-2012 05:31 AM in reply to: kpennell

(setq ang (angle rotate1 rotate2))

Distinguished Contributor
kpennell
Posts: 521
Registered: ‎04-14-2004
Message 3 of 4 (146 Views)

Re: Getangle with two getpoints

06-01-2012 05:35 AM in reply to: kpennell

Seriously?  Bloody hell.

 

Sorry for using up the thread space.

*Expert Elite*
pbejse
Posts: 2,462
Registered: ‎11-24-2009
Message 4 of 4 (140 Views)

Re: Getangle with two getpoints

06-01-2012 05:41 AM in reply to: kpennell

kpennell wrote:

Seriously?  Bloody hell.

 

Sorry for using up the thread space.


Really really :smileyhappy:

 

For more complex angle codes try the search button and type  "angle, you will see loeads for solutions

 

Cheers

 

Announcements
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.