Lisp矩形旋转-添加f

marmo · 发表于 2022-7-5 19:47:07

我不认识lisp，
所以我想问一下，是否有人能够通过添加3个新特性来修改此代码以改进它。
我使用这段代码绘制矩形，就像它们是墙一样，因此可能会出现一些输入重复的情况。

1）因此，我希望实现的代码能够存储为矩形两侧键入的最后一个值，并可以通过按enter键进行确认，例如存储最后一个半径的圆形命令。

2）第二个改进是即使在绘制矩形的第一个边之后也可以保持活动捕捉（在某些情况下可能很有用）。

3）第三个改进是允许您始终朝着鼠标指针的位置绘制第二条边，事实上，这段代码根据第一条边的倾角处理第二条边的坐标，因此在某些情况下，有必要键入负值，以便在我想要的边上绘制矩形。

谢谢你的帮助。
拉加德斯
马可

RECTROT。LSP