2autocad2009-建筑圖學(xué)基礎(chǔ)隨書光盤3.01g ch04n

1、建筑設(shè)計(jì)4.1Visual LISP 的運(yùn)算符Visual LISP 的運(yùn)算符包括：算術(shù)運(yùn)算符：-*/1+1比較運(yùn)算符：=/=邏輯運(yùn)算符：AndOr表 4-1 詳細(xì)列出了這些 Visual LISP 的運(yùn)算符信息。表 4-1Visual LISP 的運(yùn)算符64運(yùn) 算 符作用資 料 類 型+返回所有參數(shù)的和數(shù)值型-將第一個(gè)數(shù)減去其他參數(shù)，返回差值數(shù)值型*返回所有參數(shù)的乘積數(shù)值型/將第一個(gè)參數(shù)除以其他數(shù)的乘積并返回商數(shù)值型=比較參數(shù)是否相等，相等則返回 T，否則返回 nil數(shù)值型或字符串型/=比較參數(shù)是否不相等，不相等則返回 T，否則返回 nil數(shù)值型或字符串型如果每個(gè)參數(shù)值都小于它右邊的參數(shù)，則

2、返回 T，否則返回 nil數(shù)值型或字符串型如果每個(gè)參數(shù)值都大于它右邊的參數(shù)，則返回 T，否則返回 nil數(shù)值型或字符串型=如果每個(gè)參數(shù)值都大于或等于它右邊的參數(shù)，則返回T，否則返回 nil數(shù)值型或字符串型返回參數(shù)的 NOT（即 1 的補(bǔ)碼）運(yùn)算整數(shù)型And返回參數(shù)的 And 邏輯運(yùn)算字符串型、T、nilOr返回參數(shù)的 Or 邏輯運(yùn)算T、nil第 4 章高級(jí)語(yǔ)言的運(yùn)算符與表達(dá)式（續(xù)表）Visual LISP 表達(dá)式前綴表示法4.2在 Visual LISP 中，表達(dá)式采用前綴表示法，即將運(yùn)算符放在參數(shù)值之前，并將運(yùn)算符（即函數(shù)名稱）和操作數(shù)（即調(diào)用函數(shù)的參數(shù)）用括號(hào)連接，作為一個(gè)表達(dá)式，這樣的表

3、達(dá)式是串行的一種。例如：(+ 25 23 24)，結(jié)果將返回 75。4.3Visual LISP 賦值表達(dá)式如果要將 100.0 的值賦予變量 x，那么一般(setq x 100)會(huì)使用函數(shù) setq 來(lái)運(yùn)算式。如：再看一個(gè)例子，要履行 x=(a+b)/c 這樣的等式，Visual LISP 的表達(dá)式語(yǔ)法為：(setq x (/ (+ a b) c)編譯器將依操作數(shù)的類型來(lái)執(zhí)行表達(dá)式計(jì)算，如果兩個(gè)操作數(shù)都是整數(shù)，那么編譯器將產(chǎn)生整數(shù)的計(jì)算結(jié)果；若運(yùn)算符中有一個(gè)以上的實(shí)數(shù)，那么編譯器也將自動(dòng)產(chǎn)生實(shí)數(shù)的計(jì)算結(jié)果。如以下范例所示：_$ (/ 5 3)1_$ (/ 5 3.0)1.66667順利學(xué)習(xí)

4、Visual LISP 運(yùn)算符與表達(dá)式的混合應(yīng)最后，舉一個(gè)簡(jiǎn)單的范例來(lái)用。Visual LISP Operator Programoper.lspfunction:demo Visual LISP operator65運(yùn) 算 符作用資 料 類 型1+參數(shù)加 1數(shù)值型1-參數(shù)減 1數(shù)值型建筑設(shè)計(jì)(3)(4)(defun c:oper ()(5)(6)(7)(8)(9)(10)(11)(12)(13)(14)(15)(16)(17)(18)(19)(20)(21)(22)(23)(24)(25)(26)(27)(28)(29)(30)(31)(32)(33)(34)(35)(setq1 (GET(

5、setq2 (GETnInputeger:)nInput secondeger:)(setq real1 (GETREAL nInputreal:)real2 (GETREAL nInput second read:)(setq str1 (GETSTRING nInputstring:)str2 (GETSTRING nInput second string:)(princ n eger operationn)(princ1)(princ + )(princ2)(princ = ) (princ (+12)(princ n)(princ1)(princ - )(princ2)(princ =

6、 ) (princ (-12)(princ n)(princ1)(princ * )(princ2)(princ = ) (princ (*12)(princ n)(princ1)(princ / )(princ2)(princ = ) (princ (/12)(princ n)(princ1)(princ rem )(princ2)(princ = ) (princ (rem12)(princ n)(princ n)(princ nReal operationn)(princ real1)(princ + )(princ real2)(princ = ) (princ (+ real1 re

7、al2)(princ n)(princ real1)(princ - )(princ real2)(princ = ) (princ (- real1 real2)(princ n)(princ real1)(princ * )(princ real2)(princ = ) (princ (* real1 real2)(princ n)(princ real1)(princ / )(princ real2)(princ = )(princ (/ real1 real2)(princ n)66第 4 章高級(jí)語(yǔ)言的運(yùn)算符與表達(dá)式(36)(37)(38)(39)(40)(41)(42)(43)(44

8、)(45)(46)(47)(48)(49)(50)(51)(52)(53)(54)(55)(56)(57)(58)(59)(60)(61)(62)(63)(64)(65)(66)(67)(68)(princ n)(princ nIncreasement and decreasement operationn) (princ1)(princ + )(princ 1)(princ = )(princ (1+1)(princ n)(princ1)(princ - )(princ 1)(princ = ) (princ (1-1)(princ n)(princ n)(princ nLogical op

9、erationn) (princ str1)(princ )(princ str2)(princ : )(princ ( str1 str2)(princ n) (princ1)(princ = )(princ2)(princ : )(princ ( )(princ real2)(princ : )(princ ( real1 real2)(princ n) (princ str1)(princ = )(princ str2)(princ : )(princ (= str1 str2)(princ n) (princ1)(princ = )(princ2)(princ : )(princ (=

10、12)(princ n) (princ real1)(princ /= )(princ real2)(princ : )(princ (/= real1 real2)(princ n)(princ n)(princ nBit operationn) (princ )(princ1)(princ =)(princ (1)(princ n)(princ )(princ2)(princ =)(princ (2)(princ n) (princ n)(princ)67建筑設(shè)計(jì)執(zhí)行結(jié)果：若提示輸入：Inputeger:5Input secondeger:10Inputreal:3.25Input sec

11、ond read:1.8Inputstring:bookInput second string:Book則將輸出：eger operation 5 + 10 = 155 - 10 = -55 * 10 = 505 / 10 = 05 rem 10= 5 Real operation 3.25 + 1.8 = 5.053.25 - 1.8 = 1.453.25 * 1.8 = 5.853.25 / 1.8 = 1.80556Increasement and decreasement operation 5 + 1 = 65 - 1 = 4Logical operation book Book :

12、 nil 5 1.8 : Tbook = Book : T 5 = 10 : nil3.25 /= 1.8 : TBit operation5=-610=-11析：整數(shù)運(yùn)算的結(jié)果是整數(shù)，實(shí)數(shù)運(yùn)算的結(jié)果仍是實(shí)數(shù)。68第 4 章 高級(jí)語(yǔ)言的運(yùn)算符與表達(dá)式老師：“ 下四，本班要舉行烤肉遠(yuǎn)足，請(qǐng)大家提出一個(gè)可以烤肉的地點(diǎn)?！卑⒋簦骸袄蠋?，到動(dòng)物園烤肉最好了！” “為什么？” “因?yàn)槟抢锸裁慈舛加小?9建筑設(shè)計(jì)4.4VBA 的運(yùn)算符與表達(dá)式在 VBA 中的運(yùn)算符將包括：算術(shù)運(yùn)算符：*/Mod比較運(yùn)算符：=連接運(yùn)算符：&邏輯運(yùn)算符：AndEqvImpNotOrXor表 4-2 詳細(xì)列出了這群 VBA 的運(yùn)

13、算符信息。表 4-2VBA 的運(yùn)算符70運(yùn) 算 符作用資 料 類 型求數(shù)字的次方值數(shù)值型*求乘積數(shù)值型/求商的實(shí)數(shù)值數(shù)值型求商的整數(shù)值數(shù)值型Mod求余數(shù)值型+求和數(shù)值型-求差數(shù)值型比較表達(dá)式是否小于另一表達(dá)式，若小于則返回 True，否則返回 FalseTrue、False比較表達(dá)式是否大于另一表達(dá)式，若大于則返回 True，否則返回 FalseTrue、False=比較表達(dá)式是否大于或等于另一表達(dá)式，若大于或等于則返回 True，否則返回 FalseTrue、False第 4 章高級(jí)語(yǔ)言的運(yùn)算符與表達(dá)式71建筑設(shè)計(jì)（續(xù)表）4.5VBA 的表達(dá)式范例本節(jié)，就以下面這個(gè)范例來(lái)說(shuō)明 VBA 運(yùn)算符

14、與表達(dá)式的混合應(yīng)用。VBA Operator Programoper.vbafunction:demo VBA operator (3)(4)Public Sub Oper()(5)(6)Dim1 Aseger,2 AsegerDim dbl1 As Double, dbl2 As DoubleDim str1 As String, str2 As String, str As String(9)Dim bln1 As(10), bln2 As72運(yùn) 算 符作用資 料 類 型=比較表達(dá)式是否等于另一表達(dá)式，若等于則返回 True，否則返回 FalseTrue、False比較表達(dá)式是否不等于另一

15、表達(dá)式，若不等于則返回 True，否則返回 FalseTrue、False&以字符串來(lái)串連接兩個(gè)表達(dá)式字符串型And返回兩個(gè)表達(dá)式的 And 邏輯運(yùn)算True、FalseEqv判斷兩個(gè)表達(dá)式是否邏輯等值，如果等值則返回 True，否則返回 FalseTrue、FalseImp返回兩個(gè)表達(dá)式進(jìn)行邏輯運(yùn)算，若第 1 個(gè)表達(dá)式為 True，則檢查第 2 個(gè)表達(dá)式，若為 True，返回False，否則均返回 FalseTrue、FalseNot返回兩個(gè)表達(dá)式的 Not 邏輯運(yùn)算True、FalseOr返回兩個(gè)表達(dá)式的 Or 邏輯運(yùn)算True、FalseXor返回兩個(gè)表達(dá)式的 Xor 邏輯運(yùn)算True、

16、False第 4 章高級(jí)語(yǔ)言的運(yùn)算符與表達(dá)式(11) 1 = 5:2 = 2(12)dbl1 = 3.2: dbl2 = 6.4(13)str1 = acad: str2 = Acad (14)str = str1 & str2(15)bln1 = True: bln2 = False(16)(17)Debug.Pr (18)Debug.Pr (19)Debug.Pr (20)Debug.Pr (21)Debug.Pr (22)Debug.Pr (23)Debug.Pr (24)Debug.Pr (25)Debug.Pr (26)Debug.Pr (27)Debug.Pr (28)Debug.

17、Pr (29)Debug.Pr (30)Debug.Pr (31)Debug.Pr (32)Debug.Pr (33)Debug.Pr (34)Debug.Pr (35)Debug.Pr(36)Debug.Pr1 & &1 & * & dbl2 & / & dbl2 & &2 & = & ( 1 2 & = & ( 1 *2 & = & (dbl2 /2 & = & (dbl2 2)2)2)2)1 & Mod &2 & = & ( 1 Mod2)1 & + &1 & - &1 & &2 & = & (2 & = & (2 & = & (1 +1 -1 2)2)2)dbl1 & & str2 &

18、 = & (str1 str2)1 & = & CDbl( 1) & = & ( 1 = CDbl( 1)2 & = & CDbl( 2) & = & ( 2 = CDbl( 2)C (dbl2) & & dbl2 & = & (C (dbl2) dbl2) str1; & ; str2; = ; strbln1 & And & bln2; = & (bln1 And bln2) bln1 & Eqv & bln2; = & (bln1 Eqv bln2) bln1 & Imp & bln1; = & (bln1 Imp bln1) Not & bln2; = & (Not bln2)bln1

19、 & Or & bln2; = & (bln1 Or bln2)bln1 & Xor & bln2; = & (bln1 Xor bln2)執(zhí)行結(jié)果：此程序?qū)⒂诖翱谥写蛴。? 2 = 255 * 2 = 106.4 / 2 = 3.26.4 2 = 35 Mod 2 = 15 + 2 = 773建筑設(shè)計(jì)5 - 2 = 35 2 = False3.2 Acad = True 5 = 5 = True2 = 2 = True6 6.4 = Trueacad & Acad = acadAcad True And False = False True Eqv False = False True Imp True = True Not False = TrueTrue Or False = TrueTrue Xor False = True分析：略。一個(gè)范例的基礎(chǔ)上，這個(gè)范例應(yīng)該很容易理解。課 后 習(xí) 題一、多選題1.“運(yùn)算符”：（ ）就是一些特殊的數(shù)字，它可利用一群操作數(shù)的值來(lái)計(jì)算產(chǎn)生新值。就是一些特殊的文字，它可利用一群操作數(shù)的值來(lái)計(jì)算產(chǎn)生新值。就是一些特殊的符號(hào)，它可利用一群操作數(shù)的值來(lái)計(jì)算產(chǎn)生新值。以上都不對(duì)以下哪些屬算術(shù)運(yùn)算符：（ ）2.（A）*（B）&（C）(（D）/3.以下哪些是 A=(12325/45)+3的正確 Aut