Hola.
Contesto desde el móvil y sin probarlo, pero si no me equivoco bastaría con introducir el guión modificando esta parte del código así:
(command "_exportlayout"
(strcat (getvar "dwgprefix") (vl-filename-base (getvar "dwgname")) "-" presentacion )
;(getvar "ctab") ".dwg")
@ivaj Ya nos dices si te va.