#SingleInstance, Force
#NoEnv
SetTitleMatchMode, 2


Tourn_List:= GetRegisteredTourns()

Running = 0
Tourns_regd = 0
Tables_Open = 0
Tables_Not_Open := ""
Loop, parse, Tourn_List, `n, `r
{
 Tourns_regd += 1
 StringLeft, Tourn_No, A_LoopField, 9
 StringGetPos, This_is_Running, A_LoopField, (Running)
 IF(This_is_Running > 0)
 {
	Running += 1
	WinGet, This_Table_is_Open, count, %Tourn_No%, ,Lobby
	IF(This_Table_is_Open = 0)
	{
		Tables_Not_Open = %Tables_Not_Open%%Tourn_No%`r`n
	}
	ELSE
	{
		Tables_Open += 1
	}


 }

 
}

msgbox, Registered: %Tourns_regd%`r`nRunning: %Running%`r`nOpen: %Tables_Open%`r`nThe following tables are not open:`r`n%Tables_Not_Open%


return


GetRegisteredTourns() {
  WinMenuSelectItem, PokerStars Lobby,, Requests, Registered In Tournaments
  WinWait, Registered In Tournaments ahk_class #32770, , 10
  WinGet, ritw, id
  ControlGetText, nf, Button1, ahk_id%ritw%
  ControlGet, Tlist, List,, ListBox1, ahk_id%ritw%
  ControlFocus, Button2, ahk_id%ritw%
  Sleep, -1
  ControlSend, Button2, {Space}, ahk_id%ritw%
  Return tlist
 }