Premièrement, Bonjour a toute la communauté. Je me décide enfin a m'inscrire ici. Je me présente, Sébastien 32 ans, sur autocad depuis l'age de 20 ans pour le compte d'architecte, économiste de la construction et bureau d’études fluides (courant faible/fort, CVC), puis actuellement pour un bureau d’études en signalisation ferroviaire. Je me sers de votre site depuis longtemps afin de développer mes propres Lisp (aussi simple soit'il, souvent seulement a partir de la fonction "command") pour les particularités attenantes a mes métiers respectifs cité plus haut, mais aussi afin d'utiliser certain de vos Lisp qui me sont très utile et que je ne pourrais programmer moi-même par manque de connaissance de ce langage et de temps pour m'y former malheureusement. Je tiens a ce sujet a vous remercier tous et en particuliers les cadors du site que je ne pense pas avoir besoin de citer, car vous m'avez aidé a automatiser énormément de taches rébarbatives. Je me tourne vers vous afin de m'aider, pour une chose qui je pense doit être simple (pour vous hehe). J'ai crée le Lisp Acaddoc.lsp qui me permet d'installer: - Chemin_de_recherche_de_fichiers_de_support - Chemin de recherche des fichiers de support de l'imprimante - Fichier autre police - (load "") Chargement au demarrage - (autoload "" '("")) Chargement a la demande Pour le moment tous fonctionne correctement mais je souhaiterais mettre une condition, si cette élément est déjà chargé ou programmé alors ne pas le recharger, mais si cet élément n'est pas chargé ou programmé alors le charger. Exemple: - Chemin_de_recherche_de_fichiers_de_support (setq listCheminsSupportBase (strcat (getenv "ACAD") ";S:\\mes_documents\\autocad\\sf_designer")) (setenv "ACAD" listCheminsSupportBase) - Chemin de recherche des fichiers de support de l'imprimante (setenv "PrinterConfigDir" "S:\\Mes_Documents\\Autocad\\SF_DESIGNER\\Plotters") - Fichier autre police (setvar "fontalt" "es_isocp.shx") - (load "") Chargement au demarrage (load "Barre_Onglets_2010_x64.lsp") - (autoload "" '("")) Chargement a la demande (autoload "Ligne.lsp" '("Ligne_Pose" "Ligne_Cadre_Pose" "Ligne_Depose" "Ligne_Rectificatif")) Je vous remercie d'avance pour vos réactions !