|
Rund um Autocad : Block-Attribute mit lisp ausfiltern.
CADwiesel am 11.10.2002 um 13:03 Uhr (0)
Hai Du kannst 1. Die Filterliste noch spezifizieren und 2. Musst Du dien Attribut benennen. (z.Zt. steht da Basis) und 3. musst Du einen Eintrag machen was Passieren soll, wenn das Attribut mit dem gesuchten übereinstimmt. (z.Zt steht da (setq M:base (assoc 10 M:ELIST)) ) (prompt "
---- Starten mit BLK-ATT ") (defun C:BLK-att (/ M:MD_ERR M:FEHLER M:SS1 M:SS1LEN i M:ENAME M:ELIST M:ETYPE M:BTAB M:BASE M:BLK ) (setq M:M ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : einfügepunkt ändern
valerich am 13.05.2004 um 17:50 Uhr (0)
Hallo michelangelo, hier ist ein LISP-Programm. Hoffe das hilft dir. ;------------------------------------------------------------- (defun c bjIns ( / cmdecho laenge hoehe text insPoint minPoint minPoint osn minPoint1 maxPoint1) (setq cmdecho (getvar CMDECHO )) (setvar CMDECHO 0) (while (not laenge) (setq laenge (getreal
Laenge [m]: )) );end while (while (not hoehe) (setq hoehe (getreal
Hoehe [m]: )) );end while (setq text (getstring T
Text: )) (setq insPoint (g ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Layerstruktur bearbeiten
Musicus am 04.07.2008 um 11:43 Uhr (0)
Zitat:Original erstellt von Dorfy:@Musicus ...schade Zitat:Original erstellt von Musicus:Ich habs geschafft :Dund es funktioniert :) :) :)Jetzt bin ich zufrieden mit der Welt :DUnd jetzt Feierabend!Deine Mühe in Ehren, aber ich hab nach wochenlanger Bastelei mit viel nachlesen, ausprobieren und hier nachfragen einen Code auf die Reihe bekommen, der das tut, was ich möchte.Warum soll ich jetzt wieder von vorne anfangen? Noch dazu mit "hingeworfenem" Code, der weder ne Beschreibung, was er tun soll, n ...
|
| In das Form Lisp wechseln |
|
Lisp : entmod / Objekt DIMENSION
archtools am 10.05.2011 um 18:37 Uhr (0)
Zitat:Original erstellt von Bernd10:Hallo,ich habe ein Problem, wenn ich das Objekt DIMENSION mit der Funktion entmod ändern möchte. Ich möchte dabei die Linien, die zu den Punkten der Gruppencodes 13 und 14 führen verkürzen. Mit der Funktion entmod werden diese beiden Punkte zwar wie gewünscht geändert, aber die Linien bleiben trotzdem so lang wie vor dem Aufruf von entmod. Zum besseren Verständnis habe ich noch eine Beispiel-Zeichnung und Test-Lisp beigelegt.Was muss ich noch tun, damit die Linien zu de ...
|
| In das Form Lisp wechseln |
|
AutoCAD Mechanical : Führungslinie - Texthöhe
dr-nikolai am 10.11.2003 um 17:19 Uhr (0)
das hier gilt für m6pp. ich weiß nicht, ob es noch für die neue version gültig ist. vielleicht hilft es dir ja weiter. ist alles schon ein wenig her, daher weiß ich leider auch nicht mehr, ob es gültigkeit für den führungslinienkommentar hat. probier es einfach mal aus. Bei den Symbolen gibt es die Möglichkeit mittels eines LISP Befehls die Größen der Symbole zu skalieren (die neuen Symbolobjekte können auf die Größen der alten Genius Symbole zurückskaliert werden). Schweißsymbole: (amgsetdwgsetting gef@s ...
|
| In das Form AutoCAD Mechanical wechseln |
|
Rund um Autocad : Im Layoutbereich Attributbearbeitung fehlerhaft und andere seltsame Probleme ...
Berta am 25.10.2006 um 12:16 Uhr (0)
Zitat:Original erstellt von marc.scherer: [QUOTE]Original erstellt von Berta:[b] AAAh! Ja, das könnt es sein! Ist wirklich viel schneller (OH GOTT, ich habe ca. 100000 Layouts mit dem Haken bei Plotstile anzeigen ....)Null Problemo,einfach folgenden Inhalt in ne Ascii-Datei schmeißen, die z.B. "NOSHOWPLOTTYLES.LSP" nennen und irgendwo speichern wo Du sie wiederfindest. Und wenn Du ne DWG hast wo Du überall den Haken weghaben willst einfach die Datei "NOSHOWPLOTTYLES.LSP" vom Explorer in den DWG Zeichenber ...
|
| In das Form Rund um Autocad wechseln |
|
Programmierung : Parameterteil erstellen für SD-Power Normteilkatalog
der_Wolfgang am 12.12.2007 um 19:49 Uhr (0)
Zitat:Original erstellt von Peach303: Sollte doch alles passen? sieht nach Theorie und Praxis aus 1) Was sagt denn ein trace? == (trace oli::sd-define-thread) == (trace my-package::deine-funktion-auch)==== Ausgabe in der Konsole, diese Ausgabe mal hier zur Verfügung stellen (txt file)tracen ist eine der Standardmethoden zum LISP debuggen.2) Wird denn die fläche ROT? JA? nein?3) Bist Du denn sicher das du die richtige Face erwischst?4) Was kommt raus wenn du diese vermeintlich definierte Fläche mit thread_ ...
|
| In das Form Programmierung wechseln |
|
Lisp : Fonts in Textstilen automatisch ersetzen lassen
Der Turl am 04.05.2011 um 17:15 Uhr (0)
Ich möchte diesen alten Thread wiederbeleben :-)also ich hab da ein ähnlich gelagertes problem welches sich bei der übernahme von architekturzeichnungen in extrem vielen TEXTSTILE nach dem schema STIL 1 = ARIAL STIL 2 = ARIAL ..STIL 234 = ARIAL STIL 235 = VERDANASTIL 236 = VERDANASTIL 237 = VERDANA..STIL 333 = VERDANAusw äußert. somit sind unzählige schriftstile mit jedoch nur einigen SCHRIFTARTEN vorhanden.mein ziel ist es diese Stile zu belassen aber global in zB. SIMPLEX abzuändern wobei jedoch auch bes ...
|
| In das Form Lisp wechseln |
|
Lisp : Dynamischer Block ändert Namen?
CADmium am 24.10.2012 um 14:30 Uhr (0)
...bei Referenzen von Dynamischen Blöcken nicht nach Blocknamen suchen, sondern nach deren Effektivnamen .. dazu die vla-Funktionen nutzen, da es über Normalo-Lisp nicht direkt implementiert und der Zugriff etwas tricki ist ....Mal etwas Bsp-Code für C&P (defun BLOCKSELECT ( NAMEFILTER / BLOCK LISTE SSET SSET2 ITEM VLAITEM INDEX) (vl-load-com) (or(=(type NAMEFILTER)STR)(setq NAMEFILTER "*")) (vlax-for BLOCK (vla-get-blocks(vla-get-activedocument(vlax-get-acad-object))) (if(and(=(vla-get-isxref BLO ...
|
| In das Form Lisp wechseln |
|
Lisp : Finde Fehler nicht ...
romi1 am 29.12.2008 um 08:58 Uhr (0)
Hallo!Habe ein Lisp "lihe" geschrieben, welches die Z-Koordinate von Linien-Anfangs- und Endpunkt auf den Wert von bestimmten Blockattributen hebt (im eingestellten Fall müssen die Blockattribute den Namen "HOEHE" oder "PHOH" haben). Vorrausgesetzt ist immer, die X- und Y-Koordinaten der Linienendpunkte decken sich mit dem Blockeinsetzpunkt.Nun wollte dich das Prog. erweitern, habe aber entdeckt, das irgendwas faul daran ist. Ich finde es aber beim besten Willen nicht heraus ...Folgendes Problem: Habe nun ...
|
| In das Form Lisp wechseln |
|
Lisp : Auswahlsätze
BJH am 20.07.2008 um 16:33 Uhr (0)
Hallohabe folgende Lisp geschrieben. Hier werden alle Elemente innerhalb einer Polylinie und die Polylinie selberausgewählt. Sollte es so eine Polylinie nicht geben kann Alternativ gewählt werden. (while (null obj) (setq obj (entsel "
Waehle Umgrenzende Polylinie: "))) (setq auswahl obj) (if (wcmatch (strcase (cdr (assoc 0 (entget (car obj)))))"*POLYLINE") (progn (setq plist (GET-PL-POINTS (car obj))) ;GET-PL-POINTS ermittelt Polylinienpunkte (command "_zoom" "G") (setvar "OSMODE" 0) (setq obj (s ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : geschlossen Polygone aus Linien automatisch erzeugen ?
Brischke am 16.08.2004 um 10:21 Uhr (0)
Zitat: Original erstellt von Leo Laimer: ...Also, das Automatisieren lohnt IMHO nur, wenn dies eine häufig wiederkehrende Arbeit, für mehrere User, ist. ... Hallo Leo, da möchte ich mal wiedersprechen. Das trifft nicht in jedem Fall zu, denn es gibt auch genügend Fälle, in denen sich die einmalige Anwendung eines Tool s dennoch rechnet. Bsp: manuelle Tätigkeit von irgendwas 1 Tag - monoton, daher auch sehr Fehler anfällig. Kosten 8Stunden x 35€ = 280,-€ Tool beauftragt , Fertigstellung am nä ...
|
| In das Form Rund um Autocad wechseln |
|
OneSpace Modeling : Verschiedene Stellungen einer Baugruppe
Walter Geppert am 04.05.2004 um 16:16 Uhr (0)
Zitat: Original erstellt von Heiko Engel: Hmmmm, wenn ich Walter und Woho richtig verstehe dann sind das nur Momentlösungen um z.B. eine bestimmte Einbausituation abzuchecken. Wenn ich die BG wieder zurückspeicher dann muß ich doch die Kopie bzw. das selektive Exemplar rauslöschen, oder? Und wenn nicht, dann hab ich doch bestimmt keine Assoziativität zum UrTeil (d.h. wenn sich das Urteil ändert, ändert sich die Kopie nicht automatisch mit, oder?). Und wie verhalten sich diese Vorschläge bei Kolissions ...
|
| In das Form OneSpace Modeling wechseln |
