【已解决】请教autolisp fillet圆角半径过大问题

冰禁

请教各路晓东论坛大神，我在公司使用的autolisp编写的插件，autocad2019无更新情况下，fillet圆角可以正常工作。但是更新了2019.1 Update以后的补丁，就会出现问题，无法fillet圆角。
这插件2000年左右写的，我不太懂autolisp，而且这插件写的好大，研究来研究去，感觉问题出这

1. (setvar "filletrad" elb_r)                ;; 2008/5/28
   
2. (command "fillet" elbrob1 elbrob2)
   

(setvar "filletrad" elb_r)                ;; 2008/5/28<br /> (command "fillet" elbrob1 elbrob2)<br />

这里的elb_r是半径，我看了，数值也获取到了
然后elbrob1 elbrob2  要圆角的对象，对象也对。
但是运行程序，画90度直角，正常情况下直角会变圆角，但是现在提示fillet半径过大，手动点CAD圆角图标，用同样的elb_r半径值却能正常圆角。
然后我想是不是程序没正常接收到半径数值
我就改了改代码，尝试一下手动输入半径

1. (setq r(getreal "输入半径"))
   
2. (setvar "filletrad" r)
   
3. (command "fillet" elbrob1 elbrob2 )

(setq r(getreal "输入半径"))<br /> (setvar "filletrad" r)<br /> (command "fillet" elbrob1 elbrob2 )

这次似乎有点改善，10画直角，有7次能正常圆角了。但还是没解决问题。
所以觉得好奇怪，这到底是什么原因。各位大神有没有遇到过这怪问题，是不是AUTOCAD设定上问题？还是AutoCAD2019补丁后，命令变更过了？


我也尝试过这个，也没什么效果。

1. (setq r(getreal "输入半径"))
   
2. (command "fillet" "R" r)
   
3. (command "fillet" elbrob1 elbrob2 )
   

(setq r(getreal "输入半径"))<br /> (command "fillet" "R" r)<br /> (command "fillet" elbrob1 elbrob2 )<br />

或者command换成vl-cmdf 也没效
如何有大神知道的话，或者能告知有什么查错方法，还望不奢指教，谢谢！
AutoCAD 无更新初期版本 ok
2019.0.1 Update ok
2019.1 Update  X 问题出现
2019.1.1 Update X 问题出现
2019.1.2 Update X 问题出现

-------------------------------------------------------------
谢谢各位，这个问题已经解决
原来代码是(fillet 实体1 实体2)
后来改成 (fillet 实体1的点 实体2的点)

marting

没更新前，对于很大的半径，你的代码什么表现？

冰禁

marting，你好。
是这样的，这个插件是画管子的，所以他的弯头都是固定度数，比如说90度，然后半径大小的值都是预先设置好的，没有计算公式，根据选用的管子的粗细提取相应的半径值。