[LISP函数]：请教polar函数的用法

fengguiwu

我写了这样一条语句
  (command "circle" (polar cpoint 0 (/ DD 2)) "d" A)
其中DD 和A 是全局变量，已经检验过的，是经过赋值的（分别为220和8.4）
但是语句就是执行不了，说出现下列错误：
; 错误: 参数类型错误: numberp: "220"

DD和A都是我从外部文件得到的数据

另外，还有一句 (setq cen_lenth (+ (/ DD 2) 10) )
也是执行不了，不知道是什么原因。
难道从文件得到的数据还有什么说法吗？
我的函数体如下：
(defun draw_ahead_view()
  (setq cpoint (list 170 190))                  ;;设置主视图的中心点
  (command "layer" "s" "cen" "")                ;;设置cen为当前层，画主视图的中
    (setq cen_lenth (+ (/ DD 2) 10) )
   。。。。。
    (command "layer" "s" "draw" "")             ;;设置draw层为当前层，开始画主?
  (command "circle" cpoint "d" DD )
  (command "circle" cpoint "d" d )    这两个圆都是好画的，说明DD等变量是正确的
  (command "circle" (polar cpoint 0 (/ DD 2)) "d" A)
）
请高手指点一下！！谢谢！

snsj

POLAR函数要求的角度是以弧度的形式存在的，而你给出的是角度值所以返回错误
用(setq  a   (/ dd 2))      (antof  a)   
先转化成角度值就可得到正确的值

LUCAS

DD & A 是字串,要先轉為數值

將字串轉換成實數
(atof string)

fengguiwu

如梦初醒，谢谢两位大虾的指点，原来没有注意到这个问题！