十五年专注于
液压缸筒生产

全国咨询热线:
400-086-9833

   热门关键词修理 加工 活塞杆 缸筒 不锈钢

无标题文档

天圆液压产品中心

当前位置:主页 > 行业资讯 >

CAD多重插油缸入引用 炸开要领

时间:2017-05-16 17:00来源:天圆网站 作者:天圆液压 点击:
多重插入引用就是 经常会使用的图纸加密技术,永远无法解开的死锁。 方法一: 有两个好工具,可以轻松炸开。一个是AutoCAD 快速加载 AutoLISP 文件:wjjm;另一个cad加密插件,请大家使用。 具体方法: AutoCAD 快速加载 AutoLISP 文件wjjm的使用:用cad打

  多重插入引用就是 经常会使用的图纸加密技术,永远无法解开的死锁。

  方法一:

  有两个好工具,可以轻松炸开。一个是AutoCAD 快速加载 AutoLISP 文件:wjjm;另一个cad加密插件,请大家使用。

  具体方法

  AutoCAD 快速加载 AutoLISP 文件wjjm的使用:用cad打开需要炸开的文件,将wjjm直接拖入cad窗口,大缸筒加工,命令行输入wjmm,回车后按提示操作即可。

  操作步骤:① 于CAD中,选择:“工具”菜单→“加载应用程序”选项。

  ② 于对话框中选择文件“wjjm”,进行应用程序加载。

  ③ 于CAD命令行中,输入“wjjm”命令,然后选择需要保护的图块,缸筒,随便点击即可取消保护。

  方法二:

  输入“CYN-”,将多重插入块转换为普通快,然后可以炸开编辑

  方法三:

  把以下内容保存为lsp文件(如exm.lsp),加载后运行exm既可把“多重插入块”转换为“普通块”,然后既可用“explode”分解。加载后运行lockb可把“普通块”转换为“多重插入块”

  ;;-------------------------------------------------------------

  ;;转换“多重插入块”为“普通块”。

  (DEFUN C:exm ()

  (setvar "cmdecho" 0)

  (SETQ STM (car (ENTSEL " 点取多重块")))

  (while stm

  (setq e (entget stm))

  (setq stlx (cdr (assoc 0 e)))

  (if (= stlx "INSERT")

  (PROGN

  (setq r_zm70 (assoc 70 e))

  (setq c_zm71 (assoc 71 e))

  (setq r_dist_zm44 (assoc 44 e))

  (setq c_dist_zm45 (assoc 45 e))

  (setq e (subst (cons 44 0) r_dist_zm44 e))

  (setq e (subst (cons 45 0) c_dist_zm45 e))

  (setq e (subst (cons 70 0) r_zm70 e))

  (setq e (subst (cons 71 0) c_zm71 e))

  (setq e (subst (list 100"AcDbBlockReference") (list 100"AcDbMInsertBlock") e))

  (entmake e)

  (entdel stm)

  ))

  (SETQ STM (car (ENTSEL " 点取下一多重块")))

  )

  (setvar "cmdecho" 1)

  )

  ;;--------------------------------------------------------------------

  ;;转换“普通块”为“多重插入块”

  (DEFUN C:lockb ()

  (setvar "cmdecho" 0)

  (SETQ STM (car (ENTSEL " 点取块")))

  (while stm

  (setq e (entget stm))

  (setq stlx (cdr (assoc 0 e)))

  (if (= stlx "INSERT")

  (PROGN

  (setq r_zm70 (assoc 70 e))

  (setq c_zm71 (assoc 71 e))

  (setq e (subst (cons 70 1) r_zm70 e))

  (setq e (subst (cons 71 1) c_zm71 e))

  (setq e (subst (list 100"AcDbMInsertBlock") (list 100"AcDbBlockReference") e))

  (entmake e)

  (entdel stm)

  ))

  (SETQ STM (car (ENTSEL " 点取下一块")))

  )

  (setvar "cmdecho" 1)

  )

(责任编辑:admin)
分享按钮
------分隔线----------------------------