 |
Rund um AutoCAD : Lisp funktioniert nicht mehr
cadffm am 05.07.2018 um 14:32 Uhr (15)
Zitat:Original erstellt von bit:...momentan sieht es so aus: Code:(if(assoc 62 OBJEKTDATEN) ; Objektfarbe auf "VONBLOCK" setzen (setq OBJEKTDATEN(subst(cons 62 0)(assoc 62 OBJEKTDATEN)OBJEKTDATEN)) )Nach wie vor setzt du nur die Farbe auf VonBlock wenn die Farbe zuvor nicht VonLayer war..Schau dir doch mal die Objektdaten von einem Kreis an der die Farbea) Rot=1 hat oderb) VonLayer(assoc 62 (setq OD (entget(car(entsel)))))
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Lisp für Textstilfont wechsel und Bereinigung
CADmium am 25.07.2008 um 10:13 Uhr (0)
probier damit und versuch es zu verstehen :(defun c:Xrein (/ TX_ST) (vl-load-com) (setq TX_ST (vla-get-Textstyles (vla-get-ActiveDocument (vlax-get-acad-object)) ) ) (vlax-for i TX_ST (if (or(=(strcase(vla-get-fontFile i)) "TXT.SHX") (=(strcase(vla-get-fontFile i)) "TXT") ) (vla-put-fontFile i "simplex.shx") ) ) (command "_audit" "_y") (command "_purge" "a" "*" "n") (princ "...ausgeführt!")(princ))(princ "Programm geladen - mit XREIN starten")------------------ ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Auto Lisp
thika am 17.04.2008 um 13:37 Uhr (0)
Zitat:Original erstellt von holgerlab:und ich finde das hier sich manchmal Leute in Ton vergreifen. Meinst Du mich?Ich möchte im Interesse des Beitragseröffners eigentlich nicht das Thema wechseln, aber da die Frage ja schon umfassend beantwortet wurde, getraue ich mich das nun doch mal.Ich finde es nun einmal unhöflich, wenn jemand auf seine Fragen, mit wenigsten Worten formuliert, eine Anwort erwartet und nicht einmal den Helfern Rückinfo gibt oder auf Zwischenfragen reagiert.Das erzürnt mich nun einmal ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Lisp zum Prozent antragen bricht ab
Geos am 01.11.2008 um 18:57 Uhr (0)
Code:(defun c:Prozent (/ ech ang pt1 pt2 dh ds el richt) (setq ech (getvar "CMDECHO")) (setvar "CMDECHO" 0) (princ "Angabe über %-Neigung einer Linie")(SETQ pt1 (getpoint "
Erster Punkt:"))(SETQ pt2 (getpoint pt1 "
Zweiter Punkt:")) (SETQ pt1 (TRANS pt1 1 0))(SETQ pt2 (TRANS pt2 1 0))(SETQ dh (- (CADDR pt2) (CADDR pt1)))(SETQ ds (DISTANCE pt1 pt2))(SETQ ang (/ dh (SQRT (- (EXPT ds 2) (EXPT dh 2)))))(setq #osmode (getvar "OSMODE"))(setvar "OSMODE" 0)(command "_TEXT" "_S" "STANDARD" ;textstil "_J" "_BC" ; ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Dyn. Block - Breite/Länge mittels Lisp beim Einfügen übergeben...
Kuschelfee am 14.07.2015 um 20:43 Uhr (1)
Hallo,zur Zeit beschäftige ich mit einer ähnlichen Funktion und habe dafür eine Lisp gebastelt die mich nach den Parametern fragt und diese an den Block übergibt. Hier eine für deinen Block umgeschriebene Version.Code:; K. Kubat 2015; ; Aufrufen mit Matte fügt Block "ML-allgemein" ein; Block sollte sich schon in der Zeichnung befinden.; Wenn Blockverzeichnis im AutoCAD Suchpfad enthalten,; dann wird der Block auch eingefügt wenn er nicht; in der Zeichnung Referenziert ist(defun setProperty (vlaDynBlock sPr ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : text ausrichten lisp funkt nicht
marc.scherer am 11.05.2004 um 12:07 Uhr (0)
So? Code: ; Kopiert Text an eine bestimmte Stelle und richtet ihn in einem bestimmten Winkel aus (defun C:R_TEXT (/ C_E EN ENT EXITFLAG O_AB O_S P1 P2 TEXT_ELEM WINKEL ) (defun *NEUERR* (MSG) (R_VAR) (princ MSG) (princ)) (setq ALTERR *ERROR* *ERROR* *NEUERR* C_E (getvar "CMDECHO") ; ECHO O_S (getvar "OSMODE") ; FANG O_AB (getvar "angbase") EXITFLAG ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Automatische Auswahl aller Texte via Schaltfläche (LISP oder MAKRO). Bitte um Hilfe.
neo4matrix am 28.01.2008 um 18:51 Uhr (0)
Erstmal ein FETTES DANKESCHÖÖÖÖÖÖN an alle!Sorry, das mein Feedback sooo lange gedauert hat... musste sehr lange befehle "auspröbeln", bis ich eine vernünftige schaltfläche hatte...@carmelli76:leider ist scripten nicht möglich, da einige meiner befehle als dialogfeld erscheinen... _qselect zum beispiel... dann muss ich dort wieder mit der maus TEXT und ALLE auswählen, was ich ja vermeiden möchte...@Lutz_G:dieses CHTEXT.lsp ist schlichtwegs genial! BIG THX! es hat leider einige fehler / ungereimtheiten... i ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Ausrichten mehrere Elemente
Proxy am 14.09.2006 um 15:47 Uhr (0)
Ja, mit Lisp ... einfach ein BKS-Anlegen ... dann die Blöcke mit Lisp am Bassispunkt entlang rotieren (sieht aus wie ausrichten) . Lisp müsste auch hier im Forum rumfliegen ... Suchbegriffe _allign, bks / ucs ... wenn nicht kann es ja schnell geschrieben werden.------------------ MfG ProxyBitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspru ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Hilfe bei Setenv-Variable unter Acad 2007
cadffm am 29.11.2006 um 21:07 Uhr (0)
In der "Vollversion" von Acad kannst du entweder die in Lt ebenfallsvorhandenen Variablen USER* (userr1,users1,usw) nutzen oder:In der Vollversion nimmst du am besten LISP, mit LISP kannst duauch alle anderen Dieselbefehle ersetzen und hat den Vorteil dasdu dir (erstmal mit dem Thema Lisp angefangen) nahezu alle möglichenBefehle selbst erstellen kannst, nicht bloß einfache Scripte/Makro´s !Eine Variable setzen und abrufen funktioniert auf die schnellegeschrieben und ohne Erläuterung so:Zum setzen von ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Plan kommplett umfärben
cadffm am 14.09.2011 um 09:21 Uhr (1)
Ja da gibt es, genauso wie Suchmaschinen Lisp lernen ThreadUnd wenn du dann angefangen hast und konkrete Probleme bei Übungen hast suchst du genau in demverlinkten Board : Autodesk / Lisp ------------------CAD.de System-Angaben - CAD on demand - User:FAQ(Acad)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : mehrere Befehle zusammenfassen
CADuceus am 10.01.2019 um 16:43 Uhr (1)
Hallo xemIch sag mal ganz frech: Doch, es geht.Man kann beliebig viele command-Befehle in einer Lisp ausführen.Was an Deiner Lisp falsch ist, kann man Dir nur sagen, wenn Du sie uns zeigst.Übrigens: Eine Scriptdatei (SCR) wäre in diesem Fall die einfachere Lösung. Dort kannst einfach 1:1 zeilenweise reinschreiben, was Du in die Befehlszeile schreiben würdest ganz ohne Lisp.------------------Du kannst in anderen nur entzünden,was in Dir selber brennt! Wollte noch ein File anhängen, aber habe die Kiste schon ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Reihenabstand gleichzeitig
wronzky am 27.11.2007 um 17:00 Uhr (0)
Hi,also das ist ein Lisp-Programm, das den mit Meinfüg erstellten Block wieder in einzelne Blöcke zerlegt. Die kannst Du dann wieder einzeln bearbeiten.Wie man Lisp-Programme einbindet findest Du hier.Grüsse, Henning------------------VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Winkel zwischen zwei Ebenen
gringooo am 06.11.2013 um 17:18 Uhr (1)
Hallo Leute,hab heute in diesem Forum Hilfe erhalten.Sehr geniale Lösung!Vielleicht hilft die Verlinkung ja auch hier jemanden...http://forums.autodesk.com/t5/Visual-LISP-AutoLISP-and-General/need-Lisp-Surface-Angle-with-4-points/td-p/4595101/highlight/true/page/3
|
| In das Form Rund um AutoCAD wechseln |
