yefei812678 发表于 2023-12-26 17:47:16

视口图层改颜色

谁能帮忙加个对话框模式就更好了，可以选颜色可修改颜色，一个按钮可以修改线型这样就更完美了

yefei812678 发表于 2023-12-26 17:48:17

谁能帮个忙修改下这个嘛？

yefei812678 发表于 2023-12-26 17:49:37

(defun c:vc (/ ss index lay ent ffg colour)
(setvar "cmdecho" 0)
(setq ffg (getvar "TILEMODE"))
(if (= ffg 0)
    (progn
      (command "_.MSPACE")
      (prompt "\n请选择改变颜色物体所在的图层<退出>:")
      (setq ss (ssget))
      (if (/= ss nil)
    (progn
      (setq index 0)
      (setq colour (getint "请输入要改变的颜色号<1-255>"))
      (if (= colour nil)
      (setq colour 8)
      ) ;_ 结束if
      (repeat (sslength ss)
      (setq ent (ssname ss index))
      (setq lay (cdr (assoc 8 (entget ent))))
      (command "_.vplayer" "C" colour lay "" "")
      (setq index (+ index 1))
      );_ 结束repeat
    );_ 结束progn
    (progn
      (princ "\n未选到物体。")
    );_ 结束progn
      );_ 结束if
    );_ 结束progn
    (progn
      (princ "\n请转到图纸空间再使用本命令。")
    );_ 结束progn
);_ 结束if
(command "_.PSPACE")
(setvar "cmdecho" 1)
(princ)
)

yefei812678 发表于 2023-12-26 17:54:31

谁能帮忙加个对话框模式就更好了，可以选颜色可修改颜色，一个按钮可以修改线型这样就更完美了

zilong136 发表于 2023-12-27 06:28:42

感觉没必要这样给视口专门做这种插件吧，不管是改图层图层、颜色、线型，源泉都可以，不管是在模型还是布局视口里都一样操作。

yefei812678 发表于 2023-12-27 09:10:26

zilong136 发表于 2023-12-27 06:28
感觉没必要这样给视口专门做这种插件吧，不管是改图层图层、颜色、线型，源泉都可以，不管是在模型还是布局 ...

我没有用其他插件 这个插件还是挺好的不知道你会不会改

yefei812678 发表于 2023-12-27 09:11:39

大神们给看看怎么改下嘛？

zilong136 发表于 2023-12-28 00:58:16

yefei812678 发表于 2023-12-27 09:10
我没有用其他插件 这个插件还是挺好的不知道你会不会改

论谈有关图层、线型、颜色的插件应该有很多的，这不局限于到底是在模型空间还是布局空间。
页: [1]
查看完整版本: 视口图层改颜色