编写一个autolisp程序，从p1点，画线到p2点，然后从p2点画线到p3点，两条线夹角为90°
编写一个autolisp程序，从p1点，画线到p2点，然后从p2点画线到p3点，两条线夹角为90°，然后倒圆角R=20，请问这个程序应该怎么写，我知道画线这个的写法，请问...
编写一个autolisp程序，从p1点，画线到p2点，然后从p2点画线到p3点，两条线夹角为90°，然后倒圆角R=20，请问这个程序应该怎么写，我知道画线这个的写法，请问后面倒角应该怎么写？
（setq p1(getpoint"")
(setq p2(polar p1 0 50)
(setq p3(polar p2 (* 0.5 pi) 50))
(command "line" p1 p2 p3 "")
..........
请问后面倒角应该怎么写 展开
（setq p1(getpoint"")
(setq p2(polar p1 0 50)
(setq p3(polar p2 (* 0.5 pi) 50))
(command "line" p1 p2 p3 "")
..........
请问后面倒角应该怎么写 展开
展开全部
(setq p1(getpoint""))
(setq p2(polar p1 0 50))
(setq p3(polar p2 (* 0.5 pi) 50))
(command "line" p1 p2 "")
(setq l1 (entlast))
(command "line" p2 p3 "")
(setq l2 (entlast))
(command "FILLET" "R" 20)
(command "FILLET" l1 l2)
追问
多谢这位兄台，两次回答我的问题了。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
