안녕하세요. 선배님들,
다름아니라 제가 설계하는데 있어서 간단한 명령어를 통해 만드려고 하는데
좌즉 점과 우측 점을 통해서 사각형을 구현하는데 까지는 성공하였습니다.
여기에 repeat함수랑 getint함수를 사용해서 입력받은 값 만큼 사각형안에 y축으로 나누어주고 싶은데
질문있어서 조심스레 글 남겨봅니다.
(setq pt1 (getpoint “좌측 하단점을 입력하세요” ))
(princ “우측 상단점을 입력하세요”)
(setq pt2 (getpoint pt1))
(setq pt3 (list
(car pt2)
(cadr pt1)
)
)
(setq pt4 (list
(car pt1)
(cadr pt2)
)
)
//(setq mpt1 (list // mpt는 제가 따로 테스트용으로 만든거라 무시하셔도 됩니다!! //
(/ (+(car pt1)(car pt3)) 2)
(cadr pt1)
)
)
(setq mpt2 (list
(car pt3)
(/ (+(cadr pt3)(cadr pt2)) 2)
)
)
(setq mpt3 (list
(/ (+(car pt2)(car pt4)) 2)
(cadr pt2)
)
)
(setq mpt4 (list
(car pt4)
(/ (+(cadr pt1)(cadr pt4)) 2)
)
)
(command “line” pt1 pt3 pt2 pt4 pt1 “”)
//(command “line” mpt1 mpt2 mpt3 mpt4 mpt1 “”)//
(princ)
)
와 너무 감사드립니다. 소스에 파악 하는데 정말 큰 도움이 되었습니다! Y축말고도 X축으로도 할수 있겠네요!
1. 입력하는 y축으로 나눠준다는건 이런식으로 나눈다는 말인가요 ?