codedecipher的博客

在CAD 中使用Lisp写代码时经常遇到，函数内部一部分代码多次执行，奈何lisp没有goto这一跳转语法。（defun test ( / add a b) (setq a 1) (setq b 1) (defun add() (princ (+ a b)) ) (add))########################(test) ;打印结果2其中 add 为test的内部函数，定义内部函数可以实现代码断在内部多次调用，达到goto效果...

命令目录_.layer 切换到当前图层继续更新中。。。_.layer 切换到当前图层(command  "_.layer"  "set"  (cdr (assoc  8  hatchdata填充实体数据获取该实体所在的图层)) (command \space\space{"\_.layer"}{} \space\space "set" \space\space\frac{(cdr \space

作为Virtual C++开发的初学者，对整个开发的一些常识不了解会造成很多问题。MSVCR90D.DLL "D"为Debug版本。在使用VS2008开发Cad2010 插件时，只添加了Debug的配置项而没有添加Release的配置项因此，cad才会加载失败...

CR表示，圆心在 射线AB的右边。CL，圆心在射线AB的左边小弧大弧！只通过弧端点与圆心不能描述一段弧，需要确定顺时针还是逆时针。(cond ((or (and (< bulge 0) (> h r)) (and (> bulge 0) (< h r))) (progn (setq x0 (- (* (car vecAC) (cos beta...

“凸度”——CAD，多段线中的弧定义，ployline##两种表示转换"凸度"=tan⁡(α4)=hs"凸度"= \tan(\frac{\alpha}{4})=\frac{h}{s}"凸度"=tan(4α​)=sh​"凸度"表示(10 x y z)；起点(42 "凸度")圆心角表示(10 x y z)；圆心坐标(40 r)；半径(50 deg)；起点角度(51...

Hatch，CAD填充块的深度解析与CAD填充块的多次死磕对于二次开发来说CAD的图元数据结构令人费解，在我想编写填充块的拓扑操作（即合并、切割、交错、剪去等）时，发现hatch的结构是多么复杂令人头痛。在此著文一篇，以供参考。同一闭合polyline，通过“点选”与“对象”选择生成的填充块数据结构是不同的“点选”生成的填充块由点构成边界数据，而“对象选择”生成的填充块由line构成边界...