Alfila

Oui, ça marche parfaitement à présent. Merci à tout le monde pour les conseils !

Non, j'avais essayé ça aussi, mais ça ne marche pas. Le programme s'interrompt avant que le point soit donné. Dans la ligne de commande on a : Specify insertion point or [basepoint/Scale/Rotate]: *Cancel*

@DenisHen, C'était la première étape, pour comprendre le fonctionnement. Mon programme a évolué (maintenant j'insère le bloc "appel" à l'intérieur d'un bloc sélectionné et "appel" doit être explosé). Et je voudrais effectivement insérer "appel" à un point sélectionné par l'utilisateur, mais quand j'utilise la commande (getpoint), ça interrompt le programme. (defun c:xopbl ( / blk sel) (setq sel (ssget)) (setq blk (cdr (assoc 2 (entget (ssname sel 0) ) ) ) ) (command "_bedit" blk (command "_insert" "appel" (getpoint "\nInsertion point") "" "" (command "_explode" (entlast)) (command "_bclose" "") ) ) (princ) ) J'ai essayé aussi : (command "_insert" "appel" "_S" 1 "_R" 0 "_none" (getpoint "\nInsertion point") ) mais ça ne change rien. Par contre ça marche très bien avec un point défini (l'origine par exemple). Donc ça vient bien de (getpoint).

Oui, c'est ça. Merci infiniment. J'avais mis un "" après le nom du bloc parce que je pensais que je devais valider ce nom (quand on le fait manuellement, on tape "enter"). (Et effectivement après je me suis trompée entre () et "".)

Bonjour, Je viens de me mettre à AutoLisp (une bonne dizaine d'heures à essayer de débroussailler la base) et je voudrais écrire un lisp qui contient une insertion de block. Pour bien comprendre chaque manip, je les teste individuellement avant d'essayer de créer des choses plus complexes. Et là je bloque sur un truc qui paraît pourtant tout simple : quand je lance ma fonction, elle me demande de préciser le point d'insertion du block alors que je l'ai pourtant définie (enfin je crois) à 0,0,0 (suivi de l'échelle et de la rotation). Je copie mon bout de code : (defun c:insbl () (command "_insert" "nom_block" "" '(0 0 0) () 1 () 0 () ) (princ) ) Après avoir cherché en vain la réponse, je me suis inscrite ici :)