lisp教程

(AIR 175) Result : nil COMMAND : (AIR 215) Result : T 四流程控制第 1 节-------------------------------------------------------------------------------- 条件判断是利用条件函数, 配合关系及逻辑运算所设定的一些准则, 令程序自行分析, 因应情况作出适当行动. 单一条件 (IF 条件表达式是表达式 [否表达式] ) 函数先检查条件表达式, 若其传回值为 T, 便会执行其后的是表达式若有提供否表达式, 且条件表达式的传回值为 nil, 函数将不会执行( 跳过) 是表达式而执行否表达式若没有提供否表达式, 且条件表达式的传回值为 nil 时,函数将不作任何事情 IF 函数可以巢状方式嵌套, 即在是或否的表达式中加入另一个 IF 函数练习 (Exercises) 判断空气污染指数 : 大于 100 = Very High, 51 至 100 = High, 26 至 50 = Medium, 25 或以下 = Low ---- 启动编辑器, 开启 C:/TEST.LSP 程序文件; 新增 AIR-1 自定函数, 程序代码如下 : (DEFUN AIR-1 (NUM) (IF (> NUM 100) (PRINC "Very High")) (IF (AND (> NUM 50) (<= NUM 100)) (PRINC "High")) (IF (AND (> NUM 25) (<= NUM 50)) (PRINC "Medium")) (IF (<= NUM 25)) (PRINC "Low")) (PRINC))