AutoCAD_Polar coordinates(극좌표계)

Polar coordinates(극좌표계)란??

평면위의 좌표를 각도와 거리를 입력해서 움직이는 2차원 좌표계이다.
즉 기준점에서 설정한 거리와 각도만큼 움직인다.
절대좌표(원점기준에서 거리와 각도값만큼 이동) 와 상대좌표(특정 위치 기준에서 거리와 각도값만큼 이동)를 사용할 수있다.

Absolute Polar (절대좌표)

명령어 Line

시작 point (2,2)

다음 point 6.4(거리) < 38.65(각도).

참고 - point는 오로지 (0, 0, 0)이나 UCS 기준에의해서 움직인다.

거리 공식 

L은 거리값, X 와 Y값은 결과값

각도 공식

38.65값은 각도값, a값은 Y/X

결과적으로 (0, 0)에서 거리 6.4만큼 각도 38.65움직인 위치가 point (5, 4)이다.
아무리 시작점이 (2, 2) 이여도 절대좌표이기때문에 움직일 기준은 (0, 0)이다.

Relative polar (상대 좌표)

명령어 Line

시작점 (2,2).

다음 point는 @ 3.6(distance) < 33.69(angle)

참고 - 다음 Point 계산은 마지막으로 설정한 좌표기준으로 움직인다.

거리 공식

L은 거리값, X 와 Y는 결과 좌표값

각도 공식

33.69 값은 각도값, a 의값은 Y/X 

만약 @3.6 <-33.69 와같이 각도를 음수로 했다면 좌표도 반대방향으로 움직인다.

결과는 (2, 2) 의 시작점이 기준이되고 (2, 2)에서 거리 3.6, 각도 33.69만큼 움직여서 (5, 4) 에 위치한다.

시스템 변수 

ANGDIR = 각도값의 방향을 정해준다. (0 반시계방향 / 1 시계방향)
ANGBASE = 각도방향의 기준을 정해준다. (0 동쪽 / 90 북쪽 / 180 서쪽 / 270 남쪽)

참고 App

https://apps.autodesk.com/ACD/ko/Detail/Index?id=5985029222038390140&appLang=en&os=Win32_64&autostart=true 

CADKING 에서 만든 App으로써 사용자가 도면안의 명령어 Prompt에서 Polar값을 자동적으로 알수있게 해준다.

Polar를 이용한 Auto리습 

(setq pt1 '(3.0 6.0 0.0))
(setq pt2 '(5.0 2.0 0.0))
(setq base '(1.0 7.0 0.0))
(setq rads (angle pt1 pt2)) ; Angle in XY plane of current UCS
; (value is returned in radians)
(setq len (distance pt1 pt2)) ; Distance in 3D space
(setq endpt (polar base rads len))



설명
Base 포인트가 Pt1 에서 pt2 사이의 Polar값대로 움직이게하기.
(setq pt1 '(3.0 6.0 0.0))
--Pt1 변수설정
(setq pt2 '(5.0 2.0 0.0))
--pt2 변수설정
(setq base '(1.0 7.0 0.0))
--base 변수설정 (절대좌표나 상대좌표를 사용하고싶으면 base 변수를 써야한다.)
(setq rads (angle pt1 pt2))
--pt1 과 pt2의 각도값 설정(라디안값으로 저장)
(setq len (distance pt1 pt2))
--pt1 과 pt2의 거리값 저장
(setq endpt (polar base rads len))
--Polar값 리턴

Polar lisp 기능은 base point에서 라디안, 거리값 만큼 이동한다.