 |
Rund um AutoCAD : ACAD SysVariablen und Option per Lisp ändern
Mangrove am 02.11.2017 um 12:52 Uhr (15)
Hallo,Nur die erste Zeile "PrinterConfigPath" erhält leider nur den zweiten Wert(siehe Screenshot). Hast du noch Ideen?(setvar "STARTUP" 2)(vlax-put-property (vla-get-files(vla-get-preferences(vlax-get-acad-object))) "PrinterConfigPath" "P: 0 BIBLIOTHEK 4 ACAD 6 Plot Styles;M:BuerostandardACA")(vlax-put-property (vla-get-files(vla-get-preferences(vlax-get-acad-object))) "PrinterStyleSheetPath" "M:BuerostandardACAPlotstyles")(vlax-put-property (vla-get-files(vla-get-preferences(vlax-get-acad-object))) "Temp ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Lisp Datei für Raumaustattung
Dober Heinz am 02.12.2008 um 14:21 Uhr (0)
Hallo PrzemoDas hab ich mal gefunden im internet.Ist schon lange her, funktioniert aber.(defun c:trial (/ corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing)(setq corner1 (getpoint "Select one corner of room: ")corner2 (getpoint "Select opposite corner of room: ")columns (getint "Number of columns: ")rows (getint "Number of rows: ")roomwidth (abs (- (car corner1) (car corner2)))roomheight (abs (- (cadr corner1) (cadr corner2)))colspacing (/ roomwidth columns)rowspacing (/ roomheight ro ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Auswahl mittels Lisp-Ausdruck
CADmium am 04.07.2005 um 14:10 Uhr (0)
(sssetfirst (setq A(ssget _X (list(cons 8 (cdr(assoc 8 (entget (car (entsel)))))))))A) (entsel) wählt das Element und gibt Klickkoordinate und Element zurück (car(entsel)) filtert das Element aus (entget (car(entsel))) liefert die Gruppencodliste des Elements (cdr(assoc 8(entget (car(entsel))))) liefert den LAYERNAMEN (ssget _X (list(cons 8 LAYERNAMEN))) liefert einen Auswahlsatz aller Elemente im aktuellen Layout auf dem entsprechenden Layer (sssetfirst AUSWAHL AUSWAHL) setz den auswahlsatz aktiv auf ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Bereinigen als LISP oder Makro Frage
BaCAD am 12.07.2013 um 17:52 Uhr (0)
Danke für die Informationen.Das mit filedia war eine sehr gute Idee. Mein Makro sieht jetzt so aus:^C^Cai_selall;burst;be;al;*;n;_audit;j;_saveas;dxf;v;lt2000;16;"";jAm Ende wird via „Speichern unter“ automatisch eine DXF-Datei Version 2000 gespeichert. Und das ist immer im selben Ordner wie die aktuell geöffnete Datei. Die LISP-Datei ExplodeAll scheint, wenn man DWG-Referenzen geladen hat, nicht zu funktionieren. Daher habe ich mir überlegt, was ich sonst machen könnte. Dann kam mir die Idee: einfach alle ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Attribute mit Lisp an eine andere Position bewegen
spider_dd am 18.07.2024 um 12:39 Uhr (1)
Hallo 100dpi,der Beitrag wäre im Lisp-Forum besser aufgehoben, aber egal, lass ihn jetzt hier.Im Code sind einige "Kröten" enthalten, hier ein paar Hinweise:die Variable distance nutzt einen Namen, den es so schon als Systemvariabe gibt, ganz schlecht. Nenne alle Vorkommen von distance in z. B. ndistance um.Die neue Position der Attribute ermittels Du nicht aus der Position der Attribute, sondern aus der Blockposition, d. h. alle Attribute erhalten die gleiche Position.Wenn die Ausrictung (GC 72) nicht 0 = ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : autom. lisp Files laden
domda am 18.11.2002 um 14:04 Uhr (0)
sind ja einige recht interessante beiträge hier vertreten, glaube dass meine frage eigentlich auch halbwegs dazupasst und zwar was passiert wenn man eine lsp in die startgruppe mit einträgt... meine vermutung war dass dieses lsp dann bei jedem start neu hochgeladen wird ... leider irrtum (zumindestens bei mir) -- folgendes passiert .... geladen wird gar keine datei wenn ich allerdings mit appload das prog. starte und sofort mit [esc] beende dann ladet er sämtliche lsp s die in der startgruppe sind ... g ...
|
| In das Form Rund um Autocad wechseln |
 |
Rund um AutoCAD : LISP funktioniert bei manchen Nutzern nicht mehr
Peter2 am 18.06.2016 um 11:46 Uhr (15)
Zitat:Original erstellt von SNOOP_69:...hat noch jemand einen Ansatz (außer Rechner komplett neu aufsetzen!!)?a) Offene Fragen gemäss Jupa beantwortenb) Link testen:Zitat:Original erstellt von jupa:Könnte es sein, daß die ActiveX-Umgebung nicht geladen ist? Das Problem hatte ich auch schon mal, schau mal hier...c) AutoCAD neu installieren / reparieren (ev. eine Folge aus b)------------------Für jedes Problem gibt es eine einfache Lösung.Die ist aber meistens falsch. ;-)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : LISP: Höhenkoten platzieren
cadffm am 03.08.2018 um 10:49 Uhr (1)
Wenn du ZTW immer an den Text-Befehl übergibst, dann muß ZTW auch immer existieren (einen Textwert haben).Also ändere den Code dahingehen das ZTW immer einen Wert hat,ab und an den Z-Wert aus der Punktliste, oder eben einfach nur ""Da der Text aber nur sinnvoll ist wenn ein Z-Wert dargestellt werden soll,packst du den Command-Text Teil mit in die IF funktion, denn ohne Z-Wert braucht es auch kein Textobjekt.PS: Wenn man den TEXT-Befehl nutzt sollte man sicherstellen das der genutzteTexstil (k)eine feste Hö ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Bereinigen als LISP oder Makro Frage
BaCAD am 15.07.2013 um 12:45 Uhr (0)
Danke für die Info.$M=$(getvar,prefix)$(substr,$(getvar,dwgname),1,$(-,$(strlen,$(getvar,dgname)),4))"_2000.dxf"Sieht kompliziert aus. Kann man irgendwo nachschauen oder lernen, was die einzelnen Teile bedeuten oder aussagen? "" als Enter habe ich in einem englisch sprachigen AutoCAD-Forum gefunden und es funktioniert. Wenn ich statt "" ein ; eintippe, also so:^C^Cai_selall;burst;be;al;*;n;_audit;j;_saveas;dxf;v;lt2000;16;;;jDann wird zwar ein DXF gespeichert, aber am Ende fragt er noch etwas, das man abbr ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Aus Datei mit X, Y, Z-Koordinaten Flächen automatisch ueber Lisp o.ä. erzeugen??
caxman am 08.04.2004 um 12:21 Uhr (0)
Hallo Bernd, der Unterschied von meiner Anwendung zu dem Beitrag auf den Du verwiesen hast ist der, dass ich eine 3D-Flächennetz erzeugen will und keine 2D-Polylinie. Ich habe mal den Anfang einer solchen Datei mit den Koordinaten hier reinkopiert (mir dem upload hat s nicht funktioneirt). X, Y, Z-Werte Closed Index Arclength Begin section ! 1 Begin curve ! 1 -3.020 -.016 -23.430 -3.021 -.013 -23.431 -3.022 -.014 -23.431 -3.036 2.184 -23.375 -3.035 ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Icon erstellen von Lisp-Befehlen und diese dauerhaft sichern?
Matthias100 am 11.11.2005 um 14:28 Uhr (0)
Hallo Brischke und die Anderen,mit dem standartisiertem lsp befehlen habe ich kapiert und es funktioniert. Aber wie kann ich auch einen Icon herstellen für diese Befehle. Ein `.bmp` habe ich schon vorbereitet. CAdmium sprach von mnu-Datei und mnl-Datei erstellen. Keine ahnung, wie das geht. Und was AsSchu meint... keine Ahnung!!
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Probleme mit Lisp ... Blockwahl
Dober Heinz am 06.12.2008 um 09:04 Uhr (0)
Hallo PrzemoSo müsste es gehn(defun c:raum (/ corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing)(setq Blockn (getstring "Blockname? ")) (setq corner1 (getpoint "erste Ecke im Raum: ")corner2 (getpoint "gegenüber liegende Ecke: ")columns (getint "Anzahl X Richtung: ")rows (getint "Anzahl Y Richtung: ")roomwidth (abs (- (car corner1) (car corner2)))roomheight (abs (- (cadr corner1) (cadr corner2)))colspacing (/ roomwidth columns)rowspacing (/ roomheight rows)lowerleft(list(min (car corn ...
|
| 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 |
