高级教程，利用代码公式计算工程里平均值，分钟内完成多数据

代码如下，具体怎么用这个代码。简单操作如下。首先复制下面的代码，然后将其保存为。lsp文件。

像这样保存文件名。

然后我们将保存这个文件。

然后我们打开CAD，然后点击第一卷加载应用，然后截图如下。

加载应用程序屏幕截图

然后我们将它保存在loader文件夹中，然后我们选择刚刚保存的程序文件，然后单击该程序，然后单击Load。

加载程序

然后下一卷显示加载成功就是正确的配置，然后进行下一步。

加载成功的屏幕截图

在命令输入框中输入AVE，然后

在命令框中输入AVE命令。

然后我们计算这六个数的平均值，选择上运算，点击你想要放这六个数平均值的位置，然后得到这六个数的平均值。不是方便快捷吗？赶紧试试吧。(注意，代码归原作者所有，我主要告诉你应用)

6个数字的平均值

(defun c:AVE(setq ss(ss get))(setq n 0 total(ss length ss))(repeat total(setq name(ss name ss n))(setq ent(ent get name))(if(=(cdr(assoc 1 ent))nil)(progn(ss del name ss)(setq total(1-total))(setq n(1+n)))(setq I 0 sum 0 u 0)(repeat(ss length ss)(setq en(ss name ss I))(setq en _ data(ent get en)) (if(and(= 57(ascii(substr entxt nn 1)))(= 46(ascii(substr entxt nn 1)))(setq n(+1n)))(setq nn(+1 nn)))(if(equal n nn)(progn(setq sum(+sum(atof entxt)))(setq u(+1 u)))(setq I(+1 I))(setq ave(/sum u))(setq pt(getpoint # 34； /n点平均放置位置: # 34；))(命令 # 34；正文 # 34；pt # 34350#34;#34;#34;ave # 34#34;))以上是我分享的方法。赶紧试试，找到了吗？我要求的值很大，在这里的演示中没有改变。你知道如何把字体变小吗？动动脑子，感谢收看今天的内容。

说我是“志同道合”或者“工科人”，有意想不到的惊喜。试试看。