|
AutoLisp : Höhenkote Lisp Code 3 Fragen
tom.berger am 04.09.2004 um 16:30 Uhr (0)
Zitat: Original erstellt von CAD-Tötti: .....sollte die Schöpfungshöhe schon damit beginnen, eine Idee zu formulieren, woraufhin der Nächste ein LISP bastelt (erinnere Dich mal, Herr Berger: ich formulierte den Bedarf nach einer geordneten Schraffur-Routine - nicht etwa, dass ich der einzige bin, dem es nach so etwas gelüstet - du hast die Idee aufgenommen in der Form, dass Du äußerstes, dies in Dein Programm aufzunehmen - und wenn ich jetzt sage: das war aber meine Schöpfungshöhe ...wäre 1. ni ...
|
| In das Form AutoLisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
Obi-Wahn am 10.09.2008 um 11:23 Uhr (0)
Also:Ich hab jetzt vorerst mal die Routinen "BLATTRAHMEN" und "DBLPRNT" zum laufen gebracht.Woran es bei "BLATTRAHMEN" lag, kann ich nicht sagen, aber es funktioniert vorerst mal. Selbiges bei "DBLPRNT". Aber ich vermute, da hat es an (progn gelegen, denn ich habs umstrukturiert, und es funktioniert.Was noch hackt sind die "schraffurgeneratoren". Das ist nur ein (glaub ich) kleines Problem, da brauch ich eh keinen eigenen Thread aufmachen, oder?Jedenfalls dürfte das mit dem strcat zusammenhängen.Ich bekomm ...
|
| In das Form Lisp wechseln |
|
Lisp : Import Layer aus Fremd-dwg über Lisp
CADblue am 25.06.2012 um 17:17 Uhr (0)
jo danke so weit euch beidenhab bisschen geforstet und das hier gefunden,Code:(defun c:hollayer (/ oAcad oCurDoc strFile oOpenDoc oOpenDocLayers lstObj oLayer array) (setq oAcad (vlax-get-acad-object)) (setq oCurDoc (vla-get-ActiveDocument oAcad)) (setq strFile (getfiled "Zeichnung wählen:" (getvar "DWGPREFIX") "dwg" 0)) (setq oOpenDoc (vla-Open (vla-get-documents oAcad) strFile)) (setq oOpenDocLayers (vla-get-layers oOpenDoc)) (setq lstObj nil) (vlax-for oLayer oOpenDocLayers (setq lstObj (cons oLayer ls ...
|
| In das Form Lisp wechseln |
|
Lisp : AccoreConsole nimmt kein Lisp Befehle
cadffm am 03.10.2017 um 12:07 Uhr (1)
Ohne es zu am PC anzusehen:So wird es in den vieln Fällen wie gewünscht funktionieren, gut.Aber noch mal zu deinen Anmerkungen oben zu command und setq:Deine Erklärung zu command ist zwar nett, aber falsch.Man kann damit Eingaben in die Befehlszeile senden und darüber dann also auch Autocad-Befehle fernsteuern,aber command selbst ist eine Lispfunktion, ebenso wie lsh setq oder defun,da ist nichts besonderes an command.SetqImmer wieder das gleiche Lied und oben ging ich auch hier schon mal darauf ein.Poste ...
|
| In das Form Lisp wechseln |
|
Lisp : SRXTEXT Lisp suche funktioniert nicht
cadffm am 25.06.2021 um 14:29 Uhr (1)
Zu der Ausgangfrage, du hast einen Doppelfehler gemacht.TGE-3-0-GR-E00-000--Dein Code ist:Suche nach:([A-Z][A-Z][A-Z]-[0-9]-[0-9]-[A-Z][A-Z]-[A-Z][0-9][0-9]-[0-9][0-9][0-9]-)[0-9]1. Das Zeichen "-" ist nicht in 0-9 (= 0 1 2 3 4 5 6 7 8 oder 9) enthalten2. Auch die Schreibweise ist falsch. Für den Fall man hätte nur die Fälle ändern wollen bei denen das letzte Zeichen 0-9 entspricht:([A-Z][A-Z][A-Z]-[0-9]-[0-9]-[A-Z][A-Z]-[A-Z][0-9][0-9]-[0-9][0-9][0-9]-)([0-9])Gezielt nur Text mit Index "-"Befehl: SRXTEXTS ...
|
| In das Form Lisp wechseln |
|
Lisp : Mit Lisp Blöcke auslesen und Teile des Inhalts in Textzeilen abbilden
joern bosse am 26.11.2024 um 08:01 Uhr (1)
Hallo 100dpi,mit folgendem Code kann der mit ENTMAKE erstellte Text auf Mitte-Zentrisch umgestellt werden, die Position sollte erhalten bleiben:Code:(defun TextMitteZentrisch (ename / P VLA-OBJ) (setq vla-obj (vlax-ename-vla-object ename)) (setq p (vla-get-InsertionPoint vla-obj)) (vla-put-alignment vla-obj 10) (vla-move vla-obj (vla-get-InsertionPoint vla-obj)p) (vla-update vla-obj) )(defun c:test ( / ) (TextMitteZentrisch (car(entsel))) )Das Einbinden in Deinen Code:Direkt nach der ENTMAKE-Funktion mit ...
|
| In das Form Lisp wechseln |
|
Lisp : Suche nach Farbe 255,255,255 per Lisp oder Befehlsstring
cadffm am 31.01.2020 um 17:49 Uhr (1)
Zitat:Original erstellt von cadffm:Objektdaten einsehen, ändern, vergleichen bringt einen oft weiter:(entget(car(entsel))) So fragt man die ab.Und keine Sorge, ich und andere hier verstehen sehr gut was du vorhast,auch sieht man die Schwächen und Fallen.Du bist dabei, nicht ungewöhnlich, die mit vielen neuen(?) Dingen gleichzeitig zu beschäftigen,da weiß man nicht wo man Anfangen soll.Ich habe mich daher mal fast ausschließlich auf die Farben filtern Sache beschränkt für den Anfang, aber die Hilfestellun ...
|
| 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 : Sound in Lisp?
HofCAD am 20.04.2010 um 18:05 Uhr (0)
Speech Application Programming Interface http://forums.augi.com/showthread.php?t=53823&page=5&highlight=speakcfg Code:(defun C:SpeakCfg(/ Sapi ~voice ~volume ~rate Voice VoiceMary VoiceMike VoiceSam VoiceLst NumVoices @SendKeysN @PlayWav @NoPath @VoiceList @member+ @Voice&TextInput);**********************SubPrograms************************************************(defun @SendKeysN (Keys n / Wscript) (if (setq Wscript (vlax-create-object "WScript.Shell")) (progn (r ...
|
| In das Form Lisp wechseln |
|
Lisp : Automatic Dimension AutoCAD LISP??
kadirozen am 02.08.2023 um 12:26 Uhr (1)
Ich danke Ihnen beiden für Ihre Antworten.kurz erklärt, gibt es eine Möglichkeit, eine Liste abgesehen von diesem Code zu machen, so dass ich Layers aktualisieren/umbenennen kann. Momentan sind es fast 700 verschiedene Layers und jeder Name mit eindeutigem Namen. Ich habe versucht, unsere Dateien zu durchsuchen, aber es kommen immer wieder neue Layers hinzu.Im Moment hat es 4 Dicken mit 6 verschiedenen Typen. Es sollte möglich sein, eine solche Benennung zu kodieren und sie automatisch zur Liste hinzuzufüg ...
|
| In das Form Lisp wechseln |
|
Lisp : Automatic Dimension AutoCAD LISP??
archtools am 26.07.2023 um 08:23 Uhr (1)
Zitat:Original erstellt von kadirozen:Ich danke Ihnen für Ihre Antworten.Ich habe nicht vor, den Code so weit zu ändern, dass er etwas völlig Neues ist.Kurzform: Auch die Bearbeitung oder Änderung eines urheberrechtlich geschützten Werkes ist eine Urheberrechtsverletzung.Langform: https://www.gesetze-im-internet.de/urhg/Details:§ 39 Änderungen des Werkes(1) Der Inhaber eines Nutzungsrechts darf das Werk, dessen Titel oder Urheberbezeichnung (§ 10 Abs. 1) nicht ändern, wenn nichts anderes vereinbart ist.§ 6 ...
|
| In das Form Lisp wechseln |
|
Lisp : AutoCAD 2007 - Lisp Programm lässt sich nicht mehr laden
Andyt8 am 27.09.2006 um 17:16 Uhr (0)
Danke das war es. Warum das auf einmal auskommentiert ist weiß ich nicht. Anscheinend hat da einer unfug getrieben. Oder frühere Versionen haben einfach dies ignoriert?Jedenfalls danke! Damit konnte es gelöst werden.------------------Unmögliche Vielfalt mit unmöglich vielen Variationen
|
| In das Form Lisp wechseln |
|
Lisp : Bestimmtes Attribut beim Blockeinfügen via Lisp per Textstring ausfüllen
cadffm am 24.03.2021 um 19:37 Uhr (1)
Wenn die vielen Beispiele dich noch nicht zum Ziel führten,warum dann nicht einfach die Attribute beim einfügen abfragen lassen und ausfüllen?Du benutzt ja ohnehin schon der nativen EINFÜGE-Befehl,also kannst du einfach ATTDIA aus, aber ATTREQ einschalten und die Attributwerte werden abgeffragt.Einfach zu verstehen, einfach umzusehen und das ganz ohne Programmierung (abgesehen vom Command).Also Attreq und Attdia setzen (fehlt übrigens auch in der aktuellen Fassung),und dann nach der Angabe der Drehung einf ...
|
| In das Form Lisp wechseln |
