Hallo treben,
es ist nicht ganz das was Du willst, kommt aber Deinen Vorstellungen ziemlich nahe. Am Befehlsprompt startest Du mit "0 ENTER" (natürlich ohne die Gänsefüßchen) das unten gelistete Macro (muß selbstverständlich vorher geladen sein), betätigst dann eine der Tasten 1-9 und erhältst das gewünschte Resultat.
Noch vorhandene Mängel:
- Es genügt nicht, nur eine der Zifferntasten zu betätigen, sondern der Vorgang muß erst mit "0 Enter" eingeleitet werden.
- Der Befehl ist nicht transparent einsetzbar
- Es macht keinen Unterschied zwischen den Ziffern auf dem Ziffernblock und dem normalen Tastaturbereich (dürfte Dir aber egal sein).
Ich habe leider noch keine Möglichkeit gefunden, mittels LISP den/die Tastaturcode/s auszulesen.
Hier nun der Code:
(defun c:0 (/ eingabe)
(setq eingabe (cadr (grread)))
(cond
((= eingabe 49) (command "_vpoint" "-1,-1,1"))
((= eingabe 50) (command "_vpoint" "0,-1,0"))
((= eingabe 51) (command "_vpoint" "1,-1,1"))
((= eingabe 52) (command "_vpoint" "-1,0,0"))
((= eingabe 53) (command "_vpoint" "0,0,1"))
((= eingabe 54) (command "_vpoint" "1,0,0"))
((= eingabe 55) (command "_vpoint" "-1,1,1"))
((= eingabe 56) (command "_vpoint" "0,1,0"))
((= eingabe 57) (command "_vpoint" "1,1,1"))
)
(princ)
)
Falls Du mit "Schrägrisse" was anderes meinst (bin kein Bauzeichner) brauchst Du nur die vpoint-Koordinate entsprechend Deinen Wünschen anzupassen.
Have fun
Jürgen
Alternativ kannst Du auch 9 verschiedene Befehle mit den Namen "1" bis "9" schreiben, das spart einen Tastendruck (kann genügt z.B. "1 ENTER").
------------------
Bildung kommt nicht vom Lesen, sondern vom Nachdenken über das Gelesene. (Carl Hilty)
[Diese Nachricht wurde von jupa am 12. Mrz. 2014 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP