84.18 [功能] 将字符串或表写入文件 (快于 AutoLISP write-line函数) 84.19 [功能] 目录浏览对话框
84.20 [功能] 显示 windows 的确认对话框包括图标和可选按钮 84.21 [功能] 当前目录文件搜索. 类似于 DIR /S 命令 84.22 [功能] 合并两个文本文件
85.1 [功能] 字符串分割为表 By 无痕
85.2 [功能] 字符串分割为表 -------梁雄啸.2004.3
85.3 [功能] 字符串分割为表 (纯autolspl的写法)-----梁雄啸.2004.3 85.4 [功能] 字符串分割为表 85.5 [功能] 字符串分割成表
85.6 [功能] 字符串函数 by qjchen@gmail.com 85.7 [功能] 用分隔符解释字符串成表 ;by fsxm
85.8 [功能] 字符串分割(这是highflybird问答我的求助) 86.1 [功能] Exports the specified project to disk
86.2 [功能] Imports a project exported by MJ:ExportProject 87.1 [功能] 包围对象最小最大点列表 87.2 选择集的实体外矩形框 by gxl
88 [功能] 返回曲线长度(不能返回块中曲线长度) 89 [功能] Returns the size of the specified file in bytes 90.1 [功能] 返回文字样式字体高度 90.2 [功能] 设置文字样式字体高度
91 [功能] Returns the LISP value of an ActiveX variant
92.1 [功能] Attach Extended Entity Data to an AutoCAD object
92.2 [功能] Get Extended Entity Data attached to an AutoCAD object 93 [功能] 面积标注 94 [功能] 重命名布局
95 [功能] 返回打开文件列表 96 [功能] 返回布局列表
97 [功能] 窗口左下角空间切换是否显示 98.1 [功能] 模型空间背景色在空白之间切换 98.2 [功能] 布局空间背景色在空白之间切换 99.1 [功能] 表->二维表 99.2 [功能] 表->三维表
99.3 [功能] 获取多段线顶点列表(见46) 99.4 [功能] 两对象交点
100.1 [功能] 判断是否val对象? 100.2 [功能] 判断是否字符串 100.3 [功能] 判断是否实数?
100.4 [功能] 判断是否ename对象? 100.5 [功能] 判断是否变体?
100.6 [功能] 判断 X 是否是选择集且长度不为 0 101 [功能] 多段线顶点的连续样式产生线型 102.1 [功能] 使对象颜色随层 102.2 [功能] 设置当前颜色
103 [功能] 打印配置 104 [功能] 打印设备列表
105.1 [功能] 清除所有捕捉，与按F3有不同处(参见77.4) 105.2 [功能] MJ:SnapOn之后下面函数只启用端点捕捉 106 [功能] 打开一个文件 107.1 [功能] 原位复制Vla 107.2 [功能] 原位复制ename
107.3 [功能] 原位置复制VLA选集 107.4 [功能] 删除VLA选择集
107.5 [功能] 块内原地复制 By xshrimp 107.6 [功能] 块内原地复制 by highflybird 107.7 [功能] 块内原地复制 by GSLS(SS)
108 [功能] 输出 WMF SAT EPS DXF BMP格式文件 109 [功能] 移动Move 110 [功能] 偏移
111 [功能] 退出Acad 112 [功能] 重生成 113 [功能] 旋转
114.1 [功能] 多段线添加节点Vertex 114.2 [功能] 多段线修改节点Vertex
115 [功能] 文件名已经保存，返回T；新建一文件，未命名保存过，返回 nil 116.1 [功能] 缩放整个图形 116.2 [功能] 缩放到实际范围 116.3 [功能] pt中心点缩放1 116.4 [功能] pt中心点缩放2 116.5 [功能] 两点窗口缩放
116.6 [功能] 视口比例缩放-放大2倍 116.7 [功能] 视口比例缩放 116.8 [功能] 返回上一视图
117.1 [功能] 在当前视图状况下将图形单位转换为像素 117.2 [功能] 返回当前视窗左下角和右上角 坐标 117.3 [功能] pickbox大小
118 [功能] 获取 0~1 之间的随机数 (by zml84)
119.1 [功能] 将 ACI 索引颜色转换成 RGB 配色系统 119.2 [功能] 将 RGB 配色系统转换成 ACI 索引颜色 120.1 [功能] 选择集->图元列表
120.2 [功能] 选择集->图元列表 By caiqs 120.3 [功能] 图元列表->选择集
120.4 [功能] 图元列表->选择集 By caiqs
121 [功能] 根据当前文档的图形单位精度将实数转换为字符串 122.1 [功能] 遍历选择集对所包含的图元进行指定函数操作 122.2 [功能] 遍历选择集对所包含的图元进行指定函数操作 123 [功能] 获取当前 AutoCAD 的版本 124 [功能] 获取 DXF 组码值
125.1 [功能] 获取在图元 en 之后产生的图元列表 125.2 [功能] 获取在图元 en 之后产生的图元的选择集 126 [功能] 打印列表中的数据 127 [功能] 更新组码
128.1 [功能] 选择集->无名块
128.2 [功能] 用 [选择集/obj表] 做成一个块 128.3 [功能] 选择集做成一个块 129.1 [功能] 删除表中相同图元 129.2 [功能] 剔除表元素 By 无痕 130 [功能] 获得特定符号表的列表
131.1 [功能] 返回a在表lst中的位置 or nil 131.2 [功能] 从列表中删除指定的元素 132 [功能] 关键字a的列表框增加内容 133.1 [功能] 旋转一个点 133.2 [功能] 缩放一个点
134.1 [功能] 返回文件名(带扩展名) (反findfile) 134.2 [功能] 去文件名扩展,比如去掉.exe 134.3 [功能] 分割文件名为三部分 135 [功能] p1是否在p2 p3线上
136 [功能] 亮显选择集或对象(夹点不显示) 函数 137.1 [功能] 获得图形中倒数第二个图元的函数 137.2 [功能] 图中最后图元Find True last entity 138.1 [功能] 读取指定文件中指定行的内容 138.2 [功能] 返回文件行数量
138.3 [功能] 读取文件并按行将文件转换为表 139 [功能] 用 [选择集/obj表] 做成一个组 140 [功能] 加载幻灯片 141 [功能] 点表排序
142 [功能] 选择集相减 By 自贡黄明儒
143.1 [功能]选择集SS排序->图元列表 By 自贡黄明儒 143.2 [功能]选择集排序->选择集 By 自贡黄明儒 144.1 [功能] 读取系统剪贴板中字符串 144.2 [功能] 向系统剪贴板写入文字
145 [功能] 求多段线上的弧段(圆或圆弧也有效)的圆心 146 [功能] 质心
147.1 [功能] 自定义max By yjr111 147.2 [功能] 自定义max By G版 148.1 [功能] 根据点表画多段线 148.2 [功能] 根据点表画多段线 148.3 [功能] 根据点表画样条曲线 149.1 [功能] 进程显示 149.2 [功能] 进程显示 150 [功能] 生成无名组
151 [功能] 曲线选集长度求和--陌生人.2004.1
152 [功能] 局部更新
;;1 [功能] 检查加载vlisp扩展
(vl-Load-COM)
;;2 常数(lisp编辑器在输出局部变量时,带*的会排在前面.Caoyin这样写很有道理)
(setq *En2Obj* vlax-ename->vla-object
*Obj2En* vlax-vla-object->ename
*2PI* (* PI 2)
*0.5PI* (/ PI 2)
*0.25PI* (/ PI 4)
;;常用VLA对象、集合
*ACAD* (vlax-get-acad-object)
*DOC* (vla-get-ActiveDocument *ACAD*)
*DOCS* (vla-get-Documents *ACAD*)
*MS* (vla-get-modelSpace *DOC*)
*PS* (vla-get-paperSpace *DOC*)
*BLKS* (vla-get-Blocks *DOC*)
*LAYS* (vla-get-Layers *DOC*)
*LTS* (vla-get-Linetypes *DOC*)
*STS* (vla-get-TextStyles *DOC*)
*GRPS* (vla-get-groups *DOC*)
*DIMS* (vla-get-DimStyles *DOC*)
*LOUTS* (vla-get-Layouts *DOC*)
*VPS* (vla-get-Viewports *DOC*)