|
AutoLisp : Mauskoordinaten bei Klick ?
CADmium am 22.04.2004 um 08:39 Uhr (0)
... Dank euch allen ... aber TOMOS Lösung ist schon das, was ich Suche ... jetzt nur noch auf Lisp. Hatt einer eigentlich schon mal WinApi-Funktionen aus user32.dll oder so für Lisp gekapselt? So ein Beispiel wäre auch nicht schlecht. ------------------ - Thomas -
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Körper extrudiernen und in Block einfügen
Brischke am 26.04.2004 um 10:04 Uhr (0)
Hallo Michael, so wie fuchsi es bereits geschrieben hat: Du musst die zu einem Block gehörigen Elemente zwischen dem (entmake BLOCK ) und (entmake ENDBLOCK ) mit (entmake ..) erzeugen. Das fehlt bei dir. Ich würde das Element, welches du mit (command erzeugt hast, als Kopiervorlage nutzen. (entmake ..);Block ;;; (entmake(vl-remove-if (lambda (X) (member (car X) (-1 5)) ) (entget (entlast)) )) ;;; (entmake ..);ENDBLK Bei Fragen ... Grüße Holger ------------------ Holger Brischke ( ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : acad_strlsort
Bernd10 am 26.04.2004 um 14:03 Uhr (0)
Hallo, ich habe ein seltsames Problem mit der Lisp-Funktion acad_strlsort. Als Beispiel folgender Sourece-Code: ( defun c:testsort ( / ltestunsort ltestsort ) (setq ltestunsort (list 0 AWSatzPolylinienErstellen_schwarz_250 A_blau_170 A_braun_18 A_gelb_2 A_grün_90 A_orange_30 A_rot_10 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : verebnen im bks
wirbelnderwind am 26.04.2004 um 16:17 Uhr (0)
hallo liebe CADler! ich versuche 3D-objekte in eine ebene zu projezieren. dabei sind mir diverse LISP´s, die ich zum beispiel bei cadwiesel fand, sehr hilfreich. nur leider ignorieren diese alle mein selbstdefiniertes koordinatensystem. has wirklich noch niemand einen ablauf mit beachtung des BKS´s programmiert? warum? ist das so schwer/kompliziert? eigentlich steckt doch nur eine transformation dahinter, oder? danke für eure meinungen, wiwi
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Ergänzung des gemessenen Wertes
Proxy am 26.04.2004 um 17:56 Uhr (0)
P.S. hier der Anhang Code: ; BEFEHL: ATI ; Addiert die Fläche zu markierenden Polylinien und schreibt die Fläsche als Mtext. ; ================================================================================== (defun suma-pol () (setq polilineas (ssget)) (setq n-pol (sslength polilineas) n 0 ) (repeat n-pol (setq nombre (ssname polilineas n)) (if (or (= LWPOLYLINE (cdr (assoc 0 (entget nombre)))) (= POLYLINE (cdr (assoc 0 (entget nombre)))) ) (progn (command _.area ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Wie Liste arrangieren für mit entmake erstellten Block?
holgerka75 am 28.04.2004 um 14:01 Uhr (0)
Hallo Lisp´ler, ich erstelle einen Referenzpunkt mit entmake: (setq referenzpunkt (list (0 . INSERT ) (100 . AcDbEntity ) (8 . Layername ) (100 . AcDbBlockReference ) (2 . RefPkt ) (assoc 10 (entget block1)) ) ) (entmake hauptrefpktliste) Aus block1 kommen Koordinaten, aber das nur nebenher.... So, nun möchte ich in die zweite Stufe der Hierarchie gehen. (entget block = Stufe 1; entnext entget block = Stufe 2 usw....) In der zweiten Stufe wird nun die Punktnummer eingetragen. Also z ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : acad_strlsort
Bernd10 am 28.04.2004 um 15:02 Uhr (0)
Hallo, ich kann das Sortierproblem inzwischen beheben, indem ich in den Eigenschaften meiner VLX-Anwendung (Visual Lisp - Datei - Anwendung - Eigenschaften einer Anwendung) auf der Registerkarte Anwendungsoptionen den Haken der Eigenschaft Separater Namensbereich entferne. Alle anderen Eigenschaften und Einstellungen bleiben unverändert. Meine grobe Umgebung sieht so aus: - mehrere Zeichnungen können gleichzeitig geöffnet sein (Multiple Document Interface) - VLX-Anwendung einmal für alle Dokumente l ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : acad_strlsort
Dabrunz am 29.04.2004 um 08:07 Uhr (0)
Tag. Zitat: ich kann das Sortierproblem inzwischen beheben, indem ich in den Eigenschaften meiner VLX-Anwendung (Visual Lisp - Datei - Anwendung - Eigenschaften einer Anwendung) auf der Registerkarte Anwendungsoptionen den Haken der Eigenschaft Separater Namensbereich entferne. Meiner bescheidenen Meinung nach keine glückliche Wahl - verwende dann lieber vl-sort oder vl-sort-i , wenn Einträge in der Liste mehrfach vorkommen dürfen. Damit gibt s dann keine Notwendigkeit mehr, diesen Bu ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Befehl: UMGRENZUNG/GPOLY
Bernhard GSD am 29.04.2004 um 10:33 Uhr (0)
Unter bestimmten Umständen Fragt AutoCad beim Befehl UMGRENZUNG: Alles Sichtbare wird gewählt... 6256 gewählt, DELETED? N Der Dialog soll zwar in 2005 sauber übersetzt sein... Aber woher kommt die Zahl. Wie kann ich diese Frage komplett unterbinden? Oder wie kann ich diese Zahl berechnen und im Lisp ein _Yes beisteuern? (Die Suchfunktion konnte mir nicht weiterhelfen ...) von cadffm im Autocad-Forum bestens beantwortet. ------------------ Gruß aus Wien Bernhard [Diese Nachricht wurde von Bernhard ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Nummern forlaufend
Proxy am 29.04.2004 um 12:49 Uhr (0)
Code: (defun c:num (/ nr ipt ant th prefix) (setq LAY_OLD (getvar CLAYER )) (setq prefix (getstring
Textprefix: ) nr (if (setq ant (getint
Startnummer 0 )) (1- ant) 0 ) ;_ end of if th (getreal
Texthöhe: ) ) ;hier fehlte eine Klammer (princ
Wählen sie ein Element für die Layerschaltung : ) (setq AWS (ssget)) (setq AWS (ssname AWS 0)) (setq LAY_NEW (cdr (assoc 8 (entget AWS)))) (setvar CLAYER LAY_NEW) (while ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Führungstext ändern über Lisp
Brischke am 30.04.2004 um 09:34 Uhr (0)
Hallo Werner, habe im Moment kein MPP zur Hand, deswegen mal ein Schuß in s Blaue: Überprüfe mal die Elemente, welche in den Gruppencodes 3#0 aufgeführt sind, und verfolge diese. Irgendwo wirst du dann auch den Text finden. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat!
|
| In das Form AutoLisp wechseln |
|
AutoLisp : LWpolylinie auslesen
Brischke am 01.05.2004 um 21:00 Uhr (0)
Hallo, bei den LWPolylines sind die Stützpunkte (10er) gespeichert. Möchtest du den Zentrumspunkt eines Bogensegmentes ermitteln, dann musst du mit den nachfolgenden Gruppencodes rechnen. Diese bestimmen die Ausbuchtung. Suche mal in der Hilfe oder hier im Forum nach diesem Stichwort, da werden einige Beiträge dazu kommen. Schau auch mal bei http://www.induma.com in den Diskussionsforen. Da war auch mal eine Diskussion zu den LWPolylines. Bei Fragen ... Grüße Holger ------------------ Holger Brischke ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : LWpolylinie auslesen
CADwiesel am 03.05.2004 um 07:59 Uhr (0)
und irgendro mei mir gibt s sogar ein Lisp - glaube unter Bauklötze - P-Lines ------------------ Gruß CADwiesel Besucht uns im CHAT
|
| In das Form AutoLisp wechseln |
