|
Rund um Autocad : Layer nach Präfix AN/AUS schalten
CADmium am 07.12.2006 um 11:26 Uhr (0)
Erstmal schließe ich mich dem Kommentar von Tunnelbauer an und dann ist hier noch ein Switcher in Lisp:(defun C:SWITCH-LA_BIT(/ LAYER L) (while (setq LAYER(tblnext "LAYER" (null LAYER))) (if (wcmatch (cdr(assoc 2 LAYER)) "LA_BIT_*") (and (setq L (tblobjname "LAYER" (cdr(assoc 2 LAYER)))) (setq L (entget L)) (entmod(subst (cons 62(* -1(cdr(assoc 62 L))))(assoc 62 L)L)) ) ) ))------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschrei ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Trojaner in DWGs, ist das neu, oder ein alter Hut?
Bernd P am 01.12.2018 um 12:42 Uhr (1)
Servus,Naja, pishing aber da kann man gleich die Daten per Hand schicken.[QUOTE]Dazu missbrauchen die Angreifer eine Möglichkeit des weit verbreiteten Programms AutoCAD, LISP-Skripte als Teile einer Projektdatei nachzuladen......Die Angreifer müssen das Opfer dann dazu kriegen, die Projektdateien an bestimmte Orte im Dateisystem zu kopieren und zu öffnen.[/CODE]----------------------- Bitte Systeminfo eintragen, warum siehst du hier. Schöne Grüsse aus der Steiermark Bernd P.
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Blöcke eauflösen
CADmium am 18.10.2006 um 15:59 Uhr (0)
Schnellauswahl .. Blockreferenzen ... alle wählen und dann _explode eingebenoder (sssetfirst (setq a(ssget "_X" ((0 . "INSERT"))))a) und dann _explodeoder gleich ein Lisp das das macht ( sollte hier im Forum zu finden sein) .. das kann dann auch so gestalltet werden, das auch verschachtelte Blöcke bis zum letzten aufgelöst werden.z.B.hier..was waren eigentlich deine Suchbegriffe? ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälft ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Darstellung der Benutzeroberflächenanpassung
Entsorger01 am 20.02.2008 um 13:28 Uhr (0)
Das mich auch aufregt, bin ich mal auf die Suche gegangen und hab auch einige Seiten gefunden, in denen immer dieser Lösungsweg vorgeschlagen wird. Leider funktioniert die Geschichte so nicht bei mir. Beim öffnen einer Zeichnung wird QUICKCUI ausgeführt und dann bleibt der Dialog offen.Vielleicht kann ja mal einer der Lisp-Kundigen beschreiben, woran eventuell der Fehler liegt.------------------GrußMichi"Personalführung ist die Kunst, die Mitarbeiter so schnell über den Tisch zu ziehen,dass sie die Reibung ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Mehrere Zeichnungen ändern
cadffm am 09.01.2007 um 16:14 Uhr (0)
angenommen du meckerst nicht über mein Mal-Buch-Lisp-Code hier mal gaanz einfach dargestellt, DWG-Files sind fix vorgegebenund die Sub "Editiere.." aus einfachen Commands zusammengehauen:Code:(defun SUB_EDIT (myfile)(alert myfile)(command "_.open" myfile)(command "_.-purge" "_all" "*" "_n")(command "_.zoom" "_e")(command "_.qsave"));_defun(defun c:Tesafilm ()(setvar "LISPINIT" 0) ;---WICHTIG!(setq myfilelist ("c:1.dwg" "c:2.dwg" "c:3.dwg"))(foreach n myfilelist (SUB_EDIT n)));_defun
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : UCS drehen - Texte lesbar machen?
s.wickel am 19.01.2006 um 10:08 Uhr (0)
So, jetzt hab ichs weiterverfolgt.Folgendes Lisp macht es ganz einfach. Nur das entsprechende Ansichtsfenster aktivieren und starten. Ich habe den Befehl auf einer Schaltfläche liegen.Code:(defun c:Ansicht_drehen ( / old_viewctr winkel) ;;;/ winkel old_viewctr old_viewsize) (setq winkel (getstring "Winkel: ")) (command "_.dview" "" "_twist" (atof winkel) ""))Funktioniert sogar im Modellbereich! Es wird einfach nur das was man sieht um den angegebenen Winkel gedreht. Keine Probleme mit Texten u. ä. Viel Spa ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Geänderte Dateien zentral auf Server legen
CADmium am 24.10.2006 um 16:05 Uhr (0)
..ich mach das so wie Fuchsi, allerdings mit Lisp und acad.lsp .. so daß bei ACAD-Starten neuere Dateien auf die lokale Platte kopiert werden.Klappt gut. Weiterhin habe ich alle Einstellungen ect. auf ein Verzeichnis umgebogen (was in Mechanical einiges an Aufwand war), so daß ich bloß noch die Daten dieses Verzeichnisses(incl. Subdirs) abgleichen muß. Aber auch die Zentrale Ablage der Nutzerprofile ect. auf den Server bringt seine Vorteile. Ist halt Ansichtssache.------------------ - Thomas -"Bei 99% al ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Textfilter nach Höhe in Skript
ChrisSin am 14.11.2006 um 09:13 Uhr (0)
Ja, läuft anstandslos:-)Ich bastel mir jetzt noch mein skript zusammen, dass dann in einem Rutsch Text und Layer ändert. Dürfte jetzt mit eurer Hilfe - auch von CADmium - aber funktionieren...(wenn nicht meld ich mich noch mal;-))!Und um LISP richtig zu lernen, muss ich mir wohl auch mal richtig Zeit nehmen! Bislang gabs dazu aber nicht die Notwendigkeit, weil ich mit AUTOCAD eher weniger zu tun habe...So im Hauruck-Vefahren gehts jedenfalls nicht, oder nur mit Unterstützung;-)Chris
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Textstil ausfiltern
CAD-Huebner am 25.05.2008 um 19:55 Uhr (0)
Wenn der Textstil aber nicht nur Texten (TEXT), sondern zeichenweise auch MTEXT Objekten, ATTDEFs (Attributdefinitionen) oder ATTRIBs (Attributen) zugeordnet wurde, wird man über die Schnellauswahl nicht fündig.Für die ATTDEFs kabnn man die Blöcke nacheinander mit dem Blockeditor öffnen und die ATTDEFs prüfen.Die Holzhammermethode bei widerspenstigen Dateien ist DXFOUT und dann mit einem Texteditor im DXF Code suchen.Oder man schreibt sich eine angepasste VBA oder LISP Routine dafür.------------------Mit f ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : AutoCAD-Meldung beim Öffnen bestimmter Zeichnungen
Prisoner am 24.02.2012 um 16:22 Uhr (0)
Dankedankedanke cadffm, Du hast zwar nicht direkt die Lösung gehabt, mich aber drauf gebracht (Stichwort Archtools!).Also wenn Du immer noch zum "haben will" stehst: Ich schenk Dir die Meldung.XBem ist das Problem (Bemaßungstool, hat außer dem gleichen Ziel "Baubemaßung"nix mit Archtools zu tun!) Sobald ich eine Maßkette setze, ist der Bug drin.Jetzt muss ich nur noch rausbekommen, warum die Meldung erst seit kurzem und überhaupt auftaucht (und: Ist das nun wirklich eine "AutoCAD-Meldung"oder eine "XBem-Me ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Gesunde Farbeinstellung
Dig15 am 26.01.2008 um 11:10 Uhr (0)
Ich schließe mich auch meinen Vorredner an. Ich arbeite in ACAD mit einem weißen Hintergrund. Ich will es auf dem Monitor einfach so haben, wie es dann auch auf dem Plan ist. Wenn es doch mal sehr viele helle Linien geben sollte, habe ich ein Lisp, welches mir zwischen schwarz und weiß umschaltet. Ansonsten das Auge immer mal entspannen. Aus dem Fenster schauen, die Kollegin bewundern , ...Ich setze mich selbst nach einem 8h Tag noch zu Hause vor den Rechner. Dort wird dann allerdings eher gespielt. Das ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : mehrere WBlöcke aus Verzeichnis aktualisieren
CADmium am 26.10.2006 um 08:01 Uhr (0)
Vorab: Was verstehst du unter einem WBLOCK? Vielleicht können wir uns auf den FAQ-Beitrag beziehen und den Austausch mit den Fachtermini führen....das vereinfacht die sache für alle Beteiligten und beugt Mißverständnisse vor (auch wenn einige Leute im Anfragen interpretieren schon recht gut sind )..Ich vermute mal, dir geht es um eine Art Blocktausch, bei dem Blockdefinitionen (incl.deren Referenzierungen) einer Zeichnung durch die Elemente (im Modellbereich) einer anderen DWG(/DXF) ersetzt werden sollen. ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : frage
CADmium am 25.02.2008 um 10:56 Uhr (0)
1. Falsches Brett - Besser wäre LISPFORUM gewesen2. Falsche Überschrift .. etwas aussagekräftigerer Betreff bitte beim nächsten Mal3. Wenn du schon mit der Rechtschreibung und der Textformatierung auf Kriegsfuß stehst, wirds mit Lisp auch nicht so doll werden4. Guck dir mal dieTutorials von Axel an, da solltest du alles nötige für den Einstieg finden. Gedruckt gibt es diese hier .....zu deiner konkreten Frage folgender Codeschnipsel:(setq a "Blabla")(setq FILE(open "c:Testus.txt" "w"))(princ a FILE)(close ...
|
| In das Form Rund um AutoCAD wechseln |
