I have a code like that:
(setq roop t)
(while roop
(princ "\n Shift+RightMouse=... / RightMouse=... / LeftMouse=... /Space;Enter=Quit:")
(setq gr (grread nil 4 2)
ga (car gr)
gb (cadr gr))
(cond
((= ga 3);;;LeftMouse
...
...
)
((member gr '((2 13)(2 32))) ;; "" Space or Enter
(setq roop nil))
((= ga 11) ;;;RightMouse
.....
.....
)
((member gr '((11 1000))) ;;;Shift+RightMouse
....
....
)
)
)
These are not all correct.For example , Sometimes (= ga 11) represent RightMouse, other times (= ga 25).
So I give My question: How can I get the key value of the keyboard and mouse with gread?
I need all the keyboard value(as a,z,etc),mouse value(as LeftMouse, RightMouse and Wheel) and combination value (as Shift+RightMouse).
I want to know whether This can be achieved or not.
This topic didn't teach me to do that:
http://www.theswamp.org/index.php?topic=12813.0Sorry for my bad ability of Expression.