查看单个帖子
旧 2009-04-27, 10:14 AM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 求助高手帮忙

求助高手帮忙
www.dimcax.com
求助高手帮忙在lisp编程中由于绘图需要 对in_pk0至in_pk40共有41个点存储了坐标的值。我想在绘图完毕后用一个循环语句把in_pk0至in_pk40都设置为nil。这样就可以释放空间。请高手帮帮我编一个小程序,十分感谢!
d
(defun c:tt (/ i str)
(setq i 0 str "in_pk")
(repeat 42
(set (read (strcat str (itoa i))) nil)
(setq i (1+ i))
)
)
d
谢谢版主的帮助,向你致敬!
d
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)