|
Lisp : Objektkoordinaten mit Lisp abfragen
Brischke am 03.11.2016 um 20:21 Uhr (1)
Willst du das irgendwo einbauen oder genügen die Koordinaten im Textfenster?(princ (caddr(getpoint"
Punkt wählen:")))Grüße!Holger------------------Holger BrischkeCAD on demand GmbHIndividuelle Lösungen von Heute auf Morgen.defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!
|
| In das Form Lisp wechseln |
|
Lisp : Objektkoordinaten mit Lisp abfragen
wwwilli am 03.11.2016 um 20:29 Uhr (1)
XLIST hat an dieser Stelle schon ein Objekt und liest die Eigenschaften zum späteren Anzeigen aus. An dieser Stelle hacke ich mich rein, greife für Blöcke oder Punkte die Z-Koordinate ab, wandle sie zum String um und lasse sie später als "LineType" anzeigen. So ist jedenfalls der Plan.Also hier brauche ich dann so etwa einen ersatz für "(cdr (assoc 7 eList))", so dass die Z-Koordinate rauskommt:Code:;If the object is text or mtext, find out the style name (if (or (= "TEXT" sObjectType) (= "MTEXT" sObjectTy ...
|
| In das Form Lisp wechseln |
 |
Lisp : Objektkoordinaten mit Lisp abfragen
wwwilli am 07.11.2016 um 23:22 Uhr (15)
@Meldin: Danke für die Blumen. (Das Verfahren "Wie komme ich zu einem eigenen Programm, ohne eine Ahnung vom Programmieren zu haben" hat sich seit Fortran IV nicht wesentlich geändert. Nur das Internet hat seit Kurzem die Methode deutlich beschleunigt.) ;-)@cadffm: Mich würden doch Deine Bedenken interessieren, dass das nur zufällig funktionieren würde.MfGwwwilli[Diese Nachricht wurde von wwwilli am 07. Nov. 2016 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Radius über drei Punkte berechnen
jupa am 08.11.2016 um 09:05 Uhr (1)
Zitat:Original erstellt von spider_dd:Ermittle Dir einen Punkt P3, der mit geringem Abstand senkrecht über dem Mittelpunkt der Linie P1 - P2 liegt Ist gar nicht notwendig. Einfach einen Bogen zeichnen mit Startpunkt (ein Endpunkt der Linie), zweiter Punkt (einen beliebigen Punkt nahe neben der Linie, Endpunkt (anderer Endpunkt der Linie). Oder muß es unbedingt eine LISP-Lösung sein? (Wir kennen den Zusammenhang der Aufgabe nicht)Jürgen ------------------Bildung kommt nicht vom Lesen, sondern vom Nachdenken ...
|
| 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
jupa am 15.11.2016 um 16:52 Uhr (15)
Versuchs mal damit: (defun C:OFangToggle ( / aosmo)(setq aosmo (getvar "OSMODE"))(if ( aosmo 16383) (progn(setvar "OSMODE" (- aosmo 16384))(princ "
Ofang ein")) (progn (setvar "OSMODE" (+ aosmo 16384))(princ "
Ofang aus")))(prin1))Jürgen------------------Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty)[Diese Nachricht wurde von jupa am 15. Nov. 2016 editiert.]
|
| 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
Andreas Kraus am 15.11.2016 um 17:04 Uhr (1)
Hallo neo,die Fehlermeldung kommt weil du einfach zwei Ausdrücke ohne progn in eine Klammer bringst. ((setvar "OSMODE" (- aosmo 16384))(princ "
Ofang ein"))müsste so aussehen: (progn (setvar "OSMODE" (- aosmo 16384))(princ "
Ofang ein"))EDIT_ Da schaut man grade mal nach und schon ist wieder jemand schneller. Ich glaub ich mach jetzt Feierabend------------------Geht nicht, gibts nichtGrußAndreashttp://kraus-cad.de[Diese Nachricht wurde von Andreas Kraus am 15. Nov. 2016 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Transparenter Befehlsaufruf fehlerhaft
cadffm am 17.11.2016 um 20:25 Uhr (1)
Das Hochkomma ist dem Jürgen bekannt, aber es ist in der Tat so wie er schreibt.In 2013 zb. kann man wie angegeben verfahren, in 2016 würde es SO nicht akzeptiert werden.Das Verhalten ist bis/nach 2014 unterschiedlich.Ursprünglicher Grund war die Nachbildung des OFang-Toggle aus der Statusleiste oder Makro(F3?) in Lisp- wozu auch immer.Bei Osmode 0 geht dabei der Einstellungsdialog auf (eigentlich).Siehe hier: http://ww3.cad.de/foren/ubb/Forum145/HTML/004425.shtml (in diesem Thread hier interessiert nur de ...
|
| In das Form Lisp wechseln |
|
Lisp : Attribute aus dyn. Block auslesen
KathaB am 18.11.2016 um 14:39 Uhr (1)
Hallo Zusammen,ich bin hier neu im Forum und auch ein Neuling in der LISP Programmierung.Meine Frage an Euch:Ich möchte aus einem Layout die Attribute eines dynamischen Blockes und Attribute eines "normalen" Blockes auslesen.Kann mir jemand Unterstützung wie ich das anpacken kann.Mit einer treffenden Antwort wäre ich übers Wochenende beschäftigt :-)Danke schon im VorausKathi
|
| 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 : Attribute aus dyn. Block auslesen
KathaB am 23.11.2016 um 13:55 Uhr (1)
Hallo Zusammen,vielen Dank für Eure Hilfe.Die Entwicklung hat mich zwar viele Stunden gekostet aber ich stellte das Programm so zusammen wie ich es benötige - wow.Ohne Eure Tipps hätte ich es allerdings nicht geschafft.Den einen oder anderen Teil Eurer vorgeschlagenen Programmcodes habe ich noch nicht richtig verstanden - da muss ich noch ein paar Stunden dranhängen :-)Meine heutige Frage:Kann Lisp auch die Werte einer "normalen" Tabelle lesen ?GrußKathi
|
| In das Form Lisp wechseln |
