(defun C:edit_text_style ( / style)
  (geo_tools-help "edit_text_style")
  (initget)(setq style (getstring T "\nКакой стиль текста будем использовать?: "))
  (cond
    ((eq style "Рубленый (Р-131)")
     (edit_convert_text_style_to_rub))
    ((eq style "БСАМ курсив малоконтрасный (Бм-431)")
     (edit_convert_text_style_to_bsam))
    ((eq style "Древний курсив (Д-431)")
     (edit_convert_text_style_to_drevn))
    ((eq style "ЕСКД (ГОСТ)")
     (edit_convert_text_style_to_gost))
    )
  (princ)
  )