CAD问题小百科
我是搬运工:
从这里摘录了一些常见的CAD小问题:
https://www.cnblogs.com/JJBox/p/10848766.html
一、词典问题集合
这是一个常见的问题。
先说解决方案:
方法1:可以用删除词典的方法:
测试一下colorbox
去教育版戳记讨论及源码(ARX,LISP版)
CAD教育版戳记有时候很讨厌,一旦图中有这个戳记,就会传染到其它图中。就是说从有戳记的图中拷贝到没戳记的,没戳记的也会带上。
而且这个戳记不太好消除。
对于2015-2018,Autodesk公司似乎已经把这个戳记移除掉了,也就是说,用这些版本的CAD打开图,看不到戳记,也不会弹出那个戳记警告框。
保存之后,图中不会再有了(这点我没有每个版本验证)。但该死的是到了2019后,这个又出现了,不知道autodesk公司在玩什么。
关于去教育版有很多方式,ARX的方式最有效。我这里提供用了ARX源码。以及附带的生成的ARX程序。
这个程序的源码 是从网上的 wdzhangsl 引申过来,特此深表感谢!
程序的原理是从数据库指针找到戳记的偏移地址,修改此处的值,便达到了消除。
因为原代码有些重复和繁琐,特此精简,并且升级到2019。经过测试,程序有效。
因为有些CAD版本我是没办法在自己机器安装,就没有一个个CAD版本进行测试其中的偏移地址。
如果有网友能测试到我程序中没有的CAD版本的值,请告诉我或者跟帖。多谢!
画衣柜的程序
在CAD中画衣柜有时候是一件比较麻烦的事情,对2012以上的版本,可以用动态图块来实现,但还是有点罗嗦。
我下面的程序实现比较简单,只要敲入一个命令,然后你就可以任意布置你的衣柜了。
下面是其实现的代码。
截面的几何参数
对于CAD的封闭曲线类物体,可利用此程序求其几何参数。
包括面积、周长、质心、惯性矩、主矩等等。
下面是其LISP代码:
点集的最小包围圆(用LISP求解)
这里是一个经典的几何算法题目,在CAD环境下用LISP编写。 功能是求覆盖点集的最小的圆。
牛顿分形的LISP程序
牛顿分形简介:
在复数域上使用牛顿迭代生成分形图像,对函数公式\(F(z) = z^3 – 1\)在复数域上面有三个根,一个是1,另外两个是复数:
$$
\left \{
\begin{array}{ll}
Z_1=1 \\
Z_2=\frac {-1+\sqrt{3}i}{2} \\
Z_3=\frac {-1-\sqrt{3}i}{2}
\end{array}
\right.
$$
根据计算出来根的值不同转换为RGB三种不同的颜色,根据迭代次数的多少设置颜色值的大小,即颜色强度。
下面是用LISP代码的实现。
凸包的LISP实现
凸包有很多用途,网上流传着很多其他语言的代码,LISP的却很少,下面是我的LISP实现代码:
PI的高精度计算
本程序采用LISP计算高精度Pi的数值,可计算到小数点后16000位。
二叉树
这个是用lisp来构建二叉树。 对autolisp来说,构建二叉树是一个难题,因为lisp没有指针,所以比较困难。
下面是实现的代码。