pengl86 发表于 2019-1-20 21:48:38

反隐藏，隐藏切换

本帖最后由 pengl86 于 2019-1-20 21:49 编辑

大佬们，我有一个插件，现在插件已经过期，看能否帮忙破解下，谢谢
插件命令:    QH




功能作用：比如CAD中有两个图形，A ,B   先将A隐藏后（界面只显示B），点击反隐藏，界面只显示A，在点击一下，界面显示只显示B，，，，，


这个反隐藏与图层等等无关（希望不要通过图层等来控制）。只与CAD选择对象有关就行，


大佬，帮忙看一下谢谢

liunian0524 发表于 2019-1-21 10:26:56


yoyoho 发表于 2019-1-21 23:44:45

;;设定物件dxf码
(defun fsxm-setendxf (en dxf var / date old)
(if (listp en) (setq date en) (setq date (entget en)))
(if (atom dxf) (setq dxf (list (cons dxf var))))
(foreach tt dxf
    (setq dxf (car tt))
    (setq var (cdr tt))
    (setq date (if (setq old (assoc dxf date))
   (subst (cons dxf var) (assoc dxf date) date)
   (append date (list (cons dxf var)))
      )
    )
)
(entmod date)
)

xyp1964 发表于 2019-1-22 09:00:29


;; 利用dxf 60码的0或1值实现隐藏和显示简简单单
;; hh001(选择隐藏)
(defun c:hh001 (/ ss)
(if (progn (princ "\n选择要隐藏的实体...") (setq ss (ssget)))
    (xyp-SubUpd ss 60 1)
)
(princ)
)

nyistjz 发表于 2019-1-20 22:11:49

如附件，请查收，可以实现你的要求功能。

pengl86 发表于 2019-1-20 22:20:15

nyistjz 发表于 2019-1-20 22:11
如附件，请查收，可以实现你的要求功能。

大佬很给力，万分感谢，

pengl86 发表于 2019-1-20 22:22:31

nyistjz 发表于 2019-1-20 22:11
如附件，请查收，可以实现你的要求功能。

这个要是能加个对话框就更完美了，比如显示，隐藏，反隐等，

baitang36 发表于 2019-1-21 09:01:52

很不错的小程序，试了一下，真的能隐藏。

baitang36 发表于 2019-1-21 09:05:32

本帖最后由 baitang36 于 2019-1-21 09:15 编辑

这个是用if来判断是否过期的，可以采用只修改一个字节来破解。
破解方法放到群里了

baitang36 发表于 2019-1-21 09:10:35

本帖最后由 baitang36 于 2019-1-21 09:16 编辑

作者所犯的错误是提示“测试版到期,请下载后续完整版”，有了这个关键字符串，就有了可乘之机，就可以找到相应字符串进行修改

pengl86 发表于 2019-1-21 11:51:34

baitang36 发表于 2019-1-21 09:10
作者所犯的错误是提示“测试版到期,请下载后续完整版”，有了这个关键字符串，就有了可乘之机，就可以找到 ...

大佬，你能把我传的那个   反隐藏.ZIP   能破解吗？如果能，万分感谢，

pengl86 发表于 2019-1-21 11:52:01

baitang36 发表于 2019-1-21 09:10
作者所犯的错误是提示“测试版到期,请下载后续完整版”，有了这个关键字符串，就有了可乘之机，就可以找到 ...

Q740575568
页: [1] 2 3
查看完整版本: 反隐藏，隐藏切换