Bonsoir,
Je suis en train de développer un petit programme.
A la fin je souhaiterai y faire un miroir, en programmant un jeu de sélection.
Voici un extrait.
Est ce que quelqu'un saurait pourquoi il y a un problème ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 (setq P9 (polar P6 (/ pi 2) d5)) (setq P10 (polar P9 0 d6 )) (setq P11 (polar P10 (/ pi 2) (- d3 (+ d5 d5)))) (setq Pb (polar P10 0 1)) (setq pm1 (polar P6 0 (/ d4 2))) (setq pm2 (polar pm1 (/ pi 2) 1)) (setq b1 (command "_pline" P10 P11 "")) (while (/= 0 e1) (setq e1 (getdist "\n Donner l'espacement ")) (command "_copy" "d" "" 0 e1 "") (setq e (entlast)); récupère le nom de la dernière entité insérer : soit le bloc (setq ss (ssadd)); Crée un jeu de sélection vide (ssadd e ss); place l'entité dans le jeu de sélection ) (command "_mirror" ss "" pm1 pm2 "n") )
Merci d'avance
Partager