|
Lisp : Block attribute Verwenden
SCS am 08.12.2011 um 14:24 Uhr (0)
Hallo CAD´ler,ich hab nun schon ein bisschen mit Lisp experimentiert...aber so richtig wills nicht zünden. Und zwar hab ich nun folgendes vor.Ich habe immer einen Block in dem ich einen Attribut habe.zB.: Attribut A1 = 50ich hätte gerne eine Funktion mit der ich diesen attribut einlesen kann, einen bestimmten Layer angebe und er diesen in XX_50 umbennent. Und jenachdem wie der WErt des attributs ist sich der Layername ändert.Ich hab auch schon mehrmals die Suche benutzt. Aber entweder seh ich den Wald vor ...
|
| In das Form Lisp wechseln |
|
Lisp : lisp tool zum aufbrechen
fewoer am 13.01.2012 um 10:07 Uhr (0)
Hey,tut mir leid, dass ich ers jetzt antworte. Habs mittlerweile mit ein bißchen Gefrickel hinbekommen, das gute Stück läuft jetzt problemlos durch und erspart uns Drölfzig Stunden Arbeit )Danke nochmal für eure Hilfe, hätt ich ohne Eure entscheidenden Hinweise nicht hinbekommen!Liebe Grüße und noch eine schöne Zeit euch, tolle Arbeit leistet ihr hier )Patrick
|
| In das Form Lisp wechseln |
|
Lisp : Befehlslänge auf Werkzeugbuttons/Makro beschränkt?
ebla am 16.01.2012 um 17:46 Uhr (0)
Hallo cadffm,Könnte man dann das ganze als LSP-Datei speichern und dann einfach nur diese dann als Befehl auf den Button legen?Wenn ja, wie wäre die Struktur dieser Datei?Grußein LISP-Rookie
|
| In das Form Lisp wechseln |
|
Lisp : Befehlslänge auf Werkzeugbuttons/Makro beschränkt?
ebla am 16.01.2012 um 14:11 Uhr (0)
Habe u.a. kleine Routine versucht auf einen Button zu legen. Bei einigen Zeichnungen funktioniert es auch ganz gut, bei einer Zeichnung Systemabsturz mit unhandled c0000417h Exception. Wenn ich den Befehl einkürze, funktioniert es auch in der Zeichnung. Ist denn die Länge eines Makros/Lisp-Befehls das bei einem Button hinterlegt ist beschränkt? Oder vielleicht überhaupt die Länge eines Makrobefehls? Habe nichts hierzu gefunden.^C^C^P(setvar "CMDECHO" 0)(if (minusp (cdr (assoc 62 (tblsearch "LAYER" "_Vermes ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehlslänge auf Werkzeugbuttons/Makro beschränkt?
Dorfy am 16.01.2012 um 19:22 Uhr (0)
Könnte man...Code:(defun c:Deinezeilen ( / ) ;vllt einen sinnvollen namen wählen;ab hier deine Zeilen...(setvar "CMDECHO" 0)(if (minusp (cdr (assoc 62 (tblsearch "LAYER" "_Vermessung")))) (progn (princ "Alle Vermessungslayer eingeschaltet...") (command "-layer" "EI" "*_Vermessung" "")) (progn (princ "Alle Vermessungslayer ausgeschaltet...") (command "-layer" "AU" "*_Vermessung" "")))(setvar "CMDECHO" 1)(princ));klammer zuungetestet... der code ist... nicht von mir zum laden siehe FAQbei Fragen, wende dich ...
|
| In das Form Lisp wechseln |
|
Lisp : Autocad OFANG Hilfssymbol wird bei Lisp-Befehl nicht nagezeigt ?!
T_Kaulen am 20.01.2012 um 12:36 Uhr (0)
Hallo Forum,nutze in Autocad 2012 einige Kurztastenbefehle, die ich vor einigen Jahren mal über Lisp "programmiert" habe. Seit Version 2011 funktionieren einige nicht mehr so richtig. Unter anderem völlig einfache Linienbefehle wie nachfolgender(defun c:lie () (command "._line" "_end" pause))Bei Eingabe von "lie" soll eine Linie vom nächsten Endpunkt gezeichnet werden. Das funktioniert prinzipiell auch, also es wird ein Endpunkt gefangen, aber das Hilfssymbol für "Endpunkt" also dieses kleine farbige Quadr ...
|
| In das Form Lisp wechseln |
|
Lisp : Autocad OFANG Hilfssymbol wird bei Lisp-Befehl nicht nagezeigt ?!
joern bosse am 22.01.2012 um 07:58 Uhr (0)
Hallo Thomas,eine Erklärung habe ich nicht, vielleicht aber eine Alternative:Code:(defun c:lie ( / OsmodeAlt Pkt) (setq OsmodeAlt (getvar "OSMODE")) (setvar "OSMODE" 1) (setq Pkt (getpoint "
Ersten Linienpunkt angeben:")) (setvar "OSMODE" OsmodeAlt) (if pkt (command "._line" pkt pause)))------------------viele GrüßeJörnhttp://www.bosse-engineering.com
|
| In das Form Lisp wechseln |
|
Lisp : Schnittpunkt ermitteln
cadplayer am 04.05.2012 um 08:21 Uhr (0)
Ich bekomme nachwievor die Fehlermeldungerror: bad argument value: AutoCAD command: #VLA-OBJECT IAcadLWPolyline2 0000000033164b88In obj steht #VLA-OBJECT IAcadLWPolyline2 0000000033164b88Oder verstehe ich hier etwas falsch.vlax-vla-object-ename erstellt doch ein vla-objekt nicht ein Lisp-objekt ------------------Gruss Dirk
|
| In das Form Lisp wechseln |
|
Lisp : Autocad OFANG Hilfssymbol wird bei Lisp-Befehl nicht nagezeigt ?!
T_Kaulen am 23.01.2012 um 15:20 Uhr (0)
Danke Jörn,hab inzwischen im Forum Atocad Architecture durch Torsten Möhlenhoff eine Lösung gefunden. Die Variable "OSNAPCOORD" hatte den Wert 1 statt 2. Auch wenn ich deren Bedeutung nicht ganz verstanden habe, so hat die Änderung auf den Wert 2 die Lösung gebracht. die Hilfssymbole werden jetzt auch bei meiner "Kurzversion" des Lisp-Befehls angezeigt.Danke GrußThomas
|
| In das Form Lisp wechseln |
|
Lisp : Autocad OFANG Hilfssymbol wird bei Lisp-Befehl nicht nagezeigt ?!
cadffm am 23.01.2012 um 15:25 Uhr (0)
[EDIT: sendCommand gestrichen da dieser anscheinend osnapcoord NICHT berücksichtigt: siehe folgePosting von Dorfy!]Bitte lerne die Bedeutung, denn der Osnapcoord sollte im Zweifelsfall besser auf 1 stehen Menü/ButtonMakro , Script , Command oder SendCommand, jede Objekt- oder Punktwahl berücksichtigt die SysVarUnd falsche Obejktwahl oder Koordinaten wären ja verhängnisvoll oder ?Also: Explizit Osnapcoord auf 2 stellen = gut, wenn das aber nicht explizit gewünscht ist sollte man besser auf 1 stellen.------ ...
|
| In das Form Lisp wechseln |
|
Lisp : Autocad OFANG Hilfssymbol wird bei Lisp-Befehl nicht nagezeigt ?!
Dorfy am 23.01.2012 um 16:02 Uhr (0)
Code:(vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) "_line _end ")sollte auch funktionieren------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."-Lots of irritating superfluous parentheses!-
|
| In das Form Lisp wechseln |
|
Lisp : Nicht alle Blöcke selektiert mit ssget
ebla am 25.01.2012 um 14:06 Uhr (0)
Hallo cadffm,bei dem Test bekomme ich nurFehlerhafter Argumenttyp: lentityp niloder habe ich was falsch verstanden?Bin ja nicht so der LISP-Versteher.GrußErnst
|
| In das Form Lisp wechseln |
|
Lisp : Schnittpunkt ermitteln
Dorfy am 24.01.2012 um 13:22 Uhr (0)
Zitat:Original erstellt von cadplayer:phanominal, das hatte ich auch noch nicht: obwohl die var "erg" nicht klar definiert ist, erfüllt sie den Zweck (bloss ungleich 0 von was) erg = nil wenn nicht deklariert(/= erg 0) -- T somit ist die Bedingung immer erfüllterg deklariert (alles außer 0)(/= erg 0) -- Terg deklariert mit 0(/= erg 0) -- NILund dann schau dir nochmal cond in der Hilfe an!oder teste unter cond mal als erstes auf((/= erg 0)(alert "Lines no parallel")) ... klar?------------------Mfg Heiko El ...
|
| In das Form Lisp wechseln |
