StarsHotkeys - AHK
01-14-2009
, 11:03 PM
Introducing bet sizing based on the size of the big blind. I added a new tab to reflect this, it's pretty self explanatory. I figure the most common use of this will be for traditional sngs so I added the first 10 levels of the sng structure as the default. Here's what my settings look like.
Let me know what you think, here's the code:
Note: I haven't added in the latest changes fixing the Auto Refresh Tab from wickss. Maybe he can add those in.
Edit: All my additions have an Added by Amerzel comment next to the them.
Let me know what you think, here's the code:
Code:
;StarsHotkeys V1.006.1a
;added border by merging portions of TableNavigator - thanks to Wickss + Original Authors of TableNavigator - CheeseMoney
; #SingleInstance ignore
#SingleInstance, force ; changed by CheeseMoney - allows script to be reloaded
;#NoEnv
SetTitleMatchMode RegEx
#Include NextWindow.ahk
SysGet, border, 32 ; added by CheeseMoney - needed for PostStarsClick
SysGet, caption, 4 ; added by CheeseMoney - needed for PostStarsClick
caption := border + caption ; added by CheeseMoney - needed for PostStarsClick
SendHotKeyOnlyWhenStarsIsActive = 0 ; added by CheeseMoney - needed for PostStarsClick
debug = 0
;VxE's Joystick Watch Script
; thread here http://www.autohotkey.com/forum/viewtopic.php?t=26659&highlight=dpad
JoystickRefreshTime := 5
; EnableJoyMovement = 1
Menu, Tray, NoStandard
Menu, TRAY, Add, Settings, Settings
Menu, TRAY, Default, Settings
Menu, TRAY, Add, Reload, Reload
Menu, TRAY, Add, Edit, Edit ; added by CheeseMoney for easy script editing
Menu, TRAY, Add, Exit, Quit
GroupAdd, PSTables, ahk_class PokerStarsTableFrameClass
ReadIni()
DefineHotKeys()
If (EnableJoyMovement)
SetTimer, WatchAxis, %JoystickRefreshTime%
Loop {
IsTableNew()
IfWinExist Tournament Registration
AutoRegister()
If CheckWhenFree
CheckWhenFree()
If CloseMsgBox
AutoCloseMessageBox()
ClickImBack()
If activatetableundermouse
activatetableundermouse()
;highlightactivetable = 1
If highlightactivetable ; added by CheeseMoney
HighLight() ; added by CheeseMoney - may rewrite as a timer in future versions
Sleep 50 ; reduced from 100 by CheeseMoney - lower #'s use more CPU & refresh more often... can affect highlighter response time
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;JOYSTICK SECTION;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;; monitor Joystick and send fake F-key - program then waits ;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;; for these hotkeys and acts on them for table navigation ;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; VxE's Joystick Watch Script
; thread here http://www.autohotkey.com/forum/viewtopic.php?t=26659&highlight=dpad
WatchAxis:
GetKeyState, JoyX, JoyX ; Get position of X axis.
GetKeyState, JoyY, JoyY ; Get position of Y axis.
KeyToHoldDownPrev := KeyToHoldDown
YKeyToHoldDownPrev := YKeyToHoldDown
; KeyToHoldDown := ( JoyX > 70 ? "F15" : ( JoyX < 30 ? "F13" : "" ))
; YKeyToHoldDown := ( JoyY > 70 ? "F16" : ( JoyY < 30 ? "F14" : "" ))
KeyToHoldDown := ( JoyX > 70 ? NextWindow_Right_Alt1 : ( JoyX < 30 ? NextWindow_Left_Alt1 : "" ))
YKeyToHoldDown := ( JoyY > 70 ? NextWindow_Down_Alt1 : ( JoyY < 30 ? NextWindow_Up_Alt1 : "" ))
if ( YKeyToHoldDown != YKeyToHoldDownPrev )
Send % "{blind}" . (( YKeyToHoldDownPrev ? "{" . YKeyToHoldDownPrev . " up}" : "" ) . ( YKeyToHoldDown ? "{" . YKeyToHoldDown . " down}" : "" ))
if ( KeyToHoldDown != KeyToHoldDownPrev )
Send % "{blind}" . (( KeyToHoldDownPrev ? "{" . KeyToHoldDownPrev . " up}" : "" ) . ( KeyToHoldDown ? "{" . KeyToHoldDown . " down}" : "" ))
if (Debug)
; traytip,,NextWindow_Up_Alt1: %NextWindow_Up_Alt1%
return
;-----------------------------------------------------------------------------------------------------
IsTableNew()
{
global
WinGetActiveTitle, T
StringTrimRight, T, T, 1
If (T<>Oldtitle)
{
IfWinActive ahk_class PokerStarsTableFrameClass
{
If Autoopeninfo
{
WinGetPos, A, B, X, Y, A
CX:=X*0.27
CY:=Y*0.77
ControlClick,x%CX% y%CY%,A,,,,NA
}
If autorefreshinfo
PostMessage,0xc800,0x32,,,A
If MouseJump
{
WinGetPos, A, B, X, Y, A
MouseMove (X*0.5),(Y*0.5), 1
If SendCtrl
Send {Ctrl}
}
}
Oldtitle =%T%
}
}
;-----------------------------------------------------------------------------------------------------
activatetableundermouse()
{
If winactive("ahk_class PokerStarsTableFrameClass") or winactive("PokerStars Lobby")
{
MousegetPos,,,WinID
WinGetClass, class, ahk_id %WinID%
WinGetTitle, title, ahk_id %WinID%
if (class="PokerStarsTableFrameClass") or (instr(title,"PokerStars Lobby"))
winactivate, ahk_id %WinID%
}
}
return
;-----------------------------------------------------------------------------------------------------
AutoRegister()
{
global
If AutoRegister
{
;WinActivate Tournament Registration ; REmoved by CheeseMoney 12-6-08
Control, Check,,Button1, Tournament Registration
ControlClick, OK, Tournament Registration
}
}
return
;-----------------------------------------------------------------------------------------------------
CheckWhenFree()
{
IfWinExist, PokerStars, Check
{
ControlClick, Check
}
return
}
;-----------------------------------------------------------------------------------------------------
AutoCloseMessageBox()
{
SetTitleMatchMode, 3
IfWinExist, PokerStars,OK
WinClose
IfWinExist,ahk_class #32770,OK
{
WinGetTitle, title,
Needle:=" "
StringGetPos,pos, title,%Needle%
If pos>=0
{
settitlematchmode, 2
StringLeft, tablename, title, %pos%
tname:="Tournament " . tablename
IfWinExist, %tname%,
ControlClick, OK, %title%,OK
}
}
SetTitleMatchMode RegEx
return
}
;-----------------------------------------------------------------------------------------------------
Suspend:
Suspend
return
;-----------------------------------------------------------------------------------------------------
Cascade:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
Loop
{
SendInput C
sleep 100
ifwinactive, Options
winactivate, Options
else
break
}
return
;-----------------------------------------------------------------------------------------------------
Tile:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
Loop
{
SendInput T
sleep 100
ifwinactive, Options
winactivate, Options
else
break
}
return
;-----------------------------------------------------------------------------------------------------
Layout1:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 4}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout2:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 5}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout3:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 6}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout4:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 7}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout5:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 8}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout6:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 9}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout7:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 10}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
Layout8:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick,x%CX% y%CY%,ahk_id %WinID%,,,,NA
Loop
{
WinWait, Options
Winactivate, Options
SetControlDelay, -1
ControlClick, Button13, Options,,,,NA
sleep 100
Send {down 11}
Send {Enter}
WinWaitClose, Options,,1
If (!ErrorLevel)
Break
}
return
;-----------------------------------------------------------------------------------------------------
CloseTournamentLobbies:
GroupAdd, Lobbies, Tournament.*Lobby
GroupClose Lobbies, A
return
;-----------------------------------------------------------------------------------------------------
SaveHandHistory:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
WinWait, Options
SetControlDelay, -1
ControlClick, Button5, Options,,,,NA
WinWait, Instant Hand History,, 3
WinActivate, Instant Hand History
ControlFocus, PokerStarsViewClass1, Instant Hand History
send ^a
send ^c
FileAppend `n, %A_Desktop%\pokerstarsHH.txt
FileAppend %Clipboard%, %A_Desktop%\pokerstarsHH.txt
WinClose, Instant Hand History
return
;-----------------------------------------------------------------------------------------------------
HHSaveHandHistory:
ControlFocus, PokerStarsViewClass1, Instant Hand History
send ^a
send ^c
FileAppend `n, %A_Desktop%\pokerstarsHH.txt
FileAppend %Clipboard%, %A_Desktop%\pokerstarsHH.txt
return
;-----------------------------------------------------------------------------------------------------
ToggleMouseJump:
If (MouseJump=true)
{
MouseJump:=false
T=Off
}
else
{
MouseJump:=true
T=On
}
Gui, 2:Add, Text,, MouseJump: %T%
Gui, 2:+ToolWindow
Gui, 2:Show, w110 h20
Sleep, 1000
Gui, 2:Destroy
return
;-----------------------------------------------------------------------------------------------------
FindTableToAct:
WinGet, V, List, ahk_class PokerStarsTableFrameClass
Loop, %V%
{
Y:=V%A_Index%
ControlGet, Z, Visible,,PokerStarsSliderClass1, ahk_id %Y%
WingetTitle, T, ahk_id %Y%
If Z
{
WinActivate, ahk_id %Y%
Break
}
}
return
;-----------------------------------------------------------------------------------------------------
ActivateNextWindow:
WinGetActiveTitle, OldActiveTitle
WinGetClass, ActiveClass, %OldActiveTitle%
If (ActiveClass = "PokerStarsTableFrameClass") || !(SendHotkeyOnlyWhenStarsIsActive)
Send !{Esc}
WinGetActiveTitle, NewActiveTitle
WinGetClass, ActiveClass, %NewActiveTitle%
If (ActiveClass != "PokerStarsTableFrameClass") {
traytip,,Activating Old Window, 10
WinActivate %OldActiveTitle%
}
; traytip
return
;-----------------------------------------------------------------------------------------------------
ActivateBottomWindow:
GroupActivate, PSTables
return
;-----------------------------------------------------------------------------------------------------
IncreaseBet125:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
ControlGetText MinRaiseAmount, PokerStarsSliderEditorClass1, ahk_id %WinID%
Transform, RawRaiseAmount, Round, MinRaiseAmount*1.25, 2
RaiseAmount:=RoundNum(RawRaiseAmount)
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
return
;-----------------------------------------------------------------------------------------------------
FocusBetBox:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
Winactivate, ahk_id %WinID%
ControlSetText, PokerStarsSliderEditorClass1,,ahk_id %WinID%
ControlFocus, PokerStarsSliderEditorClass1, ahk_id %WinID%
return
;-----------------------------------------------------------------------------------------------------
Fold:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
KeyWait, %A_ThisHotkey%, T.5
If errorlevel
{
;Soundplay, *16
return
}
FoldStars(WinID) ; added by CheeseMoney
/*
Winactivate, ahk_id %WinID%
loop, 3 {
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:= X*0.59
CY:= Y*.94
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
CX:= X*0.52
CY:= Y*.91
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
CX:= X*0.52
CY:= Y*.87
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
sleep, 30
ControlGet, Z, Visible,,PokerStarsSliderClass1, ahk_id %WinID%
If !(Z)
break
}
*/
return
;-----------------------------------------------------------------------------------------------------
; INACTIVE HOTKEYS - WAIT FOR STARS TABLE TO BE ACTIVE BEFORE SENDING HOTKEYS - Added by CheeseMoney 12-5-08
;-----------------------------------------------------------------------------------------------------
FoldInactive:
WinWaitActive, ahk_class PokerStarsTableFrameClass,,4
If Errorlevel
return
Else Gosub Fold
Return
CheckCallInactive:
WinWaitActive, ahk_class PokerStarsTableFrameClass,,4
If (Errorlevel)
return
Else Gosub CheckCall
Return
RaiseInactive:
WinWaitActive, ahk_class PokerStarsTableFrameClass,,4
If (Errorlevel)
return
Else Gosub Raise
Return
AllInInactive:
WinWaitActive, ahk_class PokerStarsTableFrameClass,,4
If (Errorlevel)
return
Else Gosub AllIn
Return
;-----------------------------------------------------------------------------------------------------
CheckCall:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
KeyWait, %A_ThisHotkey%, T.5
If errorlevel
{
;Soundplay, *16
return
}
CallStars(WinID) ; added by CheeseMoney
/*
loop, 3 {
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:= X*0.756
CY:= Y*.94
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
CX:= X*0.69
CY:= Y*0.87
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
sleep, 30
ControlGet, Z, Visible,,PokerStarsSliderClass1, ahk_id %WinID%
If !(Z)
break
}
*/
return
;-----------------------------------------------------------------------------------------------------
Raise:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
KeyWait, %A_ThisHotkey%, T.5
If errorlevel
{
;Soundplay, *16
return
}
RaiseStars(WinID) ; added by CheeseMoney
/*
Winactivate, ahk_id %WinID%
loop, 3 {
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:= X*0.909
CY:= Y*.94
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
sleep, 30
ControlGet, Z, Visible,,PokerStarsSliderClass1, ahk_id %WinID%
If !(Z)
break
}
*/
return
;-----------------------------------------------------------------------------------------------------
OpenLobby:
WinActivate PokerStars Lobby
WinGetPos, A, B, X, Y, A
MouseMove (X*0.5),(Y*0.5), 4
return
;-----------------------------------------------------------------------------------------------------
FoldToAnyBet:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:= X*0.0213
CY:= Y*.658
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
return
;-----------------------------------------------------------------------------------------------------
IncreaseBet150:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
ControlGetText MinRaiseAmount, PokerStarsSliderEditorClass1, ahk_id %WinID%
Transform, RawRaiseAmount, Round, (MinRaiseAmount*1.5), 2
RaiseAmount:=RoundNum(RawRaiseAmount)
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
return
;-----------------------------------------------------------------------------------------------------
SitOutNext:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.0213
CY:=Y*0.70
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
return
;-----------------------------------------------------------------------------------------------------
SitOutNextAll:
WinGet, id, list, ahk_class PokerStarsTableFrameClass
Loop, %id%
{
ActivateId:= id%A_Index%
WinActivate, ahk_id %ActivateId%
WinGetPos, A, B, X, Y, A
CX:=X*0.0213
CY:=Y*0.70
ControlClick, x%CX% y%CY%, A,,,,NA
}
return
;-----------------------------------------------------------------------------------------------------
AllIn:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
ControlSetText, PokerStarsSliderEditorClass1, 999999, ahk_id %WinID%
If InstantAllin
gosub, raise
return
;-----------------------------------------------------------------------------------------------------
AutoPostBlind:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.0213
CY:=Y*0.738
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
return
;-----------------------------------------------------------------------------------------------------
OpenHHWindow:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
IfWinNotExist, Instant Hand History
{
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.14655
SendInput {Click %CX%, %CY%}
WinWait, Options
SetControlDelay, -1
ControlClick, Button5, Options,,,,NA
}
else
{
WinClose, Instant Hand History
}
return
;-----------------------------------------------------------------------------------------------------
GotoTable:
ControlGet, Black, Visible,, PokerStarsButtonClass1, PokerStars Lobby
If black
{
ControlGet, TLobby, Visible,, PokerStarsButtonClass9, PokerStars Lobby
ControlGet, GotoTablebutton, Visible,, PokerStarsButtonClass10, PokerStars Lobby
If (TLobby=1)
{
ControlClick, PokerStarsButtonClass9, PokerStars Lobby
}
else
{
If (GotoTablebutton=1)
ControlClick, PokerStarsButtonClass10, PokerStars Lobby
}
}
else
{
ControlGet, TLobby, Visible,, PokerStarsButtonClass8, PokerStars Lobby
ControlGet, GotoTablebutton, Visible,, PokerStarsButtonClass9, PokerStars Lobby
If (TLobby=1)
{
ControlClick, PokerStarsButtonClass8, PokerStars Lobby
}
else
{
If (GotoTablebutton=1)
ControlClick, PokerStarsButtonClass9, PokerStars Lobby
}
}
return
;-----------------------------------------------------------------------------------------------------
Register:
ControlGet, Black, Visible,, PokerStarsButtonClass1, PokerStars Lobby
If black
{
ControlGet, Registerbutton, Visible,, PokerStarsButtonClass8, PokerStars Lobby
ControlGet, Unregister, Visible,, PokerStarsButtonClass6, PokerStars Lobby
If (Registerbutton=1)
{
ControlClick, PokerStarsButtonClass8, PokerStars Lobby
}
else
{
If (Unregister=1)
ControlClick, PokerStarsButtonClass6, PokerStars Lobby
}
}
else
{
ControlGet, Registerbutton, Visible,, PokerStarsButtonClass7, PokerStars Lobby
ControlGet, Unregister, Visible,, PokerStarsButtonClass5, PokerStars Lobby
If (Registerbutton=1)
{
ControlClick, PokerStarsButtonClass7, PokerStars Lobby
}
else
{
If (Unregister=1)
ControlClick, PokerStarsButtonClass5, PokerStars Lobby
}
}
return
;-----------------------------------------------------------------------------------------------------
TournamentLobbyRegister:
ControlGet, Register, Visible,, PokerStarsButtonClass6, Tournament.*Lobby
ControlGet, Unregister, Visible,, PokerStarsButtonClass4, Tournament.*Lobby
If (Register=1)
{
ControlClick, PokerStarsButtonClass6, Tournament.*Lobby
}
else
{
If (Unregister=1)
ControlClick, PokerStarsButtonClass4, Tournament.*Lobby
}
return
;-----------------------------------------------------------------------------------------------------
JoinWaitlist:
ControlGet, Black, Visible,, PokerStarsButtonClass1, PokerStars Lobby
If black
{
ControlGet, Join, Visible,, PokerStarsButtonClass4, PokerStars Lobby
ControlGet, Leave, Visible,, PokerStarsButtonClass3, PokerStars Lobby
If (Join=1)
{
ControlClick, PokerStarsButtonClass4, PokerStars Lobby
SetControlDelay -1
ControlClick, Button1, Waiting List
}
else
{
If (Leave=1)
ControlClick, PokerStarsButtonClass3, PokerStars Lobby
}
}
else
{
ControlGet, Join, Visible,, PokerStarsButtonClass3, PokerStars Lobby
ControlGet, Leave, Visible,, PokerStarsButtonClass2, PokerStars Lobby
If (Join=1)
{
ControlClick, PokerStarsButtonClass3, PokerStars Lobby
SetControlDelay -1
ControlClick, Button1, Waiting List
}
else
{
If (Leave=1)
ControlClick, PokerStarsButtonClass2, PokerStars Lobby
}
}
return
;-----------------------------------------------------------------------------------------------------
Cashier:
IfWinExist Cashier
{
WinActivate Cashier
SetControlDelay -1
ControlClick, PokerStarsButtonClass8, Cashier
}
else
{
WinActivate PokerStars Lobby
WinMenuSelectItem, PokerStars Lobby,, Lobby, Cashier...
}
return
;-----------------------------------------------------------------------------------------------------
DecreaseBet20:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
ControlGetText MinRaiseAmount, PokerStarsSliderEditorClass1, ahk_id %WinID%
Transform, RawRaiseAmount, Round, (MinRaiseAmount*.8), 2
RaiseAmount:=RoundNum(RawRaiseAmount)
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
return
;-----------------------------------------------------------------------------------------------------
DecreaseBet33:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
ControlGetText MinRaiseAmount, PokerStarsSliderEditorClass1, ahk_id %WinID%
Transform, RawRaiseAmount, Round, (MinRaiseAmount/3*2), 2
RaiseAmount:=RoundNum(RawRaiseAmount)
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
return
;-----------------------------------------------------------------------------------------------------
ReloadMax:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetPos, A, B, X, Y, ahk_id %WinID%
CX:=X*0.5
CY:=Y*0.145
ControlClick, x%CX% y%CY%, ahk_id %WinID%,,,,NA
WinWait, Options
SetControlDelay, -1
ControlClick, Button4, Options
WinWait, Buy-in,,3
Control, Check,, Button1, Buy-in
ControlClick, Button3, Buy-in
return
;-----------------------------------------------------------------------------------------------------
CloseAllTables:
GroupClose, PSTables, A
Loop
{
WinWait, Table*,,1
WinActivate, Table*
If (ErrorLevel=1)
break
SetControlDelay -1
ControlClick, Button1, Table*
}
return
;-----------------------------------------------------------------------------------------------------
CloseActiveTable:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, Title, ahk_id %WinID%
IfInString Title, Logged In as
SittingAtTable:=true
SetTitleMatchMode 2
WinClose, %Title%
SetTitleMatchMode RegEx
;If SittingAtTable
;{
;WinWaitActive, Table*,,2
;SetControlDelay -1
;ControlClick, Button1, Table*
;}
return
;-----------------------------------------------------------------------------------------------------
BetIncrement1:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, title, ahk_id %WinID%
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
IfInString, Bigblind, -
{
StringTrimRight, Bigblind, Bigblind, 1
}
SetFormat, Float, 0.2
Transform, RaiseAmount, Round, Bigblind * Increment1, 2
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
If Instantxbb
gosub, raise
return
;-----------------------------------------------------------------------------------------------------
BetIncrement2:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, title, ahk_id %WinID%
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
IfInString, Bigblind, -
{
StringTrimRight, Bigblind, Bigblind, 1
}
SetFormat, Float, 0.2
Transform, RaiseAmount, Round, Bigblind * Increment2, 2
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
If Instantxbb
gosub, raise
return
;-----------------------------------------------------------------------------------------------------
BetIncrement3:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, title, ahk_id %WinID%
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
IfInString, Bigblind, -
{
StringTrimRight, Bigblind, Bigblind, 1
}
SetFormat, Float, 0.2
Transform, RaiseAmount, Round, Bigblind * Increment3, 2
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
If Instantxbb
gosub, raise
return
;-----------------------------------------------------------------------------------------------------
BetIncrement4:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, title, ahk_id %WinID%
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
IfInString, Bigblind, -
{
StringTrimRight, Bigblind, Bigblind, 1
}
SetFormat, Float, 0.2
Transform, RaiseAmount, Round, Bigblind * Increment4, 2
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
If Instantxbb
gosub, raise
return
;-----------------------------------------------------------------------------------------------------
BetIncrement5:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, title, ahk_id %WinID%
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
IfInString, Bigblind, -
{
StringTrimRight, Bigblind, Bigblind, 1
}
SetFormat, Float, 0.2
Transform, RaiseAmount, Round, Bigblind * Increment5, 2
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
If Instantxbb
gosub, raise
return
;-----------------------------------------------------------------------------------------------------
NumpadBetAmount:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
StringRight, n, A_ThisHotkey, 1
If A_ThisHotkey=NumpadDot
n:="."
ControlGetFocus, c, ahk_id %WinID%
If c=PokerStarsSliderEditorClass1
ControlSend, PokerStarsSliderEditorClass1, %n%, ahk_id %WinID%
else
{
ControlSetText, PokerStarsSliderEditorClass1,,ahk_id %WinID%
ControlFocus, PokerStarsSliderEditorClass1, ahk_id %WinID%
ControlSend, PokerStarsSliderEditorClass1, %n%,ahk_id %WinID%
}
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Left:
NextWindow_Left("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Right:
NextWindow_Right("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Up:
NextWindow_Up("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Down:
NextWindow_Down("ahk_class PokerStarsTableFrameClass")
return
NextWindow_Left_Alt1:
if (debug)
traytip,,Left_Alt1,2
NextWindow_Left("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Right_Alt1:
if (debug)
traytip,,Right_Alt1,2
NextWindow_Right("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Up_Alt1:
if (debug)
traytip,,Up_Alt1,2
NextWindow_Up("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
NextWindow_Down_Alt1:
if (debug)
traytip,,Down_Alt1,2
NextWindow_Down("ahk_class PokerStarsTableFrameClass")
return
;-----------------------------------------------------------------------------------------------------
; Added by Amerzel
;-----------------------------------------------------------------------------------------------------
BlindBetSizeHotkey:
If ActOnActiveTable
WinGet, WinId, ID, A
else
MousegetPos,,,WinID
WinGetTitle, title, ahk_id %WinID%
Slash := Instr(title, "/") + 2
Space := Instr(title, " ", false, Slash)
BBLength := Space - Slash
StringMid, Bigblind, title, Slash, BBLength
IfInString, Bigblind, -
{
StringTrimRight, Bigblind, Bigblind, 1
}
SetFormat, Float, 0.2
If (Bigblind == BigBlind0)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind0Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind1)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind1Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind2)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind2Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind3)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind3Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind4)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind4Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind5)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind5Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind6)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind6Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind7)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind7Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind8)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind8Amt%, ahk_id %WinID%
else If (Bigblind == BigBlind9)
ControlSetText, PokerStarsSliderEditorClass1, %BigBlind9Amt%, ahk_id %WinID%
else
{
Msgbox, Not Equal
Transform, RaiseAmount, Round, Bigblind * BigBlindDefault, 2
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id %WinID%
}
return
;-----------------------------------------------------------------------------------------------------
RoundNum(x)
{
WinGetTitle, Title, A
IfInString Title, Tournament
{
if X between 0 and 100
R:=5
if X between 100 and 400
R:=10
if X between 400 and 1000
R:=25
if X between 1000 and 3000
R:=50
if X between 3000 and 5000
R:=100
if X between 5000 and 20000
R:=200
if X between 20000 and 100000
R:=500
if X between 100000 and 200000
R:=1000
if X between 200000 and 500000
R:=2000
if X between 500000 and 1000000
R:=5000
if X between 1000000 and 200000000000000
R:=10000
}
else
{
if X between 0 and 1
R:=0.01
if X between 1 and 2
R:=0.05
if X between 2 and 3
R:=0.1
if X between 3 and 10
R:=0.25
if X between 10 and 25
R:=0.5
if X between 25 and 50
R:=1
if X between 50 and 100
R:=2
if X between 100 and 400
R:=5
if X between 400 and 1000
R:=10
if X between 1000 and 5000
R:=25
if X between 5000 and 20000
R:=50
if X between 20000 and 100000000
R:=100
}
SetFormat, float, 0.2
Transform V, Round, (X/R)
N:=(V*R)
return N
}
;-----------------------------------------------------------------------------------------------------
Settings:
Menu, HelpMenu, Add, Help, Help
Menu, HelpMenu, Add, About, About
Menu, Menubar, Add, Help, :HelpMenu
Gui, Menu, MenuBar
;
Gui, Add, Tab, x-4 y0 w500 h750 , Table Hotkeys|Blind Bet Size Hotkey|Other Hotkeys|Options
Gui, Add, Text, x6 y30 w240 h20 , Fold
Gui, Add, Edit, x246 y30 w240 h20 vFold, %Fold%
Gui, Add, Text, x6 y50 w240 h20 , Check/Call
Gui, Add, Edit, x246 y50 w240 h20 vCheckCall, %CheckCall%
Gui, Add, Text, x6 y70 w240 h20 , Raise
Gui, Add, Edit, x246 y70 w240 h20 vRaise, %Raise%
Gui, Add, Text, x6 y90 w240 h20 , All In
Gui, Add, Edit, x246 y90 w240 h20 vAllIn, %AllIn%
Gui, Add, CheckBox, x166 y90 w80 h20 Checked%instantallin% vinstantallin, Instant Bet
Gui, Add, Text, x6 y110 w240 h20 , Increase Bet 25`%
Gui, Add, Edit, x246 y110 w240 h20 vIncreaseBet125, %IncreaseBet125%
Gui, Add, Text, x6 y130 w240 h20 , Decrease Bet 20`%
Gui, Add, Edit, x246 y130 w240 h20 vDecreaseBet20, %DecreaseBet20%
Gui, Add, Text, x6 y150 w240 h20 , Increase Bet 50`%
Gui, Add, Edit, x246 y150 w240 h20 vIncreaseBet150, %IncreaseBet150%
Gui, Add, Text, x6 y170 w240 h20 , Decrease Bet 33`%
Gui, Add, Edit, x246 y170 w240 h20 vDecreaseBet33, %DecreaseBet33%
Gui, Add, Text, x6 y190 w20 h20 , Bet
Gui, Add, Edit, x26 y185 w25 h20 vincrement1, %increment1%
Gui, Add, Text, x51 y190 w40 h20 , x BB
Gui, Add, CheckBox, x166 y190 w80 h20 Checked%instantxbb% vinstantxbb, Instant Bet
Gui, Add, Edit, x246 y190 w240 h20 vBetIncrement1, %BetIncrement1%
Gui, Add, Text, x6 y210 w20 h20 , Bet
Gui, Add, Edit, x26 y205 w25 h20 vincrement2, %increment2%
Gui, Add, Text, x51 y210 w40 h20, x BB
Gui, Add, Edit, x246 y210 w240 h20 vBetIncrement2, %BetIncrement2%
Gui, Add, Text, x6 y230 w20 h20 , Bet
Gui, Add, Edit, x26 y225 w25 h20 vincrement3, %increment3%
Gui, Add, Text, x51 y230 w40 h20, x BB
Gui, Add, Edit, x246 y230 w240 h20 vBetIncrement3, %BetIncrement3%
Gui, Add, Text, x6 y250 w20 h20 , Bet
Gui, Add, Edit, x26 y245 w25 h20 vincrement4, %increment4%
Gui, Add, Text, x51 y250 w40 h20, x BB
Gui, Add, Edit, x246 y250 w240 h20 vBetIncrement4, %BetIncrement4%
Gui, Add, Text, x6 y270 w20 h20 , Bet
Gui, Add, Edit, x26 y265 w25 h20 vincrement5, %increment5%
Gui, Add, Text, x51 y270 w40 h20, x BB
Gui, Add, Edit, x246 y270 w240 h20 vBetIncrement5, %BetIncrement5%
Gui, Add, Text, x6 y290 w240 h20, Send Cursor To Bet Box
Gui, Add, Edit, x246 y290 w240 h20 vFocusBetBox, %FocusBetBox%
Gui, Add, Text, x6 y310 w240 h20 , Fold To Any Bet
Gui, Add, Edit, x246 y310 w240 h20 vFoldToAnyBet, %FoldToAnyBet%
Gui, Add, Text, x6 y330 w240 h20 , Sit Out Next Hand
Gui, Add, Edit, x246 y330 w240 h20 vSitOutNext, %SitOutNext%
Gui, Add, Text, x6 y350 w240 h20 , Sit Out On All Tables
Gui, Add, Edit, x246 y350 w240 h20 vSitOutNextAll, %SitOutNextAll%
Gui, Add, Text, x6 y370 w240 h20 , Open Hand History Window
Gui, Add, Edit, x246 y370 w240 h20 vOpenHHWindow, %OpenHHWindow%
Gui, Add, Text, x6 y390 w240 h20 , Save Hand History
Gui, Add, Edit, x246 y390 w240 h20 vSaveHandHistory, %SaveHandHistory%
Gui, Add, Text, x6 y410 w240 h20 , Rebuy For Full Amount
Gui, Add, Edit, x246 y410 w240 h20 vReloadMax, %ReloadMax%
Gui, Add, Text, x6 y430 w240 h20 , Tile Tables
Gui, Add, Edit, x246 y430 w240 h20 vTile, %Tile%
Gui, Add, Text, x6 y450 w240 h20 , Cascade Tables
Gui, Add, Edit, x246 y450 w240 h20 vCascade, %Cascade%
Gui, Add, Text, x6 y470 w240 h20 , Table Layout 1
Gui, Add, Edit, x246 y470 w240 h20 vLayout1, %Layout1%
Gui, Add, Text, x6 y490 w240 h20 , Table Layout 2
Gui, Add, Edit, x246 y490 w240 h20 vLayout2, %Layout2%
Gui, Add, Text, x6 y510 w240 h20 , Table Layout 3
Gui, Add, Edit, x246 y510 w240 h20 vLayout3, %Layout3%
Gui, Add, Text, x6 y530 w240 h20 , Table Layout 4
Gui, Add, Edit, x246 y530 w240 h20 vLayout4, %Layout4%
Gui, Add, Text, x6 y550 w240 h20 , Table Layout 5
Gui, Add, Edit, x246 y550 w240 h20 vLayout5, %Layout5%
Gui, Add, Text, x6 y570 w240 h20 , Table Layout 6
Gui, Add, Edit, x246 y570 w240 h20 vLayout6, %Layout6%
Gui, Add, Text, x6 y590 w240 h20 , Table Layout 7
Gui, Add, Edit, x246 y590 w240 h20 vLayout7, %Layout7%
Gui, Add, Text, x6 y610 w240 h20 , Table Layout 8
Gui, Add, Edit, x246 y610 w240 h20 vLayout8, %Layout8%
Gui, Add, Button, x205 y645 w40 h20 gSave,Save
Gui, Add, Button, x250 y645 w45 h20 gCancel1,Cancel
Gui, Tab, Other Hotkeys
Gui, Font, S8 CDefault Bold, Verdana
Gui, Add, Text, x6 y30 w240 h20 , Lobby Hotkeys
Gui, Font, S8 CDefault norm, Verdana
Gui, Add, Text, x6 y50 w240 h20 , Open Table or Tournament
Gui, Add, Edit, x246 y50 w240 h20 vGotoTable, %GotoTable%
Gui, Add, Text, x6 y70 w240 h20 , Register/Unregister
Gui, Add, Edit, x246 y70 w240 h20 vRegister, %Register%
Gui, Add, Text, x6 y90 w240 h20 , Waitlist
Gui, Add, Edit, x246 y90 w240 h20 vJoinWaitlist, %JoinWaitlist%
Gui, Add, Text, x6 y110 w240 h20 , Cashier
Gui, Add, Edit, x246 y110 w240 h20 vCashier, %cashier%
Gui, Font, S8 CDefault Bold, Verdana
Gui, Add, Text, x6 y150 w240 h20 , Navigation Hotkeys
Gui, Font, S8 CDefault norm, Verdana
Gui, Add, CheckBox, x230 y150 w240 h20 checked%EnableJoyMovement% vEnableJoyMovement,Enable D-Pad Joystick Table Movement
Gui, Add, Text, x6 y170 w240 h20 , Up
Gui, Add, Edit, x246 y170 w120 h20 vNextWindow_Up, %NextWindow_Up%
Gui, Add, Edit, x366 y170 w120 h20 vNextWindow_Up_Alt1, %NextWindow_Up_Alt1%
Gui, Add, Text, x6 y190 w240 h20 , Down
Gui, Add, Edit, x246 y190 w120 h20 vNextWindow_Down, %NextWindow_Down%
Gui, Add, Edit, x366 y190 w120 h20 vNextWindow_Down_Alt1, %NextWindow_Down_Alt1%
Gui, Add, Text, x6 y210 w240 h20 , Left
Gui, Add, Edit, x246 y210 w120 h20 vNextWindow_Left, %NextWindow_Left%
Gui, Add, Edit, x366 y210 w120 h20 vNextWindow_Left_Alt1, %NextWindow_Left_Alt1%
Gui, Add, Text, x6 y230 w240 h20 , Right
Gui, Add, Edit, x246 y230 w120 h20 vNextWindow_Right, %NextWindow_Right%
Gui, Add, Edit, x366 y230 w120 h20 vNextWindow_Right_Alt1, %NextWindow_Right_Alt1%
Gui, Add, Text, x6 y250 w240 h20 , Activate Next Table
Gui, Add, Edit, x246 y250 w240 h20 vActivateNextWindow, %ActivateNextWindow%
Gui, Add, Text, x6 y270 w240 h20 , Activate Bottom Table
Gui, Add, Edit, x246 y270 w240 h20 vActivateBottomWindow, %ActivateBottomWindow%
Gui, Add, Text, x6 y290 w240 h20 , Find Table Needing Action
Gui, Add, Edit, x246 y290 w240 h20 vFindTableToAct, %FindTableToAct%
Gui, Add, Text, x6 y310 w240 h20 , Open Lobby
Gui, Add, Edit, x246 y310 w240 h20 vOpenLobby, %OpenLobby%
Gui, Font, S8 CDefault Bold, Verdana
Gui, Add, Text, x6 y350 w240 h20 , Miscellaneous Hotkeys
Gui, Font, S8 CDefault norm, Verdana
Gui, Add, Text, x6 y370 w240 h20 , Suspend Hotkeys
Gui, Add, Edit, x246 y370 w240 h20 vSuspend, %Suspend%
Gui, Add, Text, x6 y390 w240 h20 , Close All Tournament Lobbies
Gui, Add, Edit, x246 y390 w240 h20 vCloseTournamentLobbies, %CloseTournamentLobbies%
Gui, Add, Text, x6 y410 w240 h20 , Close Active Table
Gui, Add, Edit, x246 y410 w240 h20 vCloseActiveTable, %CloseActiveTable%
Gui, Add, Text, x6 y430 w240 h20 , Close All Tables
Gui, Add, Edit, x246 y430 w240 h20 vCloseAllTables, %CloseAllTables%
;Gui, Add, Button, x205 y455 w40 h20 gSave,Save
;Gui, Add, Button, x250 y455 w45 h20 gcancel1,Cancel
Gui, Add, Button, x205 y485 w40 h20 gSave,Save ; changed by cheese
Gui, Add, Button, x250 y485 w45 h20 gcancel1,Cancel ; changed by cheese
Gui, Tab, Options
Gui, Add, CheckBox, x6 y30 w480 h20 Checked%MouseJump% vMouseJump, Move Mouse To Active Table
Gui, Add, Text, x26 y50 w220 h20 , Toggle Mouse Jump
Gui, Add, Edit, x246 y50 w240 h20 vTogglemousejump, %Togglemousejump%
Gui, Add, CheckBox, x26 y70 w460 h20 Checked%SendCtrl% vSendCtrl, Send Ctrl After MouseJump
Gui, Add, CheckBox, x6 y90 w480 h20 Checked%AutoRegister% vAutoRegister, AutoRegister for Tournaments
Gui, Add, Text, x26 y110 w220 h20 , Toggle AutoRegister
Gui, Add, Edit, x246 y110 w240 h20 vtoggleautoregister, %toggleautoregister%
Gui, Add, CheckBox, x6 y130 w480 h20 Checked%CloseMsgBox% vcloseMsgBox, AutoClose Messge Boxes
Gui, Add, Text, x26 y150 w220 h20 , Toggle AutoClose
Gui, Add, Edit, x246 y150 w240 h20 vToggleCloseMsgBox, %ToggleCloseMsgBox%
Gui, Add, CheckBox, x6 y170 w480 h20 Checked%ClickImBack% vClickImBack, Never Sit Out
Gui, Add, Text, x26 y190 w220 h20 , Toggle Never Sit Out
Gui, Add, Edit, x246 y190 w240 h20 vToggleClickImBack, %ToggleClickImBack%
Gui, Add, CheckBox, x6 y210 w480 h20 Checked%SendNumpad% vSendNumpad, Send Numpad Characters To Bet Box
Gui, Add, CheckBox, x6 y230 w480 h20 Checked%CheckwhenFree% vCheckwhenFree, Never Fold For Free
Gui, Add, Radio, x6 y250 w480 h20 vActOnActiveTable Checked%ActOnActiveTable%, Send Actions To Active Table
Gui, Add, Radio, x6 y270 w480 h20 vActOnTableUnderMouse Checked%ActOnTableUnderMouse%, Send Actions To Table Under Mouse Cursor
Gui, Add, CheckBox, x6 y290 w480 h20 Checked%activatetableundermouse% vactivatetableundermouse, Autoactivate Table Under Mouse Cursor
Gui, Add, CheckBox, x6 y310 w480 h20 Checked%autoopeninfo% vautoopeninfo, Automatically Open Info Tab
Gui, Add, CheckBox, x6 y330 w480 h20 Checked%autorefreshinfo% vautorefreshinfo, Automatically Refresh Info Tab
Gui, Add, CheckBox, x6 y350 w480 h20 Checked%highlightactivetable% vhighlightactivetable,Highlight Active Table
Gui, Add, Button, x205 y425 w40 h20 gSave,Save
Gui, Add, Button, x250 y425 w45 h20 gcancel1,Cancel
; Variable raise sizes based on size of big blind. Added by Amerzel
Gui, Tab, Blind Bet Size Hotkey
Gui, Add, Text, x6 y30 w240 h40 , Hotkey to use for raise size based on size of big blind
Gui, Add, Edit, x246 y30 w240 h20 vBlindBetSizeHotkey, %BlindBetSizeHotkey%
Gui, Add, Text, x6 y90 w240 h20 , Big Blind Size
Gui, Add, Edit, x6 y110 w140 h20 vBigBlind0, %BigBlind0%
Gui, Add, Edit, x6 y130 w140 h20 vBigBlind1, %BigBlind1%
Gui, Add, Edit, x6 y150 w140 h20 vBigBlind2, %BigBlind2%
Gui, Add, Edit, x6 y170 w140 h20 vBigBlind3, %BigBlind3%
Gui, Add, Edit, x6 y190 w140 h20 vBigBlind4, %BigBlind4%
Gui, Add, Edit, x6 y210 w140 h20 vBigBlind5, %BigBlind5%
Gui, Add, Edit, x6 y230 w140 h20 vBigBlind6, %BigBlind6%
Gui, Add, Edit, x6 y250 w140 h20 vBigBlind7, %BigBlind7%
Gui, Add, Edit, x6 y270 w140 h20 vBigBlind8, %BigBlind8%
Gui, Add, Edit, x6 y290 w140 h20 vBigBlind9, %BigBlind9%
Gui, Add, Text, x156 y90 w240 h20 , Amount to Raise to
Gui, Add, Edit, x156 y110 w140 h20 vBigBlind0Amt, %BigBlind0Amt%
Gui, Add, Edit, x156 y130 w140 h20 vBigBlind1Amt, %BigBlind1Amt%
Gui, Add, Edit, x156 y150 w140 h20 vBigBlind2Amt, %BigBlind2Amt%
Gui, Add, Edit, x156 y170 w140 h20 vBigBlind3Amt, %BigBlind3Amt%
Gui, Add, Edit, x156 y190 w140 h20 vBigBlind4Amt, %BigBlind4Amt%
Gui, Add, Edit, x156 y210 w140 h20 vBigBlind5Amt, %BigBlind5Amt%
Gui, Add, Edit, x156 y230 w140 h20 vBigBlind6Amt, %BigBlind6Amt%
Gui, Add, Edit, x156 y250 w140 h20 vBigBlind7Amt, %BigBlind7Amt%
Gui, Add, Edit, x156 y270 w140 h20 vBigBlind8Amt, %BigBlind8Amt%
Gui, Add, Edit, x156 y290 w140 h20 vBigBlind9Amt, %BigBlind9Amt%
Gui, Add, Text, x6 y330 w240 h40 , Default Multiplier to Use if BB Not Defined Above
Gui, Add, Edit, x246 y330 w140 h20 vBigBlindDefault, %BigBlindDefault%
Gui, Add, Button, x205 y645 w40 h20 gSave,Save
Gui, Add, Button, x250 y645 w45 h20 gCancel1,Cancel
Gui, Show, x131 y91 h750 w500, Stars Hotkeys
Return
;-----------------------------------------------------------------------------------------------------
Help:
run http://www.wickss.com/ahk/starshotkeys/readme.html
return
;-----------------------------------------------------------------------------------------------------
about:
Msgbox StarsHotkeys V1.006
return
;-----------------------------------------------------------------------------------------------------
GuiClose:
Gosub, Save
return
;-----------------------------------------------------------------------------------------------------
Reload:
Reload
return
;-----------------------------------------------------------------------------------------------------
Save:
Gui, Submit
FileDelete, StarsHotkeys.ini
Writeini()
Reload
return
;-----------------------------------------------------------------------------------------------------
cancel1:
Gui, Destroy
Return
;-----------------------------------------------------------------------------------------------------
Quit:
ExitApp
Edit:
Edit
Return
;-----------------------------------------------------------------------------------------------------
ClickImBack()
{
Global
If ClickImBack
{
IfWinActive, ahk_class PokerStarsTableFrameClass
{
WinGetPos, X, Y, W, H, A
Transform, CX, Round, W*0.8125
Transform, CY, Round, H*0.8621
Transform, CX2, Round, W*0.8625
PixelGetColor, Sittingout, %CX%, %CY%
PixelGetColor, JoinWaitingList, %CX2%, %CY%
If (Sittingout=0x000000) OR (Sittingout=0xDFD9CE) OR (Sittingout=0xD2EBF3) OR (Sittingout=0xB3A39D) OR (Sittingout=0x9D9D9D) OR (Sittingout=0xCCCCCC) OR (Sittingout=0xDEDBCE) OR (Sittingout=0xB5A29c) OR (Sittingout=0xBDAEAD)
If (JoinWaitingList!=0x000000) AND (JoinWaitingList!=0xDFD9CE) AND (JoinWaitingList!=0xDEDBCE) AND (JoinWaitingList!=0x0xB5A29c) AND (JoinWaitingList!=0xBDAEAD)
ControlClick, x%CX% y%CY%,,,, NA
}
}
Return
}
;-----------------------------------------------------------------------------------------------------
ToggleClickImBack:
If ClickImBack
{
ClickImBack:=False
T=Off
}
else
{
ClickImBack:=True
T=On
}
Gui, 2:Add, Text,, Never Sit Out: %T%
Gui, 2:+ToolWindow
Gui, 2:Show, w110 h20
Sleep, 1000
Gui, 2:Destroy
return
;-----------------------------------------------------------------------------------------------------
ToggleCloseMsgBox:
If (CloseMsgBox=true) {
CloseMsgBox:=false
T=Off
}
else {
CloseMsgBox:=true
T=On
}
Gui, 2:Add, Text,, AutoClose Message Box: %T%
Gui, 2:+ToolWindow
Gui, 2:Show, w150 h20
Sleep, 1000
Gui, 2:Destroy
return
;-----------------------------------------------------------------------------------------------------
ToggleAutoRegister:
If (AutoRegister=true) {
AutoRegister:=false
T=Off
}
else {
AutoRegister:=true
T=On
}
Gui, 2:Add, Text,, AutoRegister: %T%
Gui, 2:+ToolWindow
Gui, 2:Show, w110 h20
Sleep, 1000
Gui, 2:Destroy
return
;-----------------------------------------------------------------------------------------------------
DefineHotKeys()
{
Global
If Fold
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Fold%, Fold
HotKey, IfWinNotActive, ahk_class PokerStarsTableFrameClass
HotKey, %Fold%, FoldInactive
}
If CheckCall
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %CheckCall%,CheckCall
HotKey, IfWinNotActive, ahk_class PokerStarsTableFrameClass
HotKey, %CheckCall%, CheckCallInactive
}
If Raise
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Raise%, Raise
HotKey, IfWinNotActive, ahk_class PokerStarsTableFrameClass
HotKey, %Raise%, RaiseInactive
}
; Added by Amerzel
If BlindBetSizeHotkey
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %BlindBetSizeHotkey%, BlindBetSizeHotkey
; HotKey, IfWinNotActive, ahk_class PokerStarsTableFrameClass
; HotKey, %BlindBetSizeHotkey%, BlindBetSizeHotkeyInactive
}
If AllIn
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %AllIn%, AllIn
HotKey, IfWinNotActive, ahk_class PokerStarsTableFrameClass
HotKey, %Allin%, AllinInactive
}
If DecreaseBet33
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %DecreaseBet33%, DecreaseBet33
}
If SitOutNext
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %SitOutNext%, SitOutNext
}
If SitOutNextAll
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %SitOutNextAll%, SitOutNext
}
If IncreaseBet150
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %IncreaseBet150%, IncreaseBet150
}
If DecreaseBet20
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %DecreaseBet20%, DecreaseBet20
}
If IncreaseBet125
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %IncreaseBet125%,IncreaseBet125
}
If BetIncrement1
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %BetIncrement1%,BetIncrement1
}
If BetIncrement2
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %BetIncrement2%,BetIncrement2
}
If BetIncrement3
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %BetIncrement3%,BetIncrement3
}
If BetIncrement4
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %BetIncrement4%,BetIncrement4
}
If BetIncrement5
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %BetIncrement5%,BetIncrement5
}
If FocusBetBox
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %FocusBetBox%, FocusBetBox
}
If ReloadMax
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ReloadMax%, ReloadMax
}
If FoldToAnyBet
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %FoldToAnyBet%, FoldToAnyBet
}
If Cashier
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Cashier%, Cashier
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %Cashier%, Cashier
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %Cashier%, Cashier
Hotkey, IfWinActive, Cashier
Hotkey, %Cashier%, Cashier
Hotkey, IfWinActive, Instant Hand History
Hotkey, %Cashier%, Cashier
}
If Cascade
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Cascade%, Cascade
}
If Tile
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Tile%, Tile
}
If Layout1
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout1%, Layout1
}
If Layout2
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout2%, Layout2
}
If Layout3
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout3%, Layout3
}
If Layout4
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout4%, Layout4
}
If Layout5
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout5%, Layout5
}
If Layout6
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout6%, Layout6
}
If Layout7
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout7%, Layout7
}
If Layout8
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %Layout8%, Layout8
}
If CloseTournamentLobbies
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %CloseTournamentLobbies%, CloseTournamentLobbies
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %CloseTournamentLobbies%, CloseTournamentLobbies
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %CloseTournamentLobbies%, CloseTournamentLobbies
Hotkey, IfWinActive, Cashier
Hotkey, %CloseTournamentLobbies%, CloseTournamentLobbies
Hotkey, IfWinActive, Instant Hand History
Hotkey, %CloseTournamentLobbies%, CloseTournamentLobbies
}
If OpenHHWindow
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %OpenHHWindow%, OpenHHWindow
Hotkey, IfWinActive, Instant Hand History
Hotkey, %OpenHHWindow%, OpenHHWindow
}
If SaveHandHistory
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %SaveHandHistory%, SaveHandHistory
Hotkey, IfWinActive, Instant Hand History
Hotkey, %SaveHandHistory%, HHSaveHandHistory
}
If ToggleMouseJump
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ToggleMouseJump%, ToggleMouseJump
}
If ToggleClickImBack
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ToggleClickImBack%, ToggleClickImBack
}
If ToggleAutoRegister
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ToggleAutoRegister%, ToggleAutoRegister
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %ToggleAutoRegister%, ToggleAutoRegister
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %ToggleAutoRegister%, ToggleAutoRegister
Hotkey, IfWinActive, Cashier
Hotkey, %ToggleAutoRegister%, ToggleAutoRegister
Hotkey, IfWinActive, Instant Hand History
Hotkey, %ToggleAutoRegister%, ToggleAutoRegister
}
If ToggleCloseMsgbox
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ToggleCloseMsgbox%, ToggleCloseMsgbox
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %ToggleCloseMsgbox%, ToggleCloseMsgbox
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %ToggleCloseMsgbox%, ToggleCloseMsgbox
Hotkey, IfWinActive, Cashier
Hotkey, %ToggleCloseMsgbox%, ToggleCloseMsgbox
Hotkey, IfWinActive, Instant Hand History
Hotkey, %ToggleCloseMsgbox%, ToggleCloseMsgbox
}
If OpenLobby
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %OpenLobby%, OpenLobby
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %OpenLobby%, OpenLobby
Hotkey, IfWinActive, Instant Hand History
Hotkey, %OpenLobby%, OpenLobby
}
If CloseActiveTable
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %CloseActiveTable%, CloseActiveTable
}
If CloseAllTables
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %CloseAllTables%, CloseAllTables
}
If SendNumpad
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, Numpad0, NumpadBetAmount
Hotkey, Numpad1, NumpadBetAmount
Hotkey, Numpad2, NumpadBetAmount
Hotkey, Numpad3, NumpadBetAmount
Hotkey, Numpad4, NumpadBetAmount
Hotkey, Numpad5, NumpadBetAmount
Hotkey, Numpad6, NumpadBetAmount
Hotkey, Numpad7, NumpadBetAmount
Hotkey, Numpad8, NumpadBetAmount
Hotkey, Numpad9, NumpadBetAmount
Hotkey, NumpadDot, NumpadBetAmount
}
If NextWindow_Up
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Up%, NextWindow_Up
}
If NextWindow_Down
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Down%, NextWindow_Down
}
If NextWindow_Left
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Left%, NextWindow_Left
}
If NextWindow_Right
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Right%, NextWindow_Right
}
If NextWindow_Up_Alt1 ; added by CheeseMoney for joystick movement
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Up_Alt1%, NextWindow_Up_Alt1
}
If NextWindow_Down_Alt1 ; added by CheeseMoney for joystick movement
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Down_Alt1%, NextWindow_Down_Alt1
}
If NextWindow_Left_Alt1 ; added by CheeseMoney for joystick movement
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Left_Alt1%, NextWindow_Left_Alt1
}
If NextWindow_Right_Alt1 ; added by CheeseMoney for joystick movement
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %NextWindow_Right_Alt1%, NextWindow_Right_Alt1
}
If ActivateBottomWindow
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ActivateBottomWindow%, ActivateBottomWindow
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %ActivateBottomWindow%, ActivateBottomWindow
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %ActivateBottomWindow%, ActivateBottomWindow
Hotkey, IfWinActive, Cashier
Hotkey, %ActivateBottomWindow%, ActivateBottomWindow
Hotkey, IfWinActive, Instant Hand History
Hotkey, %ActivateBottomWindow%, ActivateBottomWindow
}
If ActivateNextWindow
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %ActivateNextWindow%, ActivateNextWindow
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %ActivateNextWindow%, ActivateNextWindow
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %ActivateNextWindow%, ActivateNextWindow
Hotkey, IfWinActive, Cashier
Hotkey, %ActivateNextWindow%, ActivateNextWindow
Hotkey, IfWinActive, Instant Hand History
Hotkey, %ActivateNextWindow%, ActivateNextWindow
}
If FindTableToAct
{
HotKey, IfWinActive, ahk_class PokerStarsTableFrameClass
Hotkey, %FindTableToAct%, FindTableToAct
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %FindTableToAct%, FindTableToAct
}
If Register
{
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %Register%, Register
Hotkey, IfWinActive, Tournament.*Lobby
Hotkey, %Register%, TournamentLobbyRegister
}
If GotoTable
{
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %GotoTable%, GotoTable
}
If JoinWaitlist
{
Hotkey, IfWinActive, PokerStars Lobby
Hotkey, %JoinWaitlist%, JoinWaitlist
}
If Suspend
{
Hotkey, IfWinActive
Hotkey, %Suspend%, Suspend
}
}
;-----------------------------------------------------------------------------------------------------
ReadIni()
{
global
IfNotExist, StarsHotKeys.ini
CreateIni()
IniRead, CloseMsgBox,StarsHotKeys.ini, Options,CloseMsgBox, 0
IniRead, CheckWhenFree,StarsHotKeys.ini, Options,CheckWhenFree, 0
IniRead, AutoRegister,StarsHotKeys.ini, Options,AutoRegister, 0
IniRead, MouseJump,StarsHotKeys.ini, Options, MouseJump,0
IniRead, ClickImBack,StarsHotKeys.ini, Options, ClickImBack,0
IniRead, SendNumpad,StarsHotKeys.ini, Options, SendNumpad,0
IniRead, SendCtrl,StarsHotKeys.ini, Options, SendCtrl,0
IniRead, ActOnActiveTable,StarsHotKeys.ini, Options, ActOnActiveTable,0
IniRead, EnableJoyMovement,StarsHotKeys.ini, Options, EnableJoyMovement, 0
IniRead, HighlightActiveTable, StarsHotkeys.ini, Options, HighlightActiveTable, 0
If ActOnActiveTable
ActOnTableUnderMouse:=False
Else
ActOnTableUnderMouse:=True
IniRead, instantallin,StarsHotKeys.ini, Options, instantallin,0
IniRead, instantxbb,StarsHotKeys.ini, Options, instantxbb,0
IniRead, activatetableundermouse,StarsHotKeys.ini, Options, activatetableundermouse,0
IniRead, autoopeninfo,StarsHotKeys.ini, Options, autoopeninfo,0
IniRead, autorefreshinfo,StarsHotKeys.ini, Options, autorefreshinfo,0
IniRead, increment1,StarsHotKeys.ini, increments, increment1,0
IniRead, increment2,StarsHotKeys.ini, increments, increment2,0
IniRead, increment3,StarsHotKeys.ini, increments, increment3,0
IniRead, increment4,StarsHotKeys.ini, increments, increment4,0
IniRead, increment5,StarsHotKeys.ini, increments, increment5,0
IniRead, FocusBetBox,StarsHotKeys.ini, Hotkeys, FocusBetBox,%A_Space%
IniRead, Fold,StarsHotKeys.ini, Hotkeys, Fold,%A_Space%
IniRead, CheckCall,StarsHotKeys.ini, Hotkeys, CheckCall,%A_Space%
IniRead, Raise,StarsHotKeys.ini, Hotkeys, Raise,%A_Space%
IniRead, Allin,StarsHotKeys.ini, Hotkeys, Allin,%A_Space%
IniRead, DecreaseBet33,StarsHotKeys.ini, Hotkeys, DecreaseBet33,%A_Space%
IniRead, SitOutNext,StarsHotKeys.ini, Hotkeys, SitOutNext,%A_Space%
IniRead, SitOutNextAll,StarsHotKeys.ini, Hotkeys, SitOutNextAll,%A_Space%
IniRead, IncreaseBet150,StarsHotKeys.ini, Hotkeys, IncreaseBet150,%A_Space%
IniRead, DecreaseBet20,StarsHotKeys.ini, Hotkeys, DecreaseBet20,%A_Space%
IniRead, IncreaseBet125,StarsHotKeys.ini, Hotkeys, IncreaseBet125,%A_Space%
IniRead, BetIncrement1,StarsHotKeys.ini, Hotkeys, BetIncrement1,%A_Space%
IniRead, BetIncrement2,StarsHotKeys.ini, Hotkeys, BetIncrement2,%A_Space%
IniRead, BetIncrement3,StarsHotKeys.ini, Hotkeys, BetIncrement3,%A_Space%
IniRead, BetIncrement4,StarsHotKeys.ini, Hotkeys, BetIncrement4,%A_Space%
IniRead, BetIncrement5,StarsHotKeys.ini, Hotkeys, BetIncrement5,%A_Space%
IniRead, ReloadMax,StarsHotKeys.ini, Hotkeys, ReloadMax,%A_Space%
IniRead, FoldToAnyBet,StarsHotKeys.ini, Hotkeys, FoldToAnyBet,%A_Space%
IniRead, Cashier,StarsHotKeys.ini, Hotkeys, Cashier,%A_Space%
IniRead, Cascade,StarsHotKeys.ini, Hotkeys, Cascade,%A_Space%
IniRead, Tile,StarsHotKeys.ini, Hotkeys, Tile,%A_Space%
IniRead, CloseTournamentLobbies,StarsHotKeys.ini, Hotkeys, CloseTournamentLobbies,%A_Space%
IniRead, OpenHHWindow,StarsHotKeys.ini, Hotkeys, OpenHHWindow,%A_Space%
IniRead, SaveHandHistory,StarsHotKeys.ini, Hotkeys, SaveHandHistory,%A_Space%
IniRead, Layout1,StarsHotKeys.ini, Hotkeys, Layout1,%A_Space%
IniRead, Layout2,StarsHotKeys.ini, Hotkeys, Layout2,%A_Space%
IniRead, Layout3,StarsHotKeys.ini, Hotkeys, Layout3,%A_Space%
IniRead, Layout4,StarsHotKeys.ini, Hotkeys, Layout4,%A_Space%
IniRead, Layout5,StarsHotKeys.ini, Hotkeys, Layout5,%A_Space%
IniRead, Layout6,StarsHotKeys.ini, Hotkeys, Layout6,%A_Space%
IniRead, Layout7,StarsHotKeys.ini, Hotkeys, Layout7,%A_Space%
IniRead, Layout8,StarsHotKeys.ini, Hotkeys, Layout8,%A_Space%
IniRead, ToggleMouseJump,StarsHotKeys.ini, Hotkeys, ToggleMouseJump,%A_Space%
IniRead, ToggleClickImBack,StarsHotKeys.ini, Hotkeys, ToggleClickImBack,%A_Space%
IniRead, ToggleAutoRegister,StarsHotKeys.ini, Hotkeys, ToggleAutoRegister,%A_Space%
IniRead, ToggleCloseMsgBox,StarsHotKeys.ini, Hotkeys, ToggleCloseMsgBox,%A_Space%
IniRead, OpenLobby,StarsHotKeys.ini, Hotkeys, OpenLobby,%A_Space%
IniRead, CloseActiveTable,StarsHotKeys.ini, Hotkeys, CloseActiveTable,%A_Space%
IniRead, CloseAllTables,StarsHotKeys.ini, Hotkeys, CloseAllTables,%A_Space%
IniRead, NextWindow_Up,StarsHotKeys.ini, Hotkeys, NextWindow_Up,%A_Space%
IniRead, NextWindow_Down,StarsHotKeys.ini, Hotkeys, NextWindow_Down,%A_Space%
IniRead, NextWindow_Left,StarsHotKeys.ini, Hotkeys, NextWindow_Left,%A_Space%
IniRead, NextWindow_Right,StarsHotKeys.ini, Hotkeys, NextWindow_Right,%A_Space%
IniRead, NextWindow_Up_Alt1,StarsHotKeys.ini, Hotkeys, NextWindow_Up_Alt1,%A_Space%
IniRead, NextWindow_Down_Alt1,StarsHotKeys.ini, Hotkeys, NextWindow_Down_Alt1,%A_Space%
IniRead, NextWindow_Left_Alt1,StarsHotKeys.ini, Hotkeys, NextWindow_Left_Alt1,%A_Space%
IniRead, NextWindow_Right_Alt1,StarsHotKeys.ini, Hotkeys, NextWindow_Right_Alt1,%A_Space%
IniRead, ActivateBottomWindow,StarsHotKeys.ini, Hotkeys, ActivateBottomWindow,%A_Space%
IniRead, ActivateNextWindow,StarsHotKeys.ini, Hotkeys, ActivateNextWindow,%A_Space%
IniRead, FindTableToAct,StarsHotKeys.ini, Hotkeys, FindTableToAct,%A_Space%
IniRead, GotoTable,StarsHotKeys.ini, Hotkeys, GotoTable,%A_Space%
IniRead, Register,StarsHotKeys.ini, Hotkeys, Register,%A_Space%
IniRead, JoinWaitlist,StarsHotKeys.ini, Hotkeys, JoinWaitlist,%A_Space%
IniRead, Suspend,StarsHotKeys.ini, Hotkeys, Suspend,%A_Space%
; Added by Amerzel
IniRead, BlindBetSizeHotkey,StarsHotKeys.ini, BlindBetSize, BlindBetSizeHotkey,%A_Space%
IniRead, BigBlind0,StarsHotKeys.ini, BlindBetSize, BigBlind0,%A_Space%
IniRead, BigBlind1,StarsHotKeys.ini, BlindBetSize, BigBlind1,%A_Space%
IniRead, BigBlind2,StarsHotKeys.ini, BlindBetSize, BigBlind2,%A_Space%
IniRead, BigBlind3,StarsHotKeys.ini, BlindBetSize, BigBlind3,%A_Space%
IniRead, BigBlind4,StarsHotKeys.ini, BlindBetSize, BigBlind4,%A_Space%
IniRead, BigBlind5,StarsHotKeys.ini, BlindBetSize, BigBlind5,%A_Space%
IniRead, BigBlind6,StarsHotKeys.ini, BlindBetSize, BigBlind6,%A_Space%
IniRead, BigBlind7,StarsHotKeys.ini, BlindBetSize, BigBlind7,%A_Space%
IniRead, BigBlind8,StarsHotKeys.ini, BlindBetSize, BigBlind8,%A_Space%
IniRead, BigBlind9,StarsHotKeys.ini, BlindBetSize, BigBlind9,%A_Space%
IniRead, BigBlind0Amt,StarsHotKeys.ini, BlindBetSize, BigBlind0Amt,%A_Space%
IniRead, BigBlind1Amt,StarsHotKeys.ini, BlindBetSize, BigBlind1Amt,%A_Space%
IniRead, BigBlind2Amt,StarsHotKeys.ini, BlindBetSize, BigBlind2Amt,%A_Space%
IniRead, BigBlind3Amt,StarsHotKeys.ini, BlindBetSize, BigBlind3Amt,%A_Space%
IniRead, BigBlind4Amt,StarsHotKeys.ini, BlindBetSize, BigBlind4Amt,%A_Space%
IniRead, BigBlind5Amt,StarsHotKeys.ini, BlindBetSize, BigBlind5Amt,%A_Space%
IniRead, BigBlind6Amt,StarsHotKeys.ini, BlindBetSize, BigBlind6Amt,%A_Space%
IniRead, BigBlind7Amt,StarsHotKeys.ini, BlindBetSize, BigBlind7Amt,%A_Space%
IniRead, BigBlind8Amt,StarsHotKeys.ini, BlindBetSize, BigBlind8Amt,%A_Space%
IniRead, BigBlind9Amt,StarsHotKeys.ini, BlindBetSize, BigBlind9Amt,%A_Space%
IniRead, BigBlindDefault,StarsHotKeys.ini, BlindBetSize, BigBlindDefault,%A_Space%
}
;-----------------------------------------------------------------------------------------------------
CreateIni()
{
global
CloseMsgBox:=True
CheckWhenFree:=True
AutoRegister:=True
MouseJump:=False
ClickImBack:=True
SendNumpad:=True
SendCtrl:=True
ActOnActiveTable:=True
activatetableundermouse:=False
instantallin:=False
increment1:=2.5
increment2:=3
increment3:=4
increment4:=5
increment5:=6
Fold=Joy1
CheckCall=Joy2
Raise=Joy3
Allin=Joy4
DecreaseBet33=Joy5
SitOutNext=Joy6
IncreaseBet150=Joy7
BetIncrement1=Joy8
ReloadMax=Joy9
FoldToAnyBet=Joy10
Cashier=!^c
Cascade=F1
Tile=^F1
CloseTournamentLobbies=F2
OpenHHWindow=F6
SaveHandHistory=^F6
ToggleMouseJump=F7
ToggleClickImBack=^F7
ToggleAutoRegister=!^F7
OpenLobby=^c
CloseActiveTable=F4
CloseAllTables=^F4
NextWindow_Up=Up
NextWindow_Down=Down
NextWindow_Left=Left
NextWindow_Right=Right
NextWindow_Up_Alt1=f14
NextWindow_Down_Alt1=f16
NextWindow_Left_Alt1=f13
NextWindow_Right_Alt1=f15
ActivateBottomWindow=PgDn
ActivateNextWindow=PgUp
FindTableToAct=End
GotoTable=g
Register=r
JoinWaitlist=w
Suspend=F3
; Added by Amerzel
BigBlind0=20
BigBlind1=30
BigBlind2=50
BigBlind3=100
BigBlind4=150
BigBlind5=200
BigBlind6=400
BigBlind7=600
BigBlind8=800
BigBlind9=1200
BigBlindDefault=2.5
WriteIni()
}
;-----------------------------------------------------------------------------------------------------
WriteIni()
{
global
If CloseMsgBox
IniWrite, %CloseMsgBox%, StarsHotkeys.ini, Options, CloseMsgBox
If CheckWhenFree
IniWrite, %CheckWhenFree%, StarsHotkeys.ini,Options, CheckWhenFree
If AutoRegister
IniWrite, %AutoRegister%, StarsHotkeys.ini,Options, AutoRegister
If MouseJump
IniWrite, %MouseJump%, StarsHotkeys.ini,Options, MouseJump
If ClickImBack
IniWrite, %ClickImBack%, StarsHotkeys.ini,Options,ClickImBack
If SendNumpad
IniWrite, %Sendnumpad%, StarsHotkeys.ini,Options, SendNumpad
If SendCtrl
IniWrite, %SendCtrl%, StarsHotkeys.ini, Options, SendCtrl
If NeverFoldForFree
IniWrite, %NeverFoldForFree%, StarsHotkeys.ini, Options, NeverFoldForFree
If ActOnActiveTable
IniWrite, %ActOnActiveTable%, StarsHotkeys.ini, Options, ActOnActiveTable
If activatetableundermouse
IniWrite, %activatetableundermouse%, StarsHotkeys.ini, Options, activatetableundermouse
If autorefreshinfo
IniWrite, %autorefreshinfo%, StarsHotkeys.ini, Options, autorefreshinfo
If autoopeninfo
IniWrite, %autoopeninfo%, StarsHotkeys.ini, Options, autoopeninfo
If instantallin
IniWrite, %instantallin%, StarsHotkeys.ini, Options, instantallin
If instantxbb
IniWrite, %instantxbb%, StarsHotkeys.ini, Options, instantxbb
If HighlightActiveTable ; added by CheeseMoney
IniWrite, %HighlightActiveTable%, StarsHotkeys.ini, Options, HighlightActiveTable
If EnableJoyMovement
IniWrite, %EnableJoyMovement%, StarsHotkeys.ini, Options, EnableJoyMovement
If increment1
IniWrite, %increment1%, StarsHotkeys.ini, Increments, Increment1
If increment2
IniWrite, %increment2%, StarsHotkeys.ini, Increments, Increment2
If increment3
IniWrite, %increment3%, StarsHotkeys.ini, Increments, Increment3
If increment4
IniWrite, %increment4%, StarsHotkeys.ini, Increments, Increment4
If increment5
IniWrite, %increment5%, StarsHotkeys.ini, Increments, Increment5
If FocusBetBox
IniWrite, %FocusBetBox%, StarsHotkeys.ini, Hotkeys, FocusBetBox
If Fold
IniWrite, %Fold%, StarsHotkeys.ini, Hotkeys, Fold
If CheckCall
IniWrite, %CheckCall%, StarsHotkeys.ini, Hotkeys, CheckCall
If Raise
IniWrite, %Raise%, StarsHotkeys.ini, Hotkeys, Raise
If Allin
IniWrite, %Allin%, StarsHotkeys.ini, Hotkeys, Allin
If DecreaseBet33
IniWrite, %DecreaseBet33%, StarsHotkeys.ini, Hotkeys, DecreaseBet33
If SitOutNext
IniWrite, %SitOutNext%, StarsHotkeys.ini, Hotkeys, SitOutNext
If SitOutNextAll
IniWrite, %SitOutNextAll%, StarsHotkeys.ini, Hotkeys, SitOutNextAll
If IncreaseBet125
IniWrite, %IncreaseBet125%, StarsHotkeys.ini, Hotkeys, IncreaseBet125
If DecreaseBet20
IniWrite, %DecreaseBet20%, StarsHotkeys.ini, Hotkeys, DecreaseBet20
If IncreaseBet150
IniWrite, %IncreaseBet150%, StarsHotkeys.ini, Hotkeys, IncreaseBet150
If BetIncrement1
IniWrite, %BetIncrement1%, StarsHotkeys.ini, Hotkeys, BetIncrement1
If BetIncrement2
IniWrite, %BetIncrement2%, StarsHotkeys.ini, Hotkeys, BetIncrement2
If BetIncrement3
IniWrite, %BetIncrement3%, StarsHotkeys.ini, Hotkeys, BetIncrement3
If BetIncrement4
IniWrite, %BetIncrement4%, StarsHotkeys.ini, Hotkeys, BetIncrement4
If BetIncrement5
IniWrite, %BetIncrement5%, StarsHotkeys.ini, Hotkeys, BetIncrement5
If ReloadMax
IniWrite, %ReloadMax%, StarsHotkeys.ini, Hotkeys, ReloadMax
If FoldToAnyBet
IniWrite, %FoldToAnyBet%, StarsHotkeys.ini, Hotkeys, FoldToAnyBet
If Cashier
IniWrite, %Cashier%, StarsHotkeys.ini, Hotkeys, Cashier
If Cascade
IniWrite, %Cascade%, StarsHotkeys.ini, Hotkeys, Cascade
If Tile
IniWrite, %Tile%, StarsHotkeys.ini, Hotkeys, Tile
If CloseTournamentLobbies
IniWrite, %CloseTournamentLobbies%, StarsHotkeys.ini, Hotkeys, CloseTournamentLobbies
If OpenHHWindow
IniWrite, %OpenHHWindow%, StarsHotkeys.ini, Hotkeys, OpenHHWindow
If SaveHandHistory
IniWrite, %SaveHandHistory%, StarsHotkeys.ini, Hotkeys, SaveHandHistory
If Layout1
IniWrite, %Layout1%, StarsHotkeys.ini, Hotkeys, Layout1
If Layout2
IniWrite, %Layout2%, StarsHotkeys.ini, Hotkeys, Layout2
If Layout3
IniWrite, %Layout3%, StarsHotkeys.ini, Hotkeys, Layout3
If Layout4
IniWrite, %Layout4%, StarsHotkeys.ini, Hotkeys, Layout4
If Layout5
IniWrite, %Layout5%, StarsHotkeys.ini, Hotkeys, Layout5
If Layout6
IniWrite, %Layout6%, StarsHotkeys.ini, Hotkeys, Layout6
If Layout7
IniWrite, %Layout7%, StarsHotkeys.ini, Hotkeys, Layout7
If Layout8
IniWrite, %Layout8%, StarsHotkeys.ini, Hotkeys, Layout8
If ToggleMouseJump
IniWrite, %ToggleMouseJump%, StarsHotkeys.ini, Hotkeys, ToggleMouseJump
If ToggleClickImBack
IniWrite, %ToggleClickImBack%, StarsHotkeys.ini, Hotkeys, ToggleClickImBack
If ToggleAutoRegister
IniWrite, %ToggleAutoRegister%, StarsHotkeys.ini, Hotkeys, ToggleAutoRegister
If ToggleCloseMsgBox
IniWrite, %ToggleCloseMsgBox%, StarsHotkeys.ini, Hotkeys, ToggleCloseMsgBox
If OpenLobby
IniWrite, %OpenLobby%, StarsHotkeys.ini, Hotkeys, OpenLobby
If CloseActiveTable
IniWrite, %CloseActiveTable%, StarsHotkeys.ini, Hotkeys, CloseActiveTable
If CloseAllTables
IniWrite, %CloseAllTables%, StarsHotkeys.ini, Hotkeys, CloseAllTables
If NextWindow_Up
IniWrite, %NextWindow_Up%, StarsHotkeys.ini, Hotkeys, NextWindow_Up
If NextWindow_Down
IniWrite, %NextWindow_Down%, StarsHotkeys.ini, Hotkeys, NextWindow_Down
If NextWindow_Left
IniWrite, %NextWindow_Left%, StarsHotkeys.ini, Hotkeys, NextWindow_Left
If NextWindow_Right
IniWrite, %NextWindow_Right%, StarsHotkeys.ini, Hotkeys, NextWindow_Right
If NextWindow_Up_Alt1 ; added by Cheesemoney for joystick control
IniWrite, %NextWindow_Up_Alt1%, StarsHotkeys.ini, Hotkeys, NextWindow_Up_Alt1
If NextWindow_Down_Alt1 ; added by Cheesemoney for joystick control
IniWrite, %NextWindow_Down_Alt1%, StarsHotkeys.ini, Hotkeys, NextWindow_Down_Alt1
If NextWindow_Left_Alt1 ; added by Cheesemoney for joystick control
IniWrite, %NextWindow_Left_Alt1%, StarsHotkeys.ini, Hotkeys, NextWindow_Left_Alt1
If NextWindow_Right_Alt1 ; added by Cheesemoney for joystick control
IniWrite, %NextWindow_Right_Alt1%, StarsHotkeys.ini, Hotkeys, NextWindow_Right_Alt1
If ActivateBottomWindow
IniWrite, %ActivateBottomWindow%, StarsHotkeys.ini, Hotkeys, ActivateBottomWindow
If ActivateNextWindow
IniWrite, %ActivateNextWindow%, StarsHotkeys.ini, Hotkeys, ActivateNextWindow
If FindTableToAct
IniWrite, %FindTableToAct%, StarsHotkeys.ini, Hotkeys, FindTableToAct
If GotoTable
IniWrite, %GotoTable%, StarsHotkeys.ini, Hotkeys, GotoTable
If Register
IniWrite, %Register%, StarsHotkeys.ini, Hotkeys, Register
If JoinWaitlist
IniWrite, %JoinWaitlist%, StarsHotkeys.ini, Hotkeys, JoinWaitlist
If Suspend
IniWrite, %Suspend%, StarsHotkeys.ini, Hotkeys, Suspend
; Added by Amerzel
If BlindBetSizeHotkey
IniWrite, %BlindBetSizeHotkey%, StarsHotkeys.ini, BlindBetSize, BlindBetSizeHotkey
If BigBlind0
IniWrite, %BigBlind0%, StarsHotkeys.ini, BlindBetSize, BigBlind0
If BigBlind1
IniWrite, %BigBlind1%, StarsHotkeys.ini, BlindBetSize, BigBlind1
If BigBlind2
IniWrite, %BigBlind2%, StarsHotkeys.ini, BlindBetSize, BigBlind2
If BigBlind3
IniWrite, %BigBlind3%, StarsHotkeys.ini, BlindBetSize, BigBlind3
If BigBlind4
IniWrite, %BigBlind4%, StarsHotkeys.ini, BlindBetSize, BigBlind4
If BigBlind5
IniWrite, %BigBlind5%, StarsHotkeys.ini, BlindBetSize, BigBlind5
If BigBlind6
IniWrite, %BigBlind6%, StarsHotkeys.ini, BlindBetSize, BigBlind6
If BigBlind7
IniWrite, %BigBlind7%, StarsHotkeys.ini, BlindBetSize, BigBlind7
If BigBlind8
IniWrite, %BigBlind8%, StarsHotkeys.ini, BlindBetSize, BigBlind8
If BigBlind9
IniWrite, %BigBlind9%, StarsHotkeys.ini, BlindBetSize, BigBlind9
If BigBlind0Amt
IniWrite, %BigBlind0Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind0Amt
If BigBlind1Amt
IniWrite, %BigBlind1Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind1Amt
If BigBlind2Amt
IniWrite, %BigBlind2Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind2Amt
If BigBlind3Amt
IniWrite, %BigBlind3Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind3Amt
If BigBlind4Amt
IniWrite, %BigBlind4Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind4Amt
If BigBlind5Amt
IniWrite, %BigBlind5Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind5Amt
If BigBlind6Amt
IniWrite, %BigBlind6Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind6Amt
If BigBlind7Amt
IniWrite, %BigBlind7Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind7Amt
If BigBlind8Amt
IniWrite, %BigBlind8Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind8Amt
If BigBlind9Amt
IniWrite, %BigBlind9Amt%, StarsHotkeys.ini, BlindBetSize, BigBlind9Amt
If BigBlindDefault
IniWrite, %BigBlindDefault%, StarsHotkeys.ini, BlindBetSize, BigBlindDefault
}
;-----------------------------------------------------------------------------------------------------
Highlight() {
global
OldActiveWinID := ActiveWinID
OldX := ActiveX
OldY := ActiveY
OldW := ActiveW
OldH := ActiveH
ActiveWinID := WinExist("A")
WinGetActiveStats,ActiveTitle, ActiveW, ActiveH, ActiveX, ActiveY
WinGetClass, ActiveWinClass, A
WinGet, WinProcess, ProcessName, A
;traytip,,activeWinID: %ActiveWinID%`nClass: %ActiveWinClass%
;if ((WinProcess = "PokerStars.exe") )
if (ActiveWinClass = "PokerStarsTableFrameClass") {
If (OldActiveWinID <> ActiveWinID) || ((OldX <> ActiveX || OldY <> ActiveY || OldW <> ActiveW || OldH <> ActiveH))
drawborder(ActiveWinID)
}
else ; if ((ActiveWinClass != "PokerStarsTableFrameClass"))
gui, 99:destroy
}
Drawborder(Win = "A")
{
global
;traytip,,drawborder,1
borderthickness = 13
;borderColor = Purple
borderColor = FF00A0 ; light purple
borderTrans = 200
Gui, 99:+ToolWindow -SysMenu -Caption +AlwaysOnTop
Gui, 99:Color, %borderColor%
Gui, 99:Show, Hide x1 y1 w1 h1 NA, borderGuard
WinSet, Transparent, %borderTrans%, borderGuard
SysGet, SM_CYCAPTION, 4 ;get height of caption area
SysGet, SM_CYEDGE, 46 ;thickness of the 3-d border
captionArea := SM_CYCAPTION + SM_CYEDGE
Critical, On
WinGetClass, aClass, A
WinGetActiveTitle, aTitle
MouseGetPos,,my
DetectHiddenWindows, Off
WinGetPos, ax, ay, aw, ah, ahk_id %Win%; redundant
;listvars
;pause
DetectHiddenWindows, On
old_ax := ax, old_ay := ay, old_aw := aw, old_ah := ah ;save the size and pos state vars
currColor := %currBox%_borderColor
Gui, 99:Color, %borderColor% ;%currColor% ;set the color
WinGet, winState, MinMax, A
If(winState = 1) ;1 = Maximized
{
;Gui, 99:Hide ; added by Cheese
Gui, 99:Destroy ; added by Cheese
old_ax = 0 ;added by Cheese - reset one of the size and pos state vars
Critical Off
return
}
Else If(winState = -1) ;-1 = minimized
{
;Gui, 99:Hide
Gui, 99:Destroy
old_ax = 0 ;reset one of the size and pos state vars
return
}
Else ;neither maximized nor minimized
{
iw := aw + borderThickness ;set w,h for inner rect
ih := ah + borderThickness
iw1 := aw + (borderThickness*2) ;set w,h for outer rect
ih1 := ah + (borderThickness*2)
ix := ax - borderThickness
iy := ay - borderThickness
WinSet, Region, 0-0 %iw1%-0 %iw1%-%ih1% 0-%ih1% 0-0 %borderThickness%-%borderThickness% %iw%-%borderThickness% %iw%-%ih% %borderThickness%-%ih% %borderThickness%-%borderThickness%, borderGuard ;create gui with a hollow center
}
Gui, 99:Show, x%ix% y%iy% w%iw1% h%ih1% NA ;size and position the border gui
;listvars
;pause
WinActivate ahk_id%win%
Critical Off
Return
}
relStarsClientPoint(id, ByRef x, ByRef y)
{
global border
global caption
rw := 792
rh := 546
WinGetPos, , , w, h, ahk_id%id%
w := w - (2*border)
h := h - (2*border) - caption
x := Floor( (x / rw ) * w )
y := Floor( (y / rh) * h )
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
; This Section Taken From BetPot, Thanks to Dave, Juk, Roland, and I'm sure others...
;Juks rocks
PostLeftClick(x, y, table_id, activate=1) {
; ### JUK: Send the down left click, then the mouse-up messages.
; NOTE: This is relative to the top left of the client area and NOT the top left of the
; window (ie: It *doesn't* include the title-bar like AHK's MouseClick does!!!).
If activate
WinActivate, ahk_id%table_id%
PostMessage, 0x201, 0x0001, ((y<<16)^x), , ahk_id%table_id%
PostMessage, 0x202 , 0, ((y<<16)^x), , ahk_id%table_id%
}
PostStarsClick(x, y, id)
{
relStarsClientPoint(id, x, y)
PostLeftClick(x, y, id)
}
CallStars(id)
{
PostStarsClick(600,533,id)
}
RaiseStars(id)
{
PostStarsClick(730,520,id)
}
FoldStars(id)
{
PostStarsClick(415,501,id)
}
;;;;;;;;;;;;;;;;;;;;;;;;;;;;End BetPot.ahk Section ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;; Joystick Bindkeys ;;;;;;;;;;;;;;;;;;;;;
; for some reason, these seem to have to be defined ;;;;
; even though they don't do anything, and are handled
; above (see NextWindow_Up_Alt1, etc...) ;;;;;;;;;;;;;;;
F13::
F14::
F15::
F16::
return
/*
F13::
if (debug)
Traytip,,Left, 2
;If (EnableJoyMovement)
;NextWindow_Left("ahk_class PokerStarsTableFrameClass")
return
F14::
; Traytip,,Up, 2
If (EnableJoyMovement)
NextWindow_Up("ahk_class PokerStarsTableFrameClass")
return
F15::
; Traytip,,Right, 2
If (EnableJoyMovement)
NextWindow_Right("ahk_class PokerStarsTableFrameClass")
return
F16::
; Traytip,,Down, 2
If (EnableJoyMovement)
NextWindow_Down("ahk_class PokerStarsTableFrameClass")
return
*/
~^!q::
ExitApp
return
Edit: All my additions have an Added by Amerzel comment next to the them.
01-18-2009
, 04:20 PM
Wow, I just found this software this morning, and I've been playing around with for about 3 straight hours now! Awesome! If someone could help me with a problem i'm having that would be great, it's probably something i'm just not seeing.
I made a custom layout for 24 stacked tables on PS, and i definitly like it better than cascade. But is there a way to move a single table out of the stack for a moment or two, while still concentrating on the stack? Like extra time for me to deal with the table in question, then i move it back into the stack. Thank you in advance
I made a custom layout for 24 stacked tables on PS, and i definitly like it better than cascade. But is there a way to move a single table out of the stack for a moment or two, while still concentrating on the stack? Like extra time for me to deal with the table in question, then i move it back into the stack. Thank you in advance
01-18-2009
, 04:25 PM
Quote:
Wow, I just found this software this morning, and I've been playing around with for about 3 straight hours now! Awesome! If someone could help me with a problem i'm having that would be great, it's probably something i'm just not seeing.
I made a custom layout for 24 stacked tables on PS, and i definitly like it better than cascade. But is there a way to move a single table out of the stack for a moment or two, while still concentrating on the stack? Like extra time for me to deal with the table in question, then i move it back into the stack. Thank you in advance
I made a custom layout for 24 stacked tables on PS, and i definitly like it better than cascade. But is there a way to move a single table out of the stack for a moment or two, while still concentrating on the stack? Like extra time for me to deal with the table in question, then i move it back into the stack. Thank you in advance
