沒(méi)有特別快捷的方式,Acad提供的原始功能操作步驟多,效率低.
我給你寫了個(gè)小程序提高效率,可以連續(xù)的點(diǎn)選起點(diǎn),到點(diǎn),起點(diǎn),到點(diǎn)...創(chuàng)建多個(gè)標(biāo)注.
注意:
標(biāo)注的字高和樣式隨當(dāng)前的標(biāo)注樣式和文字樣式,你可以通過(guò)設(shè)置標(biāo)注樣式來(lái)進(jìn)行調(diào)整.
下面的的代碼復(fù)制到Acad命令行回車就完成了程序的加載,執(zhí)行命令bz即可運(yùn)行,如果有什么問(wèn)題hi我吧
(defun c:bz(
/
ptSt ptEd xh
)
(setvar "CMDECHO" 0)
(setq xh t)
(while xh
(setq ptSt (getpoint "\n標(biāo)注起點(diǎn):"))
(if ptSt
(progn
(setq ptEd (getpoint "\n標(biāo)注到點(diǎn):" ptSt))
(if ptEd
(progn
(command "DIMALIGNED" ptSt ptEd ptEd)
)
(progn
(setq xh nil)
)
)
)
(progn
(setq xh nil)
)
)
)
(prin1)
)
標(biāo)注效果: