工程測量數值化在AutoCAD之應用-瑞芳高工.docVIP

國立瑞芳高級工業職業學校 97年度校內教師研習 土木建築群 工程測量數值化在AutoCAD之應用研習 （Auto lisp自動繪圖） 主講人 土木科 翁明郎老師 參考資料：Auto lisp DCL 吳永進 林美櫻 編著 目錄 簡介…………………………………………….1 重要的 AutoLISP 的基本語法結構： ………1 常用函數命令： ………………………………5 練習範例： ……………………………………6 工程測量數值化在AutoCAD之應用研習講義 （Auto lisp自動繪圖） （一）簡介 AutoLISP內含於AutoCAD軟體內,不用另外花錢買! AutoLISP是強化AutoCAD最好、最直接的『程式語言』 AutoLISP是簡化測量員在測量成果輸出與內業計算的好幫手 現今測量的趨勢是 簡單化 數值化 程式化AutoLISP可以協助達成此目的。 我對測量實習教學未來之期許：測量實習教學上若以實務考量應當數值化、程式化，應當教學生將測量成果數值化、計算過程程式化，在測量實習課的教學上應當有1/2時數，結合測量繪圖軟體進行測量實習，並讓學生學習程式設計來簡化內業計算，以因應業主的須求。 1. AutoLISP 程式語言的特質 A.語法簡單 B.功能函數強大 C.撰寫的環境不挑剃 D.直譯式程式,即寫即測、即測即用 2. AutoLISP 程式語言的功用 強化 AutoCAD 原有指令、創造更有用的 AutoCAD 新指令、簡化繁瑣的環境設定或繪圖步驟、圖面資料讀檔、寫檔。 （二）重要的 AutoLISP 的基本語法結構： 規則1：以括弧組成運算式,左右括弧數一定要成雙成對、相對稱 (+ 1 2 3 4 5) 傳回加總和15 (setq a(/ 10 3)) !a----3 (setq a(/10.0 3)) !a----3.333333 (max 14.5 8.9 35) 傳回最大值35 (setq a (* 12.5 4)) 傳回相乘值 50,同時設定給『變數 a』 !a 回應50 (註:! 號可用來查詢變數值) 錯誤的範例： 指令:(setq a (* 12.5 4) 1 傳回1表示少了一個括弧 1 ) 此時,只要再補上一個 ) 即可 規則2：運算式型態 (運算元 運算子 運算子 運算子 ...)或 (函數(式) 引數 引數 引數 ...) 或 (函數(式) 元素 元素 元素 ...) 運算元包括『功能函數』『自定函式』 自定函式: 由設計者自行定義的新函式或副程式 運算子(又稱引數或元素)包括: A.整數(Integer): 如8,-17,500,9999… B.實數(Real): 如8.5,-17.456… C.字串(String): 如 AutoCAD,123,Enter Real:,7.5,… D.串列(List): 如 (a b c),(x y),(x y z),(a 8 3.5),.... E.圖元名稱代碼:如 entity name: 6000f262 ... F.檔案代碼: 如file:#12438… G.選擇群集代碼: 如Selection set:1、Selection set:1… 規則3 ：運算式中的『運算子』,可以是另一『運算式』或『副程式』功能函數使用語法: (strcat 字串1 字串2 字串3 ....) 字串結合功能函數 (getstring 提示) 要求鍵入一個字串 (rtos 實數) 將實數轉換成字串 範例說明1: (strcat abc 123 LISP) 傳回：abc123LISP 範例說明2: (strcat abc (getstring Enter String: ) (rtos 123.45)) 執行結果: Enter String: 鍵入任一字串,假設是鍵入 HELLO 回應 abcHELLO123.45 規則4：多重的括弧運算式,運算的先後順序是『由內而外、由左而右』 範例說明: 請將10.25 + 17 - 13.2 / 7的結果,設定給變數kk，並轉換成AutoLISP 的運算式 (setq kk (- (+ 10.25 17) (/ 13.2 7))) 規則5：以檔案型態存在的AutoLISP程式(ASCII檔案),其副檔名必須是.LSP。 規則6：撰寫的環境,只要是一般的文書編輯軟體,可編輯 ASCII 檔案者都適用 如:PE2、PE3、DW3、書中仙、漢書、EDIT、記事本....等。 規則7：以 defun 功能函數定義新的指令或新的功能函式 (註:引數及區域變數可省略) 程式結構型態：(defun 函式名稱(引數/區域變數) 程式內容) 。 規則8：新定義