|
Lisp : Nur Elemente in die Auswahl nehmen, welche nicht deaktiviert+nicht gefrorenen sind
neo4matrix am 05.09.2024 um 17:12 Uhr (1)
ich habe die color-util.lsp gefunden und mit appload geladen.ich habe keinen Plan, wie ich das lisp verwenden kann, um aus RGB Werten oder Index-Farb-Nummern einen 420er Code zu generieren OK so kann man es herausfinden. Element z.B. Linie zeichnen. RGB Farbe geben. Linie selektieren.Code:(entget(car(entsel))) Attribut 420 suchen. Fertig.[Diese Nachricht wurde von neo4matrix am 10. Sep. 2024 editiert.]
|
| In das Form Lisp wechseln |
 |
Lisp : Alle Texte auswählen anhand Ihres Drehwinkels
neo4matrix am 03.04.2012 um 17:15 Uhr (15)
Hallo Gemeinde,ich habe mit vielen Zeichnungen zu tun, wo viele Texte und MTexte nicht gerade sind, sprich einen Drehwinkel von 359.9 bis 0.1 haben.Das nervt micht und ich versuchte dies per Schaltflächt zu löschen.Der erste Schritt ist nun, diese Texte in eine Auswahl zu verfrachten um sie in einem zweiten schritt mit dem LISP cht resp. chtext auf den Drehwinkel 0 zu ändern.So weit bin ich schon mal gekommen:(ssget "X" (list (cons 0 "*TEXT") (cons 50 0)))Dies wählt alle Texte und MTexte mit dem Drehwinkel ...
|
| In das Form Lisp wechseln |
|
Lisp : AutoCAD Objektfang (Ofang) Ein oder Aus (toggle) wie F3 aber als LISP
neo4matrix am 15.11.2016 um 16:29 Uhr (15)
Hallo GemeindeIch tüftle schon seit längerem an einem Listp, welches GENAU das gleiche macht, wie die F3 Taste unter AutoCAD. Nämlich den Objektfang umschalten. Hier schon mal mein List Code:(defun C:OFangToggle ( / aosmo) (setq aosmo (getvar "OSMODE")) (if ( aosmo 16383) ((setvar "OSMODE" (- aosmo 16384))(princ "
Ofang ein")) ((setvar "OSMODE" (+ aosmo 16384))(princ "
Ofang aus")) ) (prin1))Er funktioniert so weit ganz gut, Nur leider kommt beim Aufrufen des Befehls OFangToggle stets eine Fehlermeldung!Je ...
|
| In das Form Lisp wechseln |
|
Lisp : AutoCAD Objektfang (Ofang) Ein oder Aus (toggle) wie F3 aber als LISP
neo4matrix am 15.11.2016 um 16:39 Uhr (1)
Die Fehlermeldung ist übrigens:Befehl: OFANGTOGGLEOfang aus; Fehler: Fehlerhafte Funktion: 24191Befehl: OFANGTOGGLEOfang ein; Fehler: Fehlerhafte Funktion: 7807Die Zahl hinten ist der aktuelle OSMODE.mfg neo------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : AutoCAD Objektfang (Ofang) Ein oder Aus (toggle) wie F3 aber als LISP
neo4matrix am 15.11.2016 um 17:02 Uhr (1)
Super cool! Funktioniert 1A! Allerbesten Dank!mfg neo------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : AutoCAD Objektfang (Ofang) Ein oder Aus (toggle) wie F3 aber als LISP
neo4matrix am 18.11.2016 um 17:20 Uhr (14)
Hallo JürgenBesten Dank für deine Ausführungen.Das mit der Trasparenz ist wirklich ne Knacknuss...lgneo------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : Textstil per LISP umbenennen, falls vorhanden
neo4matrix am 01.02.2017 um 14:47 Uhr (15)
Hallo GemeindeIch möchte einen Textstil (Stilname1) per LISP umbenennen (in Stilname2). Aber nur, wenn dieser auch vorhanden ist:Mein Entwurf scheint aber nicht zu funktionieren:(if (/= nil (tblsearch "STYLE" Stilname1))(command "_-renanme" "t" "Stilname1" "Stilname2")) Weiss jemand rat? Besten Dank schon mal!mfg neo------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : Textstil per LISP umbenennen, falls vorhanden
neo4matrix am 01.02.2017 um 15:10 Uhr (1)
UPS! Ja RENAME hab ich falsch geschrieben, aber daran lag es nicht.Es kommt folgender Fehler:Fehler: Fehlerhafter Argumenttyp: stringp nilAuch beim LISP von cadffm(if (tblsearch "STYLE" Stilname1)(command "_.-RENAME" "_style" "Stilname1" "Stilname2")) ; Fehler: Fehlerhafter Argumenttyp: stringp nilObwohl ich den Textstil "Stilname1" erstellt habe zum testen...------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : Textstil per LISP umbenennen, falls vorhanden
neo4matrix am 01.02.2017 um 15:13 Uhr (1)
Zitat:Original erstellt von cadffm:TIP: Du solltest nicht nur Prüfen ob ein Textstil IST da ist, sondern auch das sicher kein Textstil SOLL vorhanden istDas stimmt natürlich! Ich weiss aber leider nicht, wie ich 2 Kriterien überprüfen kann, bevor ich ein command auslöse...------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : Textstil per LISP umbenennen, falls vorhanden
neo4matrix am 01.02.2017 um 15:52 Uhr (15)
Sehr cool! Das gefällt mir! Allerbesten Dank!------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : Autocad2015 Vertrauenswürdige Speicherorte
neo4matrix am 28.08.2017 um 17:49 Uhr (14)
Danke für den Tip. Ist aus Bequemlichkeint entstanden. So kann ich LISP-Dateien auf alle Workstations kopieren, und muss bei den Usern nichts in AutoCAD konfigurieren.------------------Welcome to the Real
|
| In das Form Lisp wechseln |
|
Lisp : Nur Elemente in die Auswahl nehmen, welche nicht deaktiviert+nicht gefrorenen sind
neo4matrix am 03.09.2024 um 08:14 Uhr (1)
hallo cadffmmit deaktiviert meine ich die Glühbirne EIN/AUS. Mein LISP Schnipsel soll nichts ausgeblendetes oder gefrorenes mitnehmen. So, wie wenn der User es mit der Maus markieren würde. Ein Fenster kommt darum nicht in Frage. Ich Kann "X" mit "A" ersetzen? Dann wären die gefrorenen Elemente schon mal weg?
|
| In das Form Lisp wechseln |
|
Lisp : Nur Elemente in die Auswahl nehmen, welche nicht deaktiviert+nicht gefrorenen sind
neo4matrix am 04.09.2024 um 18:41 Uhr (1)
@cadffm: Danke für die Aufklärung.Dieses c:LetzteAuswahl ist nur eine Notlösung, weil (command "_select" "_p" "") nie funktioniert hat, und ich die Element markiert haben will.Allerdings sehe ich, dass es mit deinem LISP Code geht Mit Befehlszeile meine ich: Während dem Testen kopiere ich das Ganze in die Befehlszeile. Sobald es läuft wie gewünscht entsteht daraus eine Schaltfläche oder LISP File.Den Rest muss ich noch anschauen...
|
| In das Form Lisp wechseln |
