---

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

---

hy jürgen

(setq fx "2xp")
(command "zoom" "faktor" fx)

oder wenn du die das als benutzereingabe haben willst z.b.:
(setq fx (strcat (rtos (getreal "faktor eingeben: ")) "xp"))

oder hab ich dich falsch verstanden?...

------------------
mfg Siegfried Schachinger
http://www.tbschatz.at

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hai

(setq fx "2XP")
(command "zoom" "fa" fx)

------------------
Gruß
CADwiesel
Besucht uns im CHAT

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

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

---

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

---

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

---

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

---

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

---

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