學而所用

函數 描述 (=  numstr [numstr ...] ) 如果所有參數在數值上相等返回  T  ，否則返回nil (/=  numstr [numstr ...] ) 如果參數在數值上不相等返回  T  ，那麼如果參數在數值上相等則為nil (<  numstr [numstr ...] ) 如果每個參數在數值上小於其右邊的參數返回  T  ，否則返回nil (<=  numstr [numstr ...] ) 如果每個參數在數值上小於或等於其右邊的參數返回  T  ，否則返回nil (>  numstr [numstr ...] ) 如果每個參數在數值上大於其右邊的參數返回  T  ，否則返回nil (>=  numstr [numstr ...] ) 如果每個參數在數值上大於或等於其右邊的參數返回  T  ，否則返回nil (and  [expr ...] ) 返回邏輯 AND 表達式列表 (boole  func int1 [int2 ...] ) 用作通用的位元布林函數 (cond  [(test result ...) ...] ) 用作AutoLISP的主要條件函數 (eq  expr1 expr2 ) 確定兩個表達式是否相同 (equal  expr1 expr2 [fuzz] ) 確定兩個表達式是否相等 (if  testexpr thenexpr [elseexpr] ) 依據條件評估表達式 (or  [expr ...] ) 返回邏輯 or 表達式列表 (repeat  int [expr ...] ) 計算每個表達式指定的次數，並返回最後一個表達式的值

函數 描述 (+  [number number ...] ) 返回所有數字的總和 (-  [number number ...] ) 從第一個數字減去第二個之後的數字中，返回差值 (*  [number number ...] ) 返回所有數字的乘積 (/  [number number ...] ) 將第一個數字除以剩餘數字的乘積並返回商 (~  int ) 返回位元 NOT （1的補碼） (1+  number ) 返回增加1的參數（遞增） (1-  number ) 返回減1的參數（遞減） (abs  number ) 返回參數的絕對值 (atan  num1 [num2] ) 以弧度為單位返回數字的反正切值 (cos  ang ) 返回以弧度表示的角度的餘弦值 (exp  number ) 返回指定次方的常數e（實數）（自然反對數） (expt base power ) 返回指定次方的數字 (fix  number ) 返回實數到最接近的較小整數的轉換 (float  number ) 返回數字到實數的轉換 (gcd  int1 int2 ) 返回兩個整數的最大公因數 (log  number ) 返回數字的自然對數作為實數 (logand  [int int ...] ) 返回邏輯位元的結果 and 整數列表 (logior  [int int ...] ) 返回邏輯位元包含的結果 or 整數列表 (lsh  [int numbits] ) 返回整數的邏輯位元移位指定的位數 (max  [number number ...] ) 返回給予的參數中最大數字 (min  [number number

可以利用由 Lee Mac 所寫的函數 新增MLine樣式 ;;-------------------=={ Add MLine Style }==------------------;; ;;                                                            ;; ;;  Adds an MLine Style to the ACAD_MLINESTYLE dictionary     ;; ;;------------------------------------------------------------;; ;;  Author: Lee McDonnell, 2010                               ;; ;;                                                            ;; ;;  Copyright © 2010 by Lee McDonnell, All Rights Reserved.   ;; ;;  Contact: Lee Mac @ TheSwamp.org, CADTutor.net             ;; ;;------------------------------------------------------------;; ;;  Arguments:                                                ;; ;;  data - a DXF list of MLineStyle data                      ;; ;;------------------------------------------------------------;; ;;  Returns:  MLineStyle Dictionary Entity, else nil          ;; ;;------------------------------------------------------------;; (defun LM:AddMLineStyle ( data / dic obj )  ;; © Lee M