|
AutoLisp : Ungleichmäßig skalierte Blöcke auflösen
C. Thiel am 24.02.2004 um 14:09 Uhr (0)
Zitat: Original erstellt von cadffm: Du kannst doch Blöcke ganz normal explodieren lassen (oder willst du mit dem Lisp jeden einzelnen als 1,1,1-skaliert unter einem anderen Namen gespeichert haben ? (kenne mich mict step nicht aus was du da bekommst/benötigst) Normal Explodieren geht wenn EXPLMODE auf 1 steht ... EXPLMODE kannte ich noch nicht. Das hilft aber leider auch nicht. Ich habe meine Frage hier gestellt, da ich meinte in Erinnerung zu haben das es doch irgendwie geht solche Blöcke au ...
|
| In das Form AutoLisp wechseln |
 |
Lisp : Einzeichnen eines Kreises auf Basispunkt von Text...
zimmernagel am 23.07.2018 um 21:16 Uhr (15)
Hallo Newsgroup!Ich habe folgendes Problem. Bekomme von INtergraph Ginius eine DWG-Datei, die allerdings die ganzen Flurstückspunkte (normalerweise Kreise) als Symbol darstellt, sprich, Text. Da ich die Zeichung aber in Autocad weiterbearbeite und weitergeben will, möchte ich nicht jedesmal die Symbol.shx (die kreiirt wird) mitgeben.Der Text, bzw. das Symbol für den Kreis ist auch nicht gerade schön und macht die DWG unnötig groß...Habe auch versucht, den Text als Block abzuspeichern, diesen dann austausch ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer umschalten bei der Bemassung
mapcar am 29.10.2004 um 13:11 Uhr (0)
Na, das ging doch flott...Also - ich kann den Fehler unter folgenden Umständen reproduzieren:SDI = 1LISPINIT = 1Wenn ich dann eine neue Zeichnung aufmache, wird trotz LISPINIT=1 der Reaktor selber übernommen, aber die Callbacks fehlen. Ruft man dann irgendeinen Befehl auf, kommt der Fehler, bei mir allerdings zuerst CMD-START-CALLBACK nicht gefunden.Ich sehe die Logik darin nicht so ganz. Bei LISPINIT=1 sollten eigentlich weder Reaktor noch die Funktionen übernommen werden. Tatsächlich verhält sich der Rea ...
|
| In das Form Lisp wechseln |
|
Tsetfurom : heulen, ärgern und trösten VI
Obi-Wahn am 07.09.2007 um 18:02 Uhr (0)
@Rabbit: Danke, dein Code hat mir schon etwas geholfen...Ich hab nun endlich die Zeit gefunden, mich meinem "Projekt" wieder zu widmen, und hab heute den Code für das A0 layout erstellt.Code:(setq OldOsmode (getvar "OSMODE"))(setvar "OSMODE" 0)(command "_rectang" (0 0) (1189 841))(command "_rectang" (20 10) (1179 831))(command "_line" (0 594) (20 594) "")(command "_line" (0 297) (20 297) "")(command "_line" (210 10) (210 0) "")(command "_line" (319.5 0) (319.5 10) "")(command "_line" (429 0) (429 10) "")(c ...
|
| In das Form Tsetfurom wechseln |
|
AutoLisp : Eigene Zeichnungseigenschaften definieren
FiT am 31.08.2004 um 23:01 Uhr (0)
sorry, berndhock, ich habe, glaube ich, das Thema etwas verfehlt. Ging es nicht um eine EINFACHE Möglichkeit Anwenderspezifische Daten IN der Zeichnung zu speichern? Da fällt mir bezüglich der ersten Antwort (von Erwin Fortelny) auf Deine Frage folgendes ein: Die Daten in den Zeichnungseigenschaften werden wohl auch in einer Dictionary gespeichert; (man belehre mich eines besseren): (dictsearch (namedobjdict) DWGPROPS ) ergibt z.B. (falls vorhanden) ansonsten nil (acad2004) ( (-1 . OBJEKTNAME: 4008432 ...
|
| In das Form AutoLisp wechseln |
|
Lisp : _explode + _qkungroup als lsp ?
cadffm am 12.04.2007 um 09:14 Uhr (0)
Da du allem Anschein nach wirkliches Interesse zeigst um auch am Ball bleibstkönnen wir diesen Thread gerne weiterführen , aber da du bisher nicht malansatzweise preisgegeben hast wie dein Wissen um Lisp oder Makro aussieht,hatte ich vermuten müssen das du garkeine Kenntnisse hast..Da du jedoch schon irgendetwas probiert hast, wie du nun schreibst, gibtes ja evtl doch noch Hoffnung Zu deinem ersten wichtigsten Problem, die Aufgabenstellung zu beschreibenund ggf. auch die Problembeschreibung. EIN BESTIMMTES ...
|
| In das Form Lisp wechseln |
|
Lisp : Attribute eines ausgewählten Block auslesen
neuling99 am 07.10.2011 um 08:39 Uhr (0)
Hallo Forum,Als Neuling in der Lips-Welt, muss ich mich heute mal an euch wenden, da ich nicht weiter komme.Ich möchte in jedem Raum einen Block mit dem Raumnamen, der Etage und der Wohnungsnummer, sowie diverse andere Daten einfügen. Das ist auch kein Problem. In meiner Zeichnung habe ich auch einen Block mit Attributen „Objektdaten“ den es nur einmal in der Zeichnung gibt und einige Grunddaten enthält.Nun habe ich hier im Forum folgenden Text gefunden(setq blockname "Objektdaten") (if (setq aws(ssget "X" ...
|
| In das Form Lisp wechseln |
|
Lisp : geringsten Abstand zwischen 3D-Polylinien ermitteln
Andreas Kraus am 09.07.2010 um 16:11 Uhr (0)
Ist zwar schon etwas her, aber ich habs nicht vergessen (hatte nur so viel anderes zu tun)Hier meine Idee wie ich das rausbekommen möchte:Wenn ich zwei Geraden im Raum habe und drehe die beiden zusammen so daß die eine Gerade (egal welche) identische Z-Koordinaten im Anfangs und Endpunkt hat (Drehwinkel lässt sich ja berechnen) und drehe dann nochmal in Achse dieser Geraden so daß die andere auch identische Z-Koordinaten im Anfangs und Endpunkt hat haben sich die Geraden relativ zueinander nicht verändert ...
|
| In das Form Lisp wechseln |
|
Lisp : Dynamischer Block ändert Namen?
udouk am 24.10.2012 um 14:22 Uhr (0)
Hallo Cad-DE ler.Ich hab da ein Problem mit Dynamischen Blöcken.Ich hab eine LISP geschrieben (mehr zusammenkopiert), die unter anderem einen Block mit bestimmten Namen sucht und dann Attributswerte aus diesem Block ausliest und weiterverarbeitet (in meinem Fall für die Dateinamenerstellung beim DXF-Export)Code:(defun c:IMADXFBATCHNEU () (init) (command "_pasteclip" "0,0,0") (setq ORDNER (strcat "C:Users" (getvar "LOGINNAME") "Favorites")) (setq Blockwahl (ssget "_X" ((0 . "INSERT")(2 . "Nummerierung_1zu10 ...
|
| In das Form Lisp wechseln |
|
Lisp : AcCoreConsole mit Script in ACAD24
cadffm am 18.10.2023 um 14:26 Uhr (1)
Hi,meine bereits fertig geschriebene lange Antwort ist im Nirvana gelandet, daher versuche ich es jetzt recht kurz:1. Das Wichtigste, auch wenn es dein Problem nicht klärt: Ich habe es jetzt getestet, die Doku ist vollständig und *.scr Dateien müssen NICHT in einem trustedpath liegen. Das hatte ich irgendwie anders in Erinnerung :-/ DuckUndWech2. "Mir ist einfach aufgefallen, dass die angezeigten Zeilen in der ACC24 stark von der ACC13 "abweichen" "Siehe den Bildanhang" Sieht doch ganz normal aus, jedo ...
|
| In das Form Lisp wechseln |
|
Lisp : Automatic Dimension AutoCAD LISP??
kadirozen am 28.07.2023 um 16:12 Uhr (1)
Ich konnte es nicht ausgiebig testen, aber dieser Code funktioniert im Moment.Ich suche nach einer Möglichkeit, beide if-Anweisungen zu kombinieren, um eine Bedingung zu erfassen und zu machen, so dass, wenn ein Fehler auftritt, das Programm beendet werden kann, bevor es weitergeht.Der nächste Schritt wäre, die Änderung des Layerstatus am Anfang hinzuzufügen, ich habe ein wenig gesucht, konnte aber leider nicht viele Informationen zu diesem Thema finden.Code:(defun c:RZ ( / dwg_name dxf_name folder_r12 fo ...
|
| In das Form Lisp wechseln |
|
AutoLisp : probleme mit offset
marc.scherer am 20.08.2004 um 14:36 Uhr (0)
Hi, und hier mal ein Ansatz in VLisp: Code: ;; Hier nur Beispiel, keinerlei Errorhandling ;; Versetzt ein zu pickendes Objekt um ;; die in der Liste angegebenen Werte. ;; RetVal = List von Vla-Objekten die erzeugt wurden (setq objlst (MOFFSET (car (entsel)) (1 3 7.5 10 -1 -3 -7.5 -10))) ... und auf diesen Funktionen basiert der Code oben: Code: ;; Hier nur Beispiel, keinerlei Errorhandling ;; Multioffset-Function (defun MOFFSET (ENAME OFFSETLIST /) (mapcar (function (lambda (X) (MS ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Anonyme Blöcke per Lisp umbenennen
Peter2 am 21.04.2005 um 10:18 Uhr (0)
Zitat:Original erstellt von CADmium:Beim Umbenennen eines Blocks, der nach der gewählten Blockreferenz gesucht wird , macht es demnach Sinn nur EINE Blockreferenz auswählen zu lassen, bzw. die erste der aktuellen Auswahl zu nutzen.Die Auswahl nur eines Blockes macht Sinn, aber die Meldung "Objekte wählen:" macht dem harmlosen Anwender glaubhaft, dass hier mehr auf einmal bearbeitet wird. Steht hier ein "ssget" dahinter? Weil "entsel" fragt nur nach "Objekt wählen:", und da weiss man, dass es nur um eines ...
|
| In das Form Lisp wechseln |
