programa para autoregistrarse

  • 37 respuestas
    • LabandaRoja
      LabandaRoja
      Bronce
      Registro: 09-09-2011 Artículos: 1.346
      Tengo entendido que el Holdem Boss también te lo permite! A ver si alguien puede confirmarlo :)


      Saludos, Labandaroja
    • LabandaRoja
      LabandaRoja
      Bronce
      Registro: 09-09-2011 Artículos: 1.346
      Y agregamos también el TableScan Turbo, esos programas los podes encontrar en la sección herramientas de poker


      Saludos, Labandaroja
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      Tambien el AHK para PokerStars (es gratis)
    • marcgasol96
      marcgasol96
      Plata
      Registro: 06-09-2014 Artículos: 33
      gracias Bejel.... a ver si lo encuentro!!!
    • marcgasol96
      marcgasol96
      Plata
      Registro: 06-09-2014 Artículos: 33
      hola BEJELMEJEL, me he descargado el auto hoykey y no se ni por donde entrarle, hay que programar o algo asi?? si me puedes ayudar te lo agradecería...
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      Te voy a pasar el guion, lo tienes que copiar tal cual y lo pegas en un blok de notas, despues le pones la extension .AHK.
      O si prefieres lo copias en un archivo .AHK directamente, como prefieras, luego simplemente tienes que abrirlo y ya funcionará.

      Eso si tienes que instalar el AutoHotKeys.

      Este es uno muy sencillo y que consume pocos recursos, si despues te interesa otro bastante mas completo pero que consume mas, te lo mando por privado o te lo buscas en 2+2 que por hay tambien anda furrulando.
      Este funciona para PokerStars 6, si lo quieres para el 7 abra que hacerle algunos arreglos.
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      ; a simplified poker stars auto register script
      ; based on/inspired by SFSO_4.01b.ahk
      ; Thaks go to: Everlong@2p2, _dave_, chris228, finnisher, Max1mums

      ; ================================================== ========
      ; Need to have the "Show registering/upcoming only" activated in lobby
      ; Do not minimize PokerStars Lobby, just move it out of the way
      ; ================================================== ========

      #NoEnv
      #SingleInstance, Force
      SendMode Input
      SetWorkingDir %A_ScriptDir%
      SetBatchLines, -1
      SetTitleMatchMode, 2
      StringTrimRight, thisahk, A_ScriptName, 4
      regButton:="PokerStarsButtonClass10"
      unregButton:="PokerStarsButtonClass8"
      AutoRegister:=0
      AutoSittingOut:=0
      AutoWindowMaximize:=0

      ; ================================================== ========
      ; User defined variables
      ; ================================================== ========
      MaxTablesInit:=5 ; Maximum number of Tables to keep open, Initial value
      RegisterInterval:=30*1000 ; Register every X millisec
      SittingOut:=1*30*1000 ; check and rejoin if Sitting Out every X millisec
      WindowMaximize:=2*1000 ; check and Maximize all table Windows every X millisec
      IdleCheck:=1*60*1000 ; Check if Idle every X millisec
      IdleTime:=10*60*1000 ; PauseScript and UnRegisterAll, if Idle for X millisec
      ; ================================================== =========
      ; User defined variables
      ; ================================================== =========

      if (IdleCheck>0)
      SetTimer, Safeguard, %IdleCheck%
      Gosub, BuildGui
      Return


      QuitScript:
      ExitApp
      Return

      BuildGui:
      Gui, Color, White
      Gui, Font, cOlive
      Gui, Add, Text,, Maximum Number of Open Tables
      Gui, Add, Edit
      Gui, Add, UpDown, vMaxTables, %MaxTablesInit%
      Gui, Add, Button, w190 gSittingOut, &Check if Sitting [O]ut and Go Back
      Gui, Add, Checkbox, vAutoSittingOut, &Auto
      Gui, Add, Button, w190 gWindowMaximize, &Maximize all Table [W]indows
      Gui, Add, Checkbox, vAutoWindowMaximize, &Auto
      Gui, Add, Button, w190 gStartScript, &[S]ubmit and Start/Continue Script
      Gui, Add, Button, w190 gLobbyRestore, &Restore [L]obby
      Gui, Add, Button, w190 gUnRegisterAll, &[U]n-Register All
      Gui, Add, Button, w190 gPauseScript, &[P]ause Script
      Gui, Add, Button, w190 gQuitScript, &[Q]uit Script
      Gui, Add, Text, w250 cBlue, hotkeys: Ctl + Alt + letter_in_brackets
      Gui, Add, Text, w250 cRed vStatus, Status: Idle
      Gui, Show, w260, %thisahk%
      Gui, Show, x0 y0, %thisahk%
      Sleep, -1
      Gosub, PauseScript
      Return

      Safeguard:
      if (A_TimeIdle > IdleTime)
      {
      Gosub, PauseScript
      Gosub, UnRegisterAll
      GuiControl,, Status, Status: Stopped due to inactivity
      }
      Return

      PauseScript:
      Critical
      AutoRegister:=0
      AutoSittingOut:=0
      AutoWindowMaximize:=0
      SetTimer, Register, off
      SetTimer, AutoClose, off
      SetTimer, WindowMaximize, off
      SetTimer, SittingOut, off
      SetTimer, SafeGuard, off
      GuiControl,, Status, Status: Script Paused
      Return

      StartScript:
      Gui, Submit, NoHide
      SetTimer, AutoClose, 100
      if (SittingOut>0 AND AutoSittingOut=1)
      SetTimer, SittingOut, %SittingOut%
      else
      SetTimer, SittingOut, off
      if (WindowMaximize>0 AND AutoWindowMaximize=1)
      SetTimer, WindowMaximize, %WindowMaximize%
      else
      SetTimer, WindowMaximize, off
      if (RegisterInterval>0) {
      Gosub, Register
      SetTimer, Register, %RegisterInterval%
      }
      Sleep, -1
      Return

      Register:
      AutoRegister:=1
      SetTitleMatchMode, 2
      WinGet, LobbyId, Id, PokerStars Lobby - ahk_class #32770
      if !LobbyId
      {
      GuiControl,, Status, Status: PokerStars Lobby not found
      Return
      }
      ControlSend, PokerStarsListClass3, {NumpadUp 20}, ahk_id%LobbyId%
      WinGet, PhysicalTables, list, Table ahk_class PokerStarsTableFrameClass
      if PhysicalTables is not Number
      PhysicalTables:=0
      if (PhysicalTables >= MaxTables)
      {
      GuiControl,, Status, Status: Set Full at %PhysicalTables% tables _ Waiting
      Return
      }
      timestoReg := MaxTables - PhysicalTables
      RegSNGexec(LobbyID, timestoReg)
      Return

      RegSNGexec(id, times) {
      global AutoRegister
      global regButton
      global unregButton
      Loop %times% {
      GuiControl,, Status, Status: Registering %times% times
      if (AutoRegister = 0) {
      GuiControl,, Status, Status: Idle
      Exit
      }
      ControlGet, regBtnVis, Visible,, %regButton%, ahk_id%id%
      if (regBtnVis = 1) {
      ControlSend, %regButton%, {Space}, ahk_id%id%
      ControlSend, %regButton%, {Space}, ahk_id%id%
      Sleep, 30
      ControlSend, PokerStarsListClass3, {NumpadDown}, ahk_id%id%
      Sleep, 30
      GuiControl,, Status, Status: Waiting
      } else {
      ControlGet, unregBtnVis, Visible,, %unregButton%, ahk_id%id%
      if (unregBtnVis = 1) {
      GuiControl,, Status, Status: Already registered game found _ Waiting
      Sleep, 30
      ControlSend, PokerStarsListClass3, {NumpadDown}, ahk_id%id%
      Sleep, 30
      } else {
      GuiControl,, Status, Status: No games found _ Waiting
      Return
      }
      }
      Sleep, -1
      }
      }
      Return

      UnRegisterAll:
      WinGet, LobbyId, id, PokerStars Lobby - ahk_class #32770
      if !LobbyId
      {
      GuiControl,, Status, Status: PokerStars Lobby not found
      Return
      }
      ControlSend, PokerStarsListClass3, ^r, ahk_id%lobbyid%
      WinWait, Registered In Tournaments ahk_class #32770,, 1
      {
      WinGet, regid, id, Registered In Tournaments ahk_class #32770
      ControlGet, vis, Visible,, Button1, ahk_id%regid%
      if vis {
      ControlSend, Button1, {Space}, ahk_id%regid%
      Sleep, 30
      ControlSend, PokerStarsButtonClass2, {Space}, ahk_id%regid%
      Sleep, 30
      WinClose, ahk_id%regid%
      }
      }
      Return

      LobbyRestore:
      WinGet, LobbyId, id, PokerStars Lobby - ahk_class #32770
      if !LobbyId
      {
      GuiControl,, Status, Status: PokerStars Lobby not found
      Return
      }
      WinShow, ahk_id%LobbyId%
      WinMove, ahk_id%LobbyId%,, 0, 0
      Return

      AutoClose:
      AutoClose()
      Return
      AutoClose()
      {
      SetTitleMatchMode,2
      ifWinExist, Tournament Registration ahk_class #32770
      {
      WinGet, id1, id,
      Sleep 30
      WinClose, ahk_id%id1%
      }
      ifWinExist, PokerStars ahk_class #32770,, Lobby
      {
      WinGet, id2, id,
      Sleep 30
      WinClose, ahk_id%id2%
      }
      }
      Return

      SittingOut:
      SittingOut()
      Return
      SittingOut()
      {
      activeid := WinExist("A")
      SetTitleMatchMode,2
      WinGet, TableWindows, List, Table ahk_class PokerStarsTableFrameClass
      if TableWindows=0
      Exit
      Loop %TableWindows% {
      id:=TableWindows%A_Index%
      WinActivate, ahk_id%id%
      WinGetPos,,, w, h, ahk_id%id%
      x1:=0.82*w
      y1:=0.85*h
      Round(x1)
      Round(y1)
      x2:=x1+2
      y2:=y1+2
      ColorID:=0x141414
      PixelSearch,,, x1, y1, x2, y2, ColorID, 20, ahk_id%id%, Fast
      if (ErrorLevel=0)
      Click %x1%, %y2%
      Sleep, -1
      }
      WinActivate, ahk_id%activeid%
      Sleep, 30
      Sleep, -1
      }
      Return

      WindowMaximize:
      WindowMaximize()
      Return
      WindowMaximize()
      {
      SetTitleMatchMode,2
      WinGet, TableWindows, List, Table ahk_class PokerStarsTableFrameClass
      if TableWindows=0
      Exit
      Loop %TableWindows% {
      id:=TableWindows%A_Index%
      WinGetPos,,, w, h, ahk_id%id%
      if (w<A_ScreenWidth AND w<1328)
      PostMessage, 0x112, 0xF030,,, ahk_id%id%
      Sleep, 30
      Sleep, -1
      }
      }
      Return

      ; hotkeys
      ^!o::
      Gosub, SittingOut
      Return

      ^!w::
      Gosub, WindowMaximize
      Return

      ^!s::
      Gosub, StartScript
      Return

      ^!l::
      Gosub, LobbyRestore
      Return

      ^!u::
      Gosub, UnRegisterAll
      Return

      ^!p::
      Gosub, PauseScript
      Return

      ^!h::
      WinHide, %thisahk%
      Return

      ^!r::
      WinShow, %thisahk%
      Return

      ~^!q::
      ExitApp
    • marcgasol96
      marcgasol96
      Plata
      Registro: 06-09-2014 Artículos: 33
      Hola bejelmejel la verdad que si que estoy interesado en conocer esto, porque veo que tb puedes configurar para que nunca te quedes sit out. Mi correo es lacarmenderamon@hotmail.com. mandame un email y hablamos. Graciass
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      Si tambien tiene auto-sentarse, pero para eso tambien hay otro script que ademas tiene auto-timebank.

      Te lo mandaré todo desde mi correo que es luismoragarces@hotmail.com
    • pipeta18
      pipeta18
      Plata
      Registro: 07-16-2010 Artículos: 145
      BEJELMEJEL me podes enviar el de never sitout a mi correo 13701380@fibertel.com.ar porque te lo habia preguntado antes pero no logro encontrar la respuesta.
      Muchas gracias
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      original de pipeta18
      BEJELMEJEL me podes enviar el de never sitout a mi correo 13701380@fibertel.com.ar porque te lo habia preguntado antes pero no logro encontrar la respuesta.
      Muchas gracias
      No hay problema, en cuanto tenga un momento te lo mando.

      Saludos.
    • chuviz
      chuviz
      Bronce
      Registro: 07-22-2014 Artículos: 266
      table ninja y para mesas cash Table Scan Turbo
    • Puppetstyle
      Puppetstyle
      Bronce
      Registro: 09-14-2014 Artículos: 39
      original de BEJELMEJEL
      Te voy a pasar el guion, lo tienes que copiar tal cual y lo pegas en un blok de notas, despues le pones la extension .AHK.
      O si prefieres lo copias en un archivo .AHK directamente, como prefieras, luego simplemente tienes que abrirlo y ya funcionará.

      Eso si tienes que instalar el AutoHotKeys.

      Este es uno muy sencillo y que consume pocos recursos, si despues te interesa otro bastante mas completo pero que consume mas, te lo mando por privado o te lo buscas en 2+2 que por hay tambien anda furrulando.
      Este funciona para PokerStars 6, si lo quieres para el 7 abra que hacerle algunos arreglos.
      que hay que hacer para que abra las mesas? porque pongo el numero le doy a start pero no me registra ni nada...
    • Estudiandote
      Estudiandote
      Bronce
      Registro: 03-12-2014 Artículos: 68
      Hola BEJELMEJEL, habria algun inconveniente que hablemos por skype respecto al AHK? Te dejo el mio por las dudas Motokiller2

      Saludos
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      original de Estudiandote
      Hola BEJELMEJEL, habria algun inconveniente que hablemos por skype respecto al AHK? Te dejo el mio por las dudas Motokiller2

      Saludos

      Hola Estudiandote, no uso Skype, tengo pero no lo uso ni lo he usado nunca.

      Pregunta lo que quieras por el foro, seguro que entre todos podremos resolber tus dudas con AutoHotKey.

      Un poco mas para arriba hay un post que puse mi correo, esto si lo utilizo.

      Un saludo.
    • Estudiandote
      Estudiandote
      Bronce
      Registro: 03-12-2014 Artículos: 68
      Gracias por la respuesta BEJELMEJEL, realmente me sorprende lo que escribí en mi comentario anterior, siendo que fui moderador de unos cuantos foros, y el pedir contacto por fuera de estos suele ser considerado una falta (me auto-advierto).

      Bueno, volviendo al tema, mi consulta es sobre las modificaciones que había que hacer para que funcione bien el script que posteaste en PS7.
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      Hola Estudiandote, las modificaciones que hay que hacer son simplemente cambiar el nombre de los botones que cambian de la version 6 a la 7 de PokerStars.

      En el script donde pone:
      regButton:="PokerStarsButtonClass10"
      unregButton:="PokerStarsButtonClass8"

      Tienes que cambiar el numero que PokerStars7 asigna a estos botones.

      No se si abra que cambiar algo mas para que funcione bien, si puedo te lo miro.

      Un saludo.
    • Estudiandote
      Estudiandote
      Bronce
      Registro: 03-12-2014 Artículos: 68
      El scipt tiene errores en varias lineas y no deja ejecutarse.
    • BEJELMEJEL
      BEJELMEJEL
      Plata
      Registro: 11-17-2008 Artículos: 277
      Lo voy a intentar preparar para que funcione en PokerStars 7, pero hay un pequeño problema que es que si cambias las vistas del listado de registro tambien cambian los botones.

      Lo probaré con la vista que es mas parecida a la de la version 6 de PokerStars.
    • 1
    • 2