找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 1055|回复: 19

[求助] [求助]:关于prin1的疑问

[复制链接]
发表于 2004-8-2 20:31:30 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
apply函数的格式是:apply〈函数〉〈表〉
书中的举例是:(apply ‘+  ‘(1 2 3))   返回6
我不明白的是+号前为什么加‘,另外再问一下,表达式到底指什么,是不是非得有括号
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
 楼主| 发表于 2004-8-2 21:05:58 | 显示全部楼层

[求助]:关于osnap

我想问一下
(setq pt2 (osnap pt1 "midp"))
(setq pt2 (osnap pt2 "midp,endp,center"))
这两个式子都捕捉中点,但下面的式子的endp,center还有什么作用吗,我挺糊涂。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-8-2 22:18:56 | 显示全部楼层
(setq pt2 (osnap pt2 "midp,endp,center"))
当p2 接近中点就捕捉中点,接近端点就捕捉端点,在圆上就捕捉圆心。
而第一个,仅仅捕捉中点
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 488个

财富等级: 日进斗金

发表于 2004-8-2 23:12:57 | 显示全部楼层
前面有讨论,找一下.
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-8-3 09:57:42 | 显示全部楼层
LISP中的"表达式"即符号表达式(Symbolic-Expression), 包含符号, 字符串, 表及自定义函数, 文件阐述符, AutoLISP内部函数等.
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-3 20:34:30 | 显示全部楼层
能否给一个连接,另外对于APPLY函数,+号前为什么要加',有什么特殊含义吗
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-3 20:36:31 | 显示全部楼层
精辟,终于弄明白了,我现在对学LISP一点信心也没有,太难了,斑竹可否提供些编写的基本套路.
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-3 21:10:46 | 显示全部楼层

[求助]:关于程序的执行的疑问

以下是书中画一个三维的长方体或正方体(box3)的程序:
(defun box3(sp l w h / p1 p2 p3 p4 p5 p6 p7 p8)
  (setq p2 (mapcar '+ sp (list 0 w 0))
        p3 (mapcar '+ sp (list l 0 0))
        p4 (mapcar '+ p3 (list 0 w 0))
        p5 (mapcar '+ p3 (list 0 0 h))
        p6 (mapcar '+ p4 (list 0 0 h))
        p7 (mapcar '+ sp (list 0 0 h))
        p8 (mapcar '+ p2 (list 0 0 h))
  )
  (setvar "cmdecho" 0)
  (setvar "blipmode" 0)
  (command "3dmesh" "5" "4" p7 p7 p5 p5 p8 p8 p6 p6
                            p8 p2 p4 p6 p7 sp p3 p5
                            p7 p7 p5 p5
  )
  (setvar "cmdecho" 1)
  (setvar "blipmode" 1)
  (princ)
)
我在comman;后键入(box3   0,0,0  5 5 6)屏幕上一点反应也没有,我想问一下是不是我输入的格式哟问题.
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-8-3 21:34:24 | 显示全部楼层
(box3 '(0 0 0) 5 5 6)
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-8-4 06:26:19 | 显示全部楼层
' 是quote函数的简写式. 表明不对 + 求值, 而是返回 + 符号本身.
这些LISP基础知识, 建议多看看帮助和有关书.
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-4 11:42:03 | 显示全部楼层
在(0 0 0)前为什么要加‘
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-8-4 17:06:06 | 显示全部楼层
'表示引用,对后面的表达式不进行运算。
'(0 0 0) 与 (list 0 0 0)是一样的,但前者要快一些
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-4 21:00:44 | 显示全部楼层
通过这些例子,似乎有些明白‘的含义了。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-4 21:13:58 | 显示全部楼层

[求助]:关于print的疑问

以下是书上的一段关于在屏幕上打印10、15、20、25的平方根的程序:
(defun prsqrt(/ x)
  (setq x 10)
  (while (<= x 25)
    (print (list 'sqrt x))。。。。。。1
    (princ "=")
    (princ (sqrt x))
    (setq x (+ x 5))
  )
  (princ)
)
当键入prsprt时,屏幕上显示:
(SQRT 10) =3.16228
(SQRT 15) =3.87298
(SQRT 20) =4.47214
(SQRT 25) =5.0
可是当我把1行的语句改为:
(print (list sqrt x))            既去掉’
再次运行prsqrt,结果却显示如下:
(#<SUBR @023dbdd4 SQRT> 10) =3.16228
(#<SUBR @023dbdd4 SQRT> 15) =3.87298
(#<SUBR @023dbdd4 SQRT> 20) =4.47214
(#<SUBR @023dbdd4 SQRT> 25) =5.0
请好心人解释这是为什么,两者有何区别和联系。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

 楼主| 发表于 2004-8-4 21:28:59 | 显示全部楼层

[求助]:关于文件描述符的疑问

我想问一下,什么是文件描述符,它所对应的文件是什么,比如说
(prin1 “Hello” f)       系统提示:错误: 参数类型错误: FILE nil
(write-char 67 f)         系统提示:C67
两者都是文件描述符的引用,我根本就没建立过f文件,为什么一个出错,一个却没出。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-11-18 21:29 , Processed in 0.295430 second(s), 60 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表