Hola, a parte del table ninja hay algún programa para auto-registrarse??? gracias
Tengo entendido que el Holdem Boss también te lo permite! A ver si alguien puede confirmarlo
Saludos, Labandaroja
Y agregamos también el TableScan Turbo, esos programas los podes encontrar en la sección herramientas de poker
Saludos, Labandaroja
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...
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.
; 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, &ubmit and Start/Continue Script
Gui, Add, Button, w190 gLobbyRestore, &Restore [L]obby
Gui, Add, Button, w190 gUnRegisterAll, &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
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
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
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
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.
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...
Hola BEJELMEJEL, habria algun inconveniente que hablemos por skype respecto al AHK? Te dejo el mio por las dudas Motokiller2
Saludos
original de Estudiandote
Hola BEJELMEJEL, habria algun inconveniente que hablemos por skype respecto al AHK? Te dejo el mio por las dudas Motokiller2Saludos
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.
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.
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.
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.