; Betsizing script for iPoker by coon74 from 2+2
; to run it, copy it into an .ahk file and install AHK-L from autohotkey.com

; the author is not responsible for any losses caused by its use
; test at play money or nanostake tables first

; for minimum-sized (480x360) tables only!!!
; if you use bigger tables,
; measure your table width 'w' in pixels using Window Spy
; then replace all the numbers (coordinates) below by them multiplied by (w/480)

; Sends hotkeys to table under mouse!!!

SendMode Input
SetDefaultMouseSpeed, 0
CoordMode, Mouse, Relative

~F9:: ; F9 - right mouse button emulation
MouseGetPos,x,y,id
WinGetClass,winclass,ahk_id %id%
if winclass=PTIODEVICE
 Click Right
return             

~RButton::   ; (Speed) Fold (or advance fold checkbox) - right mouse button
MouseGetPos,x,y,id
	WinGetClass,winclass,ahk_id %id%
	if winclass=PTIODEVICE
	{
      ControlClick, x300 y330, ahk_id %id% ; first click traditional Fold
	 	 ;ControlClick, x230 y330, ahk_id %id% and then Speed Fold if it is present             
}
return

~MButton::   ; (Advance) Check or Call - middle mouse button
MouseGetPos,x,y,id
	WinGetClass,winclass,ahk_id %id%
	if winclass=PTIODEVICE
      ControlClick, x360 y330, ahk_id %id%        
return

~F6::   ; F6 - iPoker's left sizing button
  MouseGetPos,x,y,id
	WinGetClass,winclass,ahk_id %id%
	if winclass=PTIODEVICE
	{
	IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
	Click, 295, 295
IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%	
      Click, 405, 330
	IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
      MouseMove, %x%, %y%
}
return

~F7::   ; F7 - iPoker's middle sizing button
MouseGetPos,x,y,id
	WinGetClass,winclass,ahk_id %id%
	if winclass=PTIODEVICE
	{
	IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
	Click, 350, 295
IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%	
      Click, 405, 330
	IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
      MouseMove, %x%, %y%
	ControlClick, x350 y295, ahk_id %id%
IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%	
      Click, 405, 330
IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
      MouseMove, %x%, %y%
}	  
return

~F8::   ; F8 - iPoker's right sizing button
 MouseGetPos,x,y,id
	WinGetClass,winclass,ahk_id %id%
	if winclass=PTIODEVICE
	{
	IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
	Click, 405, 295
IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%	
      Click, 405, 330
	IfWinNotActive, ahk_id %id%
        WinActivate, ahk_id %id%
      MouseMove, %x%, %y%
}	  
return