|
AutoLisp : Layer aufruf aus DCL
Brischke am 30.07.2003 um 13:32 Uhr (0)
Hallo Waldemar, Hallo Theodor, hier nun mal ein schnell zusammen geschossenes Beispiel Ich habe ein Dialogfenster, eine Lisp. In der Lisp sind insgesamt 4 Funktionen definiert. Rechteck zeichnen und 2 Zahlen multiplizieren, jeweils 1x mit und 1x ohne Dialogfenster. Bei Fragen ... Grüße Holger Code: ;;;Hauptprogramm - Multiplikation mit DIA (defun c:mal (/) (main_sub multipliziere "Multiplikation" "Faktor 1" "Faktor 2") (princ) ) ;;;Hauptprogramm - Multiplikation ohne DIA (defun c:-mal (/) (main ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : koordinate checken
Brischke am 31.07.2003 um 10:47 Uhr (0)
Hallo Marvin, mit Code: (ssget _X (list (-4 . and ) (0 . LINE ) (-4 . or ) (cons 10 Koordinate) (cons 11 Koordinate) (-4 . or ) (-4 . and ) ) ) geht das eleganter - aber ob am Ende das Ergebnis tatsächlich den Tatsachen entspricht ist fraglich. Sicherer ist es wirklich alle Linien Anfangs- und Endpunkte mit der Koordinate zu vergleichen. Aber nicht mit (= A B) sondern mit (equal A B toleranz) Die ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : koordinate checken
Brischke am 31.07.2003 um 11:50 Uhr (0)
immer wieder die selben ;-) Ok- ich werde mir einen anderen Nick besorgen, damit das dann nicht so auffällt. besonders frustrierend, wenn man das wissen eigentlich hat, aber einfach nicht drauf kommt...naja die übung machts, hoff ich mal ;-) Ich bin auch erst ca.10 Jahre beim AutoLISP - kann deine Hoffnungen bestätigen - allein der Meilenstein weg vom (command..) zum (entmake..) brauchte Jahre das mit dem equal ist ein guter tip...danke Habe ich selber Tage/Wochen/Monate für gebraucht, um das ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Maus oder Tastatur benutzt ??
Brischke am 31.07.2003 um 10:50 Uhr (0)
Hallo pan, meines Wissens nicht. Aber was willst du mit einer relativen Koordinaten Eingabe? dann mach (getdist..) und errechne, falls du das brauchst den Winkel hinterher, oder du verschiebst das BKS und rechnest mit (trans den Punkt auf dieses Koordinatensystem um. Irgendwie sehe ich keinen Sinn in deinem Vorhaben - lass mich aber gerne aufklären. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Irgendwann muß man schlafen, deshalb: +!+!+Urlaub vom 01.08.-30.0 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : INSERT LWPOLYLINE
Brischke am 01.08.2003 um 09:56 Uhr (0)
Hallo marvin, dein Gefühl hat Recht. Gehe in die Blocktabelle, und suche dir da den Block raus. (setq blk(tblobjname BLOCK TOLLERBLOCKNAME )) Mit (entnext..) die Elemente des Blockes durchhecheln, bis du an der Polylinie angekommen bist. Aus dieser suchst du dir dann den entsprechenden Punkt raus. Diesen kannst du dann mit (subst..) tauschen und mit (entmod..) aktualisieren. Dann mit (entupd..) den Block aktualisieren - fertig. Aber Achtung! Die Koordinaten, die du auf dem Monitor pickst musst du a ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : INSERT LWPOLYLINE
Brischke am 01.08.2003 um 10:53 Uhr (0)
Wenn in der LWPolylinie keine Koordinaten doppelt drin sind, dann kommst du mit (assoc...) sicher an die Koordinate, wenn nicht musst du die Logik, die du im Kopf hast irgendwie im Programm umsetzen. beim (assoc 10 Koordinate) kann aber auch wieder die Problematik der Gleichheit greifen. Dann ist s wieder besser mit (equal..) jeden Punkt zu vergleichen. Bei Fragen ... Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Irgendwann muß man schlafen, deshalb: +!+!+Urlaub vom 01.08.- ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Punkte sortieren
Brischke am 03.08.2003 um 12:47 Uhr (0)
Hallo Peter, schau mal in der Hilfe nach (vl-sort ..), da ist ein Bsp drin, wie man die Punkte nach X oder Y- Koordinate sortieren kann. Daraus kannst du dann erst mal die Zeilen bauen. Dann die Zeilen nach X-Wert sortieren und anschließend einfach zeilenweise die X-Abstände berechnen und wenn dieser größer als ein bestimmter Wert ist, dann eine neue Liste beginnen. Das war jetzt mein letzter Beitrag vorm Urlaub. Grüße Holger ------------------ Holger Brischke CADlon - Lisp over night! Irgendwann mu ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Block aktuelles Standes einfügen
ManfredMann am 04.08.2003 um 10:52 Uhr (0)
Hallo Experten! Ich möchte mit LISP einen externen dwg-Block mit (command _insert ....) einfügen, wobei ich den Dateinamen mit Pfad angebe. Dies funtioniert recht gut, aber wenn ein Block mit der selben Namen in der Zeichnung bereits existiert, fügt ACAD diesen internen Block statt der externen Datei ein. Bei manuellem Befehl kann man im Dialog-Box der existierende Block ersetzen lassan, aber wie funktioniert dies unter Lisp, ohne dass ich den alten Block mit purge bereinigen muß? Hat jemand eine Idee/ ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Block aktuelles Standes einfügen
Erwin Fortelny am 05.08.2003 um 11:07 Uhr (0)
Hallo! Zitat: Original erstellt von ManfredMann: Ich möchte mit LISP einen externen dwg-Block mit (command _insert ....) einfügen, wobei ich den Dateinamen mit Pfad angebe. Dies funtioniert recht gut, aber wenn ein Block mit der selben Namen in der Zeichnung bereits existiert, fügt ACAD diesen internen Block statt der externen Datei ein. [...] Hat jemand eine Idee/Erfahrung? Klaro ... die Systemvariable EXPERT auf 2 setzen!!! ... siehe Onlinehilfe ------------------ Servus, Erwin -- foe@gmx. ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Block aktuelles Standes einfügen
ManfredMann am 05.08.2003 um 13:07 Uhr (0)
Hallo Helmut! Besten Dank für die LÖSUNG!!!! So ist das richtige INSERT-Commando aufgebaut, die neue Version des externen dwg-Blocks wird in die Zeichnung ohne Wichtigtuerei eingefügt, und natürlich von allen eingefügten, gleichnamigen Blöcken übernommen. Die Formel heißt also: (command _INSERT (strcat internerblock = externedwg) ...) Zitat: Original erstellt von Helmut F: 2. (command _INSERT (strcat Neuer_Block= Dein-Blockname) ... Hierbei wird ein neuer Block definiert Ist es das was du s ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : ENTITY
mkl-cad am 07.08.2003 um 17:25 Uhr (0)
Hallo. 3 Möglichkeiten 1. Entweder mit Mtext arbeiten. Dort gibt es Sonderzeichen. Auch Funktionen zum hochstellen dabei die auch mit Lisp erstellt werden können. Ist nur nicht ganz einfach. 2. Nicht mit Standartschrifen wie Simplex oder Txt arbeiten. Bei einigen True-Type Schriften funktionieren Sonderzeichen. Geht allerdings auf die Rechnerleistung 3. Die anhängende simplex.shx benutzen und folgende Sonderzeichen benutzen: %%182 = Text hochstellen und mit beliebigen Text weiterschreibe ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 100 Flächen in Teile umwandeln
GeorgK am 08.08.2003 um 06:23 Uhr (0)
Hallo, wie kann ich in Lisp z.B. 100 Flächen nacheinander auswählen und diese dann über den Befehl Flächen zusammenheften in Teile umwandeln? Vielen Dank Georg
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Wer möchte testen?
mapcar am 27.07.2003 um 23:48 Uhr (0)
Hi Leute, habe ja schon länger auf meinen Lisp-Seiten angekündigt, dass ich da einen Übungsinterpreter einbauen will, mit dem man die ersten Hausaufgaben direkt auf der Seite und ohne AutoCAD machen kann. Jetzt endlich habe ich die Rohfassung soweit fertig, dass es sich wirklich zu spielen lohnt. Ist noch nicht eingebaut in die Seiten, bisher noch unter http://www.mapcar.de/pils/pils.html zu finden. Der Name PILS ist latürnich ein Buchstabendreher für Lisp, aber mit einer netten Assoziation - und Lisp ...
|
| In das Form AutoLisp wechseln |
