Выбор или создание нового DWG-файла

(defun ru-dlg-file-select-or-new-dwg (dlg_caption
                                      start_dir
                                      root_dir
                                      default_file_name
                                      is_edit
                                     )
                                     ;|
(ru-dlg-file-select-or-new-dwg "Файл блока" (getvar "DWGPREFIX") "C:\" "NewFile" T )
("C:\.ru\cad\samples\dwg\Имя нового файла.dwg") |;

  (_ru-dlg-file
    dlg_caption
    root_dir
    start_dir
    "*.dwg"
    default_file_name
    nil
    is_edit
    t
  ) ;_ end of _ru-dlg-file
) ;_ end of defun