小弟一个画楼梯小程序调不好，急求各位大神帮助

976143253

小弟学生比较菜了
一个lisp期末作业，，，，马上截止，，，，具体lisp也不太会，书上抄一个程序下来一直显示：
已成功加载 splt.lsp。
命令: ; 错误: 输入的字符串有缺陷
命令: ; 错误: 输入的字符串有缺陷
命令:
所以急求各位大神帮助
谢了！！！

st788796

y ( dimy_tile "icon-ug'))
->
y ( dimy_tile "icon-ug"))

976143253

st788796 发表于 2013-11-15 01:06
y ( dimy_tile "icon-ug'))
->
y ( dimy_tile "icon-ug"))

谢谢，，，但是好像还是存在一点问题啊，，，，他的追踪我不太看得懂，，

st788796

976143253 发表于 2013-11-15 01:31
谢谢，，，但是好像还是存在一点问题啊，，，，他的追踪我不太看得懂，，

括号不配对，注意用cond 的话一定要有 (t) 部分

1.   (cond
   
2.     ((= what_next 4)
   
3.       (setq pt0 (getpoint "\n 选择轴线左下角点："))
   
4.       (setq x_pt (rtos (car pt0) 2 4))
   
5.       (setq y_pt (rtos (cadr pt0) 2 4))
   
6.     )
   
7.   )

  (cond<br />     ((= what_next 4)<br />       (setq pt0 (getpoint "\n 选择轴线左下角点："))<br />       (setq x_pt (rtos (car pt0) 2 4))<br />       (setq y_pt (rtos (cadr pt0) 2 4))<br />     )<br />   )

ll_j

使用ACAD的vlisp编辑器格式化一下，可以发现一些问题，再调试一下，跟踪过程，或许可以过。

/db_自贡黄明儒_

st788796 发表于 2013-11-15 07:37
括号不配对，注意用cond 的话一定要有 (t) 部分

说得有道理