【原创】AutoLISP 程式設計

sjgau

繼續，寫一個 AutoLISP 程式，解決以下問題  
  
已知 一線段 P1 - P2  
和 一個圓 PC, R  
  
求作，一個弧，過 P1點，和圓相切，半徑等於 R1  
  
此 LISP 程式，會要求使用者點選 P1點  
大致的切點 P3，並要求輸入 R1  
然後，自動畫出目標弧。  
  
如果 input 有錯，無解的話，也要提供適當的錯誤訊息。