|
AutoLisp : Mit LISP auf Buttonmakro zugreifen
fca_mi2 am 04.03.2006 um 16:03 Uhr (0)
frag doch sofistik------------------MfGFrank
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Drehwinkel von BKS
CAD-Huebner am 05.03.2006 um 16:46 Uhr (0)
Der Lisp Ausdruck Zitat:(ASIN (* 0.5 (SQRT (APPLY + (MAPCAR (LAMBDA (val) (* val val))(MAPCAR - Xdir (1.0 0.0 0.0))))))Berechnet die Winkelverdrehung nach folgender Formel: Als Grundlage habe ich folgendes Bild genommen: Die Verwendung von LAMDA mit APPLY (hier zum Quadieren der X, Y und Z Werte mit anschließender Addition) und von MAPCAR (zum Abziehen der Koordinatenwerte) kann man erschöpfend im Handbuch oder auf Axel Seiten (siehe oben) nachlesen.------------------Mit freundlichem GrußUdo Hübner
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Drehwinkel von BKS
SHP am 05.03.2006 um 18:15 Uhr (0)
Zitat:Original erstellt von CAD-Huebner:Der Lisp Ausdruck [QUOTE](ASIN (* 0.5 (SQRT (APPLY + (MAPCAR (LAMBDA (val) (* val val))(MAPCAR - Xdir (1.0 0.0 0.0))))))Berechnet die Winkelverdrehung nach folgender Formel: Als Grundlage habe ich folgendes Bild genommen: Die Verwendung von LAMDA mit APPLY (hier zum Quadieren der X, Y und Z Werte mit anschließender Addition) und von MAPCAR (zum Abziehen der Koordinatenwerte) kann man erschöpfend im Handbuch oder auf Axel Seiten (siehe oben) nachlesen.[/QUOTE] ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : dcl anfaenger
andi2050 am 05.03.2006 um 23:16 Uhr (0)
Hallozu 1:An die Werte kommst Du mit get_tile.Dies funktioniert aber nur, wenn der Dialog noch aktiv ist d.h. zwischen start_dialog und done_dialog.Sollen die Werte beim Verlassen des Dialogs gelesen werden sollen, kannst Du das dem Button mit action_tile zuweisen.(action_tile "accept" "(setq var (get_tile "key"))(done_dialog)")Da dies bei mehreren Werten ziemlich unübersichtlich wird, kann man dies auch in eine eigene Funktion packen. Diese rufst Du dann in dem action_tile-String VOR done_dialog auf.z.B. ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Speichername + Datum + Ersteller
Dressler am 06.03.2006 um 10:47 Uhr (0)
Hallo,ich komme mal wieder zu diesem Thema zurück.Leider habe ich bisher noch nicht so richtig die Zeit gehabt mich weiter mit Lisp zu beschäftigen. Außerdem scheint Lisp ja auch laut einem Thread hier langsam nicht mehr weiter entwickelt zu werden.Vielleicht kann mir trotzdem ein Lisper bei meinem Problem hier doch noch weiterhelfen?Ich komme mit dem Code so einfach nicht zurecht.Ansonsten scheint es wenn doch am sinnvollsten zu sein, wenn ich mich mit .net beschäftige, oder?Für Hilfe und Antworten wäre i ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Speichername + Datum + Ersteller
CADmium am 06.03.2006 um 11:02 Uhr (0)
Zitat:Original erstellt von Dressler:Hallo,ich komme mal wieder zu diesem Thema zurück.Leider habe ich bisher noch nicht so richtig die Zeit gehabt mich weiter mit Lisp zu beschäftigen. Außerdem scheint Lisp ja auch laut einem Thread hier langsam nicht mehr weiter entwickelt zu werden... aber tot ist deshlab Lisp noch lange nicht .. auch in 2007 soll es integriert sein .. Zitat:Original erstellt von Dressler:Vielleicht kann mir trotzdem ein Lisper bei meinem Problem hier doch noch weiterhelfen?Ich komme m ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Elemente miteinander Verknüpfen
Paulchen am 07.03.2006 um 14:31 Uhr (0)
So, nach einer kurzen Spielerei die ersten Denkanstöße.1. An den Bemaßungstext - eine Realzahl - kommst Du soCode:(cdr (assoc 42 (entget (car (entsel "
Bemaßung anwählen: ")))))heran - einfach mal in der ACAD-Befehlszeile einfügen.2. Der Inhalt der Positionsnummern ist - auf die Schnelle - nur auf einem etwas weniger eleganten Weg auszulesen. Ich löse zunächst den Block auf, lese die Nummer des Textes aus und mache dann die Auflösung rückgängig. Nicht elegant, aber wirkungsvoll )-; Also: Auflösen mit "_.ex ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Fontname in ICAD oder ACAD
Theodor Schoenwald am 08.03.2006 um 10:35 Uhr (0)
Hallo,wenn ich z.B. den Schriftnamen "Comic Sans MS" eingestellt habe und den folgenden Befehl (cdr (assoc 3 (entget (tblobjname "STYLE" (getvar "TEXTSTYLE")))))benutze, bekomme ich als Ausgabe "comic.ttf"Ich benötige aber den Namen "Comic Sans MS" und nicht den Namen der Fontdatei.Jetzt könnte ich zwar abfragen: wenn "comic.ttf" dann "Comic Sans MS",usw...Da aber jeder andere Schriften installiert hat, wäre ich damit ziemich begrenzt.Wenn jemand eine Lösung mit Lisp hat, sollte sie kein VLX verwenden, da ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Fontname in ICAD oder ACAD
Theodor Schoenwald am 08.03.2006 um 11:47 Uhr (0)
Hallo Thomas,der Spachumfang von Lisp in ICAD entspricht ungefähr dem Stand bei ACAD12.Auf jeden Fall möchte ich mich bei Dir für die schnellen Antworten bedanken, teilweise haben sich Deine und meine Antworten überschlagen.Vieleicht finded sich doch noch eine Lösung.GrußTheodor
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Konvertierung
tunnelbauer am 09.03.2006 um 09:38 Uhr (0)
Und du glaubst einer von denen die AutoLISP können, machen so nebenbei noch mit SW rum ? Glaub ich nicht... (kenne nur einen...)Probiers mal da wo so ein Beitrag hingehört (es gibt neben dem Lisp-Forum auch noch andere Foren) http://ww3.cad.de/cgi-bin/ubb/forumdisplay.cgi?action=topics&forum=SolidWorks&number=2&DaysPrune=1000&LastLogin=&mystyle=AUGCE ------------------GrüsseThomas
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Blöcke in Ursprung zerlegen
mundal am 09.03.2006 um 10:23 Uhr (0)
Hallo Zusammen,vermutlich ist die Erklärung zu meinem Poblem recht einfach, doch erstmal das Problem:Wie setze ich über LISP interne Blöcke sofort in den Ursprung.Über die mir bekannte Variante _insert *name hat es nicht geklappt, oder mach ich was falsch ?Danke für Eure HilfeJoachim
|
| In das Form AutoLisp wechseln |
|
AutoLisp : xlspl ??? wie sieht denn die liste aus ?
startrek am 11.03.2006 um 21:47 Uhr (0)
Hi und willkommen Phillip,hmm, Du möchtest einfach Linien von P1 nach P2 nach P3 nach ... P20?Das geht genauso wie mit den Punkten, einfach eine *.scr wie folgt:Code:_line0,0,01,0,00,1,05,5,0Das ergibt für oben sukzessive 3 Linien.Oder willst Du immer die Line zwischen 2 Punkten, eg eine von 0.0.0 nach 1.0.0 und eine von 0.1.0 nach 5.5.0?Wenn letzteres kann ich Dir mit Lisp nicht helfen - kann nur s.u. - aber das geht sicher auch mit Lisp.Gruss Nancy--Code:Sub aaa() Dim fso As Object, s, lines, p1#(2), p2 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Textzeilenumrandung > Textblockumrandung
Snofru am 13.03.2006 um 19:09 Uhr (0)
Hallo alle zusammenWir haben eine LISP-Datei aus dem Jahre 1994 von St. Vetter aus Dortmund für unsere Zwecke angepasst (Beilage).Das Lisp umrandet beliebig viele Textzeilen mit einem Rahmen und erstellt gleichzeitig einen Schatten mit einer Polylinie. Genial!Nun die Frage: Ist es schwierig eben dieses LISP-Tool für einen Textblock anzupassen? Wir sind hier absolute LISP-Neulinge und haben schon mal so locker 2 Stunden nun verbraucht um den Schatten etc. auf unsere Masse und Farbenwünsche (vonlayer) anpass ...
|
| In das Form AutoLisp wechseln |
