CAD高级教程，利用代码公式计算工程里平均值，分钟内完成多数据
代码如下，具体此代码如何运用，简单操作如下，首先复制以下代码，然后另存为.lsp文件。
另存后文件名字变成这种样子
然后我们把这个文件保存好。
接着我们打开CAD，然后点击上册加载应用程序，然后截图如下。
加载应用程序截图
然后我们另存为在加载程序文件夹，然后我们选择刚才保存的程序文件，然后点击程序，再点击加载，
加载程序
然后下册显示，加载成功即是正确的配置了,然后进行下一步操作。
加载程序成功截图
在命令输入框内输入AVE即可，然后
命令框输入AVE命令
然后我们求这6个数的平均值，接上部操作选择，这6个数，点击你想放平均值的位置即可，就求得了6个数的平均值，是不是很方便、快捷，赶快试试吧。（注，代码归原作者，本人主要是告诉大家应用）
6个数的平均
(defun c:AVE (setq ss (ssget))(setq n 0 total (sslength ss))(repeat total(setq name (ssname ss n))(setq ent (entget name))(if (= (cdr (assoc 1 ent)) nil)(progn (ssdel name ss) (setq total (1- total)))(setq n (1+ n))))(setq i 0 sum 0 u 0)(repeat (sslength ss)(setq en (ssname ss i))(setq en_data (entget en))(setq en_type (cdr (assoc 0 en_data)))(setq entxt (cdr (assoc 1 en_data)))(setq n 1 nn 1)(repeat (strlen entxt)(if (and (= 57 (ascii (substr entxt nn 1)))(= 46 (ascii (substr entxt nn 1))))(setq n (+ 1 n)))(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 "/n点取平均数放置位置："))(command "text" pt "350" "" ave ""))以上就是我分享的方法，赶快试试吧，还有你们发现没，我求的数值大，此处演示中未更改，你们知道怎么变小字体吗？动动小脑子，感谢观看今天内容。
据说私信我“志同道合”或者“工程人”有意想不到的惊喜哦，试试吧。
相关推荐
-
CAD遇到病毒怎么清理？别慌，教你四个方法搞
CAD遇到病毒怎么清理？别慌，教你四个方法搞定它，cad,文件目录，cad也疯狂CAD病毒顾名思义就是专门感染CAD的病毒，一般在你的CAD文件的目录下生成ACAD.lsp文件。.lsp文件是Auto lsp程序，它的内容对电脑没有危害，但可能会损坏你做的图。不知道大家对CAD病毒是否敏感，在2007年CAD病毒大爆发时就可以经常在网上看...
-
图鉴｜看扩展名识文件，说一说CAD安装目录中
图鉴｜看扩展名识文件，说一说CAD安装目录中的文件，原来如此，扩展名,cad,cad字体,文件目录,cad命令，《实用技巧300条》第6篇｜原创：就说我在开发区在AutoCAD的安装目录中存在着数量繁多、类型各异的文件，以不同的后缀（扩展名）分门别类地被标记出来。这些文件是什么？在实际使用中起什么作用？今天的《实用技巧300条》选取了其中...
-
CAD出现错误异常后，如何恢复图纸文件？
CAD出现错误异常后，如何恢复图纸文件？，cad，AutoCAD画图的时候会有异常退出现象，有时辛苦几小时画的 图会因为异常退出或者停电等其他原因导致图纸没有保存甚至文件损坏。在这种情况下，只能是去找之前的备份文件，CAD自动备份的文件有两种：自动保存文件 （*.sv$)和备份副本（*.bak），搜一下是否有这 样的文件，然后将扩展名改回...
-
插件怎么安装？
插件怎么安装？，插件，1、点击菜单栏的“工具”，下拉菜单栏中选择“加载应用程序”。2、在弹出的对话框中找到要加载的程序，点击加载，下方显示已加载成功表示已经加载好了。3、如果想要打开软件，就自动加载插件。4、点击右下角“内容”选项，添加想要加载的程序并点击打开。5、下方也会有相应的添加成功提示，最后根据插件的操作命令进行试操作，看是否加载...
-
如何申请QQ账号？
如何申请QQ账号？，qq，申请qq账号的方法1.打开在计算机上的QQ软件，这是QQ的登录界面，单击以注册QQ帐户。2.单击注册帐户以打开以下申请的页面，然后在第一个框中输入昵称，在第二个框中输入密码，然后输入电话号码，选择电话号码归属地，单击“发送验证”，之后输入验证码，然后单击立即注册。3.然后，您成功注册了QQ帐户，新注册的QQ帐户将...
-
在常熟撞死19岁的安徽女孩怎么理？
在常熟撞死19岁的安徽女孩怎么理？，安徽交警,法院调解,法律,法制,社会万象，这个的话私了的话就是自己双方谈价格，公了的话就是打官司，但是耗时很长你好，先找个律师朋友，了解一下完全按法律程序需要赔付的金额，在此基础上，在交警部门主持下，一般都是调解。（也可以自己计算的，但中间一个死亡赔偿金因为在交警部门调解失败后，起诉法院的不同，有很大差...
-
2022这6种解决赛博朋克2077崩溃卡顿的方
2022这6种解决赛博朋克2077崩溃卡顿的方法，确定不试试，赛博朋克,电脑,选项卡，赛博朋克 2077 崩溃的情况并不少见。事实上，赛博朋克 2077 可以在各种情况和平台上崩溃。例如，它在初始加载屏幕或启动期间崩溃。在从激烈的枪战和充满动感的片段中出来后，赛博朋克 2077 也可能崩溃。本文由呆猫桌面云将总结赛博朋克2077的原因和可...
-
fob价格怎么计算报价？
fob价格怎么计算报价？，fob,汇率,汇率变动,利润,fob费用，1、下面以单价为10元的产品，1000个数量作一实例。2、卖东西当然是要赚钱的，所以假设利润为5元，把货运到港口所要花费的运费、托费等一系列费为500。3、那实际利润就是，5*1000-500=4500。4、我的计算公式为：FOB=（产品单价+利润）/汇率，每天的汇率都会...
-
向行家学习电脑截图技术
向行家学习电脑截图技术，print screen,软件,剪贴板,粘贴， 一、在键盘右上侧有一个键Print Screen，可以用它将显示屏显示的画面抓下来，复制到“剪贴板”中，然后再把图片粘贴到“画图”、“Photoshop”之类的图像处理软件中，进行编辑处理后保存成图片文件，或粘贴到“Word”、“Powerpoint”、“Wps”等...
-
电脑怎么截图
电脑怎么截图，print screen,软件,电脑,剪贴板,画图,粘贴， 一、在键盘右上侧有一个键print screen sys rq键，可以用它将显示屏显示的画面抓下来，复制到“剪贴板”中，然后再把图片粘贴到“画图”、“Photoshop”之类的图像处理软件中，进行编辑处理后保存成图片文件，或粘贴到“Word”、“Powerpoin...
-
梦幻西游更新失败怎么办
梦幻西游更新失败怎么办，梦幻西游，去官网下补丁，直接放到梦幻文件夹，不要再往里选，然后运行XY1PATCH文件，目录也选梦幻文件夹，就可以手动更新了。下个补丁 直接复制到文件里面启动时就在安装了 不会失败了。去官方网站上去下载更新补丁打开：Program Files\梦幻西游\update显示如下：[Setting]Version=1....
-
梦幻西游更新失败怎么办？
梦幻西游更新失败怎么办？，梦幻西游， 上gpatch.exe兼容补丁下载md5: b2927b802a19b6fc5baf054b45c14beb补丁说明：此补丁用于解决游戏客户端程序与网吧内安装的《净网先锋》网吧管理软件之间的冲突问题。如果由于该冲突问题导致游戏不能正常更新，请下载该补丁程序并复制到游戏所在目录内覆盖同名文件，即可保证...
-
文件系统错误 （-2147219196）？
文件系统错误 （-2147219196）？，选项卡，文件系统错误（－2147219196）是因为用户对该文件没有权限。该错误一般出现在打开看图软件时发生，也就是当前用户没有权限打开该图，就会出现这种错误，解决方法如下：方法/步骤1、当出现该错误时，记住该错误的路径，如图所示。由于每个人的系统都不同，所以路径以显示的为准。2、打开我的电脑，...
-
怎么让Word（office2019）显示Mathtype选项卡
怎么让Word（office2019）显示Mathtype选项卡？，选项卡,文件目录,mathtype，1、打开word软件，在工具栏中切换到插入选项卡，在“插入----对象”，进入对象的插入2、在弹出的对象对话框中，拖动下拉，找到MathType，选中并确定添加！3、找到MathType的安装目录，在目录下MathPage\MathPa...