|
AutoLisp : Layerstand speichern Button
michelangelo am 05.08.2004 um 14:32 Uhr (0)
Habe für das ein lisp gefunden braucht nur ein button, ist aber nur für die aktuelle zeichnung gültig nach schliessen der zeichnung ist der layerstand weg. ;;-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= ;; LAYERSTATUS ;; ;; Programm sichert den aktuellen Layerstand oder schreibt den gesicherten Layerstand wieder zurück. Die Variable, ;; in die gesichert wird, kann vom Benutzer nicht vorgegeben werden - auch hat diese Routine nichts mit den ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Kranke Polylinien?
Arcuso am 26.07.2011 um 15:17 Uhr (0)
Hallo Alfred!Habe dEhre, das wären tausende von archivierten Alt-Zeichnungen, die !vielleicht! irgendwann wieder gebraucht werden! Nachdem ich ja bei dem Umstieg auch unsere Block- und Layer-Struktur (wurde seinerzeit unter Rel.12-14 aufgebaut) auf intelligentere Beine stellen will, komme ich um einen umfangreichen Lisp-Konverter ohnehin nicht herum. Wer also eine alte Archiv-Zeichnung umbauen oder irgendwo einbauen will, der muss eben zuerst den Konverter laufen lassen, bevor er in der neuen Struktur weit ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Blöcke in den Vordergrund bringen
Walter Zettlitzer am 15.10.2002 um 09:31 Uhr (0)
In unserer Zeichnungsvorlage befinden sich eingefügte Monochrombitmaps (ACAD2002), die hinter dem Block "Zeichnungsrahmen" (Text+Linien) liegen. Sobald ich in einer neuen Zeichnung ein Layout aus der Vorlage einfüge, sind die Bitmaps plötzlich im Vordergrund und verdecken den Block. Als Abhilfe stelle ich mir ein Lisp-File vor, welches beim Drucken immer zuvor ausgeführt wird und die Blöcke, deren Namen bekannt sind, in den Vordergrund bringt. Kann mir jemand helfen, wie ich vorgehen muss? Vielen Dank Walt ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Texthöhe ändern in Abhängigkeit von der Ausgangshöhe
Musicus am 22.02.2012 um 11:52 Uhr (0)
Hallo Forum,wahrscheinlich ist es mal wieder ganz einfach, aber ich kriegs nicht hin.Problem: Ich habe in einer Zeichnung Texte mit verschiedenen Texthöhen, die in Abhändigkeit vom Ausgangswert geändert werden sollen (250 auf 125, 750 auf 550, 500 auf 350, 300 auf 150).Das hab ich schon (erstmal nur für eine Texthöhe):Code:(defun c:THOEHE ( / AWS OBJ) (setq AWS (ssget "X" ((0 . "*TEXT")(40 . 250))) ) (setq OBJ(entget AWS) ) (if (assoc 40 OBJ) (setq OBJ (subst (cons 40 125)(assoc 40 OBJ)OBJ)) );end if)Auto ...
|
| In das Form Lisp wechseln |
|
Lisp : Bemaßungsstile speichern und wiederherstellen
Andreas Kraus am 03.06.2013 um 08:24 Uhr (0)
Hallo Danillo,ich hab das auch mal über diesen Weg versucht und hab auch Probleme bekommen.Jetzt mach ich das indem ich über ODBX auf die DWG mit den Definitionen zugreife und das gewünschte mit vla-copyobjects in meine Zeichnung hole.Klappt wunderbar.Alles nötige hab ich hier im Forum über die Suche (und Fragen) gefunden.Das Beispiel war glaub ich mit Layern, aber das kann man umbauen.Hab ich inzwischen für Blöcke, Textstile, Bemaßungsstile,...Wenn du das nicht findest such ichs nochmal raus.------------- ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Maßtext auslesen, nochmals
spider_dd am 10.02.2005 um 11:10 Uhr (0)
Haloo Werner, auch hier hift wieder die Hilfe. Die sagt zu Systemvariablen DIMADEC Typ: Ganzzahl Gespeichert in: Zeichnung Ausgangswert: 0 Steuert die Anzahl der angezeigten Genauigkeitsstellen bei Winkelbemaßungen. -1 Die Winkelbemaßung wird mit der durch die DIMDEC-Einstellung festgelegten Dezimalstellenzahl angezeigt. 0-8 Die Winkelbemaßung wird mit der durch die DIMADEC-Einstellung festgelegten Dezimalstellenzahl angezeigt. Wenn DIMADEC im Stil nicht auftaucht, hat s den Standartwert, d.h. 0 un ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Bemassung
CADmium am 11.05.2005 um 10:25 Uhr (0)
Jo, schmeiß das Buch weg Aber zu deinem Prob: Sind die Bezugslinien die Hilfslinien? .. dann guck mal DIMEXO ( scheint mir bei dir etwas hoch ?? ) Typ: Reelle Zahl Gespeichert in: Zeichnung Ausgangswert: 0.0625 Bestimmt, in welchem Abstand von den Ursprungspunkten Hilfslinien gezeichnet werden. Wenn Sie direkt auf die Ecken eines Objekts zeigen, das eine Bemaßung erhalten soll, berühren die Hilfslinien das Objekt nicht. ------------------ - Thomas - Bei 99% aller Probleme ist die umfas ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zeichnungseinheit in adt
CADesigner am 13.05.2004 um 14:25 Uhr (0)
Hallo, erst mal Danke dass du darüber nachdenkst! Aber ich möchte von der CAD-Zeichnung die Zeicheneinheit wissen. Designcenter nutzt die Variablen (setq i0 (getvar INSUNITS )) (setq i1 (getvar INSUNITSDEFSOURCE )) (setq i2 (getvar INSUNITSDEFTARGET )) INSUNITS Legt einen Zeicheneinheitswert für Blöcke oder Bilder fest, die aus DesignCenter eingefügt werden INSUNITSDEFSOURCE Legt den Einheitenwert für die Quellinhalte fest INSUNITSDEFTARGET Legt den Einheitenwert für die Zielzeichnung fest ...
|
| In das Form AutoLisp wechseln |
|
Lisp : whileliste mit alert anzeigen
CADblue am 11.11.2011 um 12:55 Uhr (0)
Hi leute!!!Steh mal wieder aufm Schlauch. Pls help.Code:(defun layer()(tblnext "layer" t)(while (/= nil (print(cdr(assoc 2 (tblnext "layer")))))(print (cdr (assoc 2 (tblnext "layer")))))(assoc 2(tblnext "layer" t)))Dieser Code listet mir alle Layer in der zeichnung, aber nur in der Befehlszeile ausgegeben, is klar wg print. Ich will mir aber jetzt die gesamte liste als alert anzeigen lassen. Wie geht das?mfgblue
|
| In das Form Lisp wechseln |
|
AutoLisp : dwf-datei automatisch plotten
naboo40 am 21.06.2005 um 09:24 Uhr (0)
BRAUCHE HILFE!!!!!! ich habe mir einen icon erstellt, der bei betätigung automatisch eine dwf-datei erstellt. hier der befehl: ^C^C(command _plot ) J Modell Drucker;;m;q;n;G;A;Z;j;name.ctb;j;w;;j;j;j; meine frage dazu ich möchte gern das dieser befehl beim beenden der zeichnung automatisch aktiviert wird. habe gehört das es mit einen lisp-befehl gehen würde aber davon hebe ich überhaupt keine ahnung. kann mir da jemand weiterhelfen wäre ganz toll naboo40
|
| In das Form AutoLisp wechseln |
|
Lisp : blöcke auf 0 setzen
H-kan84 am 20.03.2008 um 12:48 Uhr (0)
Hallo zusammen,ich wollte euch mal fragen ob es schon eine lisp gibt, die in einer Zeichnung alle blöcke (ob verschachtelt oder nicht) erstmal auf dern layer 0 setzt?Hintergrund.wir haben viele viele Pläne in denen wir 3/4 des zeichnungsinhalts nicht immer brauchen und unsere eigenen Layerstruktur haben.die Blöckle wiederum liegen auf Layer die wir in unseren Zecihnungen nicht haben wollen.Geht sowaS?gruß------------------Aus technischen Gründen befindet sich die Signatur auf der Rückseite dieser Nachricht!
|
| In das Form Lisp wechseln |
|
Lisp : Position DCL-Fenster beibehalten
joern bosse am 12.12.2008 um 09:48 Uhr (0)
Hallo September,hier noch ein paar ergänzende Fragmente:Laden eines DCL-Fensters:Code:(if DCL-Position (if (not (new_dialog "DCL-Fenster" dat "" DCL-Position)) (exit)) (if (not (new_dialog "DCL-Fenster" dat)) (exit)))Beenden eines DCL-Fensters:Code:(action_tile "accept" "(setq DCL-Position (done_dialog 1))")Die Position des Fensters wird in der Variablen "DCL-Position" gespeichert. Diese sollte dann aber in der Zeichnung global verwendet werden.------------------viele GrüßeJörnhttp://www.bosse-engineerin ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Textstiltabelle ohne .shx
Peter2 am 19.08.2004 um 20:41 Uhr (0)
Einen hab ich noch, dann ist Schluss damit .. In einer Acad-12 Zeichnung folgender absoluter Pfadeintrag: Code: Befehl: (tblnext style ) ((0 . STYLE ) (2 . SIMPLEX ) (70 . 0) (40 . 0.0) (41 . 0.8) (50 . 0.0) (71 . 0) (42 . 2.5) (3 . D:ACADFONTSSIMPLEX.SHX ) (4 . )) Auch hier hat weder das Dialogfenster Textstil noch die Prüfung irgendein Problem und zeigt ganz einfach die Simplex an, aber bevor ich um diese Sondereinträge irgendwelche Abfragen herumprogrammiert, hätte ich gerne verstanden, ...
|
| In das Form AutoLisp wechseln |
