tan-point-rad 원그리기

안녕하세요
캐드 초보입니다.

한원에 탄젠트 하면서 한점을 지나는
반지름이 몇인 원을 그리려 합니다.

물론 여러 명령을 쓰면 어렵게 그려지던데요
한두번의 명령어로 그릴 수 있나요
명령어가 따로 있나요
아님
lisp 같은 것이 있나요
부탁합니다.

자주 반복을 해야하는데 그리는 시간이 넘 오려걸려서요

그럼 답변 부탁합니다.