Tuesday, November 20, 2007

Mon script pokerstars

Yopyop,

Aujoud'hui je suis d'humeur partageur :)
Donc voici mon script Autohotkey pour pokerstars.
Ce n'est pas moi qu'il est fait. J'ai juste pris des bouts de scripts ici et là pour faire le mien. Vous pouvez tout prendre, prendre que quelques fonctions ou encore vous en inspirer pour en developper d'autre.
Si vous avez des questions, soucis, remarques, les commentaires sont là pour ca !
Enjoy !

++
IggY


;=======================================================
; ps.ahk
;
; Preco :
; _ fonctionne avec AutoHotKey
; _ ce script a besoin des Rolands fonctions v3
;(http://www.autohotkey.com/download/AutoHotkeyInstall.exe)
;(http://www.overcards.com/wiki/moin.cgi/RolandsFunctions)
;
; Modification :
; _ modifié au besoin vos touches de fonction
; _ modifié au besoin le positionnement des tables
;
; Fonctionnalitées :
; _ enregistrement simplifié sur un SnG
; _ supprime automatiquement les popups
; _ ferme tout les lobbies des SnG
; _ affecte une touche pour relancer 2.5BB
; _ affecte une touche pour envoyer la boite !
; _ permet de positionner les tables sur l'écran avec le clavier
;
;=======================================================


#NoEnv
#Persistent
#SingleInstance force
#Include %a_scriptDir%
#Include functions_v3.ahk

interval = 100 ; period between refreshes

;===================
;== Fonction Loop ==
;===================
;ce qui tourne en boucle pendant l'execution du script
;soit l'enregistrement simplifié et la suppression des popups

Loop
{
AutoRegister()
NoMsgBox()
Sleep %interval%
}


;====================================
;== Affection des touches d'action ==
;====================================
;modifié le nom de la touche au début de la ligne :
;
;touche_du_clavier::
;"ce que fait la touche"
;return


;
;== Touche F1 pour fermer les lobbies
;
F1::
CloseTournamentLobby()
return

;
;== Bouton du milieu de la souris -> PPPPUUUSSSSHHHHH
;
~MButton::
MouseGetPos,,, curWin
ControlSetText, PokerStarsSliderEditorClass1, 999999, ahk_id%curWin%
return

;
;== Clique droit de la souris -> relance 2.5BB
;
~RButton::
WinGet,tableID,,A
WinGetTitle, title, ahk_id%tableID%
IfInString, title, No Limit Hold'em
{
RegexMatch( title, "\$?(\d+)\/\$?(\d+)", blind )
Transform, RaiseAmount, Round, blind2 * 2.5
MouseGetPos,,, curWin
ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id%curWin%
}
return

;
;== Clique sur le bouton "register" du main lobby Pokerstars
;== Attention : la fenetre du lobby doit être active (sélectionné)
;
g::
MouseClick, left, 686, 523
return

;
;== positionne la fenetre (la table) active sur x,y
;
; WinMove,,, x, y
; x = positionnement en pixel sur la largueur de l'ecran
; y = positionnement en pixel sur la hauteur de l'ecran
;

;== d -> en bas à gauche de mon deuxième ecran
d::
MouseGetPos,,,tableID
IfWinExist, ahk_id %tableID%
WinMove,,, 1280, 500
return

;== f -> en bas à droite de mon deuxième ecran
f::
MouseGetPos,,,tableID
IfWinExist, ahk_id %tableID%
WinMove,,, 1920, 500
return

;== z -> en haut à gauche de mon deuxième ecran
z::
MouseGetPos,,,tableID
IfWinExist, ahk_id %tableID%
WinMove,,, 1280, 0
return

;== r -> en haut à droite de mon deuxième ecran
r::
MouseGetPos,,,tableID
IfWinExist, ahk_id %tableID%
WinMove,,, 1920, 0
return

;======================================
;== Fin de l'affectation des touches ==
;======================================


;===========================
;== Fonction Autoregister ==
;===========================
;une fois le bouton "register" actionné
;cette fonction selectionne le buyin
;et confirme l'enregistrement

Autoregister()
{
SetTitleMatchMode 2
IfWinExist, Tournament Registration
{
WinActivate
Control, Check
ControlClick, OK
Sendraw keys {Space}
}
}


;================================
;== Fonction CloseTournamentLobby
;================================
;Ferme tout les lobbies de tournois ouvert

CloseTournamentLobby()
{
Loop {
SetTitleMatchMode 2
IfWinExist, Lobby,, PokerStars Lobby
WinClose
else
break
}
}


;==========
;==NoMsgBox
;==========
;clique sur tout les popups pokerstars

NoMsgBox()
{
IfWinExist, PokerStars, OK
WinClose
IfWinExist, 57, OK
WinClose
IfWinExist, PokerStars, Internal
Sleep 500
WinClose, PokerStars, Internal
return
}

3 comments:

affiliate said...

Ceci m'a l'air énorme!
Grand merci pour l'avoir mis à disposition, je testerais ça au plus vite.

Rodolphe said...

wow !! Merci !!
Je teste ça !

Anonymous said...

Ou as-tu eu ta fontion pour l'auto-register s'il te plait. Je n'arrive pas à la trouver sur le net. Merci.