|
AutoLisp : mal wieder ein reaktor...
Brischke am 26.11.2003 um 14:16 Uhr (0)
Hallo Frank, das sind erweiterte Elementdaten. Gruppencode 3. Mein Ansatz wäre: einen Command-ENDE-Reaktor, der den Rechteckbefehl abfängt und an das zuletzt erstellte Rechteck einen Objektreaktor dranhängt. Zusätzlich dazu werden in dieser Funktion die Texte für Höhe und Breite erstellt. Die Handle dieser neu erstellten Texte wird als XDATA im Rechteck gespeichert. Dann brauchst du nur noch eine Reaktorfunktion, die aufgrund des Rechteck-Objektreaktors anspringt. Diese liest dann die neuen Maße und die Te ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Elemente am Fadenkreuz (hängend) einfügen
Helmut Schepers am 15.10.2002 um 07:48 Uhr (0)
Hallo, hier mal ein kleines Beispiel in Lisp, wie so etwas machen könnte. Ich hoffe es hilft die weiter. Gruß Helmut (defun c:merk( / ab aw) ;letztes Element merken (setq ab (entlast)) ;neue Elemente zeichnen (command "kreis" (list 50 50) 50) (command "kreis" (list 50 50) 25) (command "rechteck" (list 0 0) (list 100 100)) ;wenn schon Elemente in der Zeichnung vorhanden sind, ;dann auf erstes neues Element (if ab(setq ab (entnext ab))) ;Auswahlsatz erzeugen (setq aw(ssadd)) ;wenn s ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Hilfe beim Rauschschreiben !!!
Andreas Kraus am 05.08.2008 um 11:30 Uhr (0)
Jetzt lob mich mal nicht zuviel, ich heb ja noch ab kurze Codeerklärung:Ich hole mir die Liste der Elementdaten eines angeklickten Objekts.Da ist aber noch keine Prüfung dabei ob das eine Polylinie ist(entget (car (entsel)))Die Liste speichere ich NICHT in einer Variablen, sondern verarbeite sie gleich weiter.Ich brauch ja nur die Stützpunkte, also alles was den Gruppencode 10 hat.vl-remove-if-not kann bestimmte Elemente aus einer Liste entfernen, man braucht nur zu sagen welche. Also entferne ich "alle E ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Fehlermeldung bei command solans
CAD-Huebner am 06.11.2005 um 11:30 Uhr (0)
Hallo Werner, kann diese Fehlermeldung nachvollziehen, auch wenn ich noch nicht ganz begriffen habe, was dieses Makro tun soll. Zuerst hatte ich keine Volumenkörper, da kam schon die erste Fehlermeldung, dann schnappete mein Ofang immer andere Ecken beim Aufziehen des Fensters (ich hatte im Layout schon einiges gezeichnet).Also diesem Makro müsstest du noch ne Kurzanleitung mit Verwendungszweck und Eingangsvoraussetzungen beilegen.Wenn das Lisp einfach aussehen soll, würde ich persönlich nicht 3 AutoCAD Ko ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Kranke Polylinien?
Arcuso am 01.08.2011 um 07:22 Uhr (0)
Guten Morgen!@Theodor SchönwaldDanke für den Hinweis! Auf den Befehl _CONVERTPOLY stieß ich erstmals bei einem Beitrag betr. AutoCAD 2011 hier in diesem Forum und nahm an, dass er - weil undokumentiert - neu ist. Aber tatsächlich fand ich ihn auch im 2005er.Die Lisp-Datei ConvertPoly.lsp habe ich auch gefunden, sogar mit dem letzten Upgrade vom 03.12.2010. Sie kann zwar zwischen LW- und 2D-Polylinien hin und her konvertieren, lässt aber event. vorkommende XDaten außer Acht. Da sich Elementname und Handle ä ...
|
| In das Form Lisp wechseln |
|
Lisp : hyperlink länge
fuchsi am 21.05.2008 um 15:55 Uhr (0)
Zitat:Original erstellt von hometuruk:Das mit den Variablennamen verstehe ich nicht ganz, denn es funzt ja auch so. Kann ich aber auch ändern :-).Funktionieren tuts eh, weil Du den befehl EQ nirgends verwendest.Aber alle Lispprogramme, die den befehl EQ verwenden , gehen ab deinem LISP nicht mehr.1. EQ ist ein Lispbefehl !Wenn du den als Variablennmame verwendest, gibt es den Befehl nicht mehr.z.B:(setq cond "mein Wert")Ab der Ausführung dieser Anweisung wirst Du keine COND mehr ausführen können, weil Du ...
|
| In das Form Lisp wechseln |
|
Lisp : Blöcke verbinden
O2CAD am 11.04.2011 um 16:40 Uhr (0)
Danke erstmal für die Antworten.Bevor ich anfangen wollte einen Code zu schreiben wollte ich mir erstmal soetwas wie einen Programmablaufplan erstellen und mir überlegen welche "Programmierwerkzeuge" ich brauche und wie das Ganze ablaufen soll. Das sieht bisher in etwa so aus:Da ich bisher diese Aufgabe über Skripte erledigt habe (was mir aber zu umständlich auf Dauer erscheint) war meine Idee, mit einer Lisp-Funktion automatisch ein solches Skript zu erstellen und ablaufen zu lassen.Also:Alle Blöcke einle ...
|
| In das Form Lisp wechseln |
|
Lisp : Civil3d API progn mit Vlisp C#
Brischke am 16.11.2012 um 11:55 Uhr (0)
imgrunde ist dein Ansatz richtig - du arbeitest dann mit COM-Objekten.COM-Objekte sind recht simpel aufgebaut. Es gibt Eigenschaften und Methoden, und deren Handling musst du die Funktionen beherrschen, der Rest ist Kenntnis des Objektmodells.Eigenschaften:vlax-put-property zum Eigenschaften setzenvlax-get-property zum Eigenschaften lesenMethodenvlax-invoke-method zum Methode ausführenSoweit so gut - jetzt kommt das größere (Verständnis-)Problem. Auch die aus dem Lisp bekannten Objekttypen müssen in COM-ve ...
|
| In das Form Lisp wechseln |
|
Lisp : Excel: Formula - FormulaLocal
cadffm am 27.09.2012 um 11:31 Uhr (0)
Jörn - wir kennen uns einfach zu wenig mit Excel&VBA aus (das Thema ist Anfängertauglich, heul),Rübe hat mir folgendes aufgezeigt:In einem (zB.) deutschen Excel laufen engl.Funktionen nicht !Wenn du mit VBA die Formel setzt dann wird sie Excel-intern umgewandelt (schau mal nach).Wenn man es per Hand eingibt (oder per Lisp zum Beispiel) dann wird es nichts automatisch umgewandelt, es kommt an was eingegeben wurde und somit läuft es nicht.Was mit der deutschen Version auf einem englischen Excel passiert steh ...
|
| In das Form Lisp wechseln |
|
Lisp : text übertragen auf Multiführungstext
Hoppenstedt am 27.05.2008 um 08:09 Uhr (0)
halloHier ist das Lisp:;;;FehlerSUB (defun myerr (s) (setq *error* alterr alterr nil) (princ (strcat "
TXTCOPY abgebrochen! - " s )));defun;;;Hauptroutine (defun c:TXTCOPY2 ( / aw targetli fromtxt) (command "_.undo" "_G") ;(while (= fromtext nil) (setq fromtxt (entget(car(nentsel)))) (setq fromtxt (assoc 1 fromtxt)) (setq aw (car(nentsel))) (while (/= aw nil) (redraw aw 3) (setq targetli (append (list aw) targetli)) (setq aw (car(nentsel))) );while (mapcar (lambda (X) ...
|
| In das Form Lisp wechseln |
|
Lisp : Kombination aus member und wcmatch
neurosis am 10.02.2012 um 09:50 Uhr (0)
hallo cadblue,hier mal eine moeglichkeit ohne "vl-" aus der "stdlib" von http://xarch.tu-graz.ac.at/autocad/stdlib/ (vielleicht gefaellt dir das mehr.)Code:;;; Returns first position of match in str or nil;;; case-sensitive, no regex, plain substring, first index = 1;;; Boyer-Moore method by Serge Pashkov, faster than old strpos below;;; Lisp translation of Modula-2 program from the book;;; "Algorithms and data structure", N.Wirth, Prentice-Hall, Inc. 1986;;; see contrib/boyer-moore.lsp for benchmarks and ...
|
| In das Form Lisp wechseln |
OOP-Autolisp.zip |
Lisp : OOP-Autolisp
reltro am 02.06.2013 um 11:59 Uhr (0)
Hallo liebe Menschen...Ich habe mich erst kürzlich gefragt ob ich fähig bin einer funktionalen Sprache wie Lisp es ist, Objekte beizubringen wie man es zb. aus VB oder anderen kennt...nun ja, ich hab mich mal dahinter geklemmt und es versucht und folgendes (im Anhang) ist dabei rausgekommen.Ob es nun sinnvoll ist oder nicht, es freut mich dass es funktioniert =)Ich bin kein Imformatiker; also keine Ahnung ob das ganze OOP auch nur nahe kommt, aber denke schon :PWie gesagt, im Anhang das Konstrukt... Leider ...
|
| In das Form Lisp wechseln |
|
Lisp : Attributswert mit entmod nicht mehr änderbar
Hunchback am 15.12.2008 um 16:17 Uhr (0)
Anders als im ersten Post geschrieben kann ich auch keine Attribute mit entmod verändern wenn ich einen Block in die Zeichnung meines Kollegen einfüge. Das liegt anscheinend daran, das in der Blockdefinition der Gruppencode 284 den Attributsdefinitionen hinzugefügt wird (lt.AutoCAD-Objekte Buch legt der GC 284 fest, wie Nullen in den Toleranzangaben behandelt werden [bei Bemaßungen]). Und wenn dieser GC 284 in einer Attributsreferenz steht kann ich diese nicht entmoden. Ich hab auch versucht den GC 284 rau ...
|
| In das Form Lisp wechseln |
