Polar Problems

Just a brief description of my troubles would be:
When setting text insertion point using polar command, it was staggering my text at an angle of approx. 349 degrees.

pt1tt = (2.45614e+006 235208.0)

(command ".pline" PT1TT (polar PT1TT 270 8.10))

Pretty basic code, can't figure out why if I take the same code and paste into acad, and specify 90,180, & 270 degrees it draws polylines at approx. 116 degrees apart.
Ucs is set to world, Plan is set to world, units are set to decimal, no snap, no osnaps.
Any suggestions????

 

Polar function angles are in Radians.


Bill

 

Bill,
I also tried converting the angles (angtof "270" 3)
The results are the same.

 

Maybe these two sub-functions can help.

Tim

(defun DTR (a) ;Degrees to radians conversion
(* pi (/ a 180.0)))

(defun RTD (a) ;Radians to degrees conversion
(* 180.0 (/ a pi)))

 

That worked!!!!
Thanks

 

And you often don't need the conversion program
if you can remember a few basic angles.
Deg Rad
0 0
30 (/ pi 6)
45 (/ pi 4)
60 (/ pi 3)
90 (/ pi 2)
180 pi
270 (* pi 1.5)