程序的流程控制和autolis(已修改)
2025-05-28 09:43 本頁(yè)面
【正文】 第 3章 程序的流程控制和 AutoLISP文件 程序的流程控制 AutoLISP程序的流程通過(guò)流程控制函數(shù)控制 。 分支結(jié)構(gòu) 1. (cond (測(cè)試表達(dá)式 1 結(jié)果表達(dá)式 1) [(測(cè)試表達(dá)式 2 結(jié)果表達(dá)式 2)] … ) 該函數(shù)從第一個(gè)子表起 ， 計(jì)算每一個(gè)子表的測(cè)試表達(dá)式 ，直至有一個(gè)子表的測(cè)試表達(dá)式成立為止 ， 然后計(jì)算該子表的結(jié)果表達(dá)式 ， 并返回這個(gè)結(jié)果表達(dá)式的值 。 例如 ， 當(dāng) i 小于等于 1時(shí) ， n=1；小于等于 2時(shí) ， n=4；小于等于 3時(shí) ， n=10；其它情況下 n=100。 用 cond函數(shù)實(shí)現(xiàn)變量 n和 i 之間以上關(guān)系的源代碼如下： 測(cè)試表達(dá)式 1 結(jié)果表達(dá)式 1 測(cè)試表達(dá)式 2 結(jié)果表達(dá)式 2 測(cè)試表達(dá)式 n 結(jié)果表達(dá)式 n 成立 成立 成立 不成立 不成立 不成立 測(cè)試表達(dá)式 1 結(jié)果表達(dá)式 1 測(cè)試表達(dá)式 2 結(jié)果表達(dá)式 2 測(cè)試表達(dá)式 n 結(jié)果表達(dá)式 n 成立 成立 成立 不成立 不成立 不成立 T（其余） 結(jié)果表達(dá)式 (setq n(cond ((= i 1) 1) ((= i 2) 4) ((= i 3) 10) (t 100) ) ) 說(shuō)明：該函數(shù)類(lèi)似于 C語(yǔ)言的 switch語(yǔ)句 ， 最后一個(gè)測(cè)試表達(dá)式 “ t（ 或 T） ” 相當(dāng)于 C語(yǔ)言的 “ default”， 指其余的情況 ， 例如i 等于 5時(shí) ， n等于 100， 也可以缺少這個(gè)測(cè)試表達(dá)式 。 與 C語(yǔ)言switch語(yǔ)句不同的是 ， 若某一測(cè)試表達(dá)式成立 ， 即返回相應(yīng)結(jié)果表達(dá)式的值 ， 不再向下測(cè)試 。 例如 ， 上述表達(dá)式中 ， 若 i 等于 0， 已滿(mǎn)足第一個(gè)測(cè)試表達(dá)式 (= i 1)， 返回結(jié)果表達(dá)式的 1， 最后結(jié)果是 n等于 1， 運(yùn)算結(jié)束 。 2.（ if 測(cè)試條件表達(dá)式 表達(dá)式 1 [表達(dá)式 2]） 若測(cè)試條件表達(dá)式結(jié)果為真 ， 執(zhí)行表達(dá)式 1， 否則 ， 執(zhí)行表達(dá)式 2。 例如： (if ( a 1) (setq b 2) ) 該表達(dá)式的含義是；如果 a 大于 1， 則 b等于 2， 否則不作任何計(jì)算 ， 求值結(jié)束 。 (if ( a 1) (setq b 2) (setq b 3) ) 該表達(dá)式的含義是；如果 a 大于 1， 則 b等于 2， 否則 b等于 3，求值結(jié)束 。 注意：該函數(shù)最多只有 3個(gè)變?cè)?， 即測(cè)試條件表達(dá)式 、 表達(dá)式 1和表達(dá)式 2。 先分析下列程序代碼： 測(cè)試條件 表達(dá)式 表達(dá)式 1 成立 表達(dá)式 2 測(cè)試條件 表達(dá)式 表達(dá)式 1 成立 不成立 (if ( a 1) (setq b 2) (print (＋ b a)) (setq b 4) (print b) ) 該程序段的本意是 ， 若條件成立 ， b等于 2， 然后打印 a與 b之和 ， 否則 b等于 4， 然后打印 b。 但是在執(zhí)行該程序段時(shí) ， 首先檢查 if函數(shù)變?cè)臄?shù)量 ， 第 1個(gè)變?cè)菧y(cè)試條件表達(dá)式 ， 它對(duì)應(yīng)表達(dá)式 ( a 1)， 第 2個(gè)變?cè)菞l件成立時(shí)執(zhí)行的表達(dá)式 ， 它對(duì)應(yīng)表達(dá)式 (setq
法律信息相關(guān)推薦
鄂ICP備17016276號(hào)-1