Tableninja should do it i think, but you can test my script (Ctrl+r - register, Ctrl+u - unregister):
Code:
#SingleInstance
#NoEnv
#Persistent
SetTitleMatchMode 2
relFTClientPoint(id, ByRef x, ByRef y)
{
SysGet, xbord, 32
SysGet, ybord, 33
SysGet, cap, 4
WinGetPos, , , w, h, ahk_id%id%
w := w - (2*xbord)
h := h - (2*ybord) - cap
Transform, X, Round, W*x
Transform, Y, Round, H*y
}
PostLeftClick(x, y, table_id, activate=1) {
; ### JUK: Send the down left click, then the mouse-up messages.
; NOTE: This is relative to the top left of the client area and NOT the top left of the
; window (ie: It *doesn't* include the title-bar like AHK's MouseClick does!!!).
If activate
WinActivate, ahk_id%table_id%
PostMessage, 0x201, 0x0001, ((y<<16)^x), , ahk_id%table_id%
PostMessage, 0x202 , 0, ((y<<16)^x), , ahk_id%table_id%
}
^r::
ifwinactive, ahk_class QWidget
{
winget,id,id, A
ControlGet, v, Visible, , QWidget1, ahk_id%id%
if v
{
back_x :=0.9080
back_y :=0.7357
relFTClientPoint(id, back_x, back_y)
PostLeftClick(back_x, back_y, id, 0)
winwait,Tournament Buy-in,,4
if not errorlevel
{
winget,id,id, Tournament Buy-in
back_x :=0.3608
back_y :=0.4876
relFTClientPoint(id, back_x, back_y)
PostLeftClick(back_x, back_y, id, 0)
ifwinExist,Full Tilt Poker - Tournament
{
wingetpos,,,w,,Full Tilt Poker - Tournament
if (w>600) and (w<1000)
winclose,Full Tilt Poker - Tournament
}
}
}
}
return
^u::
ifwinactive, ahk_class QWidget
{
winget,id,id, A
ControlGet, v, Visible, , QWidget1, ahk_id%id%
if v
{
back_x:=0.9080
back_y:=0.6709
relFTClientPoint(id, back_x, back_y)
PostLeftClick(back_x, back_y, id, 0)
winwaitactive,Full Tilt Poker - Tournament,,4
if not errorlevel
{
winget,id,id, Full Tilt Poker - Tournament
back_x :=0.8876
back_y :=0.0776
relFTClientPoint(id, back_x, back_y)
PostLeftClick(back_x, back_y, id, 0)
winwait,Tournament Buy-in,,0.5
if not errorlevel
{
winclose,Tournament Buy-in
ifwinexist, Full Tilt Poker - Tournament
wingetpos,,,w,, Full Tilt Poker - Tournament
if (w>600) and (w<1000)
winclose, Full Tilt Poker - Tournament
}
else
{
winwait, Full Tilt Poker,,4
if not errorlevel
winclose,Full Tilt Poker
ifwinexist, Full Tilt Poker - Tournament
wingetpos,,,w,h, Full Tilt Poker - Tournament
if (w>600) and (w<1000)
winclose, Full Tilt Poker - Tournament
}
}
}
}
return
