|
Rund um Autocad : DesignCenter- Blöcke drucken
KA76 am 31.10.2001 um 10:05 Uhr (0)
Hallo Wie kann ich eine Liste von den Blöcken einer Zeichnung drucken. Ich arbeite mit dem DesignCenter, kann die Blöcke (bei mir ca 250) aber nicht ausdrucken. Gibt es dafür ein Lisp-Programm? Kann mir jemand helfen KA
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Speichern als Dxf im ACAD 12 Format
michael_kilian am 01.11.2001 um 00:56 Uhr (0)
Hallo erstmal, wir haben folgendes Problem: ich möchte ohne viel zu klicken eine dxf-datei im ACAD 12 Format erstellen und die Objekte wählen aus der Zeichnug. Bisheriger Ablauf: Datei speichern unter ACAD 12 Dxf wählen Optionen anklicken und "Objekte wählen" anklicken Objekte wählen Datei-Namen eingeben gewünschter Ablauf: Button anwählen Datei-Namen eingeben Seichern als DXF ACAD12 und dann die gewünschten Objekte aus Zeichnug wählen Hab es schon als Makro probiert, aber es scheitern daran, dass kein Fen ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Speichern als Dxf im ACAD 12 Format
CADwiesel am 01.11.2001 um 10:14 Uhr (0)
Hai Hier Lisp (defun c:saR12dxf ( / ) (setq nam (getfiled "Was fürn Name?" "" "dxf" 1)) (if (= nam nil) (setq name (strcat (getvar "dwgprefix")(substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 3))"dxf")) ) (setq as (ssget)) (if as (command "dxfout" nam "V" "r12" "O" as"" "") ) ) Hier Button für R15(2000) ^C^C(initdia);_.dxfout; ------------------ Gruß CADwiesel
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-Programme
KA76 am 01.11.2001 um 12:56 Uhr (0)
Wie bekomme ich Lisp-Programme anständig zum Laufen? Hab die Programme über ein neu eingerichteten Werkzeugkasten laden lassen. Funktioniert aber nicht. Gibt es irgendwo eine Bechreibung/Erklärung für Lisp-Dateien?
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-Programme
AndreasN am 01.11.2001 um 13:19 Uhr (0)
Funktioniert nicht, ist eine recht allgemeine Aussage. Was funktioniert nicht, mit welcher Meldung? Grüsse Andreas
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-Programme
AndreasN am 01.11.2001 um 14:39 Uhr (0)
Hallo, (load "blkliste");bl; schon gehts :-) Grüsse Andreas
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-Programme
KA76 am 01.11.2001 um 15:32 Uhr (0)
Danke! Ist wohl doch nicht das richtige Programm für mich. Ich brauche nur die Benennung der einzelne Blöcke und nicht den Rest.
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-Programme
CADwiesel am 01.11.2001 um 16:59 Uhr (0)
Hi du kannst ja mal unter www.cadwiesel.de Blöcke das Prg. B2S.lsp ausprobieren. Vielleicht is das was. Alternativ empfehle ich Dir den Befehl ddrename. Da sind unter Blöcke auch alle drin. ------------------ Gruß CADwiesel
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp-Programme
KA76 am 02.11.2001 um 07:53 Uhr (0)
Mensch, Danke. "ddrename" kannte ich noch nicht. Ich kann die Blöcke zwar immer noch nicht in einer Liste ausdrucken, aber kann sie endlich unkompliziert umbenennen. Hab vorher über "Referenz bearbeiten" unter einem neuen Namen abgespeichert und den alten Block dann gelöscht. Das war mir immerv zu umständlich. dafür bekommst Du Bonuspunkte von mir. DANKE! KA
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp Hilfe : auswerten von Listen
SEHER am 31.10.2001 um 20:05 Uhr (0)
Hallo benwisch, les doch einfach den Layer und wenn die Farbe vonLayer dann aus dem Table Layer die Farbe (tblsearch "LAYER" Layername) oder so ähnlich. Versuchs mal -wenn Du nicht weiterkommst setz ich mich mal dahinter. Gruß seher
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp Hilfe : auswerten von Listen
benwisch am 31.10.2001 um 21:02 Uhr (0)
super....mußte zwar noch ein wenig überlegen, aber so funzt es !!!! (setq var2 (entget (car var1))) ; Aus der variablen var1 wird nun der erste assoc Wert (relevante Daten) in die liste var2 gespeichert (setq lay (cdr(assoc 8 var2))) ; hole mir den wert layer (setq var3 (tblsearch "layer" lay)) ; setz var3 mit den eigenschaften des layer s habe nun meine daten zur weiterbearbeitung *klatsch auf die stirn* danke ps...sollte mein code oben nicht optimiert sein, freue ich mich auf weitere tipp ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp Hilfe : auswerten von Listen
marc.scherer am 02.11.2001 um 12:31 Uhr (0)
Hi, so was hab ich mal geschrieben... (defun c:gsc ( / COLR LAYR PICKED) (setq picked (entsel "
Objekt anklicken dessen Layerfarbe aktuelle Farbe werden soll: " ) ;_ end entsel ) ;_ end setq (if (/= picked nil) (progn (setq layr (cdr (assoc 8 (entget (car picked)))) colr (itoa (cdr (assoc 62 (tblsearch "LAYER" layr)))) ) ;_ end setq (setvar "cecolor" colr) ) ;_ end progn (princ "
Kein OBJEKT gewählt !") ) ;_ end if (princ) ) ;_ end progn Zu Dein ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Lisp Hilfe : auswerten von Listen
benwisch am 03.11.2001 um 09:02 Uhr (0)
@marc.scherer vielen dank für deine mühe !!!! möchte dein listing speichern und damit weiter lernen !! ------------------ Die Tastatur finden Sie, indem Sie das Kabel verfolgen, das mit einem 5poligen DIN-Stecker an der Rückseite Ihres Rechners angebracht ist.
|
| In das Form Rund um Autocad wechseln |
