Commande DDVPOINT

[La Lozère]

Bonjour,

C'est moi ou la commande DDVPOINT ne marche plus.

Mais bon cela fait pas mal de temps que je n'avais pas utilisé cette commande. Mais là, quand je l'utilise, ma vue reste désespérément orienté suivant le SCU courant. Cela ne fait rien, sauf si je joue avec l'inclinaison. Mais avec la boussole, rien ne change.

 

Merci.

[lecrabe]

Hello

 

Pas sur de bien te suivre, car cela fait LONGTEMPS que je n'utilise plus cette commande !

 

En tout cas sur mon MAP 2018, cela semble OK ...

 

En haut: ABSOLU par rapport au SCG est COCHE !

Si je clique dans l'image a gauche et a droite ...

ou si je tape au clavier les angles ... CA BOUGE !

 

Bye, lecrabe

[didier]

Coucou

 

Je confirme aussi le bon fonctionnement (sur une version MAP 2015)

Pourquoi as-tu besoin de cette commande ?

 

Amicalement

[La Lozère]

Salut,

En fait je travail pour un client qui à des gabarit tout fait en présentation et qui n'utilise pas le carroyage Covadis.

Du coup, pour bien orienter ma vue, j'ai chercher plusieurs solutions afin de prendre la plus optimisée question temps.

Et c'est là que j'ai gratté dans mes vieux souvenirs pour trouver cette commande. Mais bon elle ne marche pas chez moi, et sur 2 poste différent.... Bizarre. Mais j'avoue que je n'est pas poussé mes recherches plus loin.

 

Du coup, je l'a fait un peu à l'arrache. Je clic sur l’icône du SCU pour le sélectionner, je le déplace, puis je l'oriente suivant la vue que je veux. Et après, j’établis la vue en plan suivant ce SCU avec un bouton que j'ai créé qui fait ça tout seul...

Et si besoin, je rétabli le scu précédent.

 

Voilà, le pourquoi du comment.

[didier]

Coucou

 

Je reste pantois !

Quel peut bien être le rapport entre ddvpoint et le carroyage ???

 

Tu nous l'expliqueras peut-être, je suis curieux.

 

Amicalement

[DenisHen]

Salut à vous.

 

Personnellement, pour orienter un dwg, j'ai fais une petite routine en Lisp. Elle effectue une rotation de la vue en restant en SCU générale. A toutes fins utiles :

;;;***************************************************
;;;    Variables type "Géomètre" + Rotation de vue    
;;;***************************************************
(defun c:DHOrientSCU (/ p1 p2 Echo vortho Angscu p3)
 (princ "\nDéveloppé par Denis H. (vers.1.0)")
 (setq Echo (getvar "cmdEcho"))
 (setvar "cmdEcho" 0)
 (command "-unites" "2" "2" "3" "2" "0,0" "@0,1" "O")
 (setvar "plinegen" 1)
 (command "-couleur" "ducalque" "-typeligne" "a" "ducalque" "" "_ucs" "_w") ;_ Fin de command
 (setvar "filedia" 1)
 (setvar "attdia" 1)
 (setvar "dimzin" 0)
 (setvar "angbase" (/ pi 2))           ; origine au nord
 (setvar "angdir" 1)                   ; sens horaire
 (setvar "aunits" 2)                   ; grade
 (while (and (/= p1 "Horizontale") (/= (type p1) 'LIST))
   (initget 1 "Horizontale")
   (setq p1 (getpoint "\nPoint de départ ou orientation [Horizontale] : ") ;_ Fin de getpoint
   ) ;_ Fin de setq
   (if (= p1 "Horizontale")
     (progn (initget 7)
            (command "-vue" "g" "h")
            (command "snapang" "100")
            (vlax-ldata-put "DenisH" "AngSCU" 0)
     ) ;_ Fin de progn
     (progn (setq vortho (getvar "orthomode"))
            (setvar "orthomode" 0)
            (setq p2 (getpoint p1 (strcat "\tDirection des X :")))
            (setvar "orthomode" vortho)
            (setvar "snapang" (angle p1 p2))
            (setq Angscu (- 500 (* 200 (/ (angle p1 p2) pi))))
            (if (<= Angscu 400)
              (- Angscu 400)
            ) ;_ Fin:if
            (setq p3 (polar p1 (+ (angle p1 p2) (/ pi 2)) 1000))
            (vlax-ldata-put "DenisH" "AngSCU" Angscu)
            (command "_ucs" "_z" p1 p3)
            (command "_plan" "courant")
            (command "_ucs" "_w")
            (setvar "snapmode" 0)
            (setvar "cmdEcho" Echo)
            (command "zoom" "_w" p1 p2)
     ) ;_ Fin de progn
   ) ;_ Fin de if
 ) ;_ Fin de while
 (princ)
) ;_ Fin:defun

[La Lozère]

Effectivement ta routine est pas mal Denis. Merci.

 

Et pour répondre à Didier. Lorsqu'on créait un carroyage avec la commande Covadis, tout se fait automatiquement:

- Le carroyage bien sur,

- La création d'un nouvel espace papier,

- La création d'une fenêtre espace papier (suivant paramètres)

- La mise à l'échelle de la vue (suivant paramètres)

- L'orientation

- Etc...

 

Mais comme moi, je n'utilise pas le carroyage, je dois faire toute ces manips. D’où m'a recherche de solutions pour orienter la vue dans ma fenêtre.

 

Mais bon, je cherche encore, et je n'ai pas encore exploité la solution de l'utilisation de la commande carroyage, mais sans carroyage... A voir si c'est possible. Car il faut reconnaitre que ce nouvel objet carroyage est pas mal.

 

Bref, je suis curieux, alors je test différentes solutions.

[didier]

Coucou

 

OK ce n'est pas tant la création du carroyage que toute la cosmétique qu'ils ont mis autour, je comprends mieux.

 

Amicalement

[savoie]

Bonjour, je me suis permis de récupérer votre lisp, et je dois dire qu'il est très efficace Merci.