Two Plus Two Publishing LLC
Two Plus Two Publishing LLC
 

Go Back   Two Plus Two Poker Forums > > >

Notices

Free Software Discussion of Free / Freeware / Donationware / Open Source poker software and Free Graphics mods

Reply
 
Thread Tools Display Modes
Old 08-14-2008, 11:11 AM   #51
jmillerdls
veteran
 
jmillerdls's Avatar
 
Join Date: Jul 2005
Posts: 3,485
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by BdybldngJR View Post
yeah thanks this worked
Really? When I type 18, all of the tournaments disappear...
jmillerdls is offline   Reply With Quote
Old 08-14-2008, 12:10 PM   #52
fozzy71
Carpal \'Tunnel
 
fozzy71's Avatar
 
Join Date: Mar 2007
Location: 8 Mile + 2.5
Posts: 37,267
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by jmillerdls View Post
Really? When I type 18, all of the tournaments disappear...
You probably have other filters applied such as stakes, or you arent on the ALL tab of the Stars lobby. Some stakes or groups of stakes (All, High, Med, Low) might not have 18's and 180's.

FWIW - I dont even play SNG's, or use these filters. I just happened to read it in the stars software improvements thread, IIRC.

fozzy71 is offline   Reply With Quote
Old 08-14-2008, 06:04 PM   #53
jmillerdls
veteran
 
jmillerdls's Avatar
 
Join Date: Jul 2005
Posts: 3,485
Re: AHK script:Stars Filtered SNG Opener

hmm, maybe only turbos can be filtered like that...the regs don't have the number of players in the name of the tournament.
jmillerdls is offline   Reply With Quote
Old 08-14-2008, 10:20 PM   #54
rhizome
grinder
 
Join Date: Jul 2004
Posts: 477
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by jmillerdls View Post
hmm, maybe only turbos can be filtered like that...the regs don't have the number of players in the name of the tournament.
Please mention this to stars. I've tried several times, but no one seems to think that it's an issue. Or they don't understand what I'm talking about.
rhizome is offline   Reply With Quote
Old 08-15-2008, 08:40 AM   #55
cx768
enthusiast
 
Join Date: May 2008
Posts: 84
Re: AHK script:Stars Filtered SNG Opener

Not working cause of the latest stars update.
The (will u reg in the next ...) I guess is the problem. Only the turbos have this I think.
cx768 is offline   Reply With Quote
Old 08-15-2008, 04:14 PM   #56
Simplicity8
veteran
 
Simplicity8's Avatar
 
Join Date: Apr 2008
Posts: 2,490
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by cx768 View Post
Not working cause of the latest stars update.
The (will u reg in the next ...) I guess is the problem. Only the turbos have this I think.
+1
Simplicity8 is offline   Reply With Quote
Old 08-15-2008, 06:37 PM   #57
JebusTheFierce
enthusiast
 
Join Date: Jan 2008
Posts: 56
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by Simplicity8 View Post
+1
+2
JebusTheFierce is offline   Reply With Quote
Old 08-18-2008, 02:54 PM   #58
cx768
enthusiast
 
Join Date: May 2008
Posts: 84
Re: AHK script:Stars Filtered SNG Opener

Any updates on this?
cx768 is offline   Reply With Quote
Old 08-22-2008, 09:57 PM   #59
lowpk
newbie
 
Join Date: Dec 2007
Posts: 17
Re: AHK script:Stars Filtered SNG Opener

I play Turbo, is it work ? ? And where is the search that you speak ? Its in the PS gui or in the scrit ? I fyou could explain me it would be nice, thanks in advance.
lowpk is offline   Reply With Quote
Old 08-29-2008, 11:28 AM   #60
fishamentsfriend
stranger
 
Join Date: Aug 2008
Posts: 5
Re: AHK script:Stars Filtered SNG Opener

Hi,
the button number changed with the last update.
U have to change:

PHP Code:
ControlGetTextctextButton1ahk_id%regid%
      if ( 
cText "OK" ) {
        
ControlFocusButton1ahk_id%regid%
        
Sleep, -1
        ControlSend
Button1, {SPACE}, ahk_id%regid
into:

PHP Code:
ControlGetTextctextButton3ahk_id%regid%
      if ( 
cText "OK" ) {
        
ControlFocusButton3ahk_id%regid%
        
Sleep, -1
        ControlSend
Button3, {SPACE}, ahk_id%regid
works fine 4 me.
fishamentsfriend is offline   Reply With Quote
Old 08-29-2008, 04:38 PM   #61
jmflu
journeyman
 
Join Date: May 2007
Posts: 290
Re: AHK script:Stars Filtered SNG Opener

thanks
jmflu is offline   Reply With Quote
Old 08-30-2008, 04:55 AM   #62
jmflu
journeyman
 
Join Date: May 2007
Posts: 290
Re: AHK script:Stars Filtered SNG Opener

does anyone know why it is not opening lobbies for every sng even though I have that de activated in advance multitable options?
jmflu is offline   Reply With Quote
Old 09-02-2008, 01:43 PM   #63
cx768
enthusiast
 
Join Date: May 2008
Posts: 84
Re: AHK script:Stars Filtered SNG Opener

do u have this "openSitGoTournLobby=0" in ur user ini file?
edit: do u want it to open??? then I don't know cause why on earth would u want that
cx768 is offline   Reply With Quote
Old 09-02-2008, 04:09 PM   #64
jmflu
journeyman
 
Join Date: May 2007
Posts: 290
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by cx768 View Post
do u have this "openSitGoTournLobby=0" in ur user ini file?
edit: do u want it to open??? then I don't know cause why on earth would u want that
oh yea I realize I wrote that wrong, I think I meant 'now' but yea I do NOT want the lobbies to open and I have it de activated in advanced mt options but with the newest update it opens the browsers when it auto registers.
jmflu is offline   Reply With Quote
Old 09-02-2008, 06:29 PM   #65
Leadan
journeyman
 
Leadan's Avatar
 
Join Date: Apr 2008
Location: Toulouse (Fr)
Posts: 301
Re: AHK script:Stars Filtered SNG Opener

Sorry but I'm lost in this thread, what is the version which is correctly registering? i mean when playing in set at least.

Last edited by Leadan; 09-02-2008 at 06:48 PM.
Leadan is offline   Reply With Quote
Old 09-02-2008, 09:42 PM   #66
Andrew Boccia
old hand
 
Join Date: Feb 2008
Location: Real Estate Investing in Florida
Posts: 1,533
Re: AHK script:Stars Filtered SNG Opener

confusing, looks so friggin awesome too, it scrolls across all the games I want it to, but just doesn't click register.
Andrew Boccia is offline   Reply With Quote
Old 09-04-2008, 03:25 AM   #67
thunderb4ll
grinder
 
Join Date: Oct 2007
Location: running into AJ
Posts: 476
Re: AHK script:Stars Filtered SNG Opener

this working yet?
thunderb4ll is offline   Reply With Quote
Old 09-04-2008, 06:12 AM   #68
kara
grinder
 
kara's Avatar
 
Join Date: Dec 2007
Location: software forum looking for new AHKs
Posts: 456
Re: AHK script:Stars Filtered SNG Opener

The original version is still working flawlessly registering sets for me, even with the latest Stars update using the classic lobby theme.
kara is offline   Reply With Quote
Old 09-04-2008, 06:41 AM   #69
Everlong
veteran
 
Everlong's Avatar
 
Join Date: Aug 2005
Location: let it snow
Posts: 3,064
Re: AHK script:Stars Filtered SNG Opener

UPDATE:

This works for me with the latest update and the black lobby (I will not make one for the orig lobby anymore but if you want i to work you need to change a couple of button refs. compare with the orig script...)

I have not addressed the issues with sets / registering beyond for now - I just wanted to make enough changes to make it work. As I am back to grinding SNG:s though I will have a closer look at why the limits doesn't seem to work as they should. Please try at microstakes.

Code:
;
; AutoHotkey Version: 1.0.47.1
; Language:       English
; Platform:       Win9x/NT
; Author:         Everlong@2p2 Code assembled from misc sources, thanks to _dave_, chris228 
;
; Script Function: PokerStars SNG opener (for use with the tournament filter filtering a specific type of SNG/MTT-Sng)

#NoEnv 
SendMode Input
SetWorkingDir %A_ScriptDir%
;======================================================
#SingleInstance, Force
SetTitleMatchMode, 2
Settimer, register, off
SetTimer, safeguard, off
RegSofar=0
OpenTables=0
Sysget,mon, MonitorworkArea
fivesec=0
two=0
ddlist4=0ff|
ddlist5=0ff|
Loop 50
{
fivesec:=fivesec+5

ddlist:=ddlist . A_index . "|"
ddlist2:=ddlist2 . fivesec . "|"
ddlist5:=ddlist5 . fivesec . "|"
}

Loop 100
{
two:=two+2
ddlist3:=ddlist3 . two . "|"
}

Loop 15
{
ddlist4:=ddlist4 . A_index . "|"
}
;==========================================================

Gui, add, checkbox, x10 vRegister
Gui, add, text, yp xp+30, Auto-register
Gui, add, text, x10, Close lobbies with Ctrl+E!
Gui, add, text, yp+20 x10, Register every (sec):
Gui, add, dropdownlist, w50 yp-5 xp+140  vInterval1, %ddlist2%
Gui, add, text,x10, No of SNG:s to keep open:
Gui, add, dropdownlist, w50 yp-5 xp+140 vKeepOpen , %ddlist% 
Gui, add, text,x10, Limit total SNG:s to:
Gui, add, dropdownlist, w50 yp-5 xp+140 vTotalLimit , %ddlist3% 
Gui, add, text,x10, Limit total time to (min):
Gui, add, dropdownlist, w50 yp-5 xp+140 vTimeLimit , %ddlist5% 
Gui, add, text,x10, Disable if no user input (min):
Gui, add, dropdownlist, w50 yp-5 xp+140 vGuardtimer Choose1 , %ddlist4% 
Gui, add, text, x10 cred vcdown w200 
Gui, add, text, x10 w200 vRegSofar, SNG:s registered so far:   
Gui, add, text, x10 w200 vOpenTables, Tables currently open:
Gui, add, button, w68 gGetgui, &Submit+Run
Gui, add, text, xp+72 yp+5, (Autosaves your settings) 
Gui, Add, Button, disabled x10 w56 h20 center, &Resume
Gui, Add, Button, disabled  w56 h20 yp xp+56 center, &Pause
gui, show, NA , Stars Filtered SNG Opener
WinGetPos, x, y, w, h, Stars Filtered SNG
x:=monright-w
y:=monbottom-h
Gosub, Getini
Gui, show, x%x% y%y%, SFSO 1.1 
return
;===============================================================

getgui:
Gui, submit, nohide
displayedTime=
Gosub, TimeLimit
Gosub, MakeIni
GuiControl, Enable, Pause
GuiControl, Disable, Resume
interval:=interval1*1000

if !interval
interval=off

if guardtimer is not number
{
SetTimer, safeguard, off
}
else
{
killtime:=guardtimer*60000
SetTimer, safeguard, 1000
}

WinGet, OpenTables, list, ahk_class PokerStarsTableFrameClass
if OpenTables is not number
OpenTables=0

GuiControl, , OpenTables, Tables currently open: %OpenTables%
GuiControl, , RegSofar, SNG:s registered so far: %RegSofar%
Gui, show, noactivate, Stars Filtered SNG Opener

if register=1
{
gosub, register
SetTimer, Register, %interval%
}
return

Safeguard:
if (A_TimeIdle > killtime)
{
gosub, ButtonPause

GuiControl, , cdown, Stopped  due to inactivity!!! %displayedTime%
}
return

TimeLimit:
if TimeLimit is number
{
allowedMinutes := timelimit
endTime := A_Now
endTime += %allowedMinutes%, Minutes
SetTimer, CountDown, 1000
}
else
{
GuiControl, , cdown, Time limit off
}
return

Countdown:
  remainingTime := endTime
   EnvSub remainingTime, %A_Now%, Seconds
   m := remainingTime // 60
   s := Mod(remainingTime, 60)
   displayedTime := Format3Digits(m) ":" Format2Digits(s)
   GuiControl, , cdown, Running another (mm:ss): %displayedTime%
   if (A_now > endTime)
   {
   SetTimer, Countdown, off
      Gosub, ButtonPause
   GuiControl, , cdown, Time limit reached.

   }
   
Return


Format2Digits(_val)
{
   _val += 100
   StringRight _val, _val, 2
   Return _val
}

Format3Digits(_val)
{
   _val += 1000
   StringRight _val, _val, 3
   StringTrimRight, firstZ, _val, 2
   if firstZ=0
   {
   StringtrimLeft, _val, _val, 1
   }
   StringTrimRight, firstZ, _val, 1
   if firstZ=0
   {
   StringtrimLeft, _val, _val, 1
   }
   Return _val
}


GuiClose:
Gui, submit
Gosub, MakeIni
ExitApp
return

^e::
SetTitleMatchMode, 2
GroupAdd, TLobbies, Lobby,,, PokerStars Lobby
GroupClose, TLobbies, A
return
;====================================================================
ButtonResume:
Gui, submit, nohide
if PausedTime is number
{
TimeLimit:=PausedTime
}
Gosub, TimeLimit

  GuiControl, Disable, Resume
  GuiControl, Enable, Pause
  GuiControl, , Register, 1
Register=1
gosub, register
SetTimer, Register, %Interval%
return
  
ButtonPause:
critical
SetTimer, countdown, off

Gui, submit, nohide
PausedTime:=remainingTime/60


  GuiControl, Disable, Pause
  GuiControl, Enable, Resume
  GuiControl, , Register, 0
  GuiControl, , cdown, Manually paused %displayedTime% 
SetTimer, Register, off
return

;=====================================================================
Register:

WinGet, OpenTables, list, ahk_class PokerStarsTableFrameClass
if OpenTables is not number
OpenTables=0
if (posOverlap=1)
{
SetTimer, Register, off
Sleep 30000
posOverlap=0
SetTimer Register, on
}
GuiControl, , OpenTables, Tables currently open: %OpenTables%
GuiControl, , RegSofar, SNG:s registered so far: %RegSofar%
Gui, show, noactivate, Stars Filtered SNG Opener

if (RegSofar >= TotalLimit)
{
Gosub, ButtonPause
GuiControl, , cdown, SNG Total limit reached
return
}
if (OpenTables >= TotalLimit)
{
Gosub, ButtonPause
GuiControl, , cdown, SNG Total limit reached
return
return
}
if (KeepOpen - OpenTables = 1)
{
posOverlap=1
}
if (OpenTables >= KeepOpen)
{
return
}
else
{
SettitleMatchmode, 2
  WinGet, LobbyID, id, PokerStars Lobby
  
  if !LobbyID
  {

  return
}
  RegSNGexec(LobbyID)
  }
return
MakeIni:
iniwrite, %Register%, SFSO.ini, Settings, Register
iniwrite, %Interval1%, SFSO.ini, Settings, Interval1
iniwrite, %KeepOpen%, SFSO.ini, Settings, KeepOpen
iniwrite, %TotalLimit%, SFSO.ini, Settings, TotalLimit
iniwrite, %GuardTimer%, SFSO.ini, Settings, GuardTimer
iniwrite, %TimeLimit%, SFSO.ini, Settings, TimeLimit
return

GetIni:
IfExist, SFSO.ini
{
IniRead, Register, SFSO.ini, Settings, Register
IniRead, Interval1, SFSO.ini, Settings, Interval1
IniRead, KeepOpen, SFSO.ini, Settings, KeepOpen
IniRead, TotalLimit, SFSO.ini, Settings, TotalLimit
IniRead, GuardTimer, SFSO.ini, Settings, GuardTimer, Off
IniRead, TimeLimit, SFSO.ini, Settings, TimeLimit, Off
GuiControl, , Register, %register%
StringReplace, ddlist2, ddlist2, %interval1%, %Interval1%|
GuiControl, , Interval1, |%ddlist2%
StringReplace, ddlist, ddlist, %KeepOpen%, %KeepOpen%|
GuiControl, , KeepOpen, |%ddlist%
StringReplace, ddlist3, ddlist3, %TotalLimit%, %TotalLimit%|,
GuiControl, , TotalLimit, |%ddlist3%
StringReplace, ddlist4, ddlist4, %GuardTimer%, %GuardTimer%|
GuiControl, , GuardTimer, |%ddlist4%
StringReplace, ddlist5, ddlist5, %TimeLimit%, %TimeLimit%|
GuiControl, , TimeLimit, |%ddlist5%
}
return


RegSNGexec(id) {
global RegSofar
clickdirectioncount=0
direction=0
Loop 16
{
  ControlGet, v, Visible, , PokerStarsButtonClass8, ahk_id%id%
  if (v = 0)
  if (clickdirectioncount<=5) {
    if (direction=0) {
       ControlSend, PokerStarsListClass5, {NumpadDown}, ahk_id%id%
    } else {
       ControlSend, PokerStarsListClass5, {NumpadUp}, ahk_id%id%    
    }
    clickdirectioncount:=clickdirectioncount+1
  } else {
    if (direction=0) {
	direction:=1
    } else {
        direction:=0
    }
    clickdirectioncount:=0
  }
  Sleep 1000
  if (v = 1)
  break
  }
  
  if ( v = 1 ) {
    ControlClick, PokerStarsButtonClass8, ahk_id%id%
    WinWait, Tournament Registration ahk_class #32770, , 10
    {
      WinGet, regid, id
      ControlFocus, Button1, ahk_id%regid%
      Sleep, -1
      ControlSend, Button1, {SPACE}, ahk_id%regid%
      sleep, 10
      ControlFocus, Button2, ahk_id%regid%
      Sleep, -1
      ControlSend, Button2, {SPACE}, ahk_id%regid%
      RegSofar++ 
      GuiControl, , RegSofar, SNG:s registered so far: %RegSofar%
      gui, show, noactivate, Stars Filtered SNG Opener
    }
    WinWait, Tournament Registration ahk_class #32770, , 10
    {
      WinGet, regid, id           
      ControlGetText, ctext, Button1, ahk_id%regid%
      if ( cText = "OK" ) {
        ControlFocus, Button1, ahk_id%regid%
        Sleep, -1
        ControlSend, Button1, {SPACE}, ahk_id%regid%  
      }        
    }
  }
}


;=========================================================
~^!Q::
ExitApp
Everlong is offline   Reply With Quote
Old 09-04-2008, 07:17 AM   #70
kara
grinder
 
kara's Avatar
 
Join Date: Dec 2007
Location: software forum looking for new AHKs
Posts: 456
Re: AHK script:Stars Filtered SNG Opener

Ohhhhhh the black lobby? Awesome! Updating script now Thanks Everlong!
kara is offline   Reply With Quote
Old 09-04-2008, 07:36 AM   #71
Everlong
veteran
 
Everlong's Avatar
 
Join Date: Aug 2005
Location: let it snow
Posts: 3,064
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by kara View Post
Ohhhhhh the black lobby? Awesome! Updating script now Thanks Everlong!
Please report back once you tried it, with working I mean I am at work and it did register and press all the buttons the one time I tried it

Small change, change colors (black bkgr) and version number to stand out from old version
Code:
;
; AutoHotkey Version: 1.0.47.1
; Language:       English
; Platform:       Win9x/NT
; Author:         Everlong@2p2 Code assembled from misc sources, thanks to _dave_, chris228 
;
; Script Function: PokerStars SNG opener (for use with the tournament filter filtering a specific type of SNG/MTT-Sng)

#NoEnv 
SendMode Input
SetWorkingDir %A_ScriptDir%
;======================================================
#SingleInstance, Force
SetTitleMatchMode, 2
Settimer, register, off
SetTimer, safeguard, off
RegSofar=0
OpenTables=0
Sysget,mon, MonitorworkArea
fivesec=0
two=0
ddlist4=0ff|
ddlist5=0ff|
Loop 50
{
fivesec:=fivesec+5

ddlist:=ddlist . A_index . "|"
ddlist2:=ddlist2 . fivesec . "|"
ddlist5:=ddlist5 . fivesec . "|"
}

Loop 100
{
two:=two+2
ddlist3:=ddlist3 . two . "|"
}

Loop 15
{
ddlist4:=ddlist4 . A_index . "|"
}
;==========================================================
Gui, color, Black
Gui, font, cOlive
Gui, add, checkbox, x10 vRegister
Gui, add, text, yp xp+30, Auto-register
Gui, add, text, x10, Close lobbies with Ctrl+E!
Gui, add, text, yp+20 x10, Register every (sec):
Gui, add, dropdownlist, w50 yp-5 xp+140  vInterval1, %ddlist2%
Gui, add, text,x10, No of SNG:s to keep open:
Gui, add, dropdownlist, w50 yp-5 xp+140 vKeepOpen , %ddlist% 
Gui, add, text,x10, Limit total SNG:s to:
Gui, add, dropdownlist, w50 yp-5 xp+140 vTotalLimit , %ddlist3% 
Gui, add, text,x10, Limit total time to (min):
Gui, add, dropdownlist, w50 yp-5 xp+140 vTimeLimit , %ddlist5% 
Gui, add, text,x10, Disable if no user input (min):
Gui, add, dropdownlist, w50 yp-5 xp+140 vGuardtimer Choose1 , %ddlist4% 
Gui, add, text, x10 cred vcdown w200 
Gui, add, text, x10 w200 vRegSofar, SNG:s registered so far:   
Gui, add, text, x10 w200 vOpenTables, Tables currently open:
Gui, add, button, w68 gGetgui, &Submit+Run
Gui, add, text, xp+72 yp+5, (Autosaves your settings) 
Gui, Add, Button, disabled x10 w56 h20 center, &Resume
Gui, Add, Button, disabled  w56 h20 yp xp+56 center, &Pause
gui, show, NA , SFSO
WinGetPos, x, y, w, h, SFSO
x:=monright-w
y:=monbottom-h
Gosub, Getini
Gui, show, x%x% y%y%, SFSO 2.0
return
;===============================================================

getgui:
Gui, submit, nohide
displayedTime=
Gosub, TimeLimit
Gosub, MakeIni
GuiControl, Enable, Pause
GuiControl, Disable, Resume
interval:=interval1*1000

if !interval
interval=off

if guardtimer is not number
{
SetTimer, safeguard, off
}
else
{
killtime:=guardtimer*60000
SetTimer, safeguard, 1000
}

WinGet, OpenTables, list, ahk_class PokerStarsTableFrameClass
if OpenTables is not number
OpenTables=0

GuiControl, , OpenTables, Tables currently open: %OpenTables%
GuiControl, , RegSofar, SNG:s registered so far: %RegSofar%
Gui, show, NA, SFSO 2.0

if register=1
{
gosub, register
SetTimer, Register, %interval%
}
return

Safeguard:
if (A_TimeIdle > killtime)
{
gosub, ButtonPause

GuiControl, , cdown, Stopped  due to inactivity!!! %displayedTime%
}
return

TimeLimit:
if TimeLimit is number
{
allowedMinutes := timelimit
endTime := A_Now
endTime += %allowedMinutes%, Minutes
SetTimer, CountDown, 1000
}
else
{
GuiControl, , cdown, Time limit off
}
return

Countdown:
  remainingTime := endTime
   EnvSub remainingTime, %A_Now%, Seconds
   m := remainingTime // 60
   s := Mod(remainingTime, 60)
   displayedTime := Format3Digits(m) ":" Format2Digits(s)
   GuiControl, , cdown, Running another (mm:ss): %displayedTime%
   if (A_now > endTime)
   {
   SetTimer, Countdown, off
      Gosub, ButtonPause
   GuiControl, , cdown, Time limit reached.

   }
   
Return


Format2Digits(_val)
{
   _val += 100
   StringRight _val, _val, 2
   Return _val
}

Format3Digits(_val)
{
   _val += 1000
   StringRight _val, _val, 3
   StringTrimRight, firstZ, _val, 2
   if firstZ=0
   {
   StringtrimLeft, _val, _val, 1
   }
   StringTrimRight, firstZ, _val, 1
   if firstZ=0
   {
   StringtrimLeft, _val, _val, 1
   }
   Return _val
}


GuiClose:
Gui, submit
Gosub, MakeIni
ExitApp
return

^e::
SetTitleMatchMode, 2
GroupAdd, TLobbies, Lobby,,, PokerStars Lobby
GroupClose, TLobbies, A
return
;====================================================================
ButtonResume:
Gui, submit, nohide
if PausedTime is number
{
TimeLimit:=PausedTime
}
Gosub, TimeLimit

  GuiControl, Disable, Resume
  GuiControl, Enable, Pause
  GuiControl, , Register, 1
Register=1
gosub, register
SetTimer, Register, %Interval%
return
  
ButtonPause:
critical
SetTimer, countdown, off

Gui, submit, nohide
PausedTime:=remainingTime/60


  GuiControl, Disable, Pause
  GuiControl, Enable, Resume
  GuiControl, , Register, 0
  GuiControl, , cdown, Manually paused %displayedTime% 
SetTimer, Register, off
return

;=====================================================================
Register:

WinGet, OpenTables, list, ahk_class PokerStarsTableFrameClass
if OpenTables is not number
OpenTables=0
if (posOverlap=1)
{
SetTimer, Register, off
Sleep 30000
posOverlap=0
SetTimer Register, on
}
GuiControl, , OpenTables, Tables currently open: %OpenTables%
GuiControl, , RegSofar, SNG:s registered so far: %RegSofar%
Gui, show, noactivate, SFSO 2.0

if (RegSofar >= TotalLimit)
{
Gosub, ButtonPause
GuiControl, , cdown, SNG Total limit reached
return
}
if (OpenTables >= TotalLimit)
{
Gosub, ButtonPause
GuiControl, , cdown, SNG Total limit reached
return
return
}
if (KeepOpen - OpenTables = 1)
{
posOverlap=1
}
if (OpenTables >= KeepOpen)
{
return
}
else
{
SettitleMatchmode, 2
  WinGet, LobbyID, id, PokerStars Lobby
  
  if !LobbyID
  {

  return
}
  RegSNGexec(LobbyID)
  }
return
MakeIni:
iniwrite, %Register%, SFSO.ini, Settings, Register
iniwrite, %Interval1%, SFSO.ini, Settings, Interval1
iniwrite, %KeepOpen%, SFSO.ini, Settings, KeepOpen
iniwrite, %TotalLimit%, SFSO.ini, Settings, TotalLimit
iniwrite, %GuardTimer%, SFSO.ini, Settings, GuardTimer
iniwrite, %TimeLimit%, SFSO.ini, Settings, TimeLimit
return

GetIni:
IfExist, SFSO.ini
{
IniRead, Register, SFSO.ini, Settings, Register
IniRead, Interval1, SFSO.ini, Settings, Interval1
IniRead, KeepOpen, SFSO.ini, Settings, KeepOpen
IniRead, TotalLimit, SFSO.ini, Settings, TotalLimit
IniRead, GuardTimer, SFSO.ini, Settings, GuardTimer, Off
IniRead, TimeLimit, SFSO.ini, Settings, TimeLimit, Off
GuiControl, , Register, %register%
StringReplace, ddlist2, ddlist2, %interval1%, %Interval1%|
GuiControl, , Interval1, |%ddlist2%
StringReplace, ddlist, ddlist, %KeepOpen%, %KeepOpen%|
GuiControl, , KeepOpen, |%ddlist%
StringReplace, ddlist3, ddlist3, %TotalLimit%, %TotalLimit%|,
GuiControl, , TotalLimit, |%ddlist3%
StringReplace, ddlist4, ddlist4, %GuardTimer%, %GuardTimer%|
GuiControl, , GuardTimer, |%ddlist4%
StringReplace, ddlist5, ddlist5, %TimeLimit%, %TimeLimit%|
GuiControl, , TimeLimit, |%ddlist5%
}
return


RegSNGexec(id) {
global RegSofar
clickdirectioncount=0
direction=0
Loop 16
{
  ControlGet, v, Visible, , PokerStarsButtonClass8, ahk_id%id%
  if (v = 0)
  if (clickdirectioncount<=5) {
    if (direction=0) {
       ControlSend, PokerStarsListClass5, {NumpadDown}, ahk_id%id%
    } else {
       ControlSend, PokerStarsListClass5, {NumpadUp}, ahk_id%id%    
    }
    clickdirectioncount:=clickdirectioncount+1
  } else {
    if (direction=0) {
	direction:=1
    } else {
        direction:=0
    }
    clickdirectioncount:=0
  }
  Sleep 1000
  if (v = 1)
  break
  }
  
  if ( v = 1 ) {
    ControlClick, PokerStarsButtonClass8, ahk_id%id%
    WinWait, Tournament Registration ahk_class #32770, , 10
    {
      WinGet, regid, id
      ControlFocus, Button1, ahk_id%regid%
      Sleep, -1
      ControlSend, Button1, {SPACE}, ahk_id%regid%
      sleep, 10
      ControlFocus, Button2, ahk_id%regid%
      Sleep, -1
      ControlSend, Button2, {SPACE}, ahk_id%regid%
      RegSofar++ 
      GuiControl, , RegSofar, SNG:s registered so far: %RegSofar%
      gui, show, noactivate, Stars Filtered SNG Opener
    }
    WinWait, Tournament Registration ahk_class #32770, , 10
    {
      WinGet, regid, id           
      ControlGetText, ctext, Button1, ahk_id%regid%
      if ( cText = "OK" ) {
        ControlFocus, Button1, ahk_id%regid%
        Sleep, -1
        ControlSend, Button1, {SPACE}, ahk_id%regid%  
      }        
    }
  }
}


;=========================================================
~^!Q::
ExitApp

Last edited by Everlong; 09-04-2008 at 07:56 AM. Reason: to confuse even more
Everlong is offline   Reply With Quote
Old 09-04-2008, 11:16 AM   #72
Leadan
journeyman
 
Leadan's Avatar
 
Join Date: Apr 2008
Location: Toulouse (Fr)
Posts: 301
Re: AHK script:Stars Filtered SNG Opener

I'm gonna try it soon, thanks a lot
Leadan is offline   Reply With Quote
Old 09-04-2008, 12:56 PM   #73
kara
grinder
 
kara's Avatar
 
Join Date: Dec 2007
Location: software forum looking for new AHKs
Posts: 456
Re: AHK script:Stars Filtered SNG Opener

Worked PERFECTLY for a set of 16!!!! I love the black lobby so this is great! Thank you

Edit: WOW, I tried it before the color background change. Just put in your latest edit. COOL!!!!

Edit #2: I made it black and purple...such a girl...lol.

Last edited by kara; 09-04-2008 at 01:02 PM.
kara is offline   Reply With Quote
Old 09-04-2008, 07:24 PM   #74
thunderb4ll
grinder
 
Join Date: Oct 2007
Location: running into AJ
Posts: 476
Re: AHK script:Stars Filtered SNG Opener

Quote:
Originally Posted by kara View Post
The original version is still working flawlessly registering sets for me...
Do you mean it's successfully loading up one (1) set but not registering for games continuously?
thunderb4ll is offline   Reply With Quote
Old 09-04-2008, 09:38 PM   #75
kara
grinder
 
kara's Avatar
 
Join Date: Dec 2007
Location: software forum looking for new AHKs
Posts: 456
Re: AHK script:Stars Filtered SNG Opener

Yes 1 set. I believe there is still an issue with it registering past the limit for continuous games.
kara is offline   Reply With Quote

Reply
      

Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off


Forum Jump


All times are GMT -4. The time now is 10:12 AM.


Powered by vBulletin®
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.
Copyright © 2008-2017, Two Plus Two Interactive
 
 
Poker Players - Streaming Live Online