請教依此帖的功能,有辦法改成按空鍵逐一隱藏圖層嗎(已解決,感謝)!!

lincctw_ccl

大家好!!不好意思!小弟又來麻煩大家了
在爬文過程中 有看到一帖是關於隱憂圖元
http://bbs.mjtd.com/thread-57723-1-1.html

他程式中是選擇 隱藏擇圖元方式去做!!
請教依這種隱藏方式有辨法 變成逐個隱示所隱示圖層嗎?

小弟是做沖模的是要檢查有無漏孔的,現在是用圖層的單開去做這動作!

例: 圖元是重合在一起,有圖層名為  1,2,3,4 的圖層
那框選後按空白鍵 依次單獨顯示 1 到 4的圖層  (不一定要依照順序,可循環顯示就好)
如上述我提的方式沒有辦法!!

是否有人能指導一下 該如何下面程式可以執行一段子程式就先暫停一下,由使用者 按空白鍵再接著執行下一個動作!!


(defun c:on45678()
(setvar "osmode" 0)
(c:osp)
<---  這里是否可以加入否些語法讓程式先執行完就暫停一下嗎?由使用者接空白或回車鍵再執行下一個子程式?
(c:thh)
(c:tbp)
(c:tbb)
(c:tpp)
(c:tp)
(c:tb)
(c:tud)
(c:fdim)
(command "'layer" "T" "-sp" "")
(command "layer" "SET" "-sp" "")

(princ))
謝謝!!

ZZXXQQ

(defun c:on45678();;單開  HH BP PP B SP
(setvar "osmode" 0);;;指令行不回應
(c:osp)
(getint "\nPress Enter Key to ...);  暫停
(c:thh)
(c:tbp)
(c:tbb)
(c:tpp)
(c:tp)
(c:tb)
(c:tud)
(c:fdim)
(command "'layer" "T" "-sp" "")
(command "layer" "SET" "-sp" "")
(princ)
)

lincctw_ccl

回复 ZZXXQQ 的帖子

感謝版主的指導!!
這麼晚還在線上真是辛苦您了!!
明天我再試試看您所指導的方法!!
謝謝!!

Andyhon

漏孔初探
概念 有入子必有模板孔
以程式濾取入子搜尋相應的模板孔之有無

lincctw_ccl

回复 lincctw_ccl 的帖子

各位好!!
下列是我寫的東西
有個問題想再次請教
為何依 例圖中
程式已將圖層 "關閉"
為何圖元 還在螢幕上可見 是因為它是block嗎?

p.s 本來下列程式中是用凍結的!因程式速度會比較慢
所以我改成用 開關的方式來做!

謝謝!!

(defun c:chkd();;單開d
(setvar "OSMODE" 0)
(setvar "cmdecho" 0);_關閉命令提示
(command "'layer" "on" "-d" "")
(command "layer" "SET" "-d" "")
(command "'layer" "off" "*" "" "on""-d,-d1,GG,MHAT,MM,WIR,M2,-dDASH" ""))
(prin1)

ZZXXQQ

用“冻结”可以不显示。仅“关闭”不行。

lincctw_ccl

回复 ZZXXQQ 的帖子

感謝版主指導!!