|
AutoLisp : Versionsprobleme bei entmod
double_m am 23.08.2005 um 09:44 Uhr (0)
Das funktioniert, danke!Allerdings funktioniert es nur bei AutoCAD 2004, gibt es eine Möglichkeit das bei AutoCAD 2000 auch so zu machen?
|
| In das Form AutoLisp wechseln |
|
Lisp : Punkte einer Polylinie in Datei schreiben
hep am 23.08.2005 um 15:35 Uhr (0)
Hallo Holger,hätte da schon mal eine Frage zur Ausgabe des Zahlenformats.ich kenne z.B. .... (print rtos (car sp) 2 4) "," (rtos (cadr sp) 2 4) "," (rtos (caddr sp) 2 4) "," (rtos (car ep) 2 4) "," (rtos (cadr ep) 2 4) "," (rtos (caddr ep) 2 4).............bei Dir steht (write-line (strcat xval "," yval) fn). Ich denke das wir mit mapcar erledigt, nur wie?Kannst Du mir das bitte sagen.GrußEdgar
|
| In das Form Lisp wechseln |
|
Lisp : Punkte einer Polylinie in Datei schreiben
Brischke am 23.08.2005 um 21:34 Uhr (0)
Hallo Edgar,ich habe die wohl entscheidende Stelle für dich mal kommentiert. Vielleicht hilfts.Code:(write-line;schreibe in Datei fn (substr;Gib die Zeichenkette ab dem 2. Zeichen wieder (das erste ist ein Komma) (apply strcat;das Ergebnis der folgenden [mapcar ..] ist eine Liste, deren Elemente (STR) miteinander verbunden verden (mapcar;Führe mit die Funktion [lambda..] aus und gib das Ergebnis zurück (lambda (E) ;E ist ein Element der Liste (strcat;Zeichenkettenverbinden "," ...
|
| In das Form Lisp wechseln |
|
Lisp : Punkte einer Polylinie in Datei schreiben
hep am 24.08.2005 um 10:33 Uhr (0)
Hallo Holger,es hift schon aber....Kannst du mir bitte sagen was man hier schreiben muß um ggf. 2 oder 0 Nachkommastellen zu erhalten ( (substr;Gib die Zeichenkette ab dem 2. Zeichen wieder (das erste ist ein Komma) )1234,5678 -- 1234,56 oder 1234 ^---- ist das das 2.Zeichen ^---- oder dasaber die Logik verstehe ich nicht, weil eben nur 4 Nachkomastellen geschrieben werden (ich dachte Autocad arbeitet mit 16 Stellen nach dem Koma) Vielleicht findest Du Zeit mir eine kurze Erklärung zu geben.GrüßeEdg ...
|
| In das Form Lisp wechseln |
|
Lisp : Punkte einer Polylinie in Datei schreiben
Brischke am 24.08.2005 um 10:57 Uhr (0)
Hallo Edgar,in welcher Entwicklungsumgebung programmierst du denn? Nimm mal den VLIDE und setze an der ersten öffnenden Klammer einen Haltepunkt (F9). Dann lädst du das Programm und startest es. Das Programm stoppt nun an dieser Stelle. Du schaltest dir nun das Überwachungsfenster ein und lässt dir die letzte Rückkabe anzeigen. Du kannst nun mittels F8 im Einzelschritt durch den Code wandern und siehst im Überwachungsfenster das jeweiligen Ergebnis der einzelnen Befehle. Ich denke, wenn du dies gemacht has ...
|
| In das Form Lisp wechseln |
|
AutoLisp : 90 Grad rotieren
archstudent am 24.08.2005 um 13:59 Uhr (0)
Hallo!Ich möchte das Arbeitstempo mit Autocad etwas verbessern. Statt dem normalen drehen soll z.B. Drehen um 90 Grad mit dem Tastenkürzel Str + L (bzw R) funktionieren. Jetzt wollte ich mir ein Button machen und diesen mit einem vlisp verknüpfen. Allerdings klappt das mit dem lisp noch nicht so (soll mein erster Code werden... ;-));;; Function C:rotate90 = Programm(defun C:rotate90 (); objekt wählen, aus Schwerpunkt rotationsachse wählen ; rotieren um 90 GradCommand: (command "_rotate" P1 P2 "") )(princ ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Punkte einer Polylinie in Datei schreiben
hep am 24.08.2005 um 14:23 Uhr (0)
Hallo Holger,ne das ist schon in Ordnung. Ich verstehe das auch nicht falsch. Ohne Grundkenntnis geht es nicht und genau das bin ich mir am aneignen. Ich werde das so wie du vorgeschlagen hast machen, ggf. werde ich nachfragen.GrüßeEdgar
|
| In das Form Lisp wechseln |
|
AutoLisp : Layouts laden
RoyCAD am 24.08.2005 um 16:21 Uhr (0)
HalloWie immer habe ich da ein Problem, es geht darum, dass in einer bestehenden dwt. Datei habe wo alle unsere Layouts mit Ansichtsfenster gespeichert sind (unter "I:ACADVorlagenlayoutsCAD_LAYOUTS“). Ich will ein Lisp schreiben das er, nach der Layoutsname fragt und dann das entsprechende Layout lädt (aktuelle dwg Datei)Hat vielleicht schon jemand von euch so was Geschrieben, bzw. kann mir Ansatzpunkte geben wie man so eine LISP-Routine machen kann!? Vielen Dank für Hinweise!GrußRoyCAD .
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 90 Grad rotieren
tunnelbauer am 24.08.2005 um 19:59 Uhr (0)
1. Was ist das was du da gepostet hast ? (oder ist dir da Code in die Signatur gerutscht ?)2. Was funktioniert alles ? Poste mal was du hast - denn ohne deinen Code zu sehen können wir nicht sagen was geändert gehört. Das was du da gepostet hast kann nicht funktionieren...3. Wie soll AutoCAD wissen, dass du keine weiteren Objekte wählen willst wenn du dies nicht explizit bestätigst ?4. Das mit dem Basispunkt ist dasselbe wie bei Punkt 2. (wir brauchen den Code um zu wissen was korregiert gehört)----------- ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 90 Grad rotieren
CADmium am 24.08.2005 um 21:44 Uhr (0)
Zitat:Original erstellt von archstudent:Ich möchte das Arbeitstempo mit Autocad etwas verbessern.....lassen ?Wenn mein Eindruck täuschen soll,dann arbeite dich z.B. mit MapcarS Seiten oder der Online-Hilfe im VLIDE etwas in die Lisp-Thematik ein und dann gehts konkret weiter. Wie soll das funktionieren , wenn dir hier was von vla-get-Boundingbox, mapcar und anderen Sachen erzählt wird und das Elementare fehlt ? P.S.Die Foren-Suchfunktion sollte zu den Stichworten auch schon etwas finden.------------------ ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 90 Grad rotieren
archstudent am 24.08.2005 um 22:35 Uhr (0)
Hallo Thomas!Es geht lediglich darum, durch ein Tastenkürzel selektierte Objekte um 90 Grad zu drehen, statt den nette Drehen-Button anzuklicken, das Objekt zu wählen, zu bestätigen, den Winkel von 90 Grad einzutippen und dann nochmal zu bestätigen..... Dat muß mit ner lächerlichen Zeile Lisp funktionieren!!!Funktioniert auch soweit, nachdem man ein BD-Button damit gefütter und ein Tastenkürzel vergeben hat.Autocad dürfte wohl eines der besten CAD-Programme sein,im Vergleich zu Vectorworks ist es aber im B ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Programmwiederholung
Brischke am 25.08.2005 um 07:27 Uhr (0)
Hallo Karli,die Version ist unwichtig. Wichtig ist, dass du mit dem Debuggen zurecht kommst. Das ist eine unwahrscheinliche Erleichterung und Hilfe beim Prüfen, Lernen und Verstehen der Codes.Das, was du als Kleinigkeit siehst, ist es nicht.Soll der Text wirklich so aussehen, wie ein Bemaßungstext, dann musst du zunächst die aktuelle Bemaßung auslesen, und dir von dort die aktuellen Einstellungen des Textes ermitteln.Willst du, dass sich dieser Text auch bei Veränderung des Bem-Stiles ändert, dann wird es ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : 90 Grad rotieren
archstudent am 25.08.2005 um 21:17 Uhr (0)
Genial!Autocad geht so langsam richtig ab... :-)))))))))))Der fertige Code:(defun C:r90 ( / AUSWAHL INDEX elem xmin xmax MINX MAXX MINY MAXY) (vl-load-com) (if(or(and(setq AUSWAHL (ssget "I"))((sslength AUSWAHL) 0)) (and(setq AUSWAHL (ssget)) ((sslength AUSWAHL) 0)) ) (progn (setvar "Pickfirst" 1) (command "_ucs" "_W") (setq INDEX -1) (repeat (sslength AUSWAHL) (setq ELEM(ssname AUSWAHL(setq INDEX (1+ INDEX)))) (vla-getboundingbox (vlax-ename-vla-object elem) xmin xma ...
|
| In das Form AutoLisp wechseln |
