继续求帮助 加旋转预览的功能
本帖最后由 xj6019 于 2022-12-11 12:02 编辑代码求加上预览功能 鼠标上下移动的时候希望看到能生成的形状保留鼠标移动时移动的黄色虚线
(if(and(setq ss(ssget))
(setq pt(getpoint "\n基点を指定"))
(setq pt1(getpoint pt "\n向上逆時針90度,向下順時針90度:"))
)
(if(<(cadr pt1)(cadr pt))
(command".rotate" ss "" pt "-90")
(command".rotate" ss "" pt "90")
))
)
古董帖子,散了散了,不要凑热闹了!!!!
同一个问题发一堆贴子,一堆人给你解释还想要人给你把每个代码都改完整,这种简单的东西自己学一下不好么,大家又不是没事要做.
把你这一大堆改成这一行就行了,本来就是cad原始的功能
(if (setq ss(ssget)) (command".rotate" ss ""pause pause)) 本帖最后由 xj6019 于 2019-12-27 17:48 编辑
wyl219 发表于 2019-12-4 11:41
同一个问题发一堆贴子,一堆人给你解释还想要人给你把每个代码都改完整,这种简单的东西自己学一下不好么,大 ...
00000000000000000000000000000000000000000000000000000000000 就算你买了邀请码也不能要求另一个买了邀请码无偿帮助你啊,论坛有论坛的规矩,简单问题先查文档,困难百度,解决不了google。再难的论坛没有人会也没有人能帮你。你可以花钱帮你解决。 本帖最后由 xj6019 于 2019-12-27 17:48 编辑
xinxirong 发表于 2019-12-4 12:57
就算你买了邀请码也不能要求另一个买了邀请码无偿帮助你啊,论坛有论坛的规矩,简单问题先查文档,困难百度 ...
0000000000000000000000000000000000000000000000 想学习可以发贴问,只要有回答的意义,都会有人帮忙,毕竟都是从两眼摸黑的新手过来的.
想抄代码就发悬赏呗.
wyl219 发表于 2019-12-4 13:19
想学习可以发贴问,只要有回答的意义,都会有人帮忙,毕竟都是从两眼摸黑的新手过来的.
想抄代码就发悬赏呗.
...
嗯 好的,说实在的,我也感觉到了,老是麻烦人也不好,再有解决不掉的问题,也花钱请教吧 现在高版本的CAD2014以上的,都自带这种功能 感觉不需要编程啊。打开正交或极轴,再用旋转命令即可。
页:
[1]