|
AutoLisp : viel Blöcke ersetzten durch einen
Brischke am 01.02.2005 um 20:02 Uhr (0)
Hallo, derartige Zeichnungen sind nichts Ungewöhnliches. Verschiedene Applikationen haben da so ihre Eigenarten. Wenn du derartige Zeichnungen öfter weiter bearbeiten musst, dann ließe sich da auch mit LISP etwas zaubern. Ich denke aber, dass du immer noch manuell Nacharbeiten musst. Ich habe mal diese Lisp von CADmium hergenommen, und dahingehend geändert, dass den Blöcken der Basispunkt entsprechend des Basispunkt des darin als erstes gefundenen Objekts geändert wird. Hol dir die Lisp von CADmium, un ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Daten von verschachtelten XData auslesen
mAciD am 18.12.2008 um 14:55 Uhr (0)
Hallo Leute,ich möchte gerne in Blöcke Punkte einbauen, und diese mit div. XData versehen damit ich sie später nach diesen Attributen aus der Zeichnung lesen kann und somit ihre Koordinaten verwenden kann.Ich bin schon so weit, die Punkte zu erstellen. Ich habe ihnen auch einen eindeutigen Text zugewiesen. Gruppencode 1000.Diese Punkte kann ich auch finden, aber nur wenn sie nicht in einem Block stecken.Ich kann via entget vom Block die Daten ansehen, aber wie komme ich an die Block-Unterelemente ran.Also ...
|
| In das Form Lisp wechseln |
|
Lisp : Reaktor wieder laden
Dober Heinz am 31.03.2008 um 10:11 Uhr (0)
Hallo FuchsiHier das lispCode:; Anfang der Datei; Funktion zum Setzen des Reaktors(defun add-cmd-reactors( / ) (vl-load-com) (vlr-command-reactor nil ( (:vlr-commandWillStart . cmd-start-callback)) ) (vlr-command-reactor nil ( (:vlr-commandEnded . cmd-end-callback)) )); Funktion zum Setzen der Reaktoren(defun add-cmd-reactors( / ) (vl-load-com) (if(not *cmd-reactor-added*) (progn (vlr-command-reactor nil ( (:vlr-commandWillStart . cmd-start-callback)) ) (vlr-command-reactor nil ( (:vlr-comma ...
|
| In das Form Lisp wechseln |
|
AutoLisp : ActiveX: Layer-Erzeugung erzeugt Access Violation
Dabrunz am 28.06.2004 um 15:43 Uhr (0)
______________________ etwas abseitig ______________________ Tja, wenn ich mal von den Sonder-Formen c:bla-bla absehe, ist lambda eigendlich genau das, was ich brauche, um Funktionen zu schreiben, denn lambda hat schließlich eine Funktion als Rückgabewert. Eher akademisch ist dann eher die Frage, ob die Verwendung von Code: (defun la-li-lu (x y)(.. ) oder Code: (setq la-li-lu (lambda (x y)(.. )) vorzuziehen ist. Für Funktionen, die keinen Namen brauchen, ist mir aber das setq zu schade. _ ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
SebZ am 24.02.2005 um 12:28 Uhr (0)
Hallo miteinand, habe mir mittlerweile die verschiedenen Bausteine hier im Thread runtergeladen und erste Erfahrungen gesammelt. Im Lisp BLOCK_NEW_BASISPUNKT_AUTO (BNBA) hab ich folgende Verallgemeinerung eingebaut (***** = geänderte Zeile): (defun C:BLOCK_NEW_BASISPUNKT_AUTO ( / AWS OBJEKT OBJEKTDATEN NAME ORIGIN ROTATION SKALIERUNG MOD1 MOD2 #el#) (startErrorHandler BLOCK_NEW_BASISPUNKT T (( cmdecho 0)( expert 0) ( HIGHLIGHT 1)( OSMODE 639)( ATTREQ 0))) ***** (setq Sch ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Lisp - Routinen für Ausschnitt-Anzeige transparent möglich ??
T_Kaulen am 18.06.2004 um 22:33 Uhr (0)
Hallo,bin kein Lisp-Spezialist und habe daher zu den folgenden Lisproutinen eine Frage.Die Routinen benutze ich um die Arbeit mit mehreren Ansichtsfenstern im Modellmodus zu erleichtern."f" läßt den Anwender aus dem aktuellen Ansichtsfenster in ein anderes "Übersichtsfenster" wechseln und dort einen Ausschnitt wählen der dann wiederum im ursprünglich aktiven angezeigt wird."fg" macht im Prinzip das selbe, nur dass in dem "Übersichtsfenster" zunächst "Zoom Grenzen" ausgelöst wird, dann der gewünschte Aussch ...
|
| In das Form Lisp wechseln |
|
Lisp : text zu attribut
CADmium am 14.04.2011 um 10:12 Uhr (0)
Zitat:Original erstellt von hooki:hallo,ich bin auf der suche nach einem lisp, das folgendes zustande bringt. zur ausgangssituation: ich habe einen block und einen text und will nun durch anklicken des blockes und anschließendem klick auf den text dem block diesen text als attribut "x" zuweisen. dabei soll der textinhalt als attributwert übernommen werden, aber es soll sich weder die position, drehung, stil, höhe,.... ändern. soll heißen alles sieht aus wie davor, jedoch der text ist nun ein attribut des ...
|
| In das Form Lisp wechseln |
|
Lisp : Bogen in Umgrenzung Schraffur
joern bosse am 29.06.2012 um 09:16 Uhr (0)
Hallo,ich habe eine Frage zu einer nicht assoziativen Schraffur, deren Umgrenzungspfaddaten ich auswerten möchte:In den Umgrenzungsdaten sind 2 Bögen enthalten, deren Gruppencode 73 auf 0 steht, alle anderen Bögen stehen auf 1 im GC 73. Ich weiß, daß damit die Ausrichtung gesteuert wird, im oder gegen den Uhrzeigersinn.Was ich aber nicht verstehe sind die Winkelangaben im GC 50/51, wenn der GC 73 auf 1 steht, dann entsprechen die Winkel dem WKS, wenn der GC 73 auf 0 steht, dann weiß ich nicht, worauf sich ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Befehl Plot / Treiber SHPGL
Bernd10 am 12.10.2004 um 10:23 Uhr (0)
Hallo, Zitat: Original erstellt von Peter2: Am besten, du startest genauso wie dein Lisp den Plotbefehl in der Befehlszeile mit _.plot und notierst dir genau, was das Programm fragt - in 2002 und 2005, und dann siehst du die (allfälligen) Unterschiede. Das habe ich nun gemacht und es ist wieder der Dialog Suchen nach Plotdatei nach der Option Plotten fortsetzen erschienen. Im Dialog kann ich zwar ein Verzeichnis wählen, aber nach dem Beenden mit Speichern ist die Plotdatei im Verzeichnis ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Reaktoren
Dober Heinz am 16.01.2008 um 11:17 Uhr (0)
Hallo LisplerBeschäftige mich gerade mit den Reaktoren.Habe folgenden Code von Lisp-Buch kopiert und getestet.Wenn ich eine Bemassung wähle funktioniert der Code, es wird ein Layer angelegt.Aber wenn ich eine Schraff wähle geschied nichts, kann mir bitte einer sagen wo der Fehler liegt.Danke; Anfang der Datei; Funktion zum Setzen des Reaktors(defun add-cmd-reactors( / ) (vl-load-com) (vlr-command-reactor nil ( (:vlr-commandWillStart . cmd-start-callback)) ) (vlr-command-reactor nil ( (:vlr-commandEnded . ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Volumenkörper auflösen
mapcar am 27.11.2004 um 02:05 Uhr (0)
Hier ist mal wieder der Museumswärter gefragt, glaube ich... Lars, es gibt in AutoCAD einfach verschiedene Ansätze, was 3D betrifft. Diese Ansätze sind in der Regel nicht kompatibel zueinander. Zunächst muss man immer wissen, womit man es bei 3D-Gebilden zu tun hat: Wenn der Liste-Befehl "3DSOLID" anzeigt, dann hast du es mit einem Volumenkörper der neuesten Generation zu tun. Einmal EXPLODE zerlegt diese evtl. in Flächen, aber auch in ganz obskure Entities, die du nicht weiter verarbeiten kannst, wie z.B ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Zeilenumbruch
Theodor Schoenwald am 07.04.2012 um 21:24 Uhr (0)
Hallo,@Thomas,Dein Vorschlag Nr.: 2 auflösen und dann ... lastobj ..., funktioniert, wenn nur ein Mtext auf der Zeichnung ist.Was ich vorab schon gemacht hatte, aber etwas Umstand war, funktioniert am besten.Es deckt sich fast mit dem Vorschlag von @archtools:Zuerst ersetze ich alle //P durch das "Alt+124" Danach geht es so weiter:TH = Texthöhe,BR = Textbreite (Breite der einzelnen Zeichen),L_PT = der letzte Punkt.(foreach N Z_LST (cond ; wenn ein Leerzeichen im Text ist wird die Breite verschoben ((= N ...
|
| In das Form Lisp wechseln |
|
Lisp : Gruppencodes? Will Layer ändern!
Rabbit 007 am 15.05.2007 um 18:06 Uhr (0)
Und das Zusätzlich für Gruppencodes, die für alle grafischen Objekte. Zitat:Gruppencodes, die für alle grafischen Objekte gelten Gruppencode Beschreibung Wenn ausgelassen,Vorgabewert... 1 ANW: Elementname (ändert sich beim Öffnen einer Zeichnung) nicht ausgelassen 0 Elementtyp nicht ausgelassen 5 Referenz nicht ausgelassen 102 Anfang der anwendungsdefinierten Gruppe"{application_name" (optional) Kein Vorgabewert Anwendungsdefinierte Codes Codes und Werte innerhalb der 102-Gruppen sind anwendung ...
|
| In das Form Lisp wechseln |
