(load (strcat (getenv "DXFM_LISP") "/on_start.lsp"))