AutoCAD 堪稱當今最流行的計算機輔助設計
制圖軟件。它不僅應用于
機械設計行業(yè),而且還應用于其他各種行業(yè),諸如工程分析、化學工程、電器工程等行業(yè)。它之所以應用之廣還因為它具有開放的體系結(jié)構,它允許用戶和開發(fā)者采用高級語言
編程對其進行擴充和修改,以最大限度地滿足用戶的特殊要求。眾所周知,AutoCAD R14沒有預定分頁
打印功能。對于大圖紙(如:A2圖紙)及沒有與之相匹配的打印機時,AutoCAD R14無法按設計要求將圖紙打印出來。當然,如果您有寬幅打印機,那就最好,也就沒有必要進行分頁打印了。為了實現(xiàn)大圖紙分頁打印,本文利用AutoLISP語言編寫一段程序并將其命名為myplot.lsp文件,為AutoCAD R14添加分2頁或4頁打印功能。
X8l1xD %"KWjwp (defun c:myplot() ;;;主程序
CL}I:/zRB $5"-s] (if (= 1 (getvar "cmddia"))
g-V\s&} x]J-q5 (setvar "cmddia" 0)
qyBK\WqaP XOU-8;d )
NMY!-Kv 5 J%[N- (setq num (getint " Enter the Number of Page:"))
0!'M#'m $XU$?_O (setq pmax (getvar "extmax"))
c%3
@J+z &$z1Hz