在之间插入分界点
嗨，朋友们，我需要插入指定分割点的小型自动化。这里我需要两种类型的点。一是最高点，二是最低点。程序如下：
1） 输入命令，
2） 拾取第一个点和第二个点（例如：第一个点是A，第二个点是B，
3） 然后在拾取点之间建立顶部和底部点（例如：在A和B之间）
顶点的规则是拾取点距离除以3（例如：AB/3）
底部点的规则是拾取点距离除以8（例如：AB/8）
例如：
1） 我在A点选取第一个点，在B点选取第二个点
2） A和B之间的距离为12'-8“
3） 对于顶点12'-8“/3=4'-10”
3） 所以从平行到A的顶点是4'-10“，从平行到B的顶点是4'-10“。
4） 对于底点12’-8“/8=1’-7”
5） 所以从平行到A的底点是1’-7”，从平行到B的底点是1’-7”。
6） 同样，B&C也是如此
请查找示例文件。
谢谢
点除以拾取点。图纸 拾取中心A（getpoint
拾取中心B（getpoint
如果不是水平（角度
距离A-B（距离
A-B的偏移量1（getdist
A-B的偏移量2（getdist
D1=距离A-B/3（/
D2=距离A-B/8（/
然后使用双极（setq newpt（polar（polar ptA（/pi 2.0）offset1））0.0 D1））
对极角=PI的另一侧再次执行
在newpoint处放置一个点（命令“point”
对其他偏移点重复此操作
通过lisp进行一次非常简单的尝试，这里有很多人可以编写完整的代码，但像我一样，我们喜欢看到人们自己尝试。 Hii Bigal朋友，
感谢您的回复：）。是的，希望有人能得到帮助。
谢谢
页:
[1]