chiefchang 发表于 2006-6-27 15:31:00

求教：如何编程实现公差的自动添加和修改

各位大侠：我想做个按钮，能够自动修改选中尺寸的公差。能否指教一二？多谢。

chiefchang 发表于 2006-6-27 15:49:00

<P>中心线自动画法：</P>
<P>(defun centerradius() <BR>&nbsp;(setq point (osnap (getpoint"\n选择圆:") "nea")<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; center (osnap point "cen")<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; radius (distance point center))<BR>)&nbsp;&nbsp;&nbsp; <BR>(defun c:ce(/ p1 p2)<BR>&nbsp;(command "osnap" "")<BR>&nbsp;;(centerline)<BR>&nbsp;(centerradius)<BR>&nbsp;(setq p1 (polar center pi (+ radius 3))<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; p2 (polar center 0&nbsp; (+ radius 3)))<BR>&nbsp;(command "line" p1 p2 "")<BR>&nbsp;(command "osnap" "end,int,cen")<BR>&nbsp;;(solidline)<BR>)</P>

qjcpj 发表于 2006-6-28 00:54:00

2楼，好像文不对题哟！

chiefchang 发表于 2006-6-28 15:39:00

有没有大侠可以指点一两个lisp函数用于修改尺寸公差啊？

chiefchang 发表于 2006-6-30 17:08:00

help......

ZZXXQQ 发表于 2006-7-1 21:41:00

chiefchang 发表于 2006-7-3 11:54:00

真不知道该怎么感谢你啊... ...

killer9806 发表于 2006-7-8 01:04:00

解救万民与水火之中
页: [1]
查看完整版本: 求教：如何编程实现公差的自动添加和修改