| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Suche Lisp-Tool für Farbe, Linientyp, Linienstärke (2148 mal gelesen)
|
Karsten.G Mitglied
Beiträge: 190 Registriert: 21.06.2002 Verwendetes System: PIII 700 MHz; 512 MB-RAM; Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2
|
erstellt am: 31. Jul. 2003 08:59 <-- editieren / zitieren --> Unities abgeben:
Moin, kann mir jemand unter die Arme greifen und mir ein kleines Lisp-Tool erstellen ??? Ich brauche eine Funktion, die in meiner Zeichnung überprüft, ob alle Farb-, Linientyp- und Linienstärkendefinitionen auf VONLAYER stehen, bzw. eine Anzeige, für welche dies nicht zutrifft (durch einen Kreis oder so). Es müßten auch verschachtelte Blöcke durchsucht werden. Gibt es da eine Möglichkeit ????? Wäre echt super, da ich mir die Hacken absuche. ------------------ Gruß Karsten ------------------ Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ??? Schluss damit !!! In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit ! Fragen Sie uns: http://www.buchbinderei-gibietz.de
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke Ehrenmitglied V.I.P. h.c. CAD on demand GmbH
Beiträge: 4171 Registriert: 17.05.2001 AutoCAD 20XX, defun-tools
|
erstellt am: 31. Jul. 2003 09:24 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
Hallo Karsten, auf meinen Seiten (http://www.cadlon.de) im Freedownload die Programme 24/25 ändern Dir zumindest die Farbe -ohne eine Amrkierung zu setzten, welche Elemente geändert wurden. Ansonsten ist mir ein Tool, so wie du dir das vorstellst, noch nicht unter gekommen. Es ist schon sehr speziell - aber nicht unlösbar. Bei Fragen ... Grüße Holger
------------------ Holger Brischke CADlon - Lisp over night! Irgendwann muß man schlafen, deshalb: +!+!+Urlaub vom 01.08.-30.08.2003+!+!+ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Karsten.G Mitglied
Beiträge: 190 Registriert: 21.06.2002 Verwendetes System: PIII 700 MHz; 512 MB-RAM; Windows NT 4.0;<p>AutoCAD 2000 + pit-cup 5.2
|
erstellt am: 31. Jul. 2003 09:35 <-- editieren / zitieren --> Unities abgeben:
Hi Holger, schon mal danke, das fix_color würde mir schon mal weiterhelfen. Kannst Du mir das auch für Linientypen und Linienstärken umstricken ??? Müßte doch eigentlich machbar sein. Es ist ja eine VLX-Datei, sodass ich ja gar nichts ändern kann. Wäre echt klasse. ------------------ Gruß Karsten ------------------ Ihre Fachzeitschriften fliegen überall rum und wenn Sie sie suchen, sind sie nicht zu finden ??? Schluss damit !!! In einem schönen Buch herrscht Ordnung und sie sind stets griffbereit ! Fragen Sie uns: http://www.buchbinderei-gibietz.de
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadwomen Ehrenmitglied V.I.P. h.c. Mädchen für fast alles
Beiträge: 2966 Registriert: 26.08.2002 ACAD R11 - 2022 (Plant3D) AVIS ACAD LT 2013- 2021 ZWCAD 2015 Versuch "nun ja" [s]History P3D 2012/(13) SP und Hotfix([/s]<P> Windows 10 / 64 Bit Xeon CPU 3.5GHz 16GB Ram NVIDIA Quadro P2000 3x Dell TV100 88P Monitore
|
erstellt am: 31. Jul. 2003 16:50 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
|
TK_KE Mitglied
Beiträge: 67 Registriert: 15.07.2003 .
|
erstellt am: 31. Jul. 2003 22:17 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
Hallo Karsten ! Ich hätte da noch ein Tool. Das erledigt zumindest die Arbeit mit den verschachtelten Blöcken. (Farbe,Linientyp,Linienstärke auf "VonLayer" setzen) Kann sicher deinen Bedürfnissen angepasst werden.... Gruß Thomas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tomturbos Mitglied architektur
Beiträge: 149 Registriert: 28.03.2003 windows xp windows 7 autocad/adt 2004 architecture 2010
|
erstellt am: 17. Jul. 2006 17:32 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
|
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 18. Jul. 2006 07:49 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
Das ist richtig, die Attribute der Blockreferenzen werden nicht geändert, die Attributdefinitionen der Blöcke werden aber geändert - und nur von Blöcken war die Rede. Man könntest nun also Attsync anwenden um diese mit der aktuellen Blockdefinition zu synchronisieren. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tomturbos Mitglied architektur
Beiträge: 149 Registriert: 28.03.2003 windows xp windows 7 autocad/adt 2004 architecture 2010
|
erstellt am: 18. Jul. 2006 09:43 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
|
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 18. Jul. 2006 09:55 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
denke ja nicht das man das so hätte lesen müssen, nach dem Test ist mir nur aufgefallen wie der IST-Stand ist und das ja garnichts anderes behauptet wurde Finde auch ein ordentliches "Attrefresh" muß nicht kostenlos in Foren gehandelt werden - wäre schon extrem mächtig für lau.. Attsync bietet Adesk an, das muß reichen. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 22. Jul. 2006 12:37 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
Zitat: Original erstellt von tomturbos: funktioniert nur leider nicht bei attributen - da hält sich z.b. die farbe beständig und läßt sich nicht auf von layer umstellen!gruß tom
..so wie man die Blockdefs durchläuft, kann man auch die Inserts auf Attribute testen und dann deren Eigenschften entsprechend ändern. Ist damals wahrscheinlich nicht näher aufgefallen ... neuere Progversionen haben das intus.
------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 28. Mrz. 2008 09:31 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
hi zusammen, ich benutze die nuke.lsp nur nun steh ich vor folgendem problem. ich habe viele viele blöcke die auf vers. farben liegen..oka ich benutz die nuke.lsp aber ich will den linientypen der blöcke beibehalten und nicht auf von layer packen. was genau muss ich in der nuke.lsp abändern? irgendwo hier: (if(assoc 6 EDATA) ;Resets object linetype to BYLAYER if it isn't. (setq EDATA(subst(cons 6 "BYLAYER")(assoc 6 EDATA)EDATA)) ? wäre dankbar wenn da jmd mal schauen könnte. gruß
------------------ Aus technischen Gründen befindet sich die Signatur auf der Rückseite dieser Nachricht! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 28. Mrz. 2008 09:37 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
wenn direkt danach noch eine schließende Klammer kommt ")" dann lösche einfach den ganzen geposteten Teil + die nachfolgende Klammer.. (if(assoc 6 EDATA) ;Resets object linetype to BYLAYER if it isn't. (setq EDATA(subst(cons 6 "BYLAYER")(assoc 6 EDATA)EDATA)) ) also wenn es SO aussieht.. das ganze Paket löschen und dann nach "(defun c:NUKE suchen und in "(defun c:NUKE_OLT ändern zB. dann die datei entsprechend als "NUKE_OLT.lsp" speichern --> so hättest (wenn gewollt) beide Möglichkeiten zur Verfügung ! (war jetzt zu faul mir die Lisp rauszusuchen) ------------------ die alte SUCHfunktion.. - System-Angaben - User:FAQ(Adesk) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 28. Mrz. 2008 09:44 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
hi, ja genau so hats geklappt.. ich habe das hier gelöscht: (if(assoc 6 EDATA) ;Resets object linetype to BYLAYER if it isn't. (setq EDATA(subst(cons 6 "BYLAYER")(assoc 6 EDATA)EDATA)) );if und natürlich nuke-ohne_lt.lsp abgespeichert:-) gruß ------------------ Aus technischen Gründen befindet sich die Signatur auf der Rückseite dieser Nachricht! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 04. Apr. 2008 09:01 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
moin, heute bräuchte ich die nuke.lsp mal etwas anders.:-) alle blöcke auflösen und auf dem eigefügtem Layer belassen,sichtbarkeitsklasse belassen. geht daS? ------------------ Aus technischen Gründen befindet sich die Signatur auf der Rückseite dieser Nachricht! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 04. Apr. 2008 09:02 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
moin, heute bräuchte ich die nuke.lsp mal etwas anders.:-) alle blöcke auflösen und auf dem eigefügtem Layer belassen,sichtbarkeitsklasse belassen. geht daS? ------------------ Aus technischen Gründen befindet sich die Signatur auf der Rückseite dieser Nachricht! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 04. Apr. 2008 09:08 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
wie wäre es, wenn du mal ein wenig lispeln lernst, dann kannste solche Anpassungen in zukunft selbst vornehmen ? ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 04. Apr. 2008 09:16 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
ja das möchte ich auch.. bald geht die visl basic schulung los Gibts denn da was für mich? ------------------ Aus technischen Gründen befindet sich die Signatur auf der Rückseite dieser Nachricht! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 04. Apr. 2008 09:21 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
Zitat: Original erstellt von H-kan84:
Gibts denn da was für mich? :)
Das Kochbuch bietet einen guten Einstieg in Autocadprogrammierung mit Lisp
------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 04. Apr. 2008 09:25 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 Hinweis: Meine Mitarbeit auf CAD.DE ist fakultativ, unentgeltlich und beruht nur auf einem ausgeprägtem Helfersyndrom.
|
erstellt am: 04. Apr. 2008 09:30 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
|
H-kan84 Mitglied Konstrukteur Yachtinnenausbau
Beiträge: 253 Registriert: 28.07.2006 Lenovo SL500,winXP Sp3,AutoCAD Architecture 2010
|
erstellt am: 04. Apr. 2008 09:33 <-- editieren / zitieren --> Unities abgeben: Nur für Karsten.G
|