Aller au contenu

RhymOne

Moderateurs
  • Compteur de contenus

    888
  • Inscription

  • Dernière visite

Tout ce qui a été posté par RhymOne

  1. Merci bien tramber. Tu m'ettones j'ai passé une heure à décortiqué le lisp de gile mais je deviens un peu bargo.... Les matrices ont l'air de plair à gile c'est sur... Bonne soirée
  2. Bonjour, Si jamais sa peut servir Lien de téléchargement pour express tools: [surligneur]http://dl.free.fr/bwtkaLja0 [/surligneur]
  3. Par contre le lien est au début du message. Sa pardonne sa !!! Message à patrick: vraiment pas mal l'histoire des zones colorée...
  4. Salut à tous, Trop fort tramber j'avais fait la même chose que toi, cherché dans le code de la page, pour tester cette appli FreeWheel. Et biensur surnoté le triangle.
  5. Bonjour à tous, Comme lili je ne voit pas le soucis si dans un dessin1.dwg tu crée un bloc "toto" avec le drapeau que tu veaut dessiné dans ce bloc? Tu peut dans un style de côte que tu crée choisir de mettre le bloc "tot" dans "symboles et fléches" du style de côte. A plus j'espère avoir cernée le problème
  6. Bonjour à tous, Merci gile je vais testé sa. Par contre lorsque je decortique le lisp tu fais appel à ;; TRP ;; transpose une matrice -Doug Wilson- ;; ;; Argument : une matrice Les mattrices sont vraimeent nécessaire pour ce genre de lisp. Alors la oui j'ai tapé un peu fort !! Je file au test merci Gile
  7. RhymOne

    Fenetre fantome

    Bonjour, Un petit commentaire. Avec covadis si on supprime le calque 0:erreur fatale. Avec nova: pareil. Et en lisp je pense comme patrick_35(trés matinale)... Il semble impossible de purger ou supprimer les objets du calque. Vous confirmé?
  8. Bonjour, Autre idée tu te met en scu objet sur ton axe avec les x le long de l'axe par exemple. Puis dans le filtre tu prend les objet textes avec y négatif. Puis tu les supprime...
  9. Merci tramber de cette réponse sa me fait avancer. Mais aparement cette commande que je ne connaissais pas supprime l'element en presentation et le place en objet. Moi je veut faire ceci sur plusieurs fichiers qui contiennent tous plusieurs presentation.
  10. Merci gile je me souvenais pas d'ou c'était... ici le code
  11. Bonjour, Est-il possible de crée une polyligne (en objet) suivant une fenêtre en présentation??? Merci d'avance
  12. (Re) Oui c'est de l'italien je confirme après essai d'une traduction. Pour ma part le lisp fonctionne nickel...
  13. Bonjour, Pour ma part j'utilise un lisp. Au préalable crée un fichier .txt du type: "ancien type de ligne" "nouveau type de ligne" ex: "continous" "zebré" Puis utilise ce lisp: ;;; Command : (load "newlt") ;;; Command : newlt ;;; ;; ;; Fonction Cree_liste_typlig : création d'une liste de correspondance ;; à partir du fichier de données ;; (defun Cree_liste_typlig ( fd / listtyplig ligne couple ch ) (setq listtyplig nil) (setq ligne (read-line fd) ) (while ligne (setq ch (strcase (strcat "(" ligne ")" ) )) (setq couple (read ch) ) (setq listtyplig (cons couple listtyplig) ) (setq ligne (read-line fd) ) ) (print listtyplig) (setq listtyplig (reverse listtyplig) ) ) ;; ;; Fonction Charge_typlig : chargement des nouveaux types de lignes ;; non disponibles dans le dessin ;; (defun Charge_typlig ( listtyplig / suite couple nouv_typlig ) (setq suite listtyplig) (while suite (setq couple (car suite)) (setq suite (cdr suite)) (setq nouv_typlig (cadr couple)) (if (not (tblsearch "LTYPE" nouv_typlig)) (command "._LINETYPE" "_LOAD" nouv_typlig "acad" "") ) ) ) ;; ;; Fonction typlig_corres : renvoie le nouveau type de ligne en ;; fonction de la liste de correspondance établie ;; (defun typlig_corres (anc_typlig listtyplig / nouv_typlig exist ) (setq exist (assoc (strcase anc_typlig) listtyplig) ) (if exist (setq nouv_typlig (cadr exist) ) (setq nouv_typlig nil) ) ) ;; ;; Fonction ch_typlig_layer : change le type de ligne par defaut ;; des définition de calques selon la correspondance des types de lignes ;; (defun ch_typlig_layer (listtyplig / layinfo layer anc_typlig nouv_typlig ) (setq layinfo (tblnext "LAYER" T) ) (while layinfo (setq anc_typlig (cdr (assoc 6 layinfo) ) ) (setq nouv_typlig (typlig_corres anc_typlig listtyplig) ) (if nouv_typlig (progn (setq layer (cdr (assoc 2 layinfo) ) ) (command "._Layer" "_LT" nouv_typlig layer "" ) ) ) (setq layinfo (tblnext "LAYER") ) ) ) ;; ;; Fonction ch_typlig_bloc : Change le type de ligne des entités définissant ;; un bloc, dans la table des blocs ;; (defun ch_typlig_bloc ( listtyplig / blocinfo typlig_forc anc_typlig nouv_typlig noment ent ) (setq blocinfo (tblnext "BLOCK" T)) (while blocinfo (setq noment (cdr (assoc -2 blocinfo))) (while noment (setq ent (entget noment)) (setq typlig_forc (assoc 6 ent)) (if typlig_forc (progn (setq anc_typlig (cdr typlig_forc)) (setq nouv_typlig (typlig_corres anc_typlig listtyplig)) (if nouv_typlig (progn (setq ent (subst (cons 6 nouv_typlig) typlig_forc ent)) (entmod ent) ) ) ) ) (setq noment (entnext noment)) ) (setq blocinfo (tblnext "BLOCK")) ) ) ;; ;; Commande newlt : fonction principale ;; entrée du nom de fichier de correspondance, ;; changement des types de lignes des calques, blocs et entités ;; (defun c:newlt ( / listtyplig nomfic fd sset slen i ents entres typlig_forc anc_typlig nouv_typlig cmdechold ) (setq cmdechold (getvar "cmdecho") ) (setvar "cmdecho" 0) (command "._UNDO" "_BE") ;; choix du fichier de correspondance (setq nomfic (getfiled "fichier de corres. des types de lignes" "" "txt" 2) ) ;; Creation de la liste de corrspondance (setq fd (open nomfic "r") ) (setq listtyplig (cree_liste_typlig fd)) (close fd) ;; Chargement des types de lignes non disponibles (charge_typlig listtyplig) ;; Redefinition du type de ligne par defaut des couches (print "Traitement des types de lignes des calques\n") (ch_typlig_layer listtyplig) ;; Redefinition du type de ligne des entites des blocs (print "Traitement des types de lignes des blocs\n") (ch_typlig_bloc listtyplig) ;; Redéfinition des types de ligne des entités ;; Sélection de toutes les entités du dessin (setq sset (ssget "X") ) (setq slen (sslength sset) ) ;; Changement du type de ligne des entités à type de ligne forcé (print "Traitement des entités à type de ligne forcé\n") (setq i 0) (while ( (setq ents (ssname sset i) ) (setq entres ( entget ents) ) (setq typlig_forc (assoc 6 entres) ) (if typlig_forc (progn (setq anc_typlig (cdr typlig_forc) ) (setq nouv_typlig (typlig_corres anc_typlig listtyplig) ) (if nouv_typlig (progn (setq entres (subst (cons 6 nouv_typlig) typlig_forc entres) ) (entmod entres) ) ) ) ) (setq i (1+ i) ) ) (command "._UNDO" "_END") (setvar "cmdecho" cmdechold) (print "Fin des traitements\n") (princ) )
  14. Bonjour, Vraiment intéressant comme lisp.... Dommage que l'espagnol n'est pas mon fort
  15. RhymOne

    cuix vers cui

    Salut à tous, Encore plus fort il est impossible pour autocad 2010 de lire et ecrire en cui il transforme automatiquement le cui en cuix en en créant un autre.
  16. Bonjour, ouh la la jamais vu mais preneur.....
  17. RhymOne

    import palettes d\'outils

    Bonjour, Je travaille pas mal avec les palettes et je ne suis pas daccord avec robycg01 on peut tres bien importer en xtp je voit pas trop le soucis. A plus
  18. Bonjour, Sur un forum j'ai lu sa: http://covadis.forumpro.fr/ressources-autocad-f7/gain-de-vitesse-t941.htm A parement on gagnerait en temps de démarage d'autocad. Probable ou pas je ne voit pas ce que le chemin d'accès vient faire la.... A plus
  19. RhymOne

    cuix vers cui

    En plus à la base j'étais en cui j'ai changer de poste et je suis passé en cuix sans trop le vouloir. Puis maintenant on me demande l'applicatifs pour les version 2010,2009 et 2007.3 franchement je cherche mais encore rien trouvé. En remplacant .cuix par .zip j'obtient plein de cui mais je ne voit pas comment tous les appelé a partir d'un autre cui...
  20. Bonjour, A ma connaissance il n'y a que gif et png qui gère la transparence ? Sur autocad en tout cas le .png marche nikel
  21. (Re) je pense que les polyligne2D qui constituait ce plan y sont pour quelque chose. Vraiment top ces accrochage ... MERCI GILE
  22. Bonjour, Je reviens sur le sujet Jai autocad 2010 x64 et sa marche !! Par contre si je lanse un lisp qui fait appel à un point ou un accrochage et que je m'accroche sur l'un des accrochages crée par gile le lisp saute. Sa marche pour l'accrochage courant mais arrete le lisp pour les suivants. tres explicites avec addvtx de gile (Encore un vrai fou !!!!!.. ) Merci de voir ce petit soucis...
  23. RhymOne

    cuix vers cui

    Après plusieurs essai: En vain je ne trouve aucun résultat .
  24. RhymOne

    cuix vers cui

    Bonjour, Je le savais cela mais bon une fois renommer je me retrouve avec: Plein d'images et plein de .cui dans le zip. Je vais voir ce que je peut faire avec sa..
  25. RhymOne

    cuix vers cui

    Bonjour, A ma grande surprise et après plusieurs recherche je trouve aucun moyen pour mon applicatifs de revenir en version précedentes. En effet je suis actuellement sur autocad 2010 donc avec des cuix. J'ai voulu transmettre mon appli mais impossible v.2009 Bref peut on revenir en version précedentes ???
×
×
  • 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é