| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY wird von NVIDIA zum Händler des Jahres gewählt – zum dritten Mal in Folge, eine Pressemitteilung
|
Autor
|
Thema: Zoom-Befehl per Lisp mit Faktor XP ? (2035 mal gelesen)
|
Juergen55 Mitglied Elektrotechniker
Beiträge: 282 Registriert: 08.03.2001
|
erstellt am: 23. Feb. 2004 08:38 <-- editieren / zitieren --> Unities abgeben:
Hallo, weiß jemand wie man den Zoom-Befehl mit einem Faktor bezogen auf das Papier per Variable zuweisen kann ? Ich kann der Variablen ja eigentlich keinen Int+String zuweisen ! (command "zoom" "faktor" "2XP") wie bekomme ich z.B. die 2XP in die Variable ? (command "zoom" "faktor" fx) Hab schon einiges probiert oder funktioniert der Befehl in Lisp ganz anders ? Gruß, Jürgen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Schachinger Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2041 Registriert: 08.04.2002 AIS2009, PDSU 2012-2015, Plant 3D 2011-2015, NavisWorks 2010-2015, Win7 64bit SP1, Intel Core i7 870, 16 GB RAM, Quadro 2000D
|
erstellt am: 23. Feb. 2004 08:54 <-- editieren / zitieren --> Unities abgeben: Nur für Juergen55
|
CADwiesel Moderator CAD4FM UG
Beiträge: 1989 Registriert: 05.09.2000 AutoCAD, Bricscad Wir machen das Mögliche unmöglich
|
erstellt am: 23. Feb. 2004 08:56 <-- editieren / zitieren --> Unities abgeben: Nur für Juergen55
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 23. Feb. 2004 08:57 <-- editieren / zitieren --> Unities abgeben: Nur für Juergen55
fürs Makro : (command "zoom" (strcat (itoa (getint "ZOOMFAKTOR :")) "xP")) [Edit : Man, bin ich lahm heute ..!!] Thomas
------------------ [Diese Nachricht wurde von CADmium am 23. Feb. 2004 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Juergen55 Mitglied Elektrotechniker
Beiträge: 282 Registriert: 08.03.2001
|
erstellt am: 23. Feb. 2004 09:24 <-- editieren / zitieren --> Unities abgeben:
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 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 23. Feb. 2004 13:09 <-- editieren / zitieren --> Unities abgeben: Nur für Juergen55
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 ------------------ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Juergen55 Mitglied Elektrotechniker
Beiträge: 282 Registriert: 08.03.2001
|
erstellt am: 23. Feb. 2004 14:35 <-- editieren / zitieren --> Unities abgeben:
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 "\nEventuell Ansichtsfenster wechseln !") (setq fa (getreal "\nMassstab eingeben 1 : ")) (setq fa (/ 1 fa)) (setq fx (strcat (rtos fa) "xp")) (princ fx) (command "zoom" "faktor" fx) ) ) Gruß, Jürgen
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fuchsi Mitglied Programmierer c#.net Datawarehouse
Beiträge: 1201 Registriert: 14.10.2003 AutoCad Version 2012 deu/enu <P>Windows 7 64bit
|
erstellt am: 23. Feb. 2004 14:45 <-- editieren / zitieren --> Unities abgeben: Nur für Juergen55
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 ------------------ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Juergen55 Mitglied Elektrotechniker
Beiträge: 282 Registriert: 08.03.2001
|
erstellt am: 23. Feb. 2004 22:11 <-- editieren / zitieren --> Unities abgeben:
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 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |