|
#1
|
|||
|
|||
Ongame AHK Scripts
Anyone of you using a BetPot Script and Reload chips Script for Ongame - hate their f**** Software - every now and then there is a misclick or a sit out because of the crappy reload function. How do you deal with that ongamers ?
|
#2
|
|||
|
|||
Re: Ongame AHK Scripts
<font class="small">Code:</font><hr /><pre> #NoEnv
#SingleInstance force SendMode Input SetWorkingDir %a_scriptDir% SetBatchLines -1 ; BetPot: mbeess@gmail.com ; Reload + fixes: TCEgor@gmail.com ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~ ~MButton:: handlebetting(1/1, 1) ; pot, auto bet return ~XButton1:: handlebetting(3/4, 1) ; pot, auto bet return ~F6:: handlebetting(1/2, 1) ; pot, auto bet return !RButton:: reload() return ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~ ; VERSION 0.3 ;#### reload reload() { ; rep1 := "," ; rep2 := "." ; bb := getbb(win) ; MsgBox, %bb% ; buyin := bb * amount ; stringreplace, buyin, buyin, %rep2% , %rep1% ; MsgBox, %buyin% Wingetactivetitle, title DetectHiddenText, Off Ifinstring, title, Money { SitOut: ControlClick Button7, %title% Sleep 100 IfWinNotExist %title%, Click on SIT IN to be dealt in. { GoTo, SitOut } Cashier: ControlClick Button10, %title% Sleep 100 IfWinNotExist %title%, How much of your { GoTo, Cashier } ; ControlClick RichEdit20W2, %title% ; ControlSetText, RichEdit20W2, , %title% ; SendPlay % buyin ; Sleep 100 SitIn: ControlClick Button12, %title% Sleep 100 IfWinNotExist %title%, Please wait to be dealt in { GoTo, SitIn } } } ;#### handlebetting handlebetting(size = 1, autobet = 0) { amount := fullamount(win) * size + callamount(win) transform, amount, round, amount, 1 Wingetactivetitle, title Ifinstring, title, Money { bet(win, amount, autobet) } } ;#### bet bet(win, amount, autobet) { rep1 := "," rep2 := "." Wingetactivetitle, title stringreplace, amount, amount, %rep2% , %rep1% WinActivate ControlClick, RichEdit20W3, %title% ControlSetText, RichEdit20W3, , %title% SendPlay % amount Sleep 100 } ;#### get small blind getsb(win) { rep1 := "," rep2 := "." Wingetactivetitle, title StringTrimLeft, title, title, InStr(title, "$", 0, 0) StringLeft, sb, title, InStr(title, "-") - 1 stringreplace, sb, sb, %rep1% , %rep2% return sb } ;#### get big blind getbb(win) { rep1 := "," rep2 := "." Wingetactivetitle, title StringTrimLeft, title, title, InStr(title, "$", 0, 0) StringLeft, bb, title, InStr(title, a_space) - 1 stringreplace, bb, bb, %rep1% , %rep2% return bb } ;#### get pot getpot(win) { rep1 := "," rep2 := "." Wingetactivetitle, title ControlGetText, pot, AfxWnd70u54, %title% StringTrimLeft, pot, pot, InStr(pot, "$") stringreplace, pot, pot, %rep1% , %rep2% return pot } ;#### get obet getobet(win) { rep1 := "," rep2 := "." Wingetactivetitle, title ControlGetText, obet, AfxWnd70u53, %title% StringTrimLeft, obet, obet, InStr(obet, "$") stringreplace, obet, obet, %rep1% , %rep2% return obet } ;#### get cost getcost(win) { rep1 := "," rep2 := "." Wingetactivetitle, title ControlGetText, cost, AfxWnd70u58, %title% if (ErrorLevel) { cost := 0 return } StringTrimLeft, cost, cost, InStr(cost, "$") stringreplace, cost, cost, %rep1% , %rep2% return cost } ;#### fullamount fullamount(win) { Wingetactivetitle, title pot := getpot(win) tocall := callamount(win) Setformat, float, 0.2 fullamount := pot + tocall return fullamount } ;#### callamount callamount(win) { cost := getcost(win) Setformat, float, 0.2 Wingetactivetitle, title DetectHiddenText, Off IfWinNotExist %title%, Cost: { callamount:=0 return callamount } callamount:=cost return callamount } </pre><hr /> I used this while playing on ongame, worked perfect. To bet full pot, click mouse3(the mwheel) and for 3/4 pot mouse4 (i have two extra buttons on the left side of my mouse) If you want to reload make sure you have folded ur hand, otherwise it will hang in a loop. To reload hold alt and press your right mouse button. PS: I cant remember who created this, but credits go to that guy [img]/images/graemlins/tongue.gif[/img] |
|
|