本帖最后由 作者 于 2005-8-14 16:20:39 编辑
谁能编出cass软件中“面积调整”这个功能的LISP程序:
面积调整
通过调整封闭复合线的一点或一边,把该复合线面积调整成所要求的目标面积。复合线要求是未经拟合的。
如果选择调整一点,复合线被调整顶点将随鼠标的移动而移动,整个复合线的形状也会跟着发生变化,同时可以看到屏幕左下角实时显示变化着的复合线面积,待该面积达到所要求数值,点击鼠标左键确定被调整点的位置。如果面积数变化太快,可将图形局部放大再使用本功能。
如果选择调整一边,复合线被调整边将会平行向内或向外移动以达到所要求的面积值。
如果选择在一边调整一点,该边会根据目标面积而缩短或延长,另一顶点固定不动。原来连到此点的其它边会自动重新连接。 |