[求助]我寫的lisp有問題,請板主解決
 

[求助]我寫的lisp有問題,請板主解決
www.dimcax.com
[求助]我寫的lisp有問題,請板主解決
請求板主解決我寫的lisp有問題,
請板主解決,謝謝!.
(defun c:oha()(command "'layer" "f" "*" "t" "-ha" "t" "gg" "t" "mhat" "t" "mm" "t" "wir" .
"t" "m2" "t" "-ha1" "t" "-hadash" "t" "-hadim" "set" "-ha" ""))
(defun c:ohb()(command "'layer" "f" "*" "t" "-hb" "t" "gg" "t" "mhat" "t" "mm" "t" "wir"
"t" "m2" "t" "-hb1" "t" "-hbdash" "t" "-hbdim" "set" "-hb" ""))
(defun c:ohc()(command "'layer" "f" "*" "t" "-hc" "t" "gg" "t" "mhat" "t" "mm" "t" "wir"
"t" "m2" "t" "-hc1" "t" "-hcdash" "t" "-hcdim" "set" "-hc" ""))
.這是指令 .
指令: ohb .
無法凍結圖層「-ha」。它是目前的圖層。.
指令: ohc.
無法凍結圖層「-hb」。它是目前的圖層。.
指令: ohb .
無法凍結圖層「-hc」。它是目前的圖層。.
我用块画的螺丝孔等...... 例：当前层是-ha层，接下用-hb层，所有层（块在的层除外)关闭并和凍結。我用块画的螺丝孔等...... 例：当前层是-ha层，接下用-hb层，所有层（块在的层除外)关闭并和凍結。lisp如何写。谢谢！
d
看到一长串command的玩意我就头晕，
command "'layer" 这里多了个 ’
看你的命令oha的意思是 f（冻结）所有的图层，当然当前图层是无法冻结的，然后t（解冻）-ha、gg 、mhat、mm、wir 、m2、ha1、-hadash、-hadim等图层最后设置 ha为当前图层，不知道是不是这个意思
先说下解冻的那些玩意可以简化下 "t" "-ha,gg,mhat,mm,wir,m2,ha1,-hadash,-hadim"这样应该就够了。
其次是我理解力实在不怎么的
d
( c:oha()
( "layer" "set" "-ha" "")
( "'layer" "f" "*" "t" "-ha,gg,mhat,mm,wir,m2,-ha1,-hadash,-hadim" ""))
( c:ohb()
( "layer" "set" "-hb" "")
( "'layer" "f" "*" "t" "-ha,gg,mhat,mm,wir,m2,-ha1,-hadash,-hadim" ""))
( c:ohc()
( "layer" "set" "-hc" "")
( "'layer" "f" "*" "t" "-ha,gg,mhat,mm,wir,m2,-ha1,-hadash,-hadim" ""))
看看这是不是你要的效果，程式我没试~
d
命令"oha","ohb","ohc".....不能连着用，lifecad中可以，
不过谢谢！
还请你能帮助解决。
d
谢谢！在你的想路下，我修改了，成功了
d