KeyTrap has SendInput implementation of "*Keys", however, MouseTrap
does not have the corresponding one of "*Mouse" unfortunately. So, I
wrote one.
1) Mouse-Buttons: .SendInput(vk,up)
vk is 1, 2, 4, 5, 6 for left, right, middle, xbutton1, xbutton2
up is 0 for button down, 1 for button up
2) Wheel-Scroll: .SendInput(0,n)
n is a positive integer for scroll-up, negative for scroll-down
3) Mouse-Move: .SendInput(xm,ym,ab)
xm, ym are integers, and "case-sensitive" ab can take"m" or "M":
"m" corresponds *Mouse mo xm ym
"M" corresponds *Mouse ab xm ym, and supports Multi-Monitors
----------- SendMouse.PowerPro ------------------------
if(stricoll("m",arg(3)))do
args vk,up,in
in=dll.create_struct("ui i i ui ui ui ui",0,0,0,;;+
vk/5*(vk%5+1)+not(vk)*up*120,;;+
(2*(1-vk/5)*vk*vk+vk/5*128)*(up+1)+not(vk)*2048,0,0)
else
args xm,ym,ab,in
ab=strcoll("m",ab)
in=dll.create_struct("ui i i ui ui ui ui",0,;;+
eval(ifelse(ab,?'(xm-Win.GetSystemMetrics(76));;+
*65535/Win.GetSystemMetrics(78)',"xm")),;;+
eval(ifelse(ab,?'(ym-Win.GetSystemMetrics(77));;+
*65535/Win.GetSystemMetrics(79)',"ym")),;;+
0,1|0xC000*ab,0,0)
endif
dll.call("SendInput|ui t* i",1,in,28)
quit
-------------------------------------------------------
Sean
Attention: PowerPro's Web site has moved: http://www.ppro.org
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/power-pro/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
