My PokerStars SNG AHK script

[Mike MacIntosh]

Is this script 100% operational now?

[HoRRoR]

any updates with new stars upgrades ?

[RexWoo]

It works well for me except the registration does only work 80% of the time and the "all in" is not OK as my table are resized. I think it could be possible to adjust the script to the resized window but it would be a bit of work

[Paul B.]

[ QUOTE ]
It works well for me except the registration does only work 80% of the time and the "all in" is not OK as my table are resized. I think it could be possible to adjust the script to the resized window but it would be a bit of work

[/ QUOTE ]

Oh, I fixed those a while ago but never posted the update. Here:

[ QUOTE ]

#NoEnv
#Persistent
#SingleInstance force
#Include E:\gambling\Software\PokerStars\Functions.ahk

Loop
{
AutoRegister()
NoMsgBox()
}

^1:: ;__Cascades tables
PostStarsClick(450, 60, ExFromList(tablesStars()))
SendPlay c
return

^2:: ;__Closes tournament lobbies
CloseTournamentLobby()
return

~MButton:: ;__Pushes all-in
MouseGetPos,,, curWin
ControlSetText, Edit7, 999999, ahk_id%curWin%
return



~RButton::
WinGet,id,,A
WinGetTitle, title, ahk_id%id%

IfInString, title, No Limit Hold'em
{
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
Transform, RaiseAmount, Round, Bigblind * 2.5

MouseGetPos,,, curWin
ControlSetText, Edit7, %RaiseAmount%, ahk_id%curWin%
}
return




Autoregister()
{
SetTitleMatchMode 2
IfWinExist, Tournament Registration
{
WinGet, winID, ID, Tournament Registration
ControlClick, Button1, ahk_id %winID%

Loop
{
SetTitleMatchMode 2
ControlGet, chk, Checked, , Button1, ahk_id %winID%
if chk
break
ControlClick, Button1, ahk_id %winID%
}
ControlClick, Button4, ahk_id %winID%
}
}

CloseTournamentLobby()
{
Loop
{
SetTitleMatchMode 2
IfWinExist, Lobby,, PokerStars Lobby
WinClose
else
break
}
}

NoMsgBox()
{
IfWinExist, PokerStars, Registered
WinClose, PokerStars, Registered
IfWinExist, PokerStars, Unregistered
WinClose, PokerStars, Unregistered
IfWinExist, PokerStars, Registration closed
WinClose, PokerStars, Registration closed
IfWinExist, PokerStars, Welcome to tournament
WinClose, PokerStars, Welcome to tournament
IfWinExist, PokerStars, You finished the tournament
WinClose, PokerStars, You finished the tournament
IfWinExist, PokerStars, You have won
WinClose, PokerStars, You have won
IfWinExist, PokerStars, You have been moved
WinClose, PokerStars, You have been moved
return
}


[/ QUOTE ]

I'm not sure if this works with the recent update, and you need to change the Functions.ahk to the directory where yours is. The script also raises to 2.5x when you right-click.

[RexWoo]

Thank you so much

[ QUOTE ]
The script also raises to 2.5x when you right-click.

[/ QUOTE ]

+ this is awesome if it works. gg.

[Finnisher]

e2 - all in and 2.5x work but auto-register loops on the register window never pushing the "OK". And the message boxes don't close either.

[ QUOTE ]
I think it could be possible to adjust the script to the resized window but it would be a bit of work

[/ QUOTE ]
Suzzer did that and explained it in the [censored] thread: http://forumserver.twoplustwo.com/showfl...908#Post9170908

[Finnisher]

Some of the msg boxes won't close anymore after today's update. I changed the script and now have:

NoMsgBox()
{
IfWinExist, PokerStars, OK
WinClose
IfWinExist, PokerStars, Internal
Sleep 500
WinClose, PokerStars, Internal
return
}

which seems to work. I have no idea what the internal thing is but it was in the first version and I'm still using a modified version of it.

[Chipchucker5]

Handsome (or anyone else that could fix this),

Stars just did a software upgrade and now there are a couple (the one at the beginning of the tourny and the one at the end when you bust out or win) annoying pop-up boxes that don't get closed by the script. Anyone know how to fix this? Help would be appreciated.

Thanks,
Chipchucker

[Finnisher]

My previous post has the fix I did. I combined the two scripts and it works goot:

[ QUOTE ]
#NoEnv
#Persistent
#SingleInstance force
#Include %a_scriptDir%
#Include Functions.ahk

interval = 100 ; period between refreshes

Loop
{
AutoRegister()
NoMsgBox()
Sleep %interval%
}

F1:: ;__Cascades tables
PostStarsClick(450, 60, ExFromList(tablesStars()))
SendPlay c
return

F2:: ;__Closes tournament lobbies
CloseTournamentLobby()
return

~MButton:: ;__Pushes all-in
MouseGetPos,,, curWin
ControlSetText, Edit7, 999999, ahk_id%curWin%
return

~RButton::
WinGet,id,,A
WinGetTitle, title, ahk_id%id%

IfInString, title, No Limit Hold'em
{
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
Transform, RaiseAmount, Round, Bigblind * 2.5

MouseGetPos,,, curWin
ControlSetText, Edit7, %RaiseAmount%, ahk_id%curWin%
}
return


Autoregister()
{
SetTitleMatchMode 2
IfWinExist, Tournament Registration
ControlClick, Button1
ControlClick, OK
}

CloseTournamentLobby()
{
Loop {
SetTitleMatchMode 2
IfWinExist, Lobby,, PokerStars Lobby
WinClose
else
break
}
}

NoMsgBox()
{
IfWinExist, PokerStars, OK
WinClose
IfWinExist, PokerStars, Internal
Sleep 500
WinClose, PokerStars, Internal
return
}


[/ QUOTE ]

[Chipchucker5]

Thanks Finnisher. Does this script have any additions or does it do anything differently than the original?