十万火急！！！AUTOLISP无法正常自动生成图形，恳请兄弟们帮忙！！！

wensent

我现在有一个用VB、AUTOLISP编写的程序，是锥齿轮的自动设计。现在这个程序在我的机子上运行到调用LISP时，能正常启动CAD，但是只是画出程序边框和标题栏后，就在CAD的命令行中报错：         ; 错误: 参数类型错误: numberp: nil                                 。



这个程序最终达到的效果就是要自动生成类似下图的图形！！！！！


请兄弟们帮我看看到底怎样解决？？？？？怎样能自动正常的生成图形？？？？？我后天就要交老师了，很急，恳请兄弟们帮忙！！！！！！！！！！


几点说明：


1 我用的是VB6.0+AutoCAD2002简中版


2        进入运行这个VB程序第一个界面后，单击“初始条件设定完毕”后，再单击下一步即可，后面的就一直单击下一步就行，单击绘图，就应自动生成CAD图形！！！！！！！！


2 我重装了CAD2002，还是不行！！！！


主程序在下面！！！！！！！！

wzh

你应该到VB版块中问这个问题去。

wensent

wensent

VB程序没有问题，只是LISP自动生成图形的问题！！！！！！


请用最新的WINRAR解压！！！！！！！

Taoyimaier

根据错误提示，表示可能是一个地方需要数字型变量，而你给的不是数字，


问题应该比较容易发现，用Vlisp编辑环境调试一下吧，

wzh

1。把zhuichi.txt文件中的空行去掉就可以消除你说的错误，另外，打开文件后记着关闭。



2。t不能作为变量使用，改为其它，如tt。


3。一直到(command "_dimdiameter" b2 "m" "<>" (list 578 357))可能b2点未选中圆，因为通过那一点的还有中心线，以后你自己调吧。

wensent

兄弟们，我对LISP是一点也不懂啊！！！！！！！这是别人给我的！！！！


哪位兄弟能帮我改一下，发出来啊！！！！！！

meflying

晕，别人给你的？为什么不给个能用的？