(setq txt “LOOKING*”)(if (setq ss (ssget “x” (list (cons 1 txt)))) (setvar “DIMSCALE” (* (cdr (assoc 40 (entget (ssname ss 0)))) 0.0))) chprop;p;;la;0;;ssx;;la;layer_*;;-INSERT; C:/Turbo-lisp/Turbo-dwg/DIM.DWG;0,0;;;;- DIMSTYLE;R;TURBO;(setq txt “K”) (if (setq ss (ssget “x” (list (cons 1 txt))))(setvar “DIMSCALE” (* (cdr (assoc 40 (entget (ssname ss 0)))) 0.4))) _dimlinear; 원래 2006에서 쓰던건데 2013이랑 호환이안되네요 명령어 해석이나 고칠수있는방법있을까요??? |
공유