|
AutoLisp : Zoom-Befehl per Lisp mit Faktor XP ?
Juergen55 am 23.02.2004 um 09:24 Uhr (0)
Danke, für die schnellen Antworten ! Jetzt mal was ganz anderes, Frage an CADwiesel, ich hab Dir schon vor längerer Zeit ein paar Lisp-Routinen für Deine Seite www.cadwiesel.de geschickt ! Wann machst Du mal wieder ein Update für diese ? Dann arbeitet heute nicht so viel, Denkt an den Fasching ! Jürgen
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zoom-Befehl per Lisp mit Faktor XP ?
fuchsi am 23.02.2004 um 13:09 Uhr (0)
da ich deb befehl Command weitgehend vermeiden möchte , rate ich zu dem klassischen ENTMODE der elementdaten des ansichtsfensters aus der dxf-referenz ANMERKUNG: Der Faktor ZOOM XP wird anhand der folgenden Formel berechnet: Gruppe_41 / Gruppe_45 (oder Höhe_Papierbereich / Höhe_Modellbereich). die höhe papierbereich ist eigentlich fix (oder gleich der Höhe des ansichtsfenstersm in zeicheneinheiten im papierbereich) , jetzt braucht man nur den gruppencode 45 abhängig vom ZOOM Faktor berrechnen undn setzetn ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zoom-Befehl per Lisp mit Faktor XP ?
Juergen55 am 23.02.2004 um 14:35 Uhr (0)
Hallo, anbei nun das Ergebnis was ich programmiert habe : Eine direkte Massstabseingabe für die Ansichtsfenster, durch die While-Schleife widerholt sich das ganze, und man kann testen welcher Masstab am besten passt ! (defun c:T11 () (setq ga 1) (while (/= ga 0) (setq ba (getvar tilemode)) (if (= ba 1)(progn (setvar tilemode 0))) (command _.MSPACE ) (princ
Eventuell Ansichtsfenster wechseln ! ) (setq fa (getreal
Massstab eingeben 1 : )) (setq fa (/ 1 fa)) (setq fx (strcat (rtos fa) xp )) (prin ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zoom-Befehl per Lisp mit Faktor XP ?
fuchsi am 23.02.2004 um 14:45 Uhr (0)
kurzer tipp ich würde dem befehl RTOS immer mode und precision mitgeben, stell dir vo jemand verändert die anzeigegenauigkeit auf 1 nachkommastalle dann würde (rtos (/ 1 100.)) genau 0.0 zurückgeben (rtos (/ 1 100.) 2 4) jedoch 0.0100 unabhängig von den zeichnungseinstellungen ------------------
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Entwicklung einer allgemeinen *Error* Funktion...
mapcar am 23.02.2004 um 17:22 Uhr (0)
Ich habe mich heute nochmal mit der Sache befasst, bin aber noch nicht bei den Huckepack-Funktionen angekommen. Erstmal habe ich ein bisschen aufgeräumt, und das ist dabei herausgekommen: 1. Ich habe mich von dem bisherigen Undo-Konzept verabschiedet. UNDO BEGIN und UNDO END kennen nun mal leider keine Verschachtelung, d.h. jedes BEGIN schließt automatisch eine noch offene Gruppe ab. Das lässt sich leider überhaupt nicht austricksen. Neues Modell: Nur noch die oberste (erste) Instanz des Errorhandlers erze ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Zoom-Befehl per Lisp mit Faktor XP ?
Juergen55 am 23.02.2004 um 22:11 Uhr (0)
Hallo Fuchsi, Danke für den Tipp, das war mir jetzt gar nicht klar, das es Probleme mit den Nachkomastellen geben könnte, ich hab bei meinem AutoCAD eigentlich grundsätzlich 4-Nachkomastellen. Das man dem Lisp-Befehle rtos solche Parameter verpassen kann ist auch interessant. Ich hab jetzt einfach die entsprechende Systemvariable, am Anfang meiner Lisproutine auf 4 gesetzt! (setvar luprec 4) Gruß, Jürgen
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Ungleichmäßig skalierte Blöcke auflösen
C. Thiel am 24.02.2004 um 13:14 Uhr (0)
Hallo, hoffentlich bin ich jetzt im richtigen Forum gelandet. Mein Problem ist folgendes: Ich habe heute mehrere Zeichnungen erhalten, die ich gerne in das STEP- Format exportieren würde. In dieser Zeichnung befinden sich nun aber ungleichmäßig skalierte Blöcke. Wie bekannt sein dürfte, werden solche Blöcke beim exportieren in Ihren unskalierten Zustand zurückgesetzt (zumindest bei mir ). Ich meine mich nun zu erinnern das ich vor einiger Zeit einmal ein LISP gesehen habe, mit dem es möglich ist solche B ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : LISP für LISP
Alpschorsch am 24.02.2004 um 13:24 Uhr (0)
Hallo, hab mal eine allgemmeine Handling Frage! Gibt es etwas, damit man den Überblick nicht verliert? Lisp Manager hab ich schon mal gesehen, aber der war auch nicht sehr hilfreich! Vielleicht war es auch nicht der richtige! Wie macht Ihr das? Oder soll ich das besser alles zwischen Ohren speichern! Gruß Alpschorsch
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Ungleichmäßig skalierte Blöcke auflösen
cadffm am 24.02.2004 um 13:26 Uhr (0)
Du kannst doch Blöcke ganz normal explodieren lassen (oder willst du mit dem Lisp jeden einzelnen als 1,1,1-skaliert unter einem anderen Namen gespeichert haben ? (kenne mich mict step nicht aus was du da bekommst/benötigst) Normal Explodieren geht wenn EXPLMODE auf 1 steht ... ------------------ - Sebastian Mattis -
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Ungleichmäßig skalierte Blöcke auflösen
CADmium am 24.02.2004 um 13:28 Uhr (0)
Umschreiben gesagt: Ein Block liegt mit seinen Elementen immer untransformiert in der Blocktabelle. Von dort aus wird er in die Zeichnung üner Blockreferenzen referenziert. Dabei kann die Referenz gedreht oder sklaiert werden. Für den von dir angesprochenen Export, der so scheinbar nicht funzt, würd ich die Blockreferenzen auflösen ( was dabei aus den einzelenen Elementen wird, steht gut in der ACAD-Hilfe beschrieben ) und wegenmeiner als neue Blöcke , mit Referenz am gleichen Punkt abspeichern. Mit Lisp ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : LISP für LISP
cadffm am 24.02.2004 um 13:29 Uhr (0)
Es gibt nur den Raum zwischen deinen Ohren der das alles steuert - mehr nicht. ------------------ - Sebastian Mattis -
|
| In das Form AutoLisp wechseln |
|
AutoLisp : LISP für LISP
j-sc am 24.02.2004 um 13:38 Uhr (0)
also, ne gewisse Ordnung auf den Rechnern, in den Verzeichnissen, Projekten usw. ist durchaus hilfreich - außerdem macht sich zentrale Datenhaltung (Server) ganz gut. Du solltest nur aufpassen, dass dann auch in manchen Daten nicht jeder rummurksen kann. Ne gepflegte Dokumentation ist ebenfalls hilfreich. Ansonsten wird dir aber keiner die Organisation deiner Arbeitsumgebung [vom Desktop über Verzeichnisse(Ordner), Laufwerke ,Rechner und die diversen Dateispeicherorte] abnehmen. ------------------ Ciao J- ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : LISP für LISP
Alpschorsch am 24.02.2004 um 14:06 Uhr (0)
O.K., dachte es gäbe da schon etwas, wo man eine Befehlesübersicht hat! z.B. Kurzinfo :Wie heißt die LISP und was kann Sie! Da ich nur einen Monitor habe kann ich nicht alle auf Knöpfe legen und muß einiges manuell starten! O.K. dann also Struktur und zwischen die Ohren! Aber bin weiter für jede Idee dankbar! MfG Alpschorsch
|
| In das Form AutoLisp wechseln |
