(setq ssi (ssget)) (if ssi (if (= (cdr (assoc 2 (setq edat (entget (setq e (ssname ssi n_in)))))) "材料") (progn (setq n_in 0) (setq len_in (sslength ssi)) (command "undo" "begin") (repeat len_in (setq INS (cdr (assoc 10 edat)) INSc (cdr (assoc 41 edat))) (command "_SCALE" e "" INS (/ scal (abs INSc)))) ) (setq n_in (+ 1 n_in)) ) (command "undo" "end") ) 为何会出错呢? 选择对象: 指定对角点: 找到 8 个 选择对象: ; 错误: 参数类型错误: numberp: nil |