[求助]：关于绘制铁路线draw_road.lsp

fundoll

请教各位高手:
    在AUTOCAD2002中加载draw_road.lsp，command下输入lll，
常会发生“; error: bad argument type: lentityp nil”（偶而正常）

    在Visual lisp中跟踪发现下面的错误：
   (nentselp pt);;是“以点选对象”的语句，选错line。
   
   请问是什么原因导致(nentselp pt)语句选错对象？
   
   有没有其它可替代的语句？？？  谢谢！

zhynt

我想可能是前面的PT1点的计算出了问题，以致程序根据错误的点来选择，从而产生上面的“错误的参数形式”。
而且程序出错现象是有条件的，就是说当路宽较小时，和线路“T”形相交时，道路首尾相接时会发生错误。
还有就是程序的退出机制不好，它是用使程序强行中断退出的。

fundoll

用WATCH跟踪,PT1  PT2完全正确
(nentselp pt1)  (nentselp pt2) 中的选择点完全正确 ，就是其中的选择对象错误！