That is more informative. So I assume that you want to say translate and have options such as german or other. The branch would launch leo or coin.
;;Rough code
(defun c:translate ( / language)
(initget "German Other")
(setq language (getkword "\nWhich language? [German/Other]"))
(if (= language "German")
(command "Leotranslator")
(command "Coinstranlator")
)
(princ)
)
This assumes that the commands can be called by the command function. They may need to be called by (c:leotranslator) and (c:cointranslator) or another name. If they are not autoloaded, then they need to be manually loaded. These issues are best discussed on a customization forum, not on an AutoCAD forum.
Architect, Registered NC, VA, SC, & GA.