|
AutoLisp : Messen / Teilen mit Punktnummerierung - Intelligenter Linientyp
marc.scherer am 27.05.2004 um 17:10 Uhr (0)
Hi Helmut, ja sowas habe ich in Lisp fertig. Sogar relativ modularisiert und flexibel bezüglich einer eigenen Anpassung Deinerseits. Ich müßte das jedoch erst mal aus meiner Funktions-Bibliothek rauslösen. Hast Du Interesse daran? ------------------ Ciao, Marc
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Polylinienendpunktabstände markieren
Proxy am 28.05.2004 um 11:42 Uhr (0)
Hab da Lisp gefunden, jedoch funktioniert es nicht mit Polylinien Fehlerhafter Argumenttyp: numberp: nil . Kann da einer mit Krücke an den Kopp werfen ? Code: ; Locates and marks ends of arcs, lines, and plines that are close ; but not exactly coincident. ; Gaps are marked by drawing circles on the current layer. ; Set to the layer you want the marker circles on and run ; Command: GAPS ; You can select part of a drawing to check or press ENTER to check ; The whole drawing. ; 9/27/93 LW, Robert ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Punkt in Fläche
tom.berger am 28.05.2004 um 13:00 Uhr (1)
Zitat:Original erstellt von U. Neumann:Hallo Lisp-Forum,ich habe folgendes Problem. Gegeben ist eine Fläche, d.h. die Punkte, die diese Fläche einschließen liegen in einer Liste vor. Wie ermittle ich nun, ob ein weiterer Punkt (Koordinaten sind ebenfalls bekannt) innerhalb oder außerhalb dieser Fläche liegt?Dank für eure Hilfe.Im Thread, auf den Brischke verlinkt hat, sind die echten Lösungswege nicht näher erklärt, und die LISP-Lösung ist eine sehr unsaubere Krücke. Deshalb will ich das mal hier nachhole ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Was sind Reaktoren?
tom.berger am 29.05.2004 um 12:58 Uhr (0)
Zitat: Original erstellt von mapcar: Ich habe so einige Reaktor-Programme geschrieben, die nach einer Probezeit dann doch wieder eingestampft wurden. Ein Beispiel: Vollautomatisches Setzen eines Bem-Layers, spart einem ja eine Menge Arbeit im Laufe der Zeit. Niemand, der sich den Code angesehen hat, konnte irgendeinen Fehler oder eine Unsauberkeit entdecken. Nach zwei oder drei Monaten Einsatz konnte der Fehler reproduzierbar festgemacht werden: Wurde nach einer Bemaßung im übernächsten Befehl ein bes ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Punkte transformieren und rotieren
tmoehlenhoff am 30.05.2004 um 16:13 Uhr (0)
Hi Freaks, auch wenn es nicht direkt Lisp betrifft muss ich mal folgendes loswerden: Ich quäle mich immer wieder mal mit der gleichen Sache herum und möchte das gerne mal endgültig aus der Welt schaffen: Es kommt häufiger vor, dass Punkte (eines Elementes) verschoben und gleichzeitig gedreht werden müssen. Dafür gibts sicherlich diverse Krücken, aber ich hätte gerne mal den mathematischen Weg. Ich finde immer mal wieder diese 4x4 Matrix und komme doch nicht damit zurecht (zumal ich ja nicht nur Ergebniss v ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Endpunkt eines Bogens mit Lisp bestimmen
Theodor Schoenwald am 31.05.2004 um 11:28 Uhr (0)
Hallo, ich suche eine Lösung. ... Hier wird eine Linie gezeichnet ... ... (command _ARC pause) ;... und mit einem Bogen verlängert. (setq BO (entget (entlast))) (setq P_BO_M (cdr (assoc 10 BO))) ; Zentrum des Bogens Wie erhalte ich noch den Endpunkt des Bogens? Gruß Theodor
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Endpunkt eines Bogens mit Lisp bestimmen
CAD-Huebner am 31.05.2004 um 21:33 Uhr (0)
einfach mit (GETVAR LASTPOINT ) Ein Bogen hat ja immer 2 Enden, und die müssen aus den Winkeln berechnet werden siehe GC 50 und 51. Dabei ist aber unklar, welcher Punkt dann gesucht wird, hier ist Lastpoint sicher der einfachste Weg.
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Endpunkt eines Bogens mit Lisp bestimmen
CADmium am 31.05.2004 um 22:00 Uhr (0)
Wie wäre es mit folgendem für ein Kurvenobjekt (vl-load-com) (vlax-curve-getEndPoint(vlax-ename- vla-object (entlast))) oder mit diesem für einen Bogen im Speziellen ? (vlax-safearray- list (vlax-variant-value (vlax-get-property (vlax-ename- vla-object (entlast)) Endpoint) ) ) Mittelpunkt wäre das : (vlax-safearray- list (vlax-variant-value (vlax-get-property (vlax-ename- vla-object (entlast)) Center) ) ) ------------------ - Thomas -
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Endpunkt eines Bogens mit Lisp bestimmen
Theodor Schoenwald am 31.05.2004 um 22:09 Uhr (0)
funktioniert mit (getvar lastpoint ). Danke! Gruß Theodor [Diese Nachricht wurde von Theodor Schoenwald am 31. Mai. 2004 editiert.]
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Endpunkt eines Bogens mit Lisp bestimmen
Theodor Schoenwald am 31.05.2004 um 22:18 Uhr (0)
Hallo Thomas, auch Dir ein Danke! Leider wird meine Datei für ACAD-LT mit dem Extender benötigt. Da kann ich (vlax- ... nicht einsetzen. Wenn ich jedoch den Bogen-Endpunkt für das normale ACAD benötige, habe ich ein schönes Strickmuster . Gruß Theodor
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Messen / Teilen mit Punktnummerierung - Intelligenter Linientyp
marc.scherer am 01.06.2004 um 11:52 Uhr (0)
Hi, Du meinst also eine Beschriftung, die unabhängig von der jeweiligen Länge der Pline arbeitet? Im Augenblick orientiert sich die Beschriftung ja an der Länge der Pline bzw. der Abschnittslänge... Hm... Im Prinzip müßte das mit dem Scaling der Sub MS:Station funktionieren. Rufe mal die Funktion Test auf. Folgender Dialog ergibt sich: Objekt wählen: [Wähle ein Objekt] Startwert für Stationierung eingeben/picken: 0 Maßstab für Stationierung eingeben: 0.02 Inkrement für Stationierung eingeben/picken: 50 T ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Plotten Automatisieren
patex am 07.08.2017 um 18:03 Uhr (5)
Hallo Freunde Hätte eine Frage bzw eine bitte: Gibt es eine Möglichkeit ein LISP zu schreiben dass automatisch im Modell Bereich alle Blätter Plottet?Ich habe oft Projekte mit 30 Seiten und mehr und jedes mal alle anzuklicken ist mühsam... hätte es gerne automatisiert!Meine Idee: 1) Layer machen für Maßstab zb: Plott100 Plott200 Plott250 Plott500 usw2) Polylinie um jede zu druckende Seite (DIN A4 + DIN A3)3) Reihnenfolge der Plotte = Reihenfolge erstellung Polylinie4) Druckerauswahl (direkt zum drucker ode ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Messen / Teilen mit Punktnummerierung - Intelligenter Linientyp
Helmut Wieser am 01.06.2004 um 14:16 Uhr (0)
Hallo Marc! Meine Lösung werde ich sicher hier posten. Muß hier nochmals was zum allgem. Verständnis sagen: Ich bin ein absoluter Lisp- Laie, arbeite also nach dem Versuch & Irrtum- Prinzip, fürchte also nicht viel Allgemeingültiges produzieren zu können, mal sehen... Etwas habe ich herausgefunden: Bei der frei einstellbaren Funktion TEST gibts das Problem, dass auch der Anfangswert mit dem Skalierungsfaktor multipliziert wird. Die sonstigen Einstellungen hab ich soweit im Griff. Ich brauch aber ein ...
|
| In das Form AutoLisp wechseln |
