---

Hallo Leute!

Ich arbeite oft in zwei Maßstäben in einer Datei,hab dazu verschiedene Bemassungstile definiert.
Das hin- und herschalten der Bemassungsstile nervt auf die Dauer.
Als muß ein Makro her:

Bei der Führung funktioniert es auch gut:

^C^C(setq temp (getvar "dimstyle"));-dimstyle;h;1_50;-la;m;2-Beschr;;_qleader;\\;_layerp;(command "_dimstyle" "_res" temp)

Nur bei der Bemassung gibts das Problem mit der variablen Benutzereingabe:

^C^C(setq temp (getvar "dimstyle"));-dimstyle;h;WIESER-20;dimfast;\\;(command "_dimstyle" "_res" temp)

zeichnet mir nur eine Bemassung ("dimfast" ist ein ArchTools - Befehl)

F1 sagt:
Ein Makro wird in der Regel nach einer Benutzereingabe wie z. B. einer einzelnen Punktposition wieder aufgenommen. Deshalb können keine Makros erstellt werden, die die Eingabe einer variablen Anzahl von Parametern (wie z. B. bei der Objektauswahl) ermöglichen und erst dann fortgesetzt werden. Eine Ausnahme bildet der Befehl WAHL: ein umgekehrter Schrägstrich unterbricht den Befehl WAHL, bis die Objektauswahl abgeschlossen ist.

Gibt´s da irgendeinen Trick?
Wie schaut eigentlich so eine Befehlsabfolge als lisp aus?

Grüße aus Wien

Helmut

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

---

Hallo Helmut,

Schau mal hier, das dürfte was für dich sein.

Gruß, Carsten

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

---

Hallo Carsten!

Genau sowas hab ich gemeint.
Funktioniert mit dimarc und dimlinear Acad- Befehle) aber leider nicht mit dimfast (Archtools- Befehl):

im Lisp erkennt Acad den Fremdbefehl nicht (dimfast in der Befehlszeile funktioniert)

Da werd ich mal eine Suportanfrage an Tom Berger /Archtools losschicken.

Danke und U´s 4 u

Helmut

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

---

versuche den Befehl:
(dimfast)
oder
(c:dimfast)

------------------
< Fr. & Sa. beim CAD.de-Treffen in Stuttgart dabei >

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

---

(dimfast) LISP-Befehl ist nicht verfügbar.
(c:dimfast) LISP-Befehl ist nicht verfügbar.

leider nein

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

---

Das fertige Lisp schaut so aus:

(defun c:dimli (/ )
(setvar "cmdecho" 0)
(setq cdln (getvar "clayer"))
(setq temp (getvar "dimstyle"))
(command "-layer" "set" "2-BEM-DET" "") ; <== Layer
(command "-dimstyle" "h" "WIESER-20")  ; <== Bemassungsstil
(setvar "cmdecho" 1)
(c:dimfast)
(while (> (getvar "CmdActive") 0)(command pause))
(setvar "clayer" cdln)
(command "_dimstyle" "_res" temp)
)

Danke auch an Tom Berger vom Archtools- Forum

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