[smoore]

roland over on 2+2 took another poster's idea and ran with it (Software forum, "fastest NLHE script I've ever tried" or something thread). What resulted is this script that allows you to control the Party/PokerStars/FullTilt bet slider with your mousewheel. I think he had some Absolute support working partially recently. I love it because I don't want to use the keyboard to put my bets in and this allows you to increment your bet by a sb instead of a bb. Add in the fact that party's slider is basically uncontrollable when you try to make clicks next to it and I consider this neccesary equipment now.

The only problem I've found with it is that it kills the ability to use the scrollwheel in FullTilt's lobby. Dunno why and I'm no programmer. The first line is the line that determines how many decimals to show, I don't know exactly how to change it but if you only play tournaments or 1/2 NLHE and up it'd be worth messing around with. It currently shows two decimals.

You need AutoHotKey, a free scripting program. Once you have that installed, copy the below code into a new text document and save it as wheelbet.ahk The name isn't important but the .ahk is. Now, when you doubleclick on wheelbet.ahk you'll be running this script. A small H icon will appear in your tooltray. Rightclick on that icon to choose exit if you want to quit it. I just fire it up from Start -> All Programs -> Startup and let it run the whole time.

Have fun!

SetFormat, float, 0.2
SetTitleMatchMode 2
GroupAdd, tables, Good Luck,,, PartyPoker.com
GroupAdd, tables, Logged In as,,, PokerStars Lobby
GroupAdd, tables, Logged In As,,, PokerStars Lobby
return

#IfWinActive ahk_group tables
WheelUp::
WinGet,id,,A
SetText(id,"up")
return

WheelDown::
WinGet,id,,A
SetText(id,"down")
return

SetText(win, dir)
{
WinGetTitle, title, ahk_id%win%
WinGetClass, class

If (InStr(title, "Logged In as") AND class <> "FTC_TableViewFull")
{
If (InStr(title, "No Limit") <> 0 AND InStr(title, "Tournament") = 0) ;___if "NL" is in the title but "Tournament" isn't...
StringMid, bb, title, InStr(title, "/") + 1, InStr(title, a_space,"", InStr(title, "/")) - InStr(title, "/") - 1 ;___retrieve the big blind
else if (InStr(title, "No Limit") <> 0 AND InStr(title, "Tournament") <> 0) ;___else this is a tourney
{
StringMid, bb, title, InStr(title, "/", "", InStr(title, "Blinds")) + 1
, InStr(title, a_space, "", InStr(title, "Blinds") + 8) - InStr(title, "/", "", InStr(title, "Blinds")) - 1 ;___so we retrieve the big blind instead
}
edit_num = 6
}
else If (class = "FTC_TableViewFull")
{
StringMid, bb, title, InStr(title, "/") + 1, InStr(title, a_space,"", InStr(title, "/")) - InStr(title, "/") - 1
edit_num = 1
}

else
{
If (InStr(title, "NL") <> 0 AND InStr(title, "Buy-in") = 0) ;___if "NL" is in the title but "Buy-in" isn't...
{
StringMid, bb, title, InStr(title, "-","", 0) + 2, InStr(title, ".") - InStr(title,"-", "", 0) - 4 ;___retrieve the big blind
}
else if (InStr(title, "NL") <> 0 AND InStr(title, "Buy-in") <> 0) ;___else this is a tourney
{
ControlGetText, text, Static5, %title%
IfNotInString, text, Blinds-Antes
StringMid, bb, text, InStr(text, "/") + 1, InStr(text, ")") - InStr(text, "/") - 1 ;___so we retrieve the big blind from the static instead
else
StringMid, bb, text, InStr(text, "/") + 1, InStr(text, "-","",InStr(text, "/")) - InStr(text, "/") - 1
}
edit_num = 2
}
StringReplace,bb,bb,$,,1
If bb is space ;___this is for .25/.50 or .50/1 tables; "space" means whitespace (spaces, tabs, linefeeds..)
{
IfInString, title, 50.
bb = .50
else
bb = .25
}
ControlGetText, t, Edit%edit_num%, %title% ;___retrieve the text from the edir next to the slider
If bb = .25
sb := .10
else if bb = 15
sb = 10
else if bb = 0.05
sb = 0.02
else
sb := bb/2

If dir = up
t := t + sb
else
t := t - sb
If t >= 0
ControlSetText, Edit%edit_num%, %t%, %title%
}

[jk2587]

thanks for the heads up... i havent been on the 2+2 forums in a while, this script is great though, would have been a shame to miss it.
thanks again