查看: 2491|回复: 1

[求助] 请帮忙调试一个画布管的lisp程序。

[复制链接]
ningyong58 发表于 2011-2-28 11:34 | 显示全部楼层 |阅读模式
现有一段lisp程序,调试节n次都出现括号不配对问题,调试了n次也没找到原因。
(setq hetyp(getkword(strcat“\n请选择换热器型式一”
“(S)浮头式/(U)U形管式/<(F)固定管板式
>:”)))
(if(not hetyp)(setq hetyp“Fixhead”))
(if(= hetyp“Slidehead”)
(progn(initget 7)
(setq dl(getreal“\n请输入布管限定圆直径DL<
mm>:”))
详见附件。谢谢。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?[加入论坛]

x
hanhuaji 发表于 2011-2-28 14:44 | 显示全部楼层
本帖最后由 hanhuaji 于 2011-2-28 15:14 编辑

看了一下,这不是一个绘图程序,而是计算程序,楼主抄写源程序时错误也实在太多了,标点符号大部分都用中文的,好多地方语句也不符合autolsp,根本谈不上调试,要用换热器布管程序,在本论坛下个HPY的就可以了。VCAD也相当好。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | [加入论坛]

本版积分规则

化工技术网- 赠人玫瑰 手有余香 ( 苏ICP备14035884号 )

快速回复 返回顶部 返回列表