|
Autocad Architecture ACA (ADT) : Entmod schluckt Modifikatoren
Claudio am 15.05.2007 um 15:04 Uhr (0)
Ist zwar eigentlich ein Lisp-Thema, betrifft allerdings im speziellen ADT-Elemente, daher in diesem Forum für unsere ACA(ADT)-Lispler....mal wieder was Neues für mich - Entmod verschlingt Modifikatoren von ADT-Wänden!Nach (setq Li_Wand (entget (car (entsel)))) und dann einfach nur (entmod Li_Wand) verschwinden 2d oder 3d Wand-Modifikatoren.Sie scheinen zwar unter den Eigenschaften noch auf, allerdings lassen sich auch dann nur noch 2d-Modifikatoren mit Ok reaktivieren.Nachdem (entmod) nicht gerade ein Prog ...
|
| In das Form Autocad Architecture ACA (ADT) wechseln |
|
Rund um AutoCAD : Lisp für xref Layer geht nicht mehr
Gargarot am 09.12.2008 um 14:22 Uhr (0)
Zum Makrolösch einmal den Unterstrich vor wi. _ bedeutet immer den Englischen Befehl verwenden. Und WInkel heisst auf Englisch angle- kann nicht Funktionieren. Zudem benötigt es den leerschlag nach wi nicht. Leerschlag ist gleichbedeutend mit ; oder "Enter" Im 2007 funktiert es vorher nicht, und jetzt klappts mit:^C^C_.-attedit;_y;;;; wi \_pVielleicht reicht das schon.Wenn du alles nach ^C^C schritt für schritt in die Befehlszeile eingibst siehst du doch woran es scheitert....Gruss Christoph-------------- ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : Position des Maßtexts ändern
marc.scherer am 10.11.2004 um 14:14 Uhr (0)
Hi, wie lange arbeitest Du schon mit Acad? Guckst Du in der Acad-Hilfe (F1, sehr nützlich) unter "Bemaßungsstile", Bemstil, -Bemstil Option "Anwenden"). Je nach Acad-Version auch erst in Bemassungsmodus wechseln (BEM -Enter-, dann UPDATE -Enter- und dann Bemaßungsobjekte auswählen, denen der aktuelle Bemaßungsstil zugewiesen werden soll.) Ach so, VORHER mußt Du natürlich Deine(n) Bemaßungsstil(e) so wie von Dir gewünscht einstellen... Überprüfe mal die Bemaßungsvariablen: (DIMTVP) DIMTVP 0.000 1.000 Bem-Li ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Excel-Informationen in DWG automatisch einfügen
Dig15 am 27.08.2015 um 11:14 Uhr (1)
Hallo Stefan,willkommen hier auf CAD.de! Da ich mich selbst weder mit LISP noch VBA auskenne, würde ich es "per Hand" erledigen. Mein (noch unausgereifter) Lösungsansatz wäre:- in der DWG an die Stelle der Schottungen "Dummy-Blöcke" auf die entsprechenden Layer (Elektro,...) einfügen.- die Koordinaten der Blöcke mittels Datenextraktion auslesen- anhand der Layer kannst Du in Excel eine Zuordnung zu den Gewerken herstellen- mit den ausgelesenen Koordinaten und der Gewerketrennung kannst Du per Skript entsp ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Funktion Geoposition, Positionsmarkierung analysieren
RL13 am 29.09.2017 um 11:46 Uhr (1)
Ich befürchte das geht mit Lisp nicht.Die ganzen Befehle rund um GEO... beziehen sich auf Koordinatenreferenzsysteme von denen AutoCAD Pur eigentlich nichts weiß und hinzuprogrammiert wurden ähnlich wie es bei dem Vertikalprodukt AutoCAD MAP 3D der Fall ist.Wenn ich mir eine dxf mit solchen Positionsmarkierungen (in der DXF-Datei: AcDbGeoPositionMarker) anschaue sind nur die AutoCAD-Koordinaten diesem Objekt zugeordnet.Die Umrechnung von den AutoCAD-Koordinaten auf geografische Koordinaten erfolgt meiner E ...
|
| In das Form Rund um AutoCAD wechseln |
|
Programmierung : Farbe anzeigen (Display only)
der_Wolfgang am 01.07.2008 um 12:28 Uhr (0)
Hi,ach fuer Dich habe ich doch auch noch was gehabt:siehe LISP und Screen shot anbei.der Trick ist eine einfarbige BMP datei zunehmen und die Hintergrundfarbe zu setzen. Statt der (in jedem OSD vorhandenen) Datei personality/bitmaps/bmp/blank_image.bmp kannst Du auch eine groessere (hoehe/breite) Datei nehmen. Aber dann muss man den pfad halt kennen.Eine weitere alternative waere dann noch eine embedded area per UICT (nur so als Stichwort)Bei den image only varianten sieht man dann allerdings die textuelle ...
|
| In das Form Programmierung wechseln |
|
Rund um Autocad : Textausrichtung
sali am 17.02.2004 um 15:24 Uhr (0)
@Sebastian das mit dem Auswahlsatz und dem Befehl ist mir schon klar Über das Eigenschaftsfenster konnte ich sehr komfortabel mehrere Eigenschaften auf einmal ändern (Textstil, Breitenfaktor, Höhe, Ausrichtung). _justifytext richtet zwar Text aus ändert aber nicht Breitenfaktor und Stil. also ein Befehl und noch einer .... @Thomas genau das war es! Da ich aber kaum eine Ahnung von LISP habe eine große Bitte: könntest du mir noch eine Änderung des Textstils einbauen (immer der gleiche Stil bei mir meist ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Spline schliessen
ositodepeluche am 01.09.2022 um 22:41 Uhr (1)
Hallo zusammen,Ich möchte in einer LISP eine mit SKIZZE gezeichnete Spline schliessen. Mit Command Splineedit geht das zwar, aber wenn ich die Skizze nicht abschliesse und abbreche gibts ein Problem. Darum habe ich es folgendermassen versucht: (While (initcommandversion) (Setq letzte (command "_SKETCH" pause)) (setq obj_data (entget letzte)) (if (assoc 70 obj_data) (setq obj_data (subst (cons 70 1)(assoc 70 obj_data) obj_data)) ) (entmod obj_data) (setq letzte nil) )Dabei kommt folgende ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : AutoCAD 2006 & Blöcke
helmut51 am 17.04.2008 um 11:38 Uhr (0)
Zitat:Original erstellt von Peter Tropf:Hallo,durch das Ändern der Systemvariablen BLOCKEDITLOCK auf 1 wird das Öffnen des Blockeditors aber komplett unterdrückt. Man kann ihn also auch nicht mehr über den Button, das Kontext-Menü oder den Befehl BBEARB starten (wird leider im Menü aber nicht ausgegraut)! Vielleicht sollte man einen zusätzlichen Button einfügen, mit dem man BLOCKEDITLOCK direkt umschalten kann (per Lisp- oder Diesel-Makro).mit diesem Knöpfchen öffne ich meine dyn. Blöcke --^C^Cblockeditlo ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : Variable in Lisp aus Excel
s.wickel am 20.03.2006 um 14:34 Uhr (5)
Irgendwie kann ich nicht weiter. Zitat:(setq excel (vlax-get-object "excel.application")ExcelWorkbook (if excel (vlax-get-property excel "ActiveWorkbook"))ExcelSheet (if ExcelWorkbook(vlax-get-property ExcelWorkbook "ACTIVESHEET"))ExcelCells (if ExcelSheet(vlax-get-property ExcelSheet "CELLS")))(setq a (vlax-get-property ExcelCells "A1"))Das konnte ich ja nachvollziehen. Aber es funktioniert nicht (wie oben bereits gesagt).Was muss ich jetzt in der letzten Codezeile eingeben, damit a den Zellinhalt als Wer ...
|
| In das Form Lisp wechseln |
|
Lisp : entlast nach ARRAY
Dorfy am 19.08.2009 um 10:07 Uhr (0)
Zitat:Original erstellt von alterHausmeister:.... (setq AWS(ssadd)) (while (setq OBJ(entnext OBJ))(ssadd OBJ AWS)) (sssetfirst AWS AWS) (setq Sprossen (AWS)) [b]--- hier liegt....(setq AWS(ssadd));auswahlsatz wird erstellt (leer)(while ;beginn schleife(setq OBJ(entnext OBJ));bedingung (argument) und setzen von obj auf folgeobjekt(ssadd OBJ AWS));(expression) objekt zu auswahlsatz hinzufügen, ende schleife(sssetfirst AWS AWS);aws aktivsetzen -- brauchst du das?!aws ist bereits vorhanden(setq spross ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Datei öffnen & schließen; crosspost. VBA
Helmut F am 15.08.2003 um 15:42 Uhr (0)
Hallo Sebastian, wie wäre es mit folgendem Trick? Du schreibst mit Lisp eine Script-Datei und führts diese aus, z. B.: (defun C:close_open ( / ) (setq scr_file (open (strcat (getvar TEMPPREFIX ) My_script.scr ) w )) (if (= (getvar DBMOD ) 0) (write-line _CLOSE scr_file) (write-line _CLOSE _Y scr_file) ) (write-line (strcat _OPEN (getvar DWGPREFIX ) (getvar DWGNAME )) scr_file) (close scr_file) (princ) ) Dann belegst du einen Button eines Werkzeugkastens mit dem Befehl: ^C^C ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Multilinie in Polylinie verwandeln
joern bosse am 26.10.2004 um 10:13 Uhr (0)
Hallo, probier doch mal folgendes LISP aus: Es werden nur die Stützpunkte (code 11) ausgelesen und damit wiederum eine Polylinie erstellt. Ist wieder nur auf die Schnelle = ERgebnisse prüfen (defun c:ml-pl ( / aws koord) (setq aws (entsel
Bitte Multilinie auswählen: )) (if aws (if (=(cdr(assoc 0(entget(car aws)))) MLINE ) (progn (mapcar (lambda (A) (if (=(car A)11)(setq koord(append koord (list (cdr A))))) )(entget (car aws))) (entmake (list(cons 0 POLYLINE ) ( ...
|
| In das Form Rund um Autocad wechseln |
