Get XY Coords

how to get x & y coords from given angle and distance.

i need a code for that

if Distance=80, Angle=45.....i want to draw line with first point A(0,0) to the next point B from given distance and angle.

I know i can use @distance

Kindly reply

Thanks a lot:)

(Setq B (polar A [angle in radians] distance))

Try this .

(setq b (polar '(0. 0. 0.) (/ pi 4.) 80.))

A bit more

(defun dtr (a)
(* pi (/ a 180.0))
)
(setq pt1 (getpoint "\nPick point")) 
(setq ang (dtr (getreal "\nEnter angle")))
(setq dist (getreal "\nEnter distance"))
(Setq pt2 (polar pt1 ang dist))
(princ pt2)

(setq ang ([b]getangle[/b] "\nEnter angle"))

Thanks a lot guys........ its working great for me:thumbsup:

i want to ask 1 more thing while drawing leader from entmakex

what is code for arrow head type, i want to give user arrow head by block

hmmmn. never tried creating a leader using entmakex before. Hows about showing us your code satishrajdev

       (entmakex (list '(0 . "LEADER")
	       '(100 . "AcDbEntity")
	       '(100 . "AcDbLeader")
	       '(410 . "Model")
	       (cons 10 (trans B 1 0))
	       (cons 10 (trans A 1 0))
	       '(71 . 1)
	       '(72 . 0)
	       '(73 . 3)
	       '(74 . 0)
	       '(75 . 0)
	       '(76 . 2)
	 )
      )

I want to change arrow head to "user Arrow" and specify a blockname for that

My guess is it will be too complicated compared to AddLeader Method. But i'm pretty sure it can be done.

Ok.

Then any suggestions from your side, or any else way to do this????