View Single Post
  #14  
Old 01-12-2007, 02:19 PM
jukofyork jukofyork is offline
Senior Member
 
Join Date: Sep 2004
Location: Leeds, UK.
Posts: 2,551
Default Re: Fix for party auto timebank script?

[ QUOTE ]
I got it! This works now.



#Persistent
#SingleInstance Ignore
#NoEnv

checkfield = AfxWnd42u37 ; AfxWnd42u37 is timebank control
LobbyWindowTitle = Poker Lobby ; identify poker lobby substring
TableWindowTitle = Buy-in. ; identify pokertable substring
interval = 1000 ; period between refreshes

Loop
{
TableIDList(LobbyId())
Sleep %interval%
}

LobbyId()
{
local rid
SetTitleMatchMode 2
WinGet, rid, ID, %LobbyWindowTitle%
return rid
}

TableIDList(lobbyID)
{
local pid,rlist,this_id,name,result
SetTitleMatchMode 2
WinGet, pid, PID, ahk_id%lobbyID%
WinGet, rlist, LIST, %TableWindowTitle% ahk_pid%pid%
Loop %rlist%
{
this_id := rlist%a_index%
If this_id != %lobbyID%
{
WinGetTitle, name, ahk_id%this_id%
ControlGet, result, Visible, , %checkfield%, ahk_id%this_id%
if (result)
{
ControlClick %checkfield%, ahk_id%this_id% ;Click timebank
}
}
}
return
}

[/ QUOTE ]
Just a quick thanks for making this work again! Just moved back to Party today and as luck would have it on the day they added back the 12 table limit, so this is kinda essential now.

Anyway, thanks again - Juk [img]/images/graemlins/smile.gif[/img]
Reply With Quote