Bonjour,
Merci d'avoir pris un peu de temps pour me répondre. La fonction sert à mettre le Y égal au Z, lorsque j'ai besoin de coter les altitudes d'une façade projetée sur le plan XY. Le point avec Y = -Z est bien nécessaire puisque je décale le SCU pour que le SCU soit Zm en dessous de mon entité.
Cette fonction fonctionne très bien sur Autocad, et lorsque j'ai voulu l'essayer sur ZWCAD elle ne fonctionnait plus. Elle me laisse l'origine sur l'entité choisie, avec les coordonnées 0,0,0 au lieu de 0,Z,0.
J'ai essayé votre code. Je ne connaissais pas la fonction "-origin". Je l'ai testé sans passer par l'appli et ça fonctionne, comme fonctionne mon code. Mais dès que je passe par le lisp ça ne fonctionne pas. Par contre mon code fonctionne désormais par magie... Je n'ai pourtant rien fait sauf redémarrer mon poste. ! J'ai vérifié dans "option" que la priorité soit bien "saisie au clavier, script exceptés". C'est le cas.
Je vais réessayer demain.
Merci encore et bonne soirée
