kermitos

bonjour vas dans ton rep autocad puis rep support tu trouveras acadiso.pat ou aclt.pat il y a tous les motifs si tu en créer , mets les ici.

Bonjour a tous je ne connais rein en lisp mais j'aimerai savoir si on peux réaliser ceci: Dans une surface : 1.déterminer le contour(extèrieur)déduires contour (int) si il y a 2.Créer un réseau vertical (ligne ou bloc1) selon zone donnée( choix contour) Distance en x a donner 3. ajustement par rapport aux contour 4.Créer un reseau vertical ( new bloc2) ( choix du bloc) 1couleur distance à renseigner 5.Export résultat dans excel Quantité elements –bloc 1 bloc 2 bloc 3.... l'idéal serait d'avoir peut être une boite de dialogue ou de créer un menu? Merci d'avance pour vos réponses.

Salut Matt66, merci pour le moment j'essai mais c'est pas terrible!!

Bonjour a tous, je ne sais pas koment lié un lisp à ma boite de diaolgue (dcl) joint ci dessous: je ne trouve pas, ou ne cherche pas o bon endroit ? merci d'avance pour vos réponse. [surligneur] QtxL : dialog { value = "Quantité lisses"; key = "title"; :row { : boxed_column { label="Sélection lignes: "; : edit_box { label = "Lisse d'assises: "; key = "assises"; fixed_width = true; } :button{ label="Choix des objets"; key="accept assises"; } : edit_box { label = "Lisse courantes: "; key = "courantes"; fixed_width = true; } :button{ label="Choix des objets"; key="accept courantes"; } : edit_box { label = "Pinces: "; key = "Pinces"; fixed_width = true; } :button{ label="Choix des objets"; key="accept Pinces"; } }//fin box column :spacer{ width=0; } : column{ : boxed_column{ label = "Fichier"; key = "Fichbc"; :button { label = "Fichier de sortie"; key = "out"; width=10; } : toggle { label = "Création du fichier de sortie "; key = "sof"; } }//fin box column fichier }} :row{ :spacer{ width=3; } cancel_button; :spacer{ width=3; } }//fin row du bas } RESULTAT_calcul : dialog { label = "RESULTAT"; : edit_box { key = "SOMME"; edit_width = 70; } ok_button; }[/surligneur]

re, m^m en me servant des accrochage, ca coince juste aprés la sélection c pas grave; j'me suis arrangé otrement je commence a prendre gout à vos travaux sur le lisp c'est trés intérréssant, j'ai plein d'objectifs à mettre en place pour gagner du temps, je pense que je reviendrai te demander de l'aide d'ici peu.

merci pour vos réponse, gile, kan j je copie ton lisp: je peux choisir l'arc, juste aprés lors de la sélection du pt de départ voilà le message "Sélectionnez le point de départ: nil" ca coince! :(

merci bred, pour ta réponse cependant je voulais pouvoir faire une cotation cumulé d'un arc! j'me suis mal exprimé!!!

Bonjour, est-il possible de réaliser un lisp qui permet de calculer la longueur d'un arc, (otre que la commande dans Autocad) en donnant un point de départ puis le choix d'un deuxiéme point puis un otre sin on veut (kom le cumul de cotation linéaire) merci d'avance pour vos réponse.

merci Gile

merci, pour l'info je découvre l'application Visual lisp. une question comment voir si un fichier .dcl est correct ( voir le résultat final) y a til un moyen de prévisualiser?

bonkour j'ai un petit souci la consol visual Lisp m'affiche ca!!! je peux m^m pas commencé mon lisp! Help svp merci [surligneur] $ defun c:surf (/ acdoc l n sel) # nil[/surligneur]

bonjour j'suis nouveau ici j'aimerai savoir komen insérer une image pour répondre aux autre membre merci d'avance

Patrick ]éventuellement g des hachures si ca peux t'aider hacures création en joint de pierre

Merci en réponse : je ne connais rien en lisp, ( niveau Zéro) cependant je suis trés intéréssé pour apprendre. Motivation: je dessine des facades (polyligne )je fais un réseau en x et y donc a la fin de mon dessin, je doit compter les lignes verticales , horizontales ainsi que le nb de dalles déssinné ( format variable) Mon objectif: -Qtx lignes h et v selon un calque différent -réalisation de polyligne dans le quadrillage réalisé avec si possible un joint de x valeur par rapport aux lignes h et v. -Num des polylignes ( rectangle)( en partant de gauche a droite et de bas en haut) export vers Excel avec un un peu pratique en lisp je pense que cela doit e^tre réalisable. (avant de courrir il faut savoir marcher)

Bonjour, un menbre du site m'a fourni le lisp suivant pour quantifié le nombre de lignes sur mon dessin. suivant les différentes doc trouvés je n'arive pas détaillé la composition ( joint) un peti coup de pouce !!! merci d'avance defun c:lh [surligneur] (/ ACDOC L N SEL)[/surligneur] (setq AcDoc ( [surligneur] vla-get-activedocument [/surligneur]( [surligneur] vlax-get-acad-object[/surligneur])) sel ( ssget '((0 . "LINE"))) [surligneur] n 0 l 0[/surligneur]) ( [surligneur] vlax-for e[/surligneur] ( [surligneur] vla-get-activeselectionset AcDoc[/surligneur]) ( [surligneur] if (equal (cadr (vlax-get e 'StartPoint)) ( [surligneur] cadr (vlax-get e 'EndPoint[/surligneur]))) (setq n (1+ n)[/surligneur] l (+ (vla-get-Length e) l)))) (alert (strcat "Nombre de Ligne Horizontale : " (rtos n) "\nLongueur Totale : " (rtos l))) (princ) )