|
Lisp : kostenfreie ArchTools als Lisp Library
archtools am 30.05.2023 um 10:06 Uhr (1)
Für BricsCAD ist in den ArchTools als Ersatz für das dort nicht vorhandene GEOMCAL das Programm CADCAL enthalten. Damit kann man sehr schnell und einfach ohne alle Programmierkenntnisse die kompliziertesten Koordinatenberechnungen durchführen, und sich bei der CAD-Arbeit jede Menge Hilfskonstruktionen sparen. Eine Übersicht über die CADCAL-Funktionalität ist hier zu finden: www.archtools.de/cadcal.htmlIm Quellcode ist natürlich auch der Quellcode für CADCAL enthalten. Für Programmierer ist das ein Beispiel ...
|
| In das Form Lisp wechseln |
|
Lisp : Führungslinien und und-color: #FFFF99'>Mtexte
archtools am 07.09.2023 um 15:14 Uhr (1)
Zitat:Original erstellt von ReneReichel:Hallo Marco,danke für den Tipp, war mir nicht bewusst. Warum muss man das nochmal separat einschalten, wenn man den Gruppencode schon geändert hat? Leuchtet mir irgendwie nicht ein...GrüßeRenéNach dem Ändern der DXF-Codes ein ENTUPD auf das Entity anzuwenden hilft auch nix?
|
| In das Form Lisp wechseln |
|
Lisp : Sonderformatierungen in MText und-color: #FFFF99'>suchen
archtools am 15.11.2010 um 11:29 Uhr (0)
Zitat:Original erstellt von Peter2:Wir haben einige und-color: #FFFF99'>Mtexte, da wurden viele Buchstaben und Wörter mit Sonderformatierungen wie Wingdings, Webdings usw. versehen.Gibt es eine Lösung, per Script diese Sonderformate rasch zu finden und zu protokollieren?Oder muss ich durch den DXF-Gruppencode durch?PeterNaja, Du musst auf den Text zugreifen. Der kann bei und-color: #FFFF99'>MTexten auf mehrfache Gruppencode-1-Sätze verteilt sein, und IMO gibt es keine Garantie, dass nichts sogar eine einzige Steueranweisungen auf zwei Sätze ver ...
|
| In das Form Lisp wechseln |
|
Lisp : Diverse Blöcke ersetzen
archtools am 18.12.2020 um 12:54 Uhr (1)
Zitat:Original erstellt von Bernd P:Servus,Platzhalter funktionieren hier nicht. Naja, die funktionieren nicht im Command-Aufruf. Aber hier ist ja das Lisp-Forum und nicht das Forum "Rund um AutoCAD", und in Lisp ist das natürlich ein winziger Klacks, hier mit Wildcards zu arbeiten.Dummerweise bin ich bekannt dafür, hier keine fertigen Lösungen anzubieten, sondern nur Hilfestellung für die Erarbeitung einer eigenen Lösung zu bieten. Also:1. Alle Blockreferenzen und-color: #FFFF99'>suchen, deren Blokcname dem Wildcard-Ausdruck ...
|
| In das Form Lisp wechseln |
|
Lisp : Sonderformatierungen in MText und-color: #FFFF99'>suchen
archtools am 17.11.2010 um 10:59 Uhr (0)
Zitat:Original erstellt von Peter2:Verd .... - wieder Arbeit statt Zaubertricks ... Doch, es gibt Zaubertricks:Code:(defun getmtextstring (en) (if (= ENAME (type en)) (setq en (vlax-ename-vla-object en)) ) (vlax-get-property en TextString))(defun putmtextstring (en str) (if (= ENAME (type en)) (setq en (vlax-ename-vla-object en)) ) (vlax-put-property en TextString str))[Diese Nachricht wurde von archtools am 17. Nov. 2010 editiert.]
|
| In das Form Lisp wechseln |
 |
Lisp : Blöcke auf Polylinien und-color: #FFFF99'>suchen
archtools am 21.10.2022 um 11:27 Uhr (15)
Zitat:Original erstellt von cadffm:Die Methode ist natürlich recht oberflächlich,zB. vernachlässigt diese ob die Blockreferenz wirklich auf einem Vertex oder Mittelpunkt liegt..... und wenn sie exakt mit dem Einfügepunkt drauf liegt, bedeutet das ja noch lange nicht, dass die Blockreferenz in der Nähe ihres Einfügepunkts auch "Fleisch" hat, also Entities, die man mit SSGET greifen könnte.Nein, da würde ich völlig anders vorgehen: Für eine Polylinie die Liste der Vertices und Mittelpunkte erfassen, und dann ...
|
| In das Form Lisp wechseln |
|
Lisp : Programmdateien unter Windows 7
archtools am 03.12.2012 um 11:55 Uhr (0)
Zitat:Original erstellt von Bernd10:Bisher ist das der einzige Pfad den ich gefunden habe, bei dem die Benutzer-Rechte meinem Wunsch entsprechen. Programmdateien dort abzulegen, halte ich aber eigentlich nicht für den richtigen Platz. Ich kann erst morgen weiter und-color: #FFFF99'>suchen.Nun, jedes andere Verzeichnis wäre noch weniger sinnvoll. Der korrekte Platz wäre das Programmverzeichnis, also z.B. "program filesmyprog". Wenn Du nicht die Rechte für dieses Verzeichnis ändern willst, dann ist UsersPublic die beste Wahl, w ...
|
| In das Form Lisp wechseln |
|
Lisp : Alle Texte auswählen anhand Ihres Drehwinkels
archtools am 03.04.2012 um 17:39 Uhr (1)
Zitat:Original erstellt von neo4matrix:So weit bin ich schon mal gekommen:(ssget "X" (list (cons 0 "*TEXT") (cons 50 0)))Dies wählt alle Texte und und-color: #FFFF99'>MTexte mit dem Drehwinkel 0. Leider nicht, wie gewünscht mit plus, miunus 0.1 (359.9 bis 0.1)Kann mir da jemand weiter helfen?Es gibt für die Objektwahl einen "virtuellen DXF-Gruppencode" (-4, IIRC), mit dem Du das gleich direkt in der Auswahl erledigen kannst, aber genau so schnell und IMO eleganter geht es, wenn Du einfach alle Texte auswählst und die dann na ...
|
| In das Form Lisp wechseln |
|
Lisp : Kann man Variablen dauerhaft...
archtools am 19.06.2013 um 13:48 Uhr (0)
Zitat:Original erstellt von reltro:Ich meine du musst ja genauso gut jedes Element prüfen, auf Typ...Ich muss nur die zurückgegebenen Listen decoden, und brauche deshalb nur auf listp zu prüfen.Zitat:[/i]Was mich intressieren würde, wie lange darf ein String werden?Ich könnte ihn ohne Probleme aufteilen, oder gar kürzen, mittels "MusterErkennung"....[/i]Mach ich auch. Lange Strings (maximal sind IIRC 1024 Byte erlaubt) werden als Liste von kleinen Strings gespeichert, erstes Listenelement ist zwecks Erkenn ...
|
| In das Form Lisp wechseln |
|
Lisp : SEQEND von Insert hat anderen Layer
archtools am 18.09.2007 um 23:56 Uhr (0)
Zitat:Original erstellt von CAD-Huebner:Ja, Ja, NeinDas letzte Nein musst Du durch ein Jein ersetzen, denn das kann durchaus Sinn gemacht haben. Früher erforderte es ziemlichen Aufwand, wenn man als Anwendungsprogrammierer größere Datenmengen in einer Zeichnung speichern wollte. Es gab nicht wenige Anwendungsprogramme, die beispielsweise Polylinien mit nur einem Vertex oder leere Textelemente erstellten, um an denen XDATA zu speichern. Für ähnliche Zwecke haben andere Anwendungsprogrammierer Layer erstell ...
|
| In das Form Lisp wechseln |
|
Lisp : GEOMCAL für BricsCAD
archtools am 19.09.2009 um 00:24 Uhr (0)
Zitat:Ich baue noch ein paar zusätzliche Funktionen mit ein, die mir im Geomcal fehlen.So das Programm ist jetzt so weit fertig und läuft bislang fehlerfrei. Vielleicht hat ja jemand Lust, Fehler zu und-color: #FFFF99'>suchen :-)Es gibt auch eine vollständige Funktionsübersicht mit dem gegenüber Geomcal erweiterten Funktionsumfang. Das Zip-Archiv enthält die AutoCAD- und die BricsCAD-Version:Das Programm ist jetzt vollständig und steht einschließlich (englischsprachigem) Handbuch zum Download bereit. CADCAL enthält gegenüber ...
|
| In das Form Lisp wechseln |
|
Lisp : (entget(car(entsel Mtext Hintergrund zuweisen
archtools am 13.08.2009 um 19:34 Uhr (0)
Zitat:Original erstellt von fuchsi:Da dies jedoch optionale Gruppencodes sind, muss vor dem SUBSTen abgefragt werden, ob dieser überhaupt vorhanden ist. Ansonsten muss er nämlich mit APPEND angehängt werden.Weil das bei der Bearbeitung von Gruppencodes ja öfter vorkommt, empfiehlt es sich, eine spezielle Version von SUBST zu schreiben, die dann, wenn der Code schon vorhanden ist, den vorhandenen mittels SUBST durch den neuen ersetzt, und die andernfalls den neuen einfach mit CONS hinten dran setzt.Code:(d ...
|
| In das Form Lisp wechseln |
|
Lisp : wenn entsel leer
archtools am 09.05.2023 um 12:47 Uhr (1)
Zitat:Original erstellt von joern bosse:Noch ein kleine Ergänzung zu Andreas seiner Antwort. Ich finde, solche Abfragen sind immer gut geeignet, um mit AND und OR alles zu verbinden.Für Fortgeschrittenere: in den meisten Fällen kann man dann auch auf die IF Konstruktion verzichten und erzielt mehr Übersicht im Code und höhere Performance:Anstelle Code:(if (setq en (car (entsel)) (setq el (entget en)))geht auch das:Code:(and (setq en (car (entsel)) (setq el (entget en)))Und natürlich geht das auch in weit ...
|
| In das Form Lisp wechseln |
