Zeichnung1.zip |
Rund um AutoCAD : MTEXT Farbe VONLAYER
xem am 11.03.2009 um 10:40 Uhr (5)
Hallo,ich habe ein LISP mit dem ich MTexte bearbeiten kann und die Farbe auf VONLAYER setzen kann.Code:(defun c:ftext ( / aws n string) (princ "
Bitte Mtexte wählen:") (setq aws (ssget (list (cons 0 "MTEXT")))) (if aws (progn (setq n 0) (repeat (sslength aws)(setq string (cdr(assoc 1 (entget (ssname aws n)))))(while (vl-string-search "C" string) (setq string (strcat (substr string 1 (vl-string-search "C" string))(substr(substr string (+ 4 (vl-string-search"C" string)))(+ 2 (vl-string-search ";" (sub ...
|
| In das Form Rund um AutoCAD wechseln |
|
ProSteel : Lisp bei 64 Bit
Darijo am 12.01.2012 um 19:56 Uhr (0)
Hallo CAdluisFunktioniert WICTOP auch mit DraftSight Software und PC 64Bit.Vielen Dank im Voraus.Gruss Darijo ------------------Darijo
|
| In das Form ProSteel wechseln |
|
CoCreate Programmierung : Logische Tabellen
der_Wolfgang am 06.02.2009 um 21:46 Uhr (0)
njjjaa.. also Backqoute+Comma.. Übersichtlicher (für nicht so LISP-sichere), vor allem wenn man mit mehr als einer testvariablen hantiert, ist (list ... )Code:(sd-insert-logical-table-row .... :contents (list testvariable1 testvariable2 .... ) ...)persönliche Anmerkung (vereinfachend!):ob (a b c) oder (list a b c) ist eine Frage des Zeitpunktes der Evaluierung (um es mal einfach zu sagen). Das hilft bei zeitkritischen Dingen.. und wenn man den code compiliert hat vielleicht auch noch zusätlich. Da die mei ...
|
| In das Form CoCreate Programmierung wechseln |
|
Rund um AutoCAD : ProScript mit ACAD2016 / Lisp auf viele DWGs anwenden
FeR am 19.01.2017 um 07:45 Uhr (1)
Hallo cadffm,danke für den AutoCAD Hilfe Link, der hat meinen Knoten gelöst.Hier noch mal für Mitleser meine Lösung wenn man auf BATCH gehen möchte anstatt von ScriptPro 2.0 (welches viel komfortabler ist wegen Error Handling)Mein Lisp zum Aufräumen wird im Hintergrund automatisch (büroweit) geladen, jedoch nicht ausgeführt, dazu benötigt man den Kommandozeilenaufruf im AutoCAD.Code:"C:Program FilesAutodeskAutoCAD 2016acad.exe" /nologo "d: empTestDWG1.dwg" /b "d: empcleanDWG_BATCH.scr" Im Skript "cleanDWG_ ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Winkel zwischen zwei Ebenen
gringooo am 23.10.2013 um 11:40 Uhr (1)
Hallo Leute!Hab schon oft aus dem Forum hier nützliche Lisps holen können, aber zu dem was mir nun vorschwebt finde ich leider nichts...Ich stehe sehr oft vor der Aufgabe den Winkel zwischen 2 Flächen zu ermitteln. Und das vielfach hintereinander...Hier sind bereits einige Wege dazu beschrieben. Der aller schnellste ist aber meiner Meinung nach das Zeichnen von 2 Hilfslinien lotrecht auf die Kante wo die Flächen sich treffen (wie in der Skizze ein paar postings weiter oben...) und dann mit dem Tool Winkel ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : LISP oder besser VBA oder C++
Brischke am 04.09.2002 um 09:53 Uhr (0)
Hallo Andrea, du bist schon bei Axel (mapcar) gelandet - das ist gut! Dieses Tutorial ist sehr gut, da man erkennen kann, in welcher Kombination die Befehle was bewirken. Ich nutze hauptsächlich die in VLisp enthaltene Hilfe und denke, dass diese auch beim MDT enthalten ist. DCL sollte dort auch erläutert sein. DCL ist auch nicht so schwer, das einzige was etwas unhandlich ist, ist die Anordnung der einzelnen Elemente. Wenn man aber den Aufbau von Reihen (row) und Spalten (column) erst einmal verstanden ...
|
| In das Form Rund um Autocad wechseln |
|
AutoCAD Civil 3D : Flächen dynamisch beschriften und in Tabelle summieren
cadteufel am 10.12.2017 um 16:50 Uhr (1)
Hallo stl,es wundert mich etwas das nicht gleich die Lisp-Programmierer sich anbieten?In meinen Augen eine klassische Aufgabe für einen klassischen AutoCAD-Block mit Attributen.Als Symbol den geteilten Kreis für EzG und als Attribute: BefGrad und Flaeche. Nun eine Lisp-Routine: Polylinie wählen: und Block-Position: anklicken. Das Attribut: Flaeche von der Routine dynamisch mit der Polylinie verbinden. Mit BefGrad und Layer kann man auch was automatisieren. Bei Änderungen der Polylinie verändert sich der At ...
|
| In das Form AutoCAD Civil 3D wechseln |
 |
Rund um AutoCAD : Architektur für xRef farblich bearbeiten
Stutti am 26.02.2018 um 08:16 Uhr (15)
Hallo,ich habe die Aufgabe Architekturpläne (bunt) schnell und einfach in eine graue (Farbe_252) xRef um zu arbeiten.Mein Vorgehen:- Datei unter neuem Namen abspeichern- Alle Layer über die Layereigenschaften anzeigen, entsperren und auf Farbe_252 zu setzen- Ändern aller Elemente mit "setbylayer" auf VonLayer, somit auf Farbe_252- Ausführen einer LISP um MTexte auf VonLayer zu setzen= übrig bleiben die Bemaßungen! (siehe Screenshot)Der Layer steht auf VonLayer. Die Farbe in den Eigenschaften steht auf VonL ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : binär daten
CAD-Huebner am 31.03.2004 um 12:32 Uhr (0)
Stukturierte Daten aus Pascal kann Lisp nicht erkennen. Lesen kann man in der Datei nur byteweise. (mit READ-CHAR) Die Pascal-Datei hat eine feste Größe pro Datensatz. Sofern die Struktur der Pascal-Binärdaten genau bekannt sind (ist der Pascal-Quellcode vorhanden?) muss für jeden verwendeten Datentyp eine Umwandlung in Lisp programmiert werden. (ich hab leider keine fertigen Funktionen) Die Strings sind unkompliziert, alle Zahlenwerte (Real, Double, Int ... müssen aus den ASCII-Bytedaten zurückkonvertiert ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Entwicklungs-Umgebung für Menü-Dateien
autocart am 25.01.2005 um 14:13 Uhr (0)
Hi Thomas! Vorerst vielen Dank für die Antwort. Ob mnu oder mns ist mir egal. Notepad geht zwar prima, aber es gibt noch extrem viel Potential, die Entwicklung einfacher und komfortabler, dadurch weniger fehleranfällig und schneller zu machen. Nochmal zum HTML&Lisp-Vergleich: Früher hat man HTML auch mit dem Notepad geschrieben, so wie Lisp. Es ging (prima). Der Unterschied zu jetzt ist aber groß. Ansonsten... was meinst du mit ändere direkt in der ACAD-Umgebung ? Und da es, was ich will, so wohl nicht ge ...
|
| In das Form Rund um Autocad wechseln |
|
CoCreate Modeling : Lisp oder Befehl gesucht - Skizze
Thömu am 14.09.2008 um 15:28 Uhr (0)
Da bin ich ja nicht der einzige, der diese Funktion vermisst...Zu lösen ist dies eigentlich relativ einfach, ist nur ein bisschen Vektorgeometie.Ich schrieb hier mal auf, wie es gehen würde, vielleicht kann ja jemand ein LISP daraus machen (ich hab leider keine Kenntnisse in LISP)Einlesen der Geraden:1. zwei Geraden (sagen wir mal A und B)auf der aktuellen A-Ebene anklicken (nur 2D Linie zulässig)2. Überprufung ab es wirklich Geraden sind, sonst Abbruch3. unter GEO-Eigenschaften kann man sich die beiden Ve ...
|
| In das Form CoCreate Modeling wechseln |
|
PTC Creo Elements/Direct Modeling : 3D Access - Oberfläche anpassen Icon für eigene Lisps?
Seele am 15.03.2016 um 14:18 Uhr (12)
Gelöst !!!! Wer seine Lisp-Makros in Access auch mit schönen Icon´s versehen will, der muss im Customize von Annotation die Datei user_avail_cmds.cmd einfügen. Die gleichnamige Datei gibt es auch im SolidDesigner, es ist jedoch darauf zu achten, das nur Lisp´s drin sind, die auch im Access ausgeführt werden können.Ich habe meine Datei als Beispiel mal angefügt, damit ihr Euch leichter zurecht findet.Eine nähere Beschreibung zu dieser Datei gibt es unter:.Direct Modeling 19.0personalitygermansd_customizesd ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
AutoLisp : Layerstand speichern Button
Proxy am 05.08.2004 um 09:55 Uhr (0)
Also ich habe mit ein VBA-teil programmiert. Kannst auch für Namen z.B. automatisch Datum + Uhrzeit mit Mili-Sek eingeben als Default Code: ... Dim StateObj As AcadLayerStateManager Dim eMask As AcLayerStateMask On Local Error Resume Next SaveLayerStateFrm.Show If SaveLayerStateFrm.OK = True Then Set StateObj = New AcadLayerStateManager StateObj.SetDatabase ThisDrawing.Database eMask = acLsNone With SaveLayerStateFrm If .CheckBox1.Value = True Then eMask = acLsOn If .Chec ...
|
| In das Form AutoLisp wechseln |
