upload a lisp after error

[Angelo2449]

Hello everyone,
when you try to run a lisp without uploading it, you receive the message:
"standard command contactor unknown "standard contact". press f1 for the guide"
I would like to write a lisp that, evaluating the error, upload the desired program, perhaps with a condition.
thanks to those who want to help me and others too!

 

[rpor66]

(type c:standard contact) returns nil if the command does not exist.
(if (type c:standard contact) nil) (load”miofile”)) standard counter

 

[Angelo2449]

thanks rpor66,
works perfectly but with a less bracket:

(type c: scalaimmagini)
(if (type c:scalaimmagini) nil) (load "c:\\\autocadsupporto\\\\\\\scaleimmagini.lsp")

 

[rpor66]

the error is more extended... .
(if)= (type c:scalaimmagini) nil (load) scaleimmagini)

 

[Angelo2449]

in the first version it worked, now in this no!
What's wrong?

 (defun c: tutto (/)

(setq dacaricarex (cc: "dacaricarex))

(by "ndacaracarex xxxx")
(WHISPERING)
(pr "n")

(cond
(= if you want to "c: scalaimmagini")
(type if carex)
(if (= (type dacaricarex) nil)
(load "c:\\ autocadsupporto\\ lisptre\\ scalaimmagini.lsp")
(scalaimmagini)
); if
(setq if carex nil)
); if

);; cond

);; defun

grazie.

 

[rpor66]

(defunc c:tutto (/)

(if (= (type "c:scalaimmagini") nil)
(Translated with Google Translate)
)
(c: Scalimmagini)

);