Exécuter plusieurs lisp

[oran]

Bonjour,

 

Y-a-t'il un moyen de lancer plusieurs fonctions lisp sur un plan plutôt que de les exécuter les une derrière les autres :wacko: ? (genre un lisp qui lancerait des lisp).

 

Vous en remerciant d'avance

[(gile)]

Salut,

 

Les fonctions LISP s'exécutent toujours de manière séquentielles ("les une derrière les autres") jamais "en parallèle".

[Aleck_Ultimate]

Salut.

 

Alors il doit y avoir moyen de faire ça beaucoup mieux, mais à mon petit niveau de compétence je peut te conseiller de faire comme ça :

 

(defun c:compilation_de_lisp ()
(command "lisp1")
(command "lisp2")
(command "lisp3")
)

Du coup y'a plus qu'une seul commande à lancer pour que tout ce fasse en chêne.

 

Cordialy.

 

EDIT : Oups, grillé... Je ne me serais pas permis de repasser après Maître (gile)

[lecrabe]

Hello

 

YES pour le Script de Aleck !

 

Mais encore faut il que le Lisp lance soit Scriptable !?

Donc que toutes les reponses aux questions et a la selection puissent venir du Script ...

 

A ce niveau SVP j'aimerais bien que notre Grand Maitre Gilles

(ou un autre Super Pro du Lisp/VLisp) nous expliquent qq trucs ?

Pourquoi certains Lisp/VLisp plantent un Script ?

Que ne faut il surtout pas faire dans un Lisp/VLisp pour qu'il puisse etre commande depuis un Script ?

etc ...

 

Merci d'avance, Bye, lecrabe

[(gile)]

Salut,

 

Avec la fonction command (comme avec vl-cmdf ou command-s), on ne peut appeler que les commandes natives ou les commandes personnalisées définies en .NET ou ObjectARX.

Les "commandes" définies en LISP avec : (defun c:NomDeLaCommande ...) ne peuvent être appelées en AutoLISP qu'en tant que fonctions LISP : (c:NomDeLaCommande). Ceci qui ne permet pas de spécifier les options ou entrées utilisateur.

La méthode COM SendCommand que l'on peut appeler en LISP avec vla-SendCommand) permet de "scripter" une commande LISP en lui passant les entrées utilisateur à condition que celles-ci soient exprimables en chaîne de caractère.

 

(defun c:exemple (/ cen)
 (if (setq cen (getpoint "\nCentre: "))
   (command "_.circle" cen 10.)
 )
 (princ)
)

 

La fonction c:exemple définie ci-dessus peut être appelée simplement avec :

(c:exemple)

mais l'utilisateur sera invité à spécifier le centre.

En utilisant SendCommand, on peut passer la donnée pour le centre :

(vla-SendCommand
 (vla-get-ActiveDocument (vlax-get-acad-object)) ; le dessin actif
 "exemple 10,8 "				  ; le script à exécuter
)

Cette dernière méthode est équivalente à exécuter un fichier .scr qui contiendrait :

exemple 10,8