Lisp para imprimir dwg em lote

encontrei um lisp que imprime dwg's em serie, era o que eu procurava. No entanto, é necessário algumas customizações e não estou conseguindo falar com o autor.

Alguém poderia me dar uma ajudar com o lisp

Depois de uns testes, encontrei o problemas porém não consergui solucioná-lo.

Atualmente, recebo uma mensagem de erro da seguinte maneira

error : quit \ exit abort

sei que é provocada pelo comando exit presente na rotina. Notei que em um if ele verifica a váriável return#, estando esta com o valor 0 ele cancela a rotina.

Enfim, acredito que é preciso saber por que a start_dialog não está retornando o valor 1

Agradeço qualquer ajuda.

*o lisp segue como anexo

lucianno