Конвертирование диалога DCL в лисп функцию

Конвертирование диалога DCL в лисп функцию.

Работа с программой:
1.Запускаете лисп командой - DCL_TO_LISP
2.Предлагается выбор файла dcl для преобразования
3.Рядом с файлом dcl появится файл (_dcl.lsp)
4.Копируете содержание файла в свою лисп программу
5.При запуске функции, описанной в файле, создается файл dcl и
возвращается его местоположение. В своей лисп программе меняете
команду (load_dialog "") на (load_dialog )


Обратная функция ReDCL
Требования для правильной работы:
1.Для создания DCL использована предыдущая функция и название функции, вызывающей диалог, не менялось
2.Создаваемый файл диалога отсутствует рядом с файлом функции
(в программе отсутствуют всякие проверки, поэтому восстановление DCL лучше всего производить в новом окне AutoCAD)

Порядок запуска:
Программа предлагает выбрать файл, созданной предыдущей командой. При успешном выполнении функции возле этого файла создается одноименный файл DCL