-
Compteur de contenus
5 029 -
Inscription
-
Dernière visite
-
Jours gagnés
56
Type de contenu
Profils
Forums
Calendrier
Blogs
Tout ce qui a été posté par bonuscad
-
Voici un document de CANAL + que, je pense, vous ne verrez pas ailleurs que sur le Net. Vous avez dit santé publique.... :casstet:
-
Mon coup de gueule à ce propos, je l'ai déjà eu, je ne vais pas y revenir! A propos de santé publique. Il est obligatoire pour les industriels d'apposer la mention OGM sur les produits alimentaire. Si cela est relativement vrai pour le maïs, ce n'est pas du tout le cas pour le soja, employé massivement dans l'industrie agro-alimentaire. Motif invoqué, le pourcentage utilisé est trop faible. Foutaise, même si le produit est constitué essentiellement de soja, JE N'AI JAMAIS VU aucune mention. Pourtant premier exportateur de soja, l'Argentine,La firme Monsantos leur ayant promis un bon rendement avec du soja transgénique résistant au Round-Up. Problème les mausaives herbes se sont elles aussi adaptées ce désherbant. Pour garder un rendement équivalent, les doses de désherbant ont été multiplié par 5. Le bénéfice n'est plus du tout aussi important qu'au tout début, sachant que Monsanstos exige des royalties sur la production. Premier effet les habitants ruraux qui subissent les pulvérisations aériennes de plus en plus importantes. Avec a court terme des problèmes de fertilité humaines et anomalie génétique. La terre appauvrie entrainant de nouvelle conquête sur d'immenses surfaces boisées bio-diversifiés (NB:Ce phénomène a été aussi observé par des scientifiques dans le Sud de la France, région de Montpelier, sur la population viticole, suite aux pulvérisation sur les vignes) Pour en revenir au soja, 1er importateur, l'Europe. Alors pourquoi les mentions n'apparaissent pas? Motif invoqué: les production non OGM sont mélangé, ou sont tout simplement contaminés lors de leur stockage et manutention. Donc comme il n'est plus possible de les différencier, on décide que la mention ne sera pas apposée. Conclusion: Tu n'as pas le choix tu bouffe de l'OGM saturé en herbicide, même si tu fait attention a ce que tu veux mettre dans ton assiette. A moins d'aller dans la petite épicerie fine et BIO du coin qui a son approvisionnement complètement indépendant. Et encore que.... et puis pas à la portée financière quotidienne du Français moyen. Bon détournement de la loi :( Remarque au lieu de fumer du tabac, fume de l'eucalyptus, comme ça la loi anti-tabac ne pourra s'appliquer. Une autre manière de détourner la loi, puisque c'est l'usage ;) Je reste convaincu que plus il y aura de loi, moins celle ci seront respectés car détourné dans ce monde procédurier, ou la seule vrai loi et la loi dollar. Tiens il tombe de la neige rose-orangée en Russie! Bof les frontières sont là, comme pour Tchernobyl, la santé publique attendra.... Puis-je sourire à tout ceci ? Bien que la génération suivante risque de rire jaune, confronté à des problèmes irréversibles et qu'une loi anti-tabac était censé protéger. PS: Vous ne verrez jamais ces thèmes traitées sur les chaines publiques, peut être sur Arte et encore. Ces problèmes ne sont pas médiatisés comme l'a pu l'être la loi anti-tabac ou d'autre. Au fait on peut porter la burka, le voile etc.. ? ou cette loi est laissé à l'apprécation de celui qui voudra l'appliquer. Ca aussi c'est une bonne loi mais on en parle plus (faudrait pas mettre le doigt ou sa pourrait faire mal). Ca me rappelle un texte de la constitution européenne qui grosso-modo disait ceci. En cas de guerre tout faire pour que la bourse ne s'écroule pas. Ha oui en effet la santé publique les préoccupent beaucoup! La bourse ou la vie? Allez vive la loi (mi-figue, mi-raisin), "Nul n'est sensé ignorer la loi". Heureusement que je n'ai pas fait du droit, car je crois que j'aurais "pété les plombs". Le bal est ouvert au "coup de gueule".
-
Oui là je ne peux pas faire mieux.l :( Un conseil cependant, si ta représentation est symbolique, essayes de faire des segments de longueur à 1 unité près pour éviter une représentation pas très "clean", utile pas exemple "@4<45" pour une ligne de longueur 4 à 45° C'est l'inconvénient de l'usage des formes complexes dans les type de lignes... Heureux d'avoir fait "le bonheur de Sophie" ;)
-
Cela devrait ! Es tu sur d'avoir bien écraser l'ancien SHX lors de la recompilation? Il ne faudrait pas que l'ancien traine dans un dossier de reherche ou le dossier courant, car à ce moment là on ne sait pas trop lequel Autocad va choisir.
-
Où sont les fonctions (defun upd_ent (......)) , (defun upd_blk (.....)) et (defun xd_ins (....)) ??? :o
-
Attention, Pour que cela fonctionne il faut effacer toutes tes entités concernées. Purger alors le type de ligne dans ton dessin et rechargé celui-ci. Faire des tests dans un nouveau dessin, avant de l'appliquer a ton dessin définitif quand cela convient.
-
Recompile le shp en ayant mis cela dedans: *128,15,HTEAUX 2,0A4,1,10,(5,044),10,(5,-062),10,(5,-002),2,0AC,0
-
Je suis en train de générer des PDF. Pour avoir un rendu correct dans le PDF, je NE coche PAS "Mettre à l'échelle épaisseurs de ligne" Le fichier fait alors un spool de 100 Mo dans l'imprimante virtuelle pour un fichier PDF final de 20Mo Si je coche l'option, le fichier en spool fait alors 8Mo pour un fichier PDF final de 2.8Mo. Comment puis je faire pour obtenir un bon rendu dans un fichier de taille correcte? Faut-il je réapplique des épaisseurs à mes calques en tenant compte de l'échelle de sortie? Enfin si quelqu'un a un peu d'expérience dans ce type de problème, merci de partager!
-
Dans la plus part des cas cela fonctionne, mais tout d'abord tu fait un doublon alors que je converti l'entité. Contour ne fonctionne pas toujours et surtout pour des objets non-parrallèle au SCG. Le lisp fonctionne dans n'importe quel SCU depuis un autre SCU/SCG et garde les propriétés de calque, couleur etc... Et puis ce n'est qu'une autre alternative... par contre en modifiant un peu le lisp on pourrait traiter tous les cercles sans aucune saisie de l'utilisateur. La solution est à adapter selon le besoin, contour peut très bien faire l'affaire ;)
-
Et si tu es "flemmard", avec seulement une sélection du cercle plus éventuellement une épaisseur , cette fonction de conversion: (defun c:circle2lw ( / js ent dxf_ent pt_cen radius fst_pt opp_pt new_ep) (while (null (setq js (ssget "_:S" '((0 . "CIRCLE")))))) (setq ent (ssname js 0) dxf_ent (entget ent) pt_cen (cdr (assoc 10 dxf_ent)) radius (cdr (assoc 40 dxf_ent)) fst_pt (polar pt_cen 0.0 radius) opp_pt (polar pt_cen pi radius) ) (princ "\nEpaisseur du cercle <") (princ (getvar "PLINEWID")) (princ ">: ") (initget 68) (setq new_ep (getdist)) (if new_ep (setvar "PLINEWID" new_ep)) (entmake (list '(0 . "LWPOLYLINE") '(100 . "AcDbEntity") (assoc 67 dxf_ent) (assoc 410 dxf_ent) (assoc 8 dxf_ent) (if (assoc 6 dxf_ent) (assoc 6 dxf_ent) '(6 . "BYLAYER")) (if (assoc 62 dxf_ent) (assoc 62 dxf_ent) '(62 . 256)) (if (assoc 370 dxf_ent) (assoc 370 dxf_ent) '(370 . -3)) (if (assoc 48 dxf_ent) (assoc 48 dxf_ent) '(48 . 1.0)) '(100 . "AcDbPolyline") '(90 . 2) '(70 . 1) (cons 43 (getvar "PLINEWID")) (cons 38 (caddr fst_pt)) (if (assoc 39 dxf_ent) (assoc 39 dxf_ent) '(39 . 0.0)) (cons 10 (list (car fst_pt) (cadr fst_pt))) '(40 . 0.0) '(41 . 0.0) '(42 . 1.0) (cons 10 (list (car opp_pt) (cadr opp_pt))) '(40 . 0.0) '(41 . 0.0) '(42 . 1.0) (assoc 210 dxf_ent) ) ) (entdel ent) (prin1) )
-
Rebelote, idem que précèdement fichier HAUTES-EAUX.SHP *128,9,HTEAUX 2,0A4,1,10,(5,044),2,0AA,0 fichier HAUTES-EAUX.LIN *HAUTES-EAUX,_U_U_U_U_U_U_ A,0,1,[HTEAUX,hautes-eaux.shx,x=-1,s=.1] [Edité le 2/2/2007 par bonuscad]
-
Comment représentes tu une ligne de haute eaux naturelle? Je vois pas à quoi ça ressemble, si tu peux m'en dire plus, je pourrais essayer de la créer comme j'ai pu le faire pour la haie.
-
Ben voilà, avec un peu de persévérance :exclam: Ravi que tu y sois arrivé, "COMPILER" = "_COMPILE", tu as trouvé de toi même ;)
-
Tout d'abord, ne refais pas un nouveau sujet à chaque fois, continu ta première discussion! :casstet: Pour la procédure, je peux guère être plus explicite. Dans le bloc-note fais "enregister sous" et cela crée un NOUVEAU fichier. Si tu n'est pas famillère avec la manipulation des fichiers, fais toi aider par un proche :exclam: En effet pour pouvoir personaliser Autocad, il faut savoir quand même savoir faire les manipulations les plus rudimentaires, autrement pas la peine d'essayer quoi que ce soit. :P
-
Cherche routine changer texte en bloc+attributs
bonuscad a répondu à un(e) sujet de ASTERIXII dans Débuter en LISP
Tu peux essayer de t'inspirer de cette Réponse -
Je n'avais pas connaissance du prix public :P Mais effectivement, il est cher 3000 € :o Voir le catalogue
-
En suivant la procédure suivante 1 Copie-colle les lignes suivantes dans le bloc-note que tu sauveras sous le nom de HAIE.SHP, ceci dans un dossier de recherche d'Autocad. *128,66,HAIE 1,12,(2,1,-54),2,018, 1,12,(4,1,-91),2,018, 1,12,(2,0,-126),2,01C, 1,12,(3,-1,-127),2,025, 1,12,(2,-2,-79),2,02C, 1,12,(-3,1,-52),2,020, 1,12,(-5,1,-76),2,02F, 1,12,(-3,-1,-126),2,010, 1,12,(-4,0,-78), 2,8,(10,2),0 2 Fais la même chose pour ce qui suit dans un fichier nommé HAIE.LIN *HAIE, Haies-arbuste A,0,-1,[HAIE,haie.shx,x=-1,s=.1] 3 Ceci fait, dans la ligne de commande d'autocad, tapes la commande "COMPILER" et sélectionne le fichier haie.shp, tu vas obtenir un fichier HAIE.SHX 4 Il ne te reste plus qu'a charger ce type de ligne concu à 1 unité. L'échelle de type de ligne à 1 devrait convenir. ;) NB: Avec les polylignes, penses a mettre la génération du type de ligne actif.
-
Je dirais sans pouvoir vérifier, un logiciel d'image capable de produire un format WMF que tu importeras ensuite dans AutoCad (et suivant le format tu pourras décomposer en entités distinctes) Je crois qu'il faut faire un format comme pour les cliparts d'office.
-
Utilisateur de la version 4.10 et précédentes pendant de nombreuses années. Je dirais que c'est un produit dont le prix n'a rien à voir avec tous les autres produits. (Mensura ,Covadis pour ne cité que les plus populaires). Dèjà je pense que cette version n'est principalement qu'un portage sur plateforme windows. Le produit est quand même un produit fiable, mais je l'admet un peu rustique. On peut travailler de manière professionnelle avec. J'ai monté quantité de DCE pour pouvoir le dire. Mais pour avoir un bon rendement avec ce produit, il faudrait une formation au minimum d'un jour (si les connaisances de conception routières sont dèjà connues). Après on peut faire des études complexe (giratoire compris) (pour ma part j'étudie les carrefours en bord de chaussée et donc mes profil en long sont mes profil en long fil d'assainissement de chausée projet) Ce produit accepte de lire des scripts qui simplifie la saisie pour les module axe en plan, profil en long, Le TN peut lu à partir de fichier ASCII (soit par profil, soit par coordonées 3D de point) Il exporte aussi soit en dxf2D pour les rendus papier et en 3D pour intégrationdu projet dans autocad. (NB un module complémentaitre en option (enfin je crois) se nommant TPL peut modéliser le TN et le projet au format DXF3D, il permet aussi de rechercher les courbes de niveaux et les pentes avec points haut, points bas.) Tous les quantifs sont éditables directement ou dans fichiers pour éventuellement exporter pour continuer avec Excel. Le projet peut être a tout moment transformé en TN, ainsi par cette astuce tu peux décomposer par couches très nombreuses, soit pour faire un suivi de chantier, soit si vraiment le nombre de couches te posent un problème. Bref sans rentrer dans le détail, tu peux tout faire mais cela demandes une bonne organisation dans la démarche de conception. Un débutant peut être perdu car il n'y a rien d'intuitif dans ce genre de logiciel comme peut l'être un produit de bureautique ou d'image ou de conception graphique. Si tu est tout seul à l'apprendre avec le bouquin, ben je pense que tu auras du mal. Mais rapport qualité prix, c'est à mon avis un bon produit, mais il souffre d'être à la traine au niveaux développement par rapport aux autres produits de design windows. Le rendement peut être long et faible si l'utilisateur n'est pas à l'aise avec ce genre logiciel. Pour être franc je pense que tu serait plus performant et compétitif rapidement avec un logiciel type mensura ou covadis. Mais l'invetissement financier n'est pas le même, donc là on rentre dans un autre débat.
-
Mets ton écran dans une cage de faraday ! :exclam: Voir dans Wikipedia Je pense qu'une cage grillagée pourrait suffire, tu pourrais mettre aussi une poule et lapin avec :P
-
Si tu ne veux pas utiliser la fonction RTEXT ou alors pour faire un traitement en lisp pour obtenir autre chose, voici une base ((lambda( / tot bl rc) (setq tot 0 bl (tblnext "block" t) ) (princ "\nTravail en cours...")(princ) (while bl (if (= (logand (cdr (assoc 70 bl)) 4) 4) (progn (print (cdr (assoc 1 bl))) (setq tot (1+ tot)) ) ) (setq bl (tblnext "block")) ) (textscr) (princ (strcat "\n" (itoa tot) " XRef(s) trouvé(s).")) (prin1) ))
-
Les images ne seraient pas attachées dans un dessin, qui serait lui-même attaché au dessin ouvert par hasard? Les lignes précédentes ne fonctionnerons que dans un dessin dans lequel serait attachées des images (pas à travers des Xrefs). :exclam:
-
C'est Nickel ! Is perfect! Bonne démonstration de maitrise de récursivité. Merci Evgeniy :)
-
Shockwave prend bien de la place sur mon DD.
bonuscad a répondu à un(e) sujet de Tramber dans Ordinateurs
Si ça peux t'orienter, sur mon PC c:\WINDOWS\system32\Macromed\Shockwave 10\ 1 bmp 1 dcr 9 dll 2 exe 1 log pour un total 4118K et un sous dossier Xtras avec 1txt et 6 x32 pour un total de 398k j'suis loin des 2,6Go désolé ;) Je rajouterais que pour ma part j'ai peu de pitié pour les tmp SI; ils ne sont pas du jour ou ne correspondent plus à la dernière heure de démarrage du PC [Edité le 26/1/2007 par bonuscad] -
Un petit exemple vaut mieux qu'un grand discours ((lambda ( / ) (setvar "angbase" (/ pi 2));origine au nord (setvar "angdir" 1); sens horaire (setvar "aunits" 2) ;grade (command "_.line" "100,100" "@50<80" "") ligne à 80gr (setq dxf_ent (entget (entlast))) (setq alpha (angle (cdr (assoc 10 dxf_ent)) (cdr (assoc 11 dxf_ent)))) (print alpha) ; retourne angle de la base de donnée en RADIAN) (if (equal alpha (/ pi 10) 1E-09) ; comparaison en radian malgré mise en place en grade (print (angtos alpha)); affichage résultat dans le mode courant ) (prin1) )) Vois tu ou je veux en venir?
