Thiết lập giá trị cho DIMSPACE

[hatesale 1]

Em chào các bác !!!!

Em thường phải căn chỉnh dãn đều các hàng DIM, từ CAD 2008 là có lệnh " dimspace ", tuy nhiên

Các bác cho em hỏi là có cách nào để thay đổi giá trị mặc định của Dimspace ( 2*chiều cao text dim ) không ạ. Hoặc các bác viết cho e cái Lisp để thiết lập giá trị DIMSPACE. 

Em cảm ơn các bác  :)  :)  :)  :)  :)

[hatesale 1]

Có bác nào biết thì giúp e với. Ngày nào cũng check topic mà không thấy có câu trả lời  :(  :(  :(  :(

[hung1608 8]

up cái nào

[Tr.CongSon 42]

Mình cũng mới tập tành lisp
hi vọng đúng ý bạn

(defun c:dsp (/ dbase dsp)
(redraw (setq dbase (car (entsel"\nSelect Base Dimension: "))) 3)
(setq dsp (ssget '((0 . "DIMENSION"))))
(command "dimspace" dbase dsp "" (* (getvar "dimtxt") 2))
(redraw dbase 4)
)