bikeboy 发表于 2007-8-11 02:54:00

<p>原马应该有的 找找看看</p>

120120 发表于 2007-8-11 12:04:00

<p>论坛上的都不像他那样的.</p><p>中心线他的可以框选的.论坛上找的都不都框选,要单一选择很麻烦</p><p>表面粗糙度他的可以自动识别方位.斜线时会自动跟斜线平行的.输入大小比例很方便.还要表面粗糙度什也很方面.</p><p>总的来说燕秀的功能比较人性化和智能化..</p>

120120 发表于 2007-8-11 17:25:00

没会人啊/?我晕

xyp1964 发表于 2007-8-12 01:12:00

;;; 中心线<br/>(defun c:test ()<br/>&nbsp; (CMDLA0)<br/>&nbsp; (setq&nbsp;ukw (UKWORD 7 "1 2" "中心线方式: 1-实体/2-选择集" ukw)<br/>&nbsp;ss&nbsp; (ssget)<br/>&nbsp;i&nbsp;&nbsp; -1<br/>&nbsp; )<br/>&nbsp; (xyp-MkLaCo "中心线" 1)<br/>&nbsp; (setvar"osmode"0)<br/>&nbsp; (cond&nbsp;((= ukw "1")<br/>&nbsp; (while&nbsp;(setq s1 (ssname ss (setq i (1+ i))))<br/>&nbsp;&nbsp;&nbsp; (command "select" s1 "")&nbsp;&nbsp;&nbsp; <br/>&nbsp;&nbsp;&nbsp; (aaa (ssget "p"))<br/>&nbsp; )<br/>&nbsp;)<br/>&nbsp;((= ukw "2")<br/>&nbsp; (aaa ss)<br/>&nbsp;)<br/>&nbsp; )<br/>&nbsp; (CMDLA1)<br/>)<br/>(defun aaa (ssel / pts pt2 pt4 pt6 pt8)<br/>&nbsp; (setq&nbsp;pts (xyp-get-SSMinMaxPts ssel)<br/>&nbsp;pt2 (nth 1 pts)<br/>&nbsp;pt4 (nth 3 pts)<br/>&nbsp;pt6 (nth 5 pts)<br/>&nbsp;pt8 (nth 7 pts)<br/>&nbsp; )<br/>&nbsp; (command "line" pt2 pt8 "")<br/>&nbsp; (command "line" pt4 pt6 "")<br/>)

Jeff101217 发表于 2007-8-12 14:33:00

<p>版主可不可以把这两个程序的地址发出来啊~很不好找啊</p>

120120 发表于 2007-8-13 08:41:00

<p>&nbsp;test ; 错误: no function definition: CMDLA0</p><p>test ; 错误: no function definition: UKWORD</p><p></p><p>有误啊!老大!</p>

liaopoppy 发表于 2009-1-2 23:57:00

好东西…………

samshs 发表于 2009-1-16 14:09:00

不能用

功夫佬 发表于 2012-5-23 23:45:21

用不了，还是要一些支持文件吧

功夫佬 发表于 2012-5-23 23:49:58

xyp1964 发表于 2007-8-12 01:12 static/image/common/back.gif
;;; 中心线(defun c:test ()&nbsp; (CMDLA0)&nbsp; (setq&nbsp;ukw (UKWORD 7 "1 2" "中心线方式: 1-实体/2 ...

(CMDLA0)
我想请教一下你这个是做什么用的cmdla0
页: 1 [2] 3
查看完整版本: 谁能写燕秀的这两个功能?