#NoEnv
#SingleInstance force
BBs := 50   ;How many BBs to buy in for

WinGet, pid, PID, Full Tilt Poker
WinGet, id, list, ahk_pid%pid%, , Full Tilt Poker
SetTitleMatchMode, 2
If (pid)
{
	;MsgBox, % "Found Lobby"
}
Else
{
	MsgBox, % "Oops, FTP isn't open."
	Exit
}
Loop
{
	WinWait, Get Chips ahk_pid%pid% ahk_class #32770
	WinGet, id, ID

	ControlSetText, FTCMarkupText12,,ahk_class #32770 ahk_id %ID%
	ControlSetText, Button2,,ahk_class #32770 ahk_id %ID%
	ControlClick, Button3, ahk_class #32770 ahk_id %ID%
	ControlGetText, BuyStr, FTCMarkupText2, ahk_class #32770 ahk_id %ID%
	StringGetPos, pos, BuyStr, /
	pos += 1
	StringTrimLeft, MinBuy, BuyStr, %pos%
	BuyStr := Minbuy
	StringGetPos, pos, BuyStr, $
	pos += 1
	StringTrimLeft, MinBuy, BuyStr, %pos%
	buyin = 1
	buyin *= BBs * MinBuy
	ControlSetText, Edit1, %buyin%, ahk_class #32770 ahk_id %ID%
	ControlSend, FTCSkinButton1, {space}, ahk_class #32770 ahk_id %ID%
}