函数传递参数

ggosgg

各位大佬，为什么这样写，调用会出现函数错误。

(defun C:tt()
   (setq Pt1 (getpoint "请输入第1点："))
   (setq Pt2 (getpoint pt1 "请输入第2点："))
   (line(Pt1 Pt2))
  ;(entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") '(100 . "AcDbPolyline") (cons 90 2) (cons 10 StartPt) (cons 10 EndPt)))  
)
;两顶点多段线（多顶点类似）
(defun line(StartPt EndPt)
  (entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") '(100 . "AcDbPolyline") (cons 90 2) (cons 10 StartPt) (cons 10 EndPt)))  
)
..直接写到上面又是对的。变成函数就不对。

飞雪神光

tanxindong 发表于 2024-8-22 09:10
我的win7系统用的飞诗，启动CAD2021时总是显示：末找到“start.scr“  
怎么调好啊。请大神指导

将飞诗目录添加进CAD的默认搜索路径 重启CAD

tanxindong

我的win7系统用的飞诗，启动CAD2021时总是显示：末找到“start.scr“  
怎么调好啊。请大神指导D:\fei1.png

飞雪神光

xxyyzzlg 发表于 2024-8-22 16:03
飞诗lisp编辑器 ，这个代码检查看起来很方便啊，最新版可从哪里下载的？

百度或者QQ群

飞雪神光

1. (line Pt1 Pt2)

(line Pt1 Pt2)

muai2010

(line(Pt1 Pt2))-------(line Pt1 Pt2)

dingtiedt

(line(Pt1 Pt2))改成 (line Pt1 Pt2)

shcvip

飞雪神光 发表于 2024-8-21 23:04

请问，这是用什么软件检查的？

xiao1984

飞诗代码编辑阅读器

飞雪神光

shcvip 发表于 2024-8-21 23:36
请问，这是用什么软件检查的？

飞诗lisp编辑器

xxyyzzlg

飞雪神光 发表于 2024-8-21 23:04

飞诗lisp编辑器 ，这个代码检查看起来很方便啊，最新版可从哪里下载的？