随笔分类 -  autolisp

[转载]ARX函数1
摘要：void setView(AcGePoint2d Pt1, AcGePoint2d Pt2, double ex_ratio){AcGePoint2d CenterPt; //若X坐标或Y坐标重合，判为意外，不进行SetView操作if ((fabs(Pt1.x-Pt2.x)<1e-6)||(fab 阅读全文
posted @ 2020-03-23 21:52 中国膜结构网mjgou 阅读(522) 评论(0) 推荐(0)
[经验] FAS 20号指令的深入研究
摘要：看了tryhi大侠的精华贴 《定义真正意义的可选参数》（http://bbs.mjtd.com/thread-181052-1-1.html）受益匪浅，原来这个不起眼的指令竟然蕴藏玄机。文中对20号指令(十六进制14h)四个参数的作用是这样描述的：第一字节：表示参数数量+无名变量的数量之和第二字节： 阅读全文
posted @ 2020-03-19 16:44 中国膜结构网mjgou 阅读(460) 评论(1) 推荐(0)
利用编译时的全局声明对抗反编译
摘要：先看一个简单的例子;(defun t1 () (princ "t1"))(defun t4() (defun t2 () (princ "t2")) (defun t3 () (princ "t1")) (princ "t4")) (defun t5 ()(t1)(t2)(t3)(t4))正常编译后 阅读全文
posted @ 2020-03-13 10:05 中国膜结构网mjgou 阅读(210) 评论(0) 推荐(0)
关于剪切板操作的三个函数
摘要：(defun ClearClipBoard () (startapp "cmd /c \"echo off | clip\"")) ; (clearclipboard) (defun _SetClipBoardText (text / htmlfile result) ;; Caller's sol 阅读全文
posted @ 2020-03-10 22:57 中国膜结构网mjgou 阅读(738) 评论(0) 推荐(0)
椭圆（弧）转换为多段线弧（非直线模拟
摘要：;; Arguments;; lst : a list;; start : start index (first item = 0);; leng : the sub list length (number of items) or nil(defun sublist (lst start leng 阅读全文
posted @ 2020-03-10 22:56 中国膜结构网mjgou 阅读(2213) 评论(0) 推荐(0)
*CAD系统变量
摘要：*CAD系统变量要获取到系统变量的值，然后解析系统变量的含义，在网上找到这些资料：3DDWFPREC 控制三维DWF发布的精度。3DCONVERSIONMODE 用于将材质和光源定义转换为当前产品版本。3DSELECTIONMODE 控制使用三维视觉样式时视觉上重叠的对象的选择优先级。ACADLSP 阅读全文
posted @ 2020-02-17 23:06 中国膜结构网mjgou 阅读(2151) 评论(0) 推荐(0)