Aller au contenu

Hachure automatique et polyligne


Hydro8

Messages recommandés

Bonjour

 

J'essaye de faire une chose je pense simple sous autocad : des hachures automatique une fois une polyligne fermée.

 

Pour réaliser cette fonction j'ai trouvé ce lisp :

 

(defun c:plyhat (/ *error* oldcmd ply)
(vl-load-com)

(defun *error* (msg)
  (if oldcmd (setvar "CMDECHO" oldcmd))
  (if (not (member msg '("Function cancelled"
                         "quit / exit abort")))
    (princ (strcat "\n<< Error: " msg " >>"))
    (princ "\n<< Cancelled >>"))
  (princ))

(setq oldcmd (getvar "CMDECHO"))
(setvar "CMDECHO" 0)

(command "_pline")
(prompt "\nConstruct Polyline...")
(while (eq 1 (logand 1 (getvar "CMDACTIVE")))
  (command pause))
(vla-put-Closed
  (vlax-ename->vla-object (setq ply (entlast))) :vlax-true)
(command "_hatch" "_S" ply "" "")
(princ))

 

Il fonctionne bien, mon seul soucis c'est que j'aimerais le diffuser à d'autres personnes qui n'auront pas forcément en tête les options de la fonction polyligne.

 

Du coup, est-il possible d'afficher les options de la fonction polyligne dans ce lisp ? Je veux parler de "Arc Demi-larg LOngueur annUler LArgeur" et des sous options quand on choisit Arc par exemple.

 

Merci pour votre aide.

Lien vers le commentaire
Partager sur d’autres sites

Super merci !!

 

Petit question qui à plus au moins à voir avec le sujet initial, est-il possible de faire des hachures AINSI31 rempli pour partie automatiquement ?

 

Pour le moment nous faisons des hachures AINSI31, nous les décomposons et nous remplissons en SOLID une intervalle sur deux. Je me dis qu'il doit être possible de le faire en automatique mais je n'ai rien trouvé d'approchant sur internet ?

Lien vers le commentaire
Partager sur d’autres sites

Bonjour,

 

J'essaye actuellement de faire un programme qui utilise la commande "_-HATCH" (c'est pour cela que je me permet de poster un msg dans ce sujet similaire au lieu d'en ouvrir un autre), cependant j'ai un souci : lors du premier lancement de mon programme AutoCAD me renvoie le message d'erreur

Carnet de couleurs introuvable.
donc je suppose que c'est lors de l'appel de la commande "_-HATCH" car c'est la seule ligne où je spécifie une couleur.

 

Mais si je relance le programme une seconde fois, aucun problème et mon programme fonctionne parfaitement...

Je dois créer des hachures vertes (3) et des hachures rouges (10), j'ai également essayé en passant par les coUleurs vraies, soit vert (0,255,0) et rouge (255,0,0).

 

Votre aide me sera précieuse :P

 

Désolé Hydro8, mais je ne suis pas en mesure de t'aider pour ton problème...

Lien vers le commentaire
Partager sur d’autres sites

Bonjour,

 

on peut paramétrer la couleur indépendamment de la commande avec la variable HPCOLOR.

 

ci dessous la liste des variable commençant par HP et gérant les valeurs proposées dans le dialogue hachures ou la commande -hatch

 

HPANG 0.0000g

HPANNOTATIVE 0

HPASSOC 1

HPBOUND 1

HPBOUNDRETAIN 0

HPDOUBLE 0

HPDRAWORDER 3

HPGAPTOL 0.0100

HPINHERIT 0

HPISLANDDETECTION 1

HPISLANDDETECTIONMODE 1

HPMAXLINES 1000000

HPNAME "_SOLID"

HPOBJWARNING 10000

HPORIGIN 0.000,0.000

HPORIGINMODE 5

HPORIGINSTOREASDEFAULT 0

HPQUICKPREVTIMEOUT 2

HPSCALE 1.0000

HPSEPARATE 1

HPSPACE 1.000

HPBACKGROUNDCOLOR "Aucune"

HPCOLOR "Utiliser la valeur courante"

HPDLGMODE 1

HPLASTPATTERN "ANSI31" (lecture seule)

HPLAYER "Utiliser la valeur courante"

HPLINETYPE Inactif

HPMAXAREAS 10000

HPPICKMODE 0 (lecture seule)

HPQUICKPREVIEW Inactif

HPRELATIVEPS Inactif (lecture seule)

HPTRANSPARENCY "Utiliser la valeur courante"

 

Olivier

Lien vers le commentaire
Partager sur d’autres sites

Créer un compte ou se connecter pour commenter

Vous devez être membre afin de pouvoir déposer un commentaire

Créer un compte

Créez un compte sur notre communauté. C’est facile !

Créer un nouveau compte

Se connecter

Vous avez déjà un compte ? Connectez-vous ici.

Connectez-vous maintenant
×
×
  • Créer...

Information importante

Nous avons placé des cookies sur votre appareil pour aider à améliorer ce site. Vous pouvez choisir d’ajuster vos paramètres de cookie, sinon nous supposerons que vous êtes d’accord pour continuer. Politique de confidentialité