View Single Post
  #37  
Old 08-18-2005, 08:23 PM
tigerite tigerite is offline
Senior Member
 
Join Date: Sep 2004
Posts: 360
Default Re: game controllers V. hot keys for NL

Just press num lock.. or use the advanced script, I'll PM you it.

Changed my mind, I'll post it. Right, when you press + now instead of automatically clicking the button it'll highlight the raise amount, and put numlock ON. To make the raise press ENTER on the numpad.

#InstallKeybdHook force
#SingleInstance force

enterRaiseAction = % false

$NumpadSub::
if % GetEnterRaiseAction()
{
Send, {NumLock}
SetEnterRaiseAction(false)
}
MouseGetPos, , , mouse_win_id

ControlGet, track_visible, Visible, , msctls_trackbar321, ahk_id %mouse_win_id%

if track_visible
ControlSend, msctls_trackbar321, {END}, ahk_id %mouse_win_id%

ControlGet, button_visible, Visible, , AfxWnd42s16, ahk_id %mouse_win_id%

if button_visible
Control, Check, , AfxWnd42s16, ahk_id %mouse_win_id%

return

$NumpadEnter::
MouseGetPos, , , mouse_win_id

ControlGet, button_visible, Visible, , AfxWnd42s16, ahk_id %win_id%
enter_raise_action = % GetEnterRaiseAction()

if enter_raise_action and button_visible
{
Send, {NumLock}
SetEnterRaiseAction(false)
Control, Check, , AfxWnd42s16, ahk_id %win_id%
}
else
Control, Check, , AfxWnd42s15, ahk_id %mouse_win_id%

return

$NumpadDot::
$NumpadDel::
if % GetEnterRaiseAction()
{
Send, {NumLock}
SetEnterRaiseAction(false)
}
MouseGetPos, , , mouse_win_id
button_list = 20,19,14

Loop, parse, button_list, `,
{
ControlGet, button_visible, Visible, , AfxWnd42s%A_LoopField%, ahk_id %mouse_win_id%
if button_visible
{
Control, Check, , AfxWnd42s%A_LoopField%, ahk_id %mouse_win_id%
break
}
}

WinGet, confirm_fold_id, ID, Confirm fold ahk_class #32770
if confirm_fold_id <>
Control, Check, , Button2, ahk_id %confirm_fold_id%

return


$NumpadLeft::
CoordMode, Mouse, Screen
MouseMove, 200, 800, 2
CoordMode, Mouse, Relative
return

$LWin::
$NumpadClear::
CoordMode, Mouse, Screen
MouseMove, 1000, 800, 2
CoordMode, Mouse, Relative
return

$Browser_Back::
$NumpadHome::
CoordMode, Mouse, Screen
MouseMove, 200, 200, 2
CoordMode, Mouse, Relative

return

$NumpadUp::
CoordMode, Mouse, Screen
MouseMove, 1000, 200, 2
CoordMode, Mouse, Relative
return

$NumpadRight::
CoordMode, Mouse, Screen

MouseGetPos, mouse_xpos, mouse_ypos

if (mouse_xpos < 1600)
MouseMove, 1800, 800, 2
else if (mouse_xpos < 2400) and (mouse_ypos < 600)
MouseMove, 1800, 800, 2
else if (mouse_xpos > 2400) and (mouse_ypos > 600)
MouseMove, 1800, 800, 2
else
MouseMove, 2600, 800, 2

CoordMode, Mouse, Relative
return

$Browser_Forward::
$NumpadPgUp::
CoordMode, Mouse, Screen
MouseGetPos, mouse_xpos, mouse_ypos

if (mouse_xpos < 1600)
MouseMove, 1800, 200, 2
else if (mouse_xpos < 2400) and (mouse_ypos > 600)
MouseMove, 1800, 200, 2
else if (mouse_xpos > 2400) and (mouse_ypos < 600)
MouseMove, 1800, 200, 2
else
MouseMove, 2600, 200, 2

CoordMode, Mouse, Relative
return

$NumpadAdd::
if % GetEnterRaiseAction()
{
Send, {NumLock}
SetEnterRaiseAction(false)
}
MouseGetPos, , , mouse_win_id
GetRaiseAmount(mouse_win_id)
return


GetRaiseAmount(win_id)
{
Send, {NumLock}

ControlFocus, Edit2, ahk_id %win_id%
SetEnterRaiseAction(true)

return
}

GetEnterRaiseAction()
{
global
return, %enterRaiseAction%
}

SetEnterRaiseAction(status)
{
global
enterRaiseAction = %status%
return
}
Reply With Quote