lisp rtos函数

AutoLisp函数

一、数学运算功能函数

1．l（十 数值 数值?）返回：累计实数或整数数值 1．2（一 数值 数值?）返回：差值

1．3（* 数值 数值?）返回：所有数值乘积

1．4（/ 数值 数值?）返回：第一个数值除以第二个以后数值的商 1．5（l十 数值）返回：数值十l l. 6（1— 数值）返回：数值一l

l．7（abs 数值）返回：数值的绝对值 1．8（atan 数值）返回：反正切值

1．9（cos 角度）返回：角度的余弦值，角度值为弧度 1．10（exp 数值）返回：数值的指数

1．11（expt 底数指数）返回：底数的指数值 1．12（fix 数值）返回：将数值转换为整数值

1．14（gcd 数值1 数值2）返回：两数值的最大公因数 1．15（log 数值）返回：数值的自然对数值

1．16（max 数值 数值?）返回：数值中的最大值 1．17（min 数值 数值?）返回：数值中的最小值 1．18 pi 常数∏，其值约为3．1415926

(vlxls-app-Init) 该程序实现了初始化EXCEL应用程序

(vlxls-app-New UnHide) 该程序实现功能:新建一个excel格，UnHide 为T时，显示窗体 (vlxls-app-open XLSFile UnHide) 打开xlsfile文件 (vlxls-app-save xlapp) 保存文件

(vlxls-app-saveas xlapp Filename) 另存为文件

(vlxls-app-quit xlapp SaveYN) 退出应用程序 SaveYN : T/nil (vlxls-app-kill SaveYN) 强行清除所有EXCEL应用程序 (vlxls-app-autofit xlapp) 存储格自动调整大小 (vlxls-sheet-get-all xlapp) 取得所有应用的页

(vlxls-Sheet-Get-Active xlapp) 返回当前应用的页 (vlxls-sheet-delete xlapp Name) 删除页

(vlxls-sheet-rename New Old Xlapp) 给页重新命名 (vlxls-sheet-add

(vlxls-app-Init) 该程序实现了初始化EXCEL应用程序

(vlxls-app-New UnHide) 该程序实现功能:新建一个excel格，UnHide 为T时，显示窗体 (vlxls-app-open XLSFile UnHide) 打开xlsfile文件 (vlxls-app-save xlapp) 保存文件

(vlxls-app-saveas xlapp Filename) 另存为文件

(vlxls-app-quit xlapp SaveYN) 退出应用程序 SaveYN : T/nil (vlxls-app-kill SaveYN) 强行清除所有EXCEL应用程序 (vlxls-app-autofit xlapp) 存储格自动调整大小 (vlxls-sheet-get-all xlapp) 取得所有应用的页

(vlxls-Sheet-Get-Active xlapp) 返回当前应用的页 (vlxls-sheet-delete xlapp Name) 删除页

(vlxls-sheet-rename New Old Xlapp) 给页重新命名 (vlxls-sheet-add

功能函数类型 功能函数语法 （+ 数值数值数值） （- 数值数值） （* 数值数值） （/ 数值数值） （1+ 数值） （1- 数值） （abs 数值） （atan 数值） （cos 角度） （exp 数值） （exp1 底数指数） （fix 数值） （float 数值） （ged 数值1 数值2） (log 数值） （max 数值数值数值） （min 数值数值数值） pi （rem 数值1 数值2） （sin 角度） （sqrt 数值） （= 表达式1 表达式2） （/= 表达式1 表达式2） （<表达式1 表达式2） （<= 表达式1 表达式2） （>表达式1 表达式2） （>= 表达式1 表达式2） （～数值） 结果 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 返回 函数用法解释 累计实数或整数数值 差值 数值乘积 第一个数值除以第二个数值以后的商 数值+1 数值-1 数值的绝对值 反正切值 角度的余弦值，角度值为弧度 数值的指数 底数的指数值 将

《Common LISP Hints 中译》

《Common LISP Hints》

Geoffrey J. Gordon Friday, February 5, 1993

Modified by Bruno Haible

Transtalted to Traditional Chinese by Wei-Yueh Chen (陈玮岳)

QUOTE:

Note: This tutorial introduction to Common Lisp was written for the CMU environment, so some of the details of running lisp toward the end may differ from site to

(defun c:pjlj()

(command "ltscale" 5 "")

(command "limits" "0,0" "420,297")

(command "zoom" "all")

(command "osnap" "off")

(command "lwdisplay" 1)

(setq d (getreal"\nÈ·¶¨Öᾶ¹«³ÆÖ±¾¶d:"))

(setq b (getreal"\nƽ¼ü¿í¶Èb:"))

(setq h (getreal"\nÈ·¶¨Æ½¼üÉ

CAD中画缓和曲线，首先复制本文☆后面的源程序保存至cad安装目录的SUPPORT文件夹，保存类型为.lsp 可以随便复制一个SUPPORT文件夹内的lsp文件，然后替换本文的程序。 打开CAD后，输入appload回车，找到你保存的缓和曲线lsp程序，点击加载，然后就可以画缓和曲线了。 首先，要画出缓和曲线的两条直线，然后输入HH回车，按提示完成缓和曲线。 注：本程序，缓和曲线段拟合长度为0.4m，如需更改拟合长度，将程序的第8行(repeat (FIX(/ Ls 0.4))及9行(setq l (+ l (/ Ls (FIX(/ Ls 0.4))))中的0.4修改即可。 ☆

;;多义线摹拟缓和曲线。

;;输入起止直线、半径、缓和曲线长或设计车速。 ;;命令：HH

(defun com_p() (setq l 0)

(command \ (command \ (repeat (FIX(/ Ls 0.4))

(setq l (+ l (/ Ls (FIX(/ Ls 0.4))))

x (+ (- l (/ (* l l l l l) 40 C C)) (/ (*

目 录

第一章 简介................................................................1

1.1使用 Visual LISP.....................................................1

1.2教程概述.............................................................1

第二章 设计和开始编程.......................................................2

2.1定义整个程序的目标...................................................2

2.2 Visual LISP 入门.....................................................2

2.2.1查看 Visual LISP 等待控制从 AutoCAD 返回的步骤.................2

2.2.2使用 Visual LISP 开始编写应用程序的步骤....................

一、统计函数

AVERAGE COUNT MAX MIN

COUNTIF：

计算给定区域内满足特定条件的单元格的数目。

语法

COUNTIF(range,criteria)

Range ： 需要计算其中满足条件的单元格数目的单元格区域。

Criteria ： 确定哪些单元格将被计算在内的条件，其形式可以为数字、表达式或文本。例如，条件可以表示为 32、"32"、">32"、"apples"。

SUMIF：（数学与三角函数）

根据指定条件对若干单元格求和。

语法

SUMIF(range,criteria,sum_range)

Range ： 用于条件判断的单元格区域。

Criteria ： 确定哪些单元格将被相加求和的条件，其形式可以为数字、表达式或文本。例如，条件可以表示为 32、"32"、">32"、"apples"。

Sum_range 为需要求和的实际单元格。只有当 Range 中的相应单元格满足条件时，才对 sum_range 中的单元格求和。如果省略 sum_range。则直接对 Range 中的单元格求和。

FR

一、统计函数

AVERAGE COUNT MAX MIN

COUNTIF：

计算给定区域内满足特定条件的单元格的数目。

语法

COUNTIF(range,criteria)

Range ： 需要计算其中满足条件的单元格数目的单元格区域。

Criteria ： 确定哪些单元格将被计算在内的条件，其形式可以为数字、表达式或文本。例如，条件可以表示为 32、"32"、">32"、"apples"。

SUMIF：（数学与三角函数）

根据指定条件对若干单元格求和。

语法

SUMIF(range,criteria,sum_range)

Range ： 用于条件判断的单元格区域。

Criteria ： 确定哪些单元格将被相加求和的条件，其形式可以为数字、表达式或文本。例如，条件可以表示为 32、"32"、">32"、"apples"。

Sum_range 为需要求和的实际单元格。只有当 Range 中的相应单元格满足条件时，才对 sum_range 中的单元格求和。如果省略 sum_range。则直接对 Range 中的单元格求和。

FR