Copier des objet et insertion entre 2 points

[Oli553]

:casstet: :casstet:

Je veus créer un petit lisp qui me permet de lancer la commande COPIER puis aprés avoir selectionné les objet voulus, les copier avec comme point de copie de destination le milieu entre 2 points.

Comment puis-je faire?

:exclam: :exclam:

Merci d'avance

 

[Edité le 29/3/2005 par Oli553]

[Oli553]

Je pense que le Lisp doit commencer comme ceci mais ensuite, je bloc un peut pour lancer la commande suivante qui est _m2p pour la selection du milieu entre 2 points.

 

(Defun C: copy2p ( )
(command "_copy")
)
princ)

[bonuscad]

Et simplement une macro dans un bouton?

Du style

^C^C_.select;\_.copy;_previous;;\_none;'_cal;(cur+cur)/2;^Z

[Oli553]

Je te répondrait un grand MERCI, sa m'apprendra à chercher compliquer quand on peut fare simple.

A charge de revanche. :)

[Oli553]

Si je le modifie comme ceci:

^C^C_.select;\_.copy;_previous;;m;\_none;'_cal;(cur+cur)/2;^Z

cela me permet d'avoir une copie multiple. Mais y'a t'il une variable pour revenir au choix du point milieux? Car sinon, je doit faire clic droit "milieu entre deux point" pour continuer.

Encore merci

 

[Edité le 30/3/2005 par Oli553]