Twenty two years later I ask the same question, is it really not possible to code a function in lisp that utilizes scrolling of the mouse wheel? Like for example rotating a block 90 degrees when turning the mouse wheel.
Twenty two years later I ask the same question, is it really not possible to code a function in lisp that utilizes scrolling of the mouse wheel? Like for example rotating a block 90 degrees when turning the mouse wheel.
Yes, I think you can do a lot with (grread).
I have a decades old program that takes all its input from grread, though I never figured out how to interpret a menu pick.
But for just a mouse wheel it must rely on setvars like VIEWCTR and others (as I recall).
Sadly, I'm not aware of using the mouse wheel to rotate an object.
In many ways I'm still stuck in the dark ages.
Can you teach me? Maybe then I can help you.
John F. Uhden
Yes, I think you can do a lot with (grread).
I have a decades old program that takes all its input from grread, though I never figured out how to interpret a menu pick.
But for just a mouse wheel it must rely on setvars like VIEWCTR and others (as I recall).
Sadly, I'm not aware of using the mouse wheel to rotate an object.
In many ways I'm still stuck in the dark ages.
Can you teach me? Maybe then I can help you.
John F. Uhden
@jakob_holmquist @john.uhden Since the scroll wheel is zoom I don't think GRREAD can detect it. It would generate a code 5 (point) since the cursor is technically moving.
Quick test:
(while (and (setq a (grread t 15 1)) (not (member (cadr a) '(13))) (not (member (car a) '(3 25))))
(print a)
)
@jakob_holmquist @john.uhden Since the scroll wheel is zoom I don't think GRREAD can detect it. It would generate a code 5 (point) since the cursor is technically moving.
Quick test:
(while (and (setq a (grread t 15 1)) (not (member (cadr a) '(13))) (not (member (car a) '(3 25))))
(print a)
)
Can't find what you're looking for? Ask the community or share your knowledge.