cad pu插件下载lisp_cad线路里程标注lisp插件下载

CAD插件，路数里程

cad超级实用工具-线路里程标注（BZLC）.zip

自动对曲线进行里程桩标注，可以设置标注位置，字体大小，支持等距、任意、指定桩号三种模式标注。同时可以导出桩号点坐标。功能十分强大。

cad下使用appload命令加载后使用，提高作图效率，为各种标注，坐标标注等带来快捷、便利的体验。

cad填充图案制作工具插件是为cad制图软件制作的一款插件，往往我们在用cad需要填充图案的时候没有现成的素材，还得去网上找，还并不一定找的到，这款工具就是用来给我们自己制作填充素材的，求人不如求己嘛!

OmapCAD插件，集合了发送所选对象到奥维、加载在线底图、下载底图到本地、下载高程[DEM]、设置关联点、设置断面参数、设置等功能

超级详细 (defun *error*(st) (if (and (/= st "Function cancelled") (/= st "quit / exit abort") ) (princ (strcat "错误: " st)) ) (setq *error* old_err) (princ) ) (defun sort (l / lt ltem vmax vmin l1 l2 l3 lt0 ltem0 ltem1 l30 vmax0 vmin0 l10 l20) (setq ltem (mapcar 'car l) ;ltem : 取出l的第一项形成的表 vmin (1- (apply 'min ltem)) ;vmin : 是一个比ltem中最小的数还小的数 ) (while (< vmin (setq vmax (apply 'max ltem))) ;从ltem中取出最大值 (setq l1 l l3 nil ltem (subst vmin vmax ltem)) ;去掉最大值 (while (setq l2 (assoc vmax l1)) ;取出最大值所对应的项 (setq l1 (cdr (member l2 l1))) ;处理相同的值 (setq l3 (cons l2 l3)) ) (progn (setq ltem0 (mapcar 'cadr l3) ltem1 (mapcar 'car l3) l30 (mapcar 'cdr l3) vmin0 (1- (apply 'min ltem0)) ) (while ( (car bp) (car sp)) ; (setq tem bp bp sp sp tem) ; ) (setq ss nil) (if (setq ss (ssget "c" bp sp)) (progn (setq n 0) (repeat (sslength ss) (setq el (entget (ssname ss n))) (if (and (= (dxf 0 el) "LINE") (or (= (dxf 8 el) "WALL") (= (dxf 8 el) "AXIS")) (setq ip (inters bp sp (dxf 10 el) (dxf 11 el))) ) ; ip 交点 (progn (setq lpt (cons ip lpt)) ) ) (setq n (1+ n)) ) ; repeat 找出所有的交点并形成表lpt (if (/= nil lpt) (setq lpt (sort lpt))) ) ) (setq pt0 '(0 0 0)) ;以下9行去掉相同的数据 (foreach pt lpt (if (< (distance pt0 pt) 0.000001) (princ "\n警告:墙线有重线") (setq lpt0 (cons

CAD lisp 里程注记CAD lisp 里程注记CAD lisp 里程注记CAD lisp 里程注记CAD lisp 里程注记CAD lisp 里程注记

挺好用的线长统计工具

autocad自制纯autolisp绘图插件,兼容autocad for mac。 加载main.fas，输入hh查询命令。

对CAD图形面积求和，方便快捷，希望为你的绘图工作带来便利

cad编号的插件，可对桩基，对象进行智能编号，大大提高工作效率

在cad中运行此插件，然后批量插入dwg文件，方便使用。