Maxime85

Merci lecrabe il marche par contre j aimerais savoir si on peu l' impossez l' ordre des points ? Ps Capde06 (:vers excel le mieux a mon avis menu outils> extraction de donnees) j ai pas trouver cet option dans le menu outils Cordialement

Bonsoir , J ai un souci , j' aimerais savoir comment extraire les coordonnées XYZ des points crées dans Autocad vers Excel ou un Fichier Texte http://img4.hostingpics.net/pics/678492cad.jpg peu t'être avce un Lisp ??? Mais la je n ai aucune idée Cordialement

Bonjour, j aimerais avoir les nouveautées concernant civil 3d 2013 y'a t il une amélioration ? au niveau des Giratoires quoi de neuf et subassembly composer ? Cordialement

Bonjour Pecout44 , Merci pour la disponibilité. Je comprends maintenant. Cordialement

Bonsoir, Merci pour l' info Steven Amicalement

Bonjour, J aimerais savoir "a titre d' information" les info sur le logiciel Building suite il a quel particularité par rapport a AA. Cordialement

Bonsoir, Merci pecout44 mais j ai pas toujours bien compris pourrai tu m'expliquer d' avantage Cordialement

Bonjour Merci pour cette explication et Bienvenu dans le Forum. Par ailleurs pourrai tu nous fournir une capture d' écran montrant la partie a décocher? Cordialement

Bonsoir Merci GEGEMATIC ça marche Cordialement

Bonsoir Merci Lovecraft Cordialement

Bonjour, Toujours un message d' erreurs peu t' être c' est du a Powerclic en effet je l' ai installé mais apparemment Il ne retrouve pas Autocad (Windows seven 64 bits) je ne sais pas s'il y'a une procédure spécial pour l' installation http://img15.hostingpics.net/pics/62442132kl.jpg j aimerais extraire la surface ; les construction et le semi de point par ailleurs s'il y a une procédure pour l' extraction de l' axe en plan et le profil en long je serai ravi de le découvrir Amicalement

Bonsoir, j ai installé Powerclic ensuite j ai chargé le Lisp ci dessus mais je n' obtient rien ci joint une image explicative http://img11.hostingpics.net/pics/58216524bg.jpg Cordialement

Bonjour, j ai crée une surface "a partir d' un fichier Texte " les constructions et éléments existant on été fais sur civil 3D mais la suite dois d’être fais sur covadis Ps: la routine pourra conserver tous les éléments préalablement fais sur Civil 3D ? Merci d'avance Cordialement

Bonjour, Merci Thierry Cordialement

Bonjour, J'ai réalisé un semi de points sur civil 3D (avec les constructions bâti , routes ..) j aimerais savoir si on peux exploiter ce semi de points sur autre Logiciel en occurrence Covadis; Piste pour faire de la conception routière par exemple (certes Civil 3D le fais) mais je me sens mieux dans les autres Logiciels aussi même faire des modifications sur le Fichier .dwg dans un autre Logiciel Cordialement

Bonjour, Voici une astuce pour trouver une hauteur de texte convenable pour l' impression il faut faire ((2 x echelle plan )/1000) Cordialement

Bonjour Jalna, vraiment bluffant. merci Par ailleurs j aimerais savoir si Civil 3d n as pas un Module semblable car je pense que Covadis possède un truc de ce genre Cordialement

Bonsoir Bruno, Problème Résolu, Merci. Amicalement.

Bonsoir Bruno, J'ai essayé la commande Ajusté avec la mise a jour du code mais ça ne marche pas aussi. c:lwp2cl http://i42.servimg.com/u/f42/15/62/62/90/02222210.jpg Amicalement

Bonjour Bruno, Merci pour la Modification mais le problème persiste quant je lance la commande axe ayant au préalable converti la polyligne en cecle +droite la premier droite disparaît par contre quant je crée le cercle par la méthode (2 points de tangence +rayon) et je relance la commande axe ça marche , je ne comprends pas pourquoi Amicalement http://i42.servimg.com/u/f42/15/62/62/90/000010.jpg

Bonsoir Bonuscad , J'ai effectivement déplacer l' axe vers l' origine mais le problème posté dans le précédent post ( à savoir quant je lance la commande "axe" sur la polyligne converti la première droite disparaît par contre quand je crée 2 droites et un cercle avec la méthode 2points de tangence -rayon quand je relance la commande "axe" il crée le fichier de commande) persiste. Amicalement

Bonsoir , voici le code que j' utilise pour créer un fichier de commande (defun c:axe ( / lparam fonc_long_clotho input typf oldRSCL sslin sscer orig) ;-------------------- ; Variables globales ;-------------------- (setq lparam '( (RSCL 240 "Rayon minimal sans clothoide (0 pour aucune clothoide) ") (KMAX 67 "Longueur maximale de clothoide en metres ") (PRECMP 5 "Nombre de decimales pour l'exportation vers Micropiste ") (EXTMAP "MAP" "Extension par defaut des fichiers d'axe en plan pour Micropiste ") )) (_param lparam) (setq PRECAXE 6 EXTAXE "XAP") ;----------------------------------------------------------------- ; fonction donnant la longueur de clotho en fonction du rayon 'ray' ; et KMAX, longueur maximale ;----------------------------------------------------------------- (setq fonc_long_clotho '(min (* 6.0 (expt (Abs ray) 0.4)) KMAX) ) ;-------------------- ; ;-------------------- (PrinC "\nCouche : <")(princ (GetVar "CLAYER"))(princ "> ") (setq lay (GetString)) (If (= lay "") (setq lay (GetVar "CLAYER")) ) (initget "O,o N,n") (setq input (getkword "\nVoulez-vous ordonner les cercles et les droites O/N <O> ")) (if (or (null input) (= input "O")) (_ordap)) ;-------------------- ; lecture des entites ;-------------------- (princ "\nLecture des entites en cours...") (SetQ sslin (ssget "x" (List '(0 . "LINE") (Cons 8 lay)) ) sscer (ssget "x" (List '(0 . "CIRCLE") (Cons 8 lay)) ) ) (princ "\nLecture des entites terminee.") (if (or (null sslin) (null sscer) (/= (sslength sscer) (1- (sslength sslin))) ) (progn (close f) (princ "\nIl doit y avoir (n+1) droites pour n cercles.") (exit) ) ) (princ "\n") (princ (sslength sslin)) (princ " droites.") (princ "\n") (princ (sslength sscer)) (princ " cercles.") (princ "\nOK.") (princ "\nPK du premier point ")(princ (cdr (assoc 10 (entget (ssname sslin (1- (sslength sslin))))))) (if (setq input (getreal " <0.000> ")) (setq orig input) (setq orig 0.0)) (initget "O N") (setq input (getkword "\nMettre des clothoides O/N <O> ")) (if (= input "N")(setq oldRSCL RSCL RSCL 0)(setq oldRSCL RSCL)) (initget "3 4 A Q") (setq typf (getkword "\nVoulez-vous generer un fichier (MicroPiste[3]/Piste+[4]/[Q]uitter) <4> ")) (if (/= typf "Q") (progn (cond ((null typf) (setq typf 'T)) ((= typf "3") (setq typf nil)) ) (cond ((= typf "A") (_genxap sslin sscer fonc_long_clotho orig)) (T (_genmap sslin sscer fonc_long_clotho orig typf)) ) ) ) (setq RSCL oldRSCL) (princ) ) (princ "AXE ") Mais ce qui me surprends c' est que j n'obtiens pas ce que je recherche pourtant les Lisp posté Précédemment par Bonuscad et Bruno semblaient résoudre le problème http://i42.servimg.com/u/f42/15/62/62/90/000010.jpg Ps: Merci pour la modification Laurent Amicalement

Bonsoir Laurent, Voici le lien pour le fichier :Fichier Amicalement

Bonsoir Laurent, j ai justement entendu parler de cette méthode mais je m'y connais pas trop j ai essayé de bidouiller mais sans succès. Amicalement