阿貴的 autolisp 小程式集

PLOT_Suite [ CAD 智能出圖套件 ]

主要分成兩支程式:

SPT : 出圖 PDF 檔

BLP  : 印表機 出 A4 圖紙

----------------------------------------------------------------------------------------------

[ PLOT_Suite.zip AutoCAD 版本 ] [ PLOT_Suite.zip ZWCAD 版本 ]

[ CAD 智能出圖套件 ] 包含:

pdf-printer.txt 預設 PDF 印表機名稱的檔案. { ZWCAD PDF(High Quality Print).pc5 }

pdf-Style.txt 預設 PDF 印表機的出圖型式表名稱的檔案. { ZWCAD.ctb }

pdf-printer-paper.txt 預設 PDF 印表機的圖紙名稱的檔案. { ISO A4 (297.00 x 210.00 MM) }

plot-printer.txt 預設實體印表機名稱的檔案. { AL-M220DN(網路) }

plot-Style.txt 預設實體印表機的出圖型式表名稱的檔案. { monochrome.ctb }

plot-printer-paper.txt 預設實體印表機的圖紙名稱的檔案. { A4 210 x 297 mm }

pdftk.exe 請上網下載免費程式, pdftk.exe 是純文字 command 版本, 不要用視窗版 pdftkXp.exe.

SPT 有找到 pdftk.exe 則將個別 PDF 合併成一個單一 PDF 檔, 並刪除所有單張 PDF 檔.

GET-LIST 擷取 [ 出圖設備 ], [ 出圖型式表 ], [ 圖紙名稱 ] 清單的小程式. ( SDN 無法成功寫入時的備用 )

SDN 選取 PLOT_Suite 所需的預設值, 包括: [ 印表機 ], [ 圖紙 ], 和 [ 出圖型式表 ], 寫入上面 6 個 ( ***.TXT ) 檔案內. 預設值設定成功後, SPT 和 BLP 就能順利執行出圖.

Plot_suite.txt PLOT_Suite 的說明檔.

-------------------------------------------------------------------------------

套件下載後, 先行操作項目

將 [ CAD 智能出圖套件 ] 解壓縮到同一資料夾.
將主程式加到預載區.

設定後, 開新圖檔時, 自動預先載入.
(load “PLOT_Suite”) 載入 PLOT_Suite 程式

執行程式, 建立預設檔.

(load “SDN") 載入 SDN程式.
SDN 執行 SDN程式.

-------------------------------------------------------------------------------

【印表機與圖紙預設工具】使用說明 (DCL 對話框版)

為了簡化出圖設定流程，我們已將原本複雜的文字設定介面，升級為直覺式的對話框操作！現在只需動動滑鼠，就能完成 6 項預設值的設定，避免手動輸入錯誤。 🚀 如何開始使用？在 AutoCAD / ZWCAD 指令行輸入： (load “SDN”) (並按下 Enter, 載入SDN )

SDN (並按下 Enter, 執行SDN )

*** 以上為 SDN 的操作說明 ***

---------------------------------------------------------------

*** SDN 執行有問題, 才考慮備用方案, GET_LIST ***

*** 2026.03.23 SDN 選取 PLOT_Suite 預設值, 包括: 印表機, 圖紙, 和出圖型式表, 寫入 6 個 .TXT 檔案內. ***

GET_LIST 在純文字介面操作, 須先了解 GET_LIST 的操作順序和原理; SDN 在 DCL 對話框中選取 6 個預設值後, SDN 幫忙寫入相對的 6 個文字檔內.

-------------------------------------------------------------------------------

*** 以下為 GET_LIST 的操作說明 ***

(load "GET-LIST") >> 載入 GET_LIST 程式.

GET-LIST >> 執行 GET_LIST 程式. 這個程式, 要執行兩次:

第一次:

[1/3] 已生成設備清單: plot-name-list.txt

[2/3] 已生成型式表清單: pltStyle-list.txt

正在讀取設備 [ZWCAD PDF(High Quality Print).pc5] 的紙張...

[3/3] 已生成紙張清單: pdf-paper-list.txt

[提示] 找不到 plot-printer.txt，跳過紙張擷取。

[完成] 請查看 LISP 資料夾。

以上是第一次執行GET_LIST 程式顯示的訊息.

plot-name-list.txt >> 所有出圖設備名稱的清單.

pltStyle-list.txt >> 所有出圖型式表名稱的清單.

首先, 可以打開 pltStyle-list.txt , 選取您要指定的出圖型式表名稱, 如: Monochrome.ctb , 把它複製, 貼到 pltStyel.txt (自建檔案).

打開 plot-name-list.txt 檔案, 找到您要出圖的設備名稱, 例如: AL-M220DN(網路), 這是我的 CAD 連接到的實體印表機, 把它複製, 貼到 plot-printer.txt (自建檔案).

ZWCAD PDF(High Quality Print).pc5, 這是我要出圖 PDF 檔的印表機名稱, 把它複製, 貼到 pdf-printer.txt (自建檔案).

第二次執行 GET_LIST 程式:

指令:GET-LIST

正在生成配置清單...

[1/3] 已生成設備清單: plot-name-list.txt

[2/3] 已生成型式表清單: pltStyle-list.txt

正在讀取設備 [ZWCAD PDF(High Quality Print).pc5] 的紙張...

[3/3] 已生成紙張清單: pdf-paper-list.txt

正在讀取設備 [AL-M220DN(網路)] 的紙張...

[3/3] 已生成紙張清單: plot-paper-list.txt

[完成] 請查看 LISP 資料夾。

多生成了 pdf-paper-list.txt 和 plot-paper-list.txt 兩個檔案.

在 pdf-paper-list.txt 找到 A4 圖紙名稱, ISO A4 (297.00 x 210.00 MM), 把它複製, 貼到 pdf-printer-paper.txt (自建檔案).

在 plot-paper-list.txt 找到 A4 圖紙名稱, A4 210 x 297 mm, 把它複製, 貼到 plot-paper-list.txt (自建檔案).

這樣, 您就完整建立了 -PLOT 指令所需的預設值了:

plot-printer.txt / pdf-printer.txt / pdf-printer-paper.txt / plot-name-paper.txt / pltStyel.txt

實體印表機名稱 / PDF檔的出圖設備 / PDF印表機圖紙名稱 / 實體印表機圖紙名稱 / 出圖型式表名稱

程式所需的這五個出圖預設值檔案, 成功建立. 即可執行出圖程式: SPT 或 BLP

出圖如果正確無誤, 即五個預設值都設定正確. 以後就可以直接以 SPT 或 BLP 指令出圖.

如果有問題, 必須重頭依序由印表機 -> 圖紙設定預設值.

將 pdf-printer.txt 檔案內容, 改成您要的 PDF 印表機名稱. 如: ZWCAD PDF(High Quality Print).pc5

將 plot-printer.txt 檔案內容, 改成您要的預設印表機. 如: AL-M220DN(網路)

*** 要注意字和字之間的空格要相符. 不能多或少. 要完全相同. ***

pdf-printer.txt 檔案的內容, 一定要是出圖 PDF 檔的 PDF 印表機名稱.

plot-printer.txt 檔案內容, 一定要指定出 A4 紙張的實體印表機.

存 ***.txt 文字檔的 [ 編碼 ] 要指定 ANSI, 中文文字在 CAD 才不會變亂碼顯示... AL-M220DN(蝬脰楝)

操作檢查清單：

設定檔建立：

PDF 用：pdf-printer.txt 與 pdf-printer-paper.txt

實體用：plot-printer.txt 與 plot-name-paper.txt

通用：pltStyle.txt

編碼確認：請確保這些 .txt 檔案儲存為 ANSI 編碼（BIG5），以避免中文字亂碼。

紙張名稱：請務必從 GET-LIST 產出的清單中，複製完整的紙張名稱（含數字與單位）到 .txt 中。

這套方案現在兩邊邏輯完全對稱，無論是在 ZWCAD 還是 AutoCAD 下，只要設定檔配置好，出圖速度與準確度都會達到巔峰。

*** 以上前三項, 一次設定成功後, 就幾乎不用再改動. ***

*** 以上為 GET_LIST 的操作說明 ***

-------------------------------------------------------------------------------

正常出圖指令:

指令: SPT >> 出圖 PDF 格式的檔案

指令: BLP >> [ 實體印表機 ] 出印在 A4 紙張的圖形.

-------------------------------------------------------------------------------

PLOT_Suite 適用範圍 :

出圖單一圖檔之 [ 模型空間 ] 內的圖框 ( block 或 Polyline ).
出圖類型 : PDF 檔, 或 A4 圖紙.
圖框由左至右一直線排列, 出圖會自動由左至右排序出圖.
出圖會依圖框橫/豎, 自動旋轉配合.
出圖的圖紙大小, 預設為 A4 規格.
列印比例, 一律為 [佈滿 (Fit)]
PDF 出圖, 每個 PDF 檔名尾部加三碼流水號.
PDF 檔案, 放在出圖檔案 (.dwg ) 所在路徑下的 pdf_output 次資料夾中.

-------------------------------------------------------------------------------

-------------------------------------------------------------

指令:SPT === SPT 智能 PDF 出圖啟動 === 請先選一個圖框範本 ( Block 或 Polyline ): 再來選取要出圖 PDF 檔的圖框 ( Block 或 Polyline ): 選取物件: 指定對角點: 找到 64 個，已過濾 61 個選取物件: -PLOT 是否需要細節列印設定? [是(Y)/否(N)] <否>: Y 輸入配置名或 [?] <模型>: Model 輸入輸出設備的名稱或 [?] <ZWCAD PDF(High Quality Print).pc5>: ZWCAD PDF(High Quality Print).pc5 輸入圖紙尺寸或 [?] <ISO A4 (210.00 x 297.00 MM)>: ISO A4 (297.00 x 210.00 MM) ………………. 輸入檔案名 <D:\drawing\ZE0312-XXXX-1150311013-代號J-Model.pdf>: D:\drawing\pdf_output\12E002_W260312015_003.pdf 是否儲存對頁面設定的變更? [是(Y)/否(N)] <否>: No 是否繼續列印? [是(Y)/否(N)] <是>: Yes 有效列印範圍: 252.55 寬 X 176.00 高正在列印視埠 2。指令: === SPT 出圖 PDF 圖形檔完成 ===