PONTIAC95-2

Bonjour, merci de ta réponse, En fait nous cherchons un/des niveaux bac/bac+2 après faut voir. encore merci.

Bonjour, Y aurait-il des forumeurs qui pourraient m'indiquer des écoles proposant des étudiants en alternance ou stages longue durée sur les métiers batiments et infrastructures sur le logiciel autocad en bureau d'études dans la région parisenne (plus précisement Val d'oise). D'avance merci. PS: désolé ce message fait doublon avec celui que j'ai mis dans le forum métier. [Edité le 18/11/2008 par PONTIAC95-2]

Bonjour, Y aurait-il des forumeurs qui pourraient m'indiquer des écoles proposant des étudiants en alternance ou stages longue durée sur les métiers batiments et infrastructues sur le logiciel autocad dans la région parisenne (plus précisement Val d'oise). D'avance merci.

non cela ne semble pas un pb de plumes, ça imprime sur HP mais pas sur Konika. Par contre je fais un pdf et j'envoie sur konika et ça imprime. Truc vraiment fou !

Merci de vous êtes pencher sur le pb qui n'est pas résolu car même le responsable informatique donne sa langue au chat. et rédémarrer l'imprimante ne donne rien. Je vais rechopper le driver sur le réseau et réinstaller. Je verrais bien. Si quelqu'un a une vague idée, je suis preneur. Merci et bonne journée à tous.

Non pas de blocs. Alors je viens de faire autre chose. Comme l'impression sur l'imprimante (konika) a3/a4 merdait, j'a envoyé le A3 sur un traceur HP et là..miracle le cartouche est OK. Cela signifie qu'il y a un problème sur le réseau avec li'mprimante A3 ou autre je ne sais pas. Peut-être tenter de réinitialiser 'limprimante ou la redéfinir de nouveau par autocad. C'est quand même un truc de fou..

C'est fait, en plus toutes mes données sont dans la calque "cartouche" . C'est la 2éme fois que cela m'arrive depuis 2semaines. Au fait, il faut j'ai oublié de préciser que jusqu'à hier, mon cartouche s'imprimait correctement et tout d'un coup, c'est le soir quand j'ai voulu relancer une impression après avoir bossé dessus que cela à merder. J'ai même démarrer mon fichier autocad en faisant "récupérer" et rien de plus.

Alors, je vais tenter d'éclaircir... Je veux tracer un cartouche en feuille A3 qui est dans un onglet avec d'autres feuilles a3, il y a du texte, des lignes autocad, des images raster. jusque là du classique. Je lance mon impression, il n'y a que sur ma feuille de cartouche que des données ne sortent pas à l'imprimante alors que l'aperçu autocad est OK. Incompréhensible surtout que sur les autres feuilles A3, tout est ok à l'impression. Et ce problème n'apparait que sur le A3 du cartouche aussi bien sur une imprimante réelle qu'avec l'imprimante PDF d'autocad. Vraiment je n'y comprend rien.

Bonjour, J'ai un gros pb de traçage avec autocad 2007. Une partie de mes données de mon cartouche ne s'imprime pas bien qu'à l'aperçu elles s'apparaissent. C'est aussi bie ndu texte basique et des lignes ! Je cherche depuis un moment mais je ne trouve pas la solution. Quelqu'un a-t-il une idée d'où cela peut-il provenir ? D'avance merci.

Bjr, alors moi, toutes les petites routines que je développe (grand mot) sont souvent éditées comme Gile avec des commentaires. Pour ma part, j'ai pris des petits progs existants que j'ai décripté et étudié le language en me référant au guide lisp autocad et à l'aide. Puis modifs de ces progs pour voir les divers résultats. J'avoue cela fut laborieux car j'étais tout seul à m'intéresser à ce sujet dans cet ex-entreprise à l'époque. Bon courage. un petit exemple pour la route... ; CRAY3P.LSP ;COTATION D'UNE DEVELOPPEE D'UN ARC PAR ;LA COMMANDE COTATION ANGULAIRE ;SELECTION DU 1ER SOMMET ;SELECTION DU 2EME SOMMET ;SELECTION DU CENTRE (defun DEVE2 () (setq attri nil) (setq ent1 nil) ;selection du premier sommet (setq p1 (getpoint "\n\t 1er sommet : ")) ;selection du second sommet (setq p2 (getpoint "\n\t 2eme sommet : ")) ;selection du centre (setq pc (getpoint "\n\t Centre : ")) ;calcul du gisement (setq gisem (angle p1 p2)) (setq val2 (* 63.66197724 gisem)) (setq val1 (- 300 val2)) ;trace de l'arc qui sera effacer a la fin (command "arc" p1 "F" p2 pc) (setq attri (entlast)) ;attribution des caracteristiques de la liste de l'arc a ent1 (setq ent1 (entget attri)) ;attribution de la valeur du rayon en recherche dans liste ent1 (setq rayon (cdr (assoc 40 ent1))) ;attribution de la valeur de l'angle de depart en recherche dans liste ent1 (setq alpha1 (cdr (assoc 50 ent1))) ;attribution de la valeur de l'angle de fin en recherche dans liste ent1 (setq alpha2 (cdr (assoc 51 ent1))) ;calcul de l'angle de l'arc (setq alpha (- alpha2 alpha1)) ;test (setq test1 (- alpha2 alpha1)) (if (< test1 0) (progn (setq alpha (- alpha1 alpha2)) (setq alpha (- 6.28318531 alpha)) ) ) ;calcul de la developpe (setq val (* alpha rayon)) (princ "\ COTATION DE LA DEVELOPPEE ") (command "effacer" (entlast) "") (command "cot" "ang" "" pc p1 p2 pause (rtos (abs val) 2 3) "") (command "_trotate" val1 "dernier" "" "sortie") (princ) (command "redess") ) (defun c:c3 () (setq sblip (getvar "blipmode")) (setq scmde (getvar "cmdecho")) (setvar "blipmode" 0) (setvar "cmdecho" 0) (DEVE2) ; (command "scu" "o" pori) (setvar "blipmode" sblip) (setvar "cmdecho" scmde) (princ) ) (princ "\n LA COMMANDE EST CHARGEE. TAPER \"c3\" ")

Bjr, par un petit script cela marchera du tonnerre. Fais une recherche sur le site a ce sujet. Col A col B col C col D numero x y 102 1 2.5478 =CONCATENER(ARRONDI(B3;3);",";"";ARRONDI(C3;3)) col E col F ="_point "&D3&" " ="-texte "&D3&" 0.35 0 "&CTXT(A3;3)&"" J'arrive pas à insérer mon tableau excel donc c'est un peu brouillon mais c'est fait dans du excel désolé... Avant de recopier les colonnes E dans la ligne de commande autocad, il faut bien sûr que ton repère soit le SCG et pour lancer la colonne F (qu'il faut copier aussi dans la ligne de commande autocad), il faut de plus que la hauteur du style de texte courant soit à zéro puisque la ligne de script lui donne une hauteur de 0.35. Bon courage [Edité le 23/2/2006 par PONTIAC95-2]

essaye avec ça, modif de mon prog précdent ; NEWLAYER-AJOUT PREFIXE.LSP ;........................................................ ; ce programme modifie le nom du debut des nappes ; l'utilisateur saisi les caracteres qu'il veut supprimer ; puis saisi a la suite les caracteres de remplacement ;........................................................ (defun c:NNL (/ nom nom1 nomb nomb2 oldtx oldtx1 oldtx2 sset nbsset v2 newtx newtxt ent entit) (setvar "cmdecho" 0) (setq nom (getstring "\n FILTRE DEBUT NOM DE CALQUES a modifier PAR AJOUT DE PREFIXE:")) (setq nom1 (getstring "\n Nouveau PREFIXE DES CALQUES :")) (setq nomb (strlen nom)) (setq nomb2 (+ 1 nomb)) ; On se positionne sur le premier nom de plan qui est défini (setq x_plan (tblnext "layer" T)) ; On boucle pour passer un à un tous les plans (while (/= x_plan nil) ;recherche du nom de la nappe dans l'entite incremente ;sous la forme d'une liste (setq oldtx1 (assoc 2 x_plan)) ;(prin1 oldtx1) ;le nom de la nappe est le second texte de la liste ci dessus (setq oldtx (cdr oldtx1)) (prin1 oldtx) ;boucle de test variable (setq boucle 1) (while (< boucle 10) ;recherche du debut de texte du nom de la nappe (setq oldtx2 (substr oldtx boucle nomb)) ;(prin1 oldtx2) ;(prin1 nomb) ;test pour savoir si le debut du texte dans l'entite ;correspond au texte que l'on veut supprimer (if (= nom oldtx2) (progn ;suppression du debut de texte du nom de la nappe (setq nomb3 (+ boucle nomb)) (setq oldtx3 (substr oldtx nomb3)) (prin1 oldtx3) ;concatenation du nouveau texte avec l'ancien moins le debut de texte ;qui a ete supprime (setq newtx (strcat nom1 oldtx3)) ;command AUTOCAD renommer (command "renommer" "ca" oldtx newtx) ) ; fin du progn ) ; fin du while (setq boucle (+ boucle 1)) ) (setq x_plan (tblnext "layer")) ) ; fin du while (print)

Je suis collé, disons car pas trop le temps de me pencher sur mon developpement. En fait mon programme n'avait été développé que pour ajouter des préfixes constant à des nappes dont les préfixes de départ étaient identiques (mais ne convenant pas à une certaine charte) sur un certain nombre de caractères. Par contre et dans ton cas, si le préfixe a supprimé est variable, il vaut mieux extraire les noms de calques vers excel, les transformer par excel puis avec un script (renommer calque) les ré-injecter dans autocad . J'ai fais une fois un truc similaire et cela avait bien marché.

l'envoi par mail etait pour moi la solution la plus rapide, bien sûr je peux copier içi le prog et que ceux qui sont intéréssé n'ont qu'à le sauvegarder . Programmation basique à mon niveaux qui me dépanne... ; NEWLAYER-AJOUT PREFIXE.LSP ;........................................................ ; ce programme modifie le nom du debut des nappes ; l'utilisateur saisi les caracteres qu'il veut supprimer ; puis saisi a la suite les caracteres de remplacement ;........................................................ (defun c:NNL (/ nom nom1 nomb nomb2 oldtx oldtx1 oldtx2 sset nbsset v2 newtx newtxt ent entit) (setvar "cmdecho" 0) (setq nom (getstring "\n FILTRE DEBUT NOM DE CALQUES a modifier PAR AJOUT DE PREFIXE:")) ;calcul du nombre de lettre a supprimer (setq nomb (strlen nom)) (setq nomb2 (+ 1 nomb)) ; On se positionne sur le premier nom de plan qui est défini (setq x_plan (tblnext "layer" T)) ; On boucle pour passer un à un tous les plans (while (/= x_plan nil) ;recherche du nom de la nappe dans l'entite incremente ;sous la forme d'une liste (setq oldtx1 (assoc 2 x_plan)) (prin1 oldtx1) ;le nom de la nappe est le second texte de la liste ci dessus (setq oldtx (cdr oldtx1)) (prin1 oldtx) ;recherche du debut de texte du nom de la nappe (setq oldtx2 (substr oldtx 1 nomb)) (prin1 oldtx2) ;test pour savoir si le debut du texte dans l'entite ;correspond au texte que l'on veut supprimer (if (= nom oldtx2) (progn ;suppression du debut de texte du nom de la nappe (setq oldtx3 (substr oldtx nomb2)) (prin1 oldtx3) ;concatenation du nouveau texte avec l'ancien moins le debut de texte ;qui a ete supprime (setq newtx (strcat nom1 oldtx3)) ;mise en forme du nouveau nom de la nappe sous la forme de liste (setq newtxt (cons 8 newtx)) ;command AUTOCAD renommer (command "renommer" "ca" oldtx newtx) ) ) (setq x_plan (tblnext "layer")) ) ; fin du while (print) (princ) )

Bjr, j'ai un prog qui devrait convenir, faut voir en testant... Peux-tu indiquer ton mail et je te l'envoie.