|
Rund um AutoCAD : Schnittweg berechnen?
CAD-Huebner am 11.12.2008 um 23:25 Uhr (0)
Willkommen bei CAD.DE und AUGCE! Vier wichtige Links für den problemlosen Einstieg:Richtig Fragen - Nettiquette - Suchfunktion - System-InfoDer Befehl heißt DATENEXTRAKT und ist seit Version 2008 in AutoCAD einthalten.Natürlich gab es auch zuvor schon (Lisp)-Routinen und Makros zum Summieren von Linienlängen.Die Suche bei CAD.de bringt dann einige weiterführende Tipps, hier mal eine kleine Auswahl: http://ww3.cad.de/foren/ubb/Forum54/HTML/019492.shtml#000001 http://ww3.cad.de/foren/ubb/Forum54/HTML/02 ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Lisp zur Streckenaufteilung und -ausmittlung
Schachinger am 02.05.2003 um 17:25 Uhr (0)
guckst du hier: (defun c:mittlung () (setq obj (ssget)) (setq Basispunkt (getpoint "Basispunkt: ")) (setq Teilung (getreal "
Teilung: ")) (setq Anzahl (getint "Anzahl: ")) (setq Mittelpunkt (getpoint "Mittelpunkt der Anordnung: ")) (setq Drehwinkel (getangle Mittelpunkt "Drehwinkel: ")) (setq x (+ Anzahl 0.5)) (setq ss (ssadd)) (repeat Anzahl (setq x (- x 1.0)) (setq e1 (entlast)) (command "_copy" obj "" Basispunkt (list (+ (- (car Mittelpunkt) (/ (* Anzahl Teilung) 2.0)) (* x ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : alle layer auf einen Kopieren
CADmium am 13.03.2008 um 21:14 Uhr (0)
(setq LAYERDATEN (GET_LAYER (cdr(assoc 8 OBJEKTDATEN)))) kannst du auskommentieren und dann die Zeilen wo Layerdaten verwendet werden, also bei der Linienstärke ebenfallsn Semikolon vor.P.S. ich finds nicht so toll, wenn einfach nur kopiert wird, ohne sich die Mühe zu machen , die Sachen wenigstens im Ansatz zu verstehen oder zumindest das zu wollen, aber .. nun ja ..stellt euch mal vor , hier postet einer n Lisp, das alle eure dwgs löscht.. (ich nicht )das brauch noch nicht mal ne kompilierte vlx ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Bogenmaß
AsSchu am 05.07.2004 um 13:59 Uhr (0)
Zitat: Original erstellt von Rhein: Hallo, weiß jemand von euch wie man ein Bogenmaß bemaßen kann?????? Danke im voraus Ulrich eventuell so: (defun c:bl (/ bogen PERIMETERTEXT HOCHTEXT) (setvar cmdecho 0) (setq bogen (entsel Zu bemaßenden Bogen wählen ! )) (command _lengthen (car bogen) ) (print Maßposition zeigen ! ) (setq PERIMETERTEXT (rtos (getvar PERIMETER ) 2 3)) (setq HOCHTEXT (substr PERIMETERTEXT (strlen PERIMETERTEXT) 1)) (setq PERIMETERTEXT (substr PERIM ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : 3d plan - global alle höhen auf null setzen?
CAD-Huebner am 19.08.2005 um 20:06 Uhr (0)
Ich vermute, dass es in dem Geometerplan mehr um Punkte, Linien und Blöcke mit verschiedenen Z-Höhen geht.Dieses Tthema wird regelmäßig nachgefragt.Die letzten Beiträge enthielten dafür verschiedene Lösungen - meistens Hinweise auf Lisp-Routinen wie Plaetten.lsp oder Flatten aus den Expresstools.Hier mal 2 Links zu Beiträgen: http://ww3.cad.de/foren/ubb/Forum54/HTML/010998.shtml#000000 oder http://ww3.cad.de/foren/ubb/Forum54/HTML/006318.shtml#000000 P.S. Es ist für alle Leser nützlich, deine Systemumgebun ...
|
| In das Form Rund um Autocad wechseln |
 |
Rund um AutoCAD : Lisp für Scheitelpunkte bereinigen...
CADmium am 02.06.2014 um 21:19 Uhr (15)
wronzky schrieb mal dazu: ....eine schnelle Methode wäre die Datei als DXF-Datei abzuspeichern und in den Einstellungen die Anzahl der Dezimalstellen der Ausgabe auf 0 oder 1 stellen. Aber Achtung! Das rundet gnadenlos ALLE Koordinaten. Für Teilbereiche kannst Du die zu rundenen Objekte als Wblock in eine separate Datei schreiben und dann diese Datei über DXF "runden".Ich hatte auch mal ein Tool dafür geschrieben .. finde es momentan aber nicht ... kannst ja selbst noch mal suchen.Ein Link noch dazu Klick- ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Unbeabsichtigt Linie mit Z-Koordinate gezeichnet
Sparky am 13.05.2002 um 08:35 Uhr (0)
Hallo zusammen, es geht auch ganz einfach mit der Schnellauswahl die Linien die auf einer z-Koordinate liegt auf null zu legen. In der Schnellauswahl einfach alle Objekte auswählen, weiter delta null auswählen und als Option ungleich null eingeben. Dann werden alle Objekte die ungleich null sind ausgeleuchtet. Danach kann man über die Eigenschaften delta z auf null setzten. Und schon habe ich alle Objekte, in diesem Fall Linien, auf null gesetzt. Und das ohne irgendein Lisp-Programm oder anderen Utilit ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Linientypfaktoren um Faktor X ändern (nicht über LKFAKTOR)
Attilio am 18.05.2016 um 12:22 Uhr (15)
Hallo zusammen,habe hier gesucht, aber nix genaues gefunden.Ich fürchte für das Problem gibts keine Hauslösung.Ich möchte in einer Zeichnung den Linientypfaktor aller markierten Linien um den Faktor X verändern.Z.B. Faktor 20:Alle Linien deren Linientypfaktoren auf 1 stehen sollen nach dem Befehl, auf LTF 20 stehen,alle Linien deren Linientypfaktoren auf 2 stehen sollen nach dem Befehl, auf LTF 40 stehen...usw.Den LKFAKTOR kann ich in diesem Fall nicht ändern (können schon, wollen nicht).Hat da jemand eine ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : zeichnen in cm -> richtige layoutskalierung
Entsorger01 am 11.04.2012 um 11:50 Uhr (0)
Zitat:Original erstellt von andreasTh:frage: wie bringen wir autocad bei das unsere abstände cm sind und wir im layout 1:100 skalieren können um 1:100er maßstab zu haben?In dem ihr die Maßstabsliste in den Optionen - Reiter Benutzereinstellungen anpasst, quasi die Zeichnung auf CM ausrichtet.Beispiel Definition Maßstab 1:50:Zeichnen in mm = 1 Papiereinheiten = 50 ZeichnungseinheitenZeichnen in cm = 10 Papiereinheiten = 50 ZeichnungseinheitenZeichnen in m = 1000 Papiereinheiten = 50 ZeichnungseinheitenDa ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : bestimmter Layerfilter für Layout
Dorfy am 28.05.2010 um 12:34 Uhr (0)
Hi,(defun check_sysvar (a b);Funktionsdef. mit Übergabewerten a und b vom Reaktor (if (= (car b) "TILEMODE");nur wenn b die Sysvar tilemode enthält mache was (setq ctab? (getvar "ctab"));ihmo noch ein progn einbauen oder cond oder... gibt Namen der aktuellen Registerkarte zurück -- ggf spezielle Filter bzw Unterscheidung Modell -Layout, wird in ctab? gespeichert;;; hier die Layerfilter-Umschaltung hineinbasteln unter Berücksichtigung der Variablen CTAB ))(vlr-sysvar-reactor nil ((:vlr-sysvarchanged . chec ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : modifizierte Befehle
tunnelbauer am 24.04.2006 um 16:46 Uhr (0)
also 1. deine IT-Abteilung kannst du aus dem Spiel lassen, da diese dir die Rechte für C:Documents and SettingsuserApplication DataAutodeskAutoCAD 2004R16.0enuSupport (als Beispiel) nicht nehmen kann, da sonst gar nix mehr geht (ist aber ein versteckter Ordner)Wenn wir jetzt http://ww3.cad.de/foren/ubb/Forum54/HTML/013776.shtml#000001 als Beispiel hernehmen, dann müsste das Lisp so aussehen:Code:(defun C:kreuz () (setq X-Point (getpoint)) (command "_xline" "_h" X-Point "") (command "_xline" "_v" X-Point " ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp für Schaltfläche: Linie erzeugen
CADmium am 12.02.2004 um 10:35 Uhr (0)
Lad dir mal das : (defun c:Fadenkreuz ( / OLDLAYER LAYERNAME PUNKT) (setq OLDLAYER (getvar CLAYER )) (setq LAYERNAME 0 ) (if (tblsearch LAYER LAYERNAME) (setvar CLAYER LAYERNAME ) ;Layer aktuell setzen ) (if(setq PUNKT (getpoint Punkt eingeben : )) (progn (command _pline (mapcar - PUNKT (2500 0 0)) (mapcar + PUNKT (2500 0 0)) ) (command _pline (mapcar - PUNKT (0 2500 0)) (mapcar + PUNKT (0 2500 0)) ) ) ) (setvar CLAYER OLDLAYER ) (princ ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Layer auf Russisch
Proxy am 25.04.2004 um 19:01 Uhr (0)
Das sind UniCodes bei den Layernamen. Diese kannst du via Lisp in bestimmte Deutsche Buchstaben konvertieren oder ganze Reihen von russischen Unicodes in gleichsinnige deutsche Layernamen umbenennen. Zitat: U+0428U+0442U+0440U+0438U+0445U+043EU+0432U+043AU+0430 U+0422U+0435U+043AU+0441U+0442_U+0441U+0435U+0447U+0435U+043DU+0438U+044F U+0422U+0435U+043AU+0441U+0442_U+0434U+0435U+0442U+0430U+043BU+0438 U+042DU+043AU+0441U+043FU+043BU+0438U+043AU+0430U+0446U+0438U+044F U+041EU+0441U+0438_U+0440U+0 ...
|
| In das Form Rund um Autocad wechseln |
