functional-programming - AutoLISP:如何解决无函数定义错误？

Question

下面我粘贴了我的 drawmycoil.lsp 文件中的代码。

(defun drwcoil ()
  (setq helices_center '(0 0)) ; this is the center of the helices
  (setq inner_radius 1e3)      ; 1000 microns
  (setq outer_radius 2.4e3)    ; 2400 microns
  (setq coil_thickness 35)     ; 35 microns
  (setq turns (\ (- outer_radius inner_radius)
                 (* coil_thickness 2))) ; coil_thickness is multiplied by 2 to
                                        ; account for coil spacing
  (while (< inner_radius outer_radius)
    (command "HELIX"
             helices_center
             inner_radius
             (+ inner_radius (* coil_thickness 2))
             "t"
             "1"
             "0") ;draws one helix per iteration
    (setq inner_radius 
          (+ inner_radius (* coil_thickness 2))))) ; increments the inner radius
                                                   ; for the next iteration

(defun c:drawmycoil ()
  (drwcoil)
  (princ))

这是加载和执行后的 lisp 文件的输出:

Command: _appload coil35um_intricate.lsp successfully loaded. 

Command: 

Command:  

Command: drawmycoil  ; 
error: no function definition: \\\\

尽管我已经清楚地定义了我的功能，但我无法让 AutoCAD/AutoLISP 识别它们。我正在使用 Autodesk Education Master Suite 2011。我看到了很多教程网站，其中大部分都专注于功能的 LISP 部分。我更专注于让 AutoCAD 通过 LISP 为我绘制绘图。

Answer 1

查看您帖子中的这段代码:

(setq turns (\ (-

我怀疑您打算使用 / 而不是 \。