画BOX的lisp程序代码,CAD中调试没有问题,适合初学者学习