|
Lisp : Rotieren und Skalieren einer Polylinie mithilfe von 3 Punkten
MalteJ am 06.03.2007 um 12:43 Uhr (0)
Hi Lispler,ich hab da eine ziemlich lästige Aufgabe in AutoCAD:Es muss eine 2D-Polylinie um ihren Anfangspunkt gedreht werden.Undzwar so, dass der Endpunkt der Polylinie auf einer Linie mit dem Anfangspunkt und einem beliebigen anderen Punkt (Referenzpunkt) liegt.Anschließend soll die Polylinie so skaliert werden, dass der Endpunkt auf dem Referenzpunkt liegt. Der Anfangspunkt dient hier als Skalierpunkt und behält dementsprechend seine Koordinaten bei.Zur Bedienung:Zu erst soll der Befehl aufgerufen werde ...
|
| In das Form Lisp wechseln |
|
Lisp : xref mittels script einfügen
Bernd P am 03.11.2011 um 11:01 Uhr (0)
hiCode:(if(or(setq AUSWAHL (ssget)) (setq AUSWAHL (ssget)) ) (progn (setq INDEX -1) (repeat (sslength AUSWAHL) (setq OBJEKT(ssname AUSWAHL(setq INDEX(1+ INDEX)))) (setq OBJDATA (entget OBJEKT)) (setq OBJDATA (subst (cons 41 1 ) (assoc 41 OBJDATA) OBJDATA)) (setq OBJDATA (subst (cons 42 1 ) (assoc 42 OBJDATA) OBJDATA)) (setq OBJDATA (subst (cons 43 1 ) (assoc 43 OBJDATA) OBJDATA)) (setq OBJDATA (subst (cons 50 0 ) (assoc 50 OBJDATA) OBJDATA)) (setq OBJDATA ( ...
|
| In das Form Lisp wechseln |
|
Lisp : Umgebungseigenschaften übertragen
Danillo am 07.04.2013 um 11:21 Uhr (0)
Hallo Leute,damit das gewünschte Layout erzielt wird bzw. die Lisp-Programme korrekt arbeiten, habe ich bisher immer eine Prototypenzeichnung (Template) gemacht, wo ich z.B. den Bemaßungsstil, den Textstil, Maßstäbe usw. voreingestellt habe. Diese Methode hat den Nachteil, dass man darauf angewiesen ist, dass der Benutzer auch die entsprechende Template verwendet bzw. man hat Probleme, wenn man auf einer fremden Zeichnung weiterarbeiten will.Meine Frage ist, wie kann ich einen Bemaßungsstil in LISP abspeic ...
|
| In das Form Lisp wechseln |
|
Lisp : Wblock bzw _copyclip in 2000/2006
AB-CAD am 24.05.2007 um 10:31 Uhr (0)
Hallo,war nun schon länger nicht mehr auf dieser Seite, da wir mittlerweile auch mit nicht AutoCAD-Programmen arbeiten und sehr viel Arbeit haben.Dennoch beschäftigt mich ein Phänomen schon längere Zeit. Es taucht wohl bei Plänen auf, die mal in ACAD 2006/2007 geöffnet wurden und dann wieder in 2000/2002 geöffnet werden.(Leider arbeiten wir mit Misch-Versionssystem)In diesen Plänen ist es nicht mehr möglich, irgendetwas via "_wblock" oder "_copyclip/_copybase" als Teilzeichnung abzuspeichern. Die Objekte u ...
|
| In das Form Lisp wechseln |
|
AutoLisp : alle Dateien öffnen
Helmut F am 26.08.2003 um 13:01 Uhr (0)
Hallo HP, für einen ähnlichen Fall habe ich schon mal was gemacht. Versuch mal folgendes : 1. Mit Lisp ein SCRIPT-File anlegen lassen 2. Danach dieses Script ausführen z.B.: (defun C pen_Zoom_Close ( / verzeichnis all_files scr_file i) (setq verzeichnis (vl-filename-directory (getfiled Verzeichnis und BELIEBIGE Zeichnung wählen dwg 2)) all_files (vl-directory-files verzeichnis *.dwg 1) scr_file (open (strcat (getvar TEMPPREFIX ) My_script.scr ) w ) i 0) (Repeat (length all_files) (w ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Probleme gesucht...
tappenbeck am 15.04.2003 um 09:38 Uhr (0)
hallo axel, du suchst problem hier sind zwei: 1.) blöcke mit objektdaten/-sach und referenzen tauschen eine möglichkeit auch blöcke so auszutauschen, das bestehende objektdaten/-sach bzw. referenzen auch auf den neuen block übertragen werden. 2.) blöcke verlieren attribute es gibt manchmal das phänomäne dass blöcke die zugehörigen attribute (ich glaube das war der fall, wenn der alte block keine attribute hat und der neue welche enthält - bin mir aber nicht mehr ganz sicher) verlieren. füge ich nun diesen ...
|
| In das Form AutoLisp wechseln |
|
Lisp : 3drotate in Lisp
tappenbeck am 19.10.2012 um 15:02 Uhr (0)
Also ich versuche es nochmal.In der Musterzeichnung ist nur die grüne Linie enthalten - damit die Punkte und das Grundelement für das Nachvollziehen identisch sind.Ich habe Anfangs- und Endpunktpunkt (p1 bzw. p2) in den Variablen abgelegt damit ich einfacher das in der Befehlszeile nachstellen kann und auch wiederholen kann.Die Zeichnung befindet sich bei BKS-Welt in der Draufsicht.Wenn ich die grüne Linie mit dem rotate3d-Befehl nur mit der Maus bediente, dann wird die grüne Linie richtig gedreht - das Er ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Ungleichmäßig skalierte Blöcke auflösen
C. Thiel am 24.02.2004 um 13:14 Uhr (0)
Hallo, hoffentlich bin ich jetzt im richtigen Forum gelandet. Mein Problem ist folgendes: Ich habe heute mehrere Zeichnungen erhalten, die ich gerne in das STEP- Format exportieren würde. In dieser Zeichnung befinden sich nun aber ungleichmäßig skalierte Blöcke. Wie bekannt sein dürfte, werden solche Blöcke beim exportieren in Ihren unskalierten Zustand zurückgesetzt (zumindest bei mir ). Ich meine mich nun zu erinnern das ich vor einiger Zeit einmal ein LISP gesehen habe, mit dem es möglich ist solche B ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : pnetz aus 2d
moes am 16.09.2005 um 23:27 Uhr (0)
Als Grundlage möchte ich gescannte Karten (könnte aber auch ein digitaler Kartenauschnitt in 2d sein) verwenden. Darauf kann ich ja über einzelne Messpunkte oder aber Höhenlinien Angaben über die Topographie haben.Lege ich z.B. eine 3d Polylinie drüber, um einen Schnitt zu zeichnen, so muss ich später die Linie ja Punkt für Punkt durchgehen um den z-Wert in den Eigenschaften der Linie einzutragen. Eine Abfrage (bzw. prompt) während dem Zeichnen der Linie wäre da einfacher. Also: Punkt selektieren auf Zeich ...
|
| In das Form AutoLisp wechseln |
|
Lisp : STARTUP delfil
scoope am 25.10.2005 um 13:07 Uhr (0)
HalloHab schon sehr viel über startup und der acaddoc.lsp mit Hilfe der Suchfunktion gelesen.Trotzdem schaffe ich es nicht ein lisp ( delfil bzw. remlayerfilters - löscht alle benannten Layerfilter ) automatisch nach öffen jeder Datei ausführen zu lassen.Bin leider nicht so vertraut mit Lisp.Wäre jemand von euch so nett mir diesen Eintrag zu erstellen,sodaß ich diesen dann nur mehr in die acaddoc.lsp einfügen brauche.Interessant wäre noch, wo ich diesen Eintrag in der acaddoc.lsp einfügen soll.Info:Wir arb ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer umschalten bei der Bemassung
mapcar am 29.10.2004 um 18:53 Uhr (0)
Tja, jetzt hab ichs unter 2004 genauso wie du, und es nützt auch nix, das Programm in die acad.lsp einzubinden.Ich schließe daraus kurz und bündig: Wenn man mit den Einstellungen SDI=1 und LISPINIT=1 arbeitet, ist das Verwenden eines Editor-Reaktors mit dem CommandEnded-Event ohne Auftreten dieses Fehlers nicht möglich. Die Gründe dafür habe ich ja schon genannt: Warum wird der Reaktor in die neue Zeichnung übernommen, als sei er persistent? Ich addiere das einfach zur Liste aller der Dinge, die in VLisp n ...
|
| In das Form Lisp wechseln |
|
Lisp : alles klar mit AutoCAD 2011?
joern bosse am 14.07.2010 um 15:54 Uhr (0)
Hallo Tom,ich habe auch gerade noch was entdeckt: Wenn ich einen AWS für Bearbeitungszwecke durchlaufen lasse, dann kann ich mir den Status immer in der Befehlszeile mit PRINC ausgeben lassen.In 2008 funktioniert es, in 2011 nicht, da wird erst nach Programmende die letzte Zeile angezeigt. Kann das einer von Euch nachvollziehen???Mit irgendeiner Zeichnung testen, Hauptsache es sind ein paar Objekte enthalten, es wird dann der Layer "test" neu zugewiesen, also NICHT SPEICHERN!!!Code:(defun c:TestAws ( / AWS ...
|
| In das Form Lisp wechseln |
|
Lisp : Popup, Hyperlink, Excel & Co.
Brischke am 27.06.2007 um 15:15 Uhr (0)
Hallo kschlepp,da hast du dir mehrere Themen auf den Tisch gezogen, die jedes für sich schon ein abendfüllendes Programm sein könnten.in Lisp ist es nicht ohne Weiteres möglich ala MsgBox einen YesNo-Dialog auf den Bildschirm zu zaubern. Dafür musst du dir ein Dialogfeld programmieren, und natürlich auch die entsprechenden Funktionen, die das Dialogfenster steuern und die entsprechende Rückgabe geben.Du willst als nächstes einen Link in einem Dialogfenster haben ... das geht nicht. Du kannst in deinem Dial ...
|
| In das Form Lisp wechseln |
