判断条件,然后执行语句在LISP中怎么写?判断条件当某值 不等于 某值 的条件下 执行下一语句 (if (or (= mima nil) (not mima "abcxyz0517")) (command "QUIT" "y" "" ""))
判断条件,然后执行语句
在LISP中怎么写?
判断条件
当
某值 不等于 某值 的条件下
执行下一语句
(if (or (= mima nil) (not mima "abcxyz0517"))
(command "QUIT" "y" "" ""))
2楼
(if (= 1 3) "YES! ! " "no.") 返回 "no."
回复
3楼
LISP和 DCL在一个文件中
能实现吗?
斑竹帮帮我
回复
4楼
1.方法1 打包成vlx文件,可以包含dcl文件.
2.方法2. 就是利用lsp.的命令write-line直接在支持目录下生成所需的dcl文件.
回复
5楼
vlx文件怎么生成??
还有,就是有别人的FAS文件和vlx 文件,怎么加到自己编译的FAS文件里面呢??
回复
6楼
怎样用lisp 将最近的2个图元转化为块?
回复
7楼
(defun c:fh11( )
(startapp (findfile "D:\工具箱\建筑工具箱\HCLoad.EXE"))
(princ)
)
帮我看看有什么毛病?
回复
8楼
(startapp (findfile "D:\\工具箱\\建筑工具箱\\HCLoad.EXE"))
或者
(startapp (findfile "D:/工具箱/建筑工具箱/HCLoad.EXE"))
语法
(findfile filename)
功能及参数
此函数将提供用户利用程序针对一个特定的文件来找出AutoCAD 数据库名称。此 AutoCAD 数据库路径的组成是由目前的文件夹, 接着含有目前编辑图形文件的文件夹, 再接着以 ACAD 系统变量命名的文件夹(如果有的话), 而最后则是此 AutoCAD 文件名的文件夹。
findfile 并没有缺省的扩展名, 或是文件名。因而使用时, 您必须给予文件名称。如果此名称不合法, AutoCAD将自动搜寻并将完整合法的文件名称返回, 当寻找不到时则返回nil。如果提供有一个磁盘/文件夹路径, 那么AutoCAD将只在此文件夹中寻找 (而不会执行数据库搜寻)。findfile 函数所返回的完整名称将适用于 open 函数。(在以下范例中, 我们将使用“/”当做文件夹的分别间隔。而在DOS操作系统中, 您亦可以使用“\”或是“/”)。
范例
在下列假设条件下：
目前的文件夹是 /r14 而且含有 abc.lsp 文件
我们正在 /r14/drawings 文件夹中编辑图形
ACAD 环境参数设定成 /r14/support
xyz.txt 文件只存在于 /r14/support 文件夹中
nosuch 文件并不存在于数据库搜寻路径中的任何文件夹之下
则：
(findfile "abc.lsp") 返回 "/r14/abc.lsp"
(findfile "xyz.txt") 返回 "/r14/support/xyz.txt"
(findfile "nosuch") 返回 nil
回复
9楼
(startapp (findfile "D:\\工具箱\\建筑工具箱\\HCLoad.EXE"))
或者
(startapp (findfile "D:/工具箱/建筑工具箱/HCLoad.EXE"))
除了EXE文件
对EXCEL文件,TXT文件等能实现吗?
回复
10楼
帮我把下面的LISP程序优化一下
要求:
在转化之前,输入一点,以输入的点为基准点绘制轴侧图
回复
11楼
帮我优化一下下面的LISP程序
要求:
在绘制轴侧图之前,
输入一点,以该点为基准点
绘制轴侧图
回复
