如何写局部变量

xiaoliu · 发表于 2004-5-19 11:04:00

使用了一个循环,这样给变量p1,p2...到pn赋值, 并不限定n的多少,但我在编程中想把这些pi,都写到defun 后的局部变量中该如何写呢??
(defun (/ )
(while
   (setq en (entsel(strcat"\n" "选择杆" (itoa i))))
   (setq en (car en))
   (setq e (entget en))
   (set (read (strcat "p" (itoa i) )) (cdr (assoc 10 e)))
   )
)

meflying · 发表于 2004-5-19 11:36:00

不要用那么多变量,你把那些值都放到一个表里,表长度可以不定,也可以随时提取...不是方便很多
PS:你的函数没有函数名啊

如何写局部变量

发表回复

精选推荐