(vmon)

(setq lw "m:")
;----------------------------------------------------------------------------

(setvar "cmdecho" 0)
(setq g_si2 (getvar "tdindwg"))
(load (strcat lw "/acadsst/menu/ssg.lsp"))
(prompt "\nSSG-Menu (ACAD.LSP).. (c) 2013 by SCHÖNENBERGER Systeme GmbH - All rights reserved")
(prompt " ")

(princ)