Question

AUTOlisp 不知道这里那里出问题了，输入命令之后没有反应呢？

(defun c:xxx()
(func1)
(func2)
(func3)
(func4)
)
(defun func1()
(if (not (tblsearch "layer" "S-BEAM-标注箍筋)"))
(command "layer" "m" "S-BEAM-标注箍筋" "c" 135 "l" "CONTINUOUS" "")
(command "layer" "s" "S-BEAM-标注箍筋" "")
(prin1)
)
)
(defun func2()
(if (not (tblsearch "dimstyle" "标注箍筋"))
(command "dimstyle" "s" "标注箍筋")
(command "dimstyle" "v" "标注箍筋")
)
)
(defun func3()
(setvar "dimASO" 0)
(setvar "dimSTYLE" "TSSD_100_100")
(setvar "dimADEC" 0)
(setvar "dimALT" 0)
(setvar "dimALTD" 2)
(setvar "dimALTF" 25.40)
(setvar "dimALTRND" 0.00)
(setvar "dimALTTD" 2)
(setvar "dimALTTZ" 0)
(setvar "dimALTU" 2)
(setvar "dimALTZ" 0)
(setvar "dimAPOST" "")
(setvar "dimASZ" 100.00)
(setvar "dimATFIT" 3)
(setvar "dimAUNIT" 0)
(setvar "dimAZIN" 0)
(setvar "dimBLK" "_ArchTick")
(setvar "dimBLK1" "_ArchTick")
(setvar "dimBLK2" "_ArchTick")
(setvar "dimCEN" 0.00)
(setvar "dimCLRD" 0)
(setvar "dimCLRE" 0)
(setvar "dimDEC" 0)
(setvar "dimDLE" 100.00)
(setvar "dimDLI" 0.00)
(setvar "dimDSEP" ".")
(setvar "dimEXE" 100.00)
(setvar "dimEXO" 250.00)
(setvar "dimFRAC" 0)
(setvar "dimGAP" 30.00)
(setvar "dimJUST" 0)
(setvar "dimLDRBLK" "")
(setvar "dimLFAC" 1.00)
(setvar "dimLIM" 0)
(setvar "dimLUNIT" 2)
(setvar "dimLWD" -2)
(setvar "dimLWE" -2)
(setvar "dimPOST" "")
(setvar "dimRND" 0.00)
(setvar "dimSAH" 0)
(setvar "dimSCALE" 1.00)
(setvar "dimSD1" 0)
(setvar "dimSD2" 0)
(setvar "dimSE1" 0)
(setvar "dimSE2" 0)
(setvar "dimSOXD" 0)
(setvar "dimTAD" 1)
(setvar "dimTDEC" 0)
(setvar "dimTFAC" 1.00)
(setvar "dimTIH" 0)
(setvar "dimTIX" 1)
(setvar "dimTM" 0.00)
(setvar "dimTMOVE" 2)
(setvar "dimTOFL" 1)
(setvar "dimTOH" 0)
(setvar "dimTOL" 0)
(setvar "dimTOLJ" 1)
(setvar "dimTP" 0.00)
(setvar "dimTSZ" 0.00)
(setvar "dimTVP" 0.00)
(setvar "dimTXSTY" "TSSD_dimension")
(setvar "dimTXT" 350.00)
(setvar "dimTZIN" 0)
(setvar "dimUPT" 0)
(setvar "dimZIN" 0)
)
(defun func4()
(command "dimlinear" pause pause "t" "\\u+00828@120(2)" pause)
)

Answer 1

你好
怎么会这样了啊？
那你试下其他的命令，不要输入坐标，随便点着画！
然后在双击鼠标的 中键 （滑轮），这就的话就是把整个图全部最大化显示在绘图区，你将会看到你画的图
若果是这样的话，那就是说你的CAD没问题，而你的绘图区域太大，而你画的图的尺寸相对对小，结果是看不见，
你可以通过格式 图形界限 来设置绘图区域，
当然你完成绘图后，双击中建，就可以了，

希望对你有帮助

Answer 2

func1:  if函数的参数太多了，多了行（prinl）,第二行引号里多了个右括号，后面用图层的话会出错