다른 님의 lisp 을 수정했는데…

14년쯤 전에 acad11 일대 1달정도 lisp을 배운적이 있어서
다른님의 lisp을 받아서 수정을 했는데…
원하는대로 잘 안되네요..모르는게 다인거 같아서리…부탁드립니다.
요기조기 조금씩 고쳤는데… 글자크기와, 원의 크기가 바뀌더라도 라인이 원의 밖에 와야되는데…원 안으로 지나가요…라인이 원의 밖으로 생기게 위치를 잡을수가 없네요…
쫌 갈켜주세요