| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY bietet das umfangreichste Ökosystem von B2B als auch B2C-Lösungen für IT-Akteure auf dem Markt, eine Pressemitteilung
|
Autor
|
Thema: Plinien einzeln schraffieren (1268 mal gelesen)
|
Jadzia Mitglied
Beiträge: 16 Registriert: 26.11.2003 AutoCAD + LT 2004 + LT Extender
|
erstellt am: 28. Nov. 2003 12:43 <-- editieren / zitieren --> Unities abgeben:
hab vor längerem mal ein lsp gefunden, mit dem man angeblich mehrere Objekte/Polylinien aufeinmal einzeln schraffieren kann. Unter 2004 wird jedoch nur ein Objekt schraffiert Hat jemand Lust, sich das Tool mal anzusehen?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Kramer24 Ehrenmitglied V.I.P. h.c. Architekt
Beiträge: 5896 Registriert: 09.11.2001
|
erstellt am: 28. Nov. 2003 12:52 <-- editieren / zitieren --> Unities abgeben: Nur für Jadzia
Hallo, bei mir (AC2004) läufts... ;;; ;;; ;;; Funktionen zum Hatchen von Objekten (geschlossene Polylines u.ä.) ;;; Mit Buttondefinitionen für die, die Buttons wollen, ;;; HATCHT ALLE GEWÄHLTEN OBJEKTE UNABHÄNGIG VONEINANDER ;;; AUF VOREINGESTELLTEN LAYERN ;;; ;;; - Wolfgang Sünder - ;;; - 10/17/01 - ;;; - VERSION 2.0 - ;;; ;;; (prompt "\n| | sw_hatch wurde geladen. \"sw_hb001\" oder \"sw_hv001\" zum Ausführen Eingeben") (defun c:sw_hb001 (/ idx ss sc clayer) (command "_UNDO" "_BEGIN") (command "_ucs" "w") (setq ss (ssget)) (setq idx 0) (repeat (sslength ss) (command "_-bhatch" "_A" "_A" "_Y" "" "_P" "SOLID" "_S" (ssname ss idx) "" "" ) (setq idx (1+ idx)) ) (command "_ucs" "VO") (command "_UNDO" "_END")(princ) )
------------------ "Stellt Euch vor, es geht, und keiner kriegt's hin." (Neuss) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 28. Nov. 2003 12:59 <-- editieren / zitieren --> Unities abgeben: Nur für Jadzia
funktioniert tadellos allerdings ist in deinem angehägntem lisp ein fehler die zeile (repeat (sslength ss)) hat ein ) zuviel richtig : (repeat (sslength ss) allerdings dürfte das lisp mit diesem fehler keine einzige polylinie schraffieren. da es wegen klammerfehler nicht ladbar ist ------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 28. Nov. 2003 13:04 <-- editieren / zitieren --> Unities abgeben: Nur für Jadzia
ok das war wirklich der fehler als datei ist sie soweit ladbar (habe sie nur in der VLIDE getestet, und da kann man klammerfehler nichtladen) es kommt zwar ein fehler , aber der befehl c:sw_hb001 wurde definiert (repeat (sslength ss)) durch die klammer zuviel, hat er zwar den auswahlsatz ss durchlaufen, aber nichts damit gemacht. danach war der befehl hatch nicht mehr in der schleife, und er hat nur das erste element des auswahlsatzes schraffiert.
------------------ *********************************************** AutoCad 2000i, 2002, 2004 deutsch und englisch Windows 2000, NT, XP Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Jadzia Mitglied
Beiträge: 16 Registriert: 26.11.2003 AutoCAD + LT 2004 + LT Extender
|
erstellt am: 28. Nov. 2003 13:12 <-- editieren / zitieren --> Unities abgeben:
|
loppy Mitglied Architekt
Beiträge: 39 Registriert: 23.04.2003
|
erstellt am: 03. Feb. 2004 10:08 <-- editieren / zitieren --> Unities abgeben: Nur für Jadzia
Hi Ist es möglich dieses Lisp auf Inselerkennung bei der Schraffur zu erweitern? Wäre sehr hilfreich beim schraffieren von Grundrissen. cheers Christoph ------------------ "If you don't fail now or then, it's a sign you're playing it safe (Woody Allen)" Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |