第2章-数据类型-清华CAD二次开发-LISP.pptVIP

【例2-1】定义一个加10函数，源代码如下： (defun add10(x) (setq x(+ 10 x)) ) 或者： (defun add10(x) (+ 10 x) ) 该函数的函数名是add10，只有一个变元x，没有局部变量说明，它返回表达式(setq x(+ 10 x))或(+ 10 x)的值（二者是相等的）。 【例2-2】定义一个已知圆柱体的半径和高度，计算其体积的函数。源代码如下： (defun volume(r h / v) (setq v(* r r pi h)) ) 该函数的函数名是volume ，有两个变元r（半径）和h（高度），有一个局部变量v，它返回表达式(setq v(* r r pi h))的值。 2.5.2 调用AutoLISP函数 AutoLISP以表的形式调用函数，其格式如下： (函数名 [变元]…) 表的第一个元素是函数名，其余是该函数所要求的变元，变元的数量可能为0，也可能任意多个，这取决于具体函数。例如， （sqrt 4），调用的函数名为sqrt（求平方根），函数的变元是4、只有一个变元； （+ 1 2 3），调用的函数名为“+”（加），函数的变元是1、2、3，共有3个变元。 每个变元还可以