#1
|
|||
|
|||
simple script for stars: help please
i need to fix a pretty simple script for stars.
when i right click a sngs, its suposed to enter 2.5x the bb in the raise box. and it stopped working. will ship $5 if you can fix it. just the right click, everythin gelse stil works ==================================== ; ; AutoHotkey Version: 1.x ; Language: English ; Platform: Win9x/NT ; Author: A.N.Other <myemail@nowhere.com> ; ; Script Function: ; Template script (you can customize this template by editing "ShellNew\Template.ahk" in your Windows folder) ; #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases. SendMode Input ; Recommended for new scripts due to its superior speed and reliability. SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory. #NoEnv #Persistent #SingleInstance force #Include %a_scriptDir% #Include Functions.ahk interval = 100 ; period between refreshes Loop { AutoRegister() NoMsgBox() Sleep %interval% } F1::tile() return tile() {SetTitleMatchMode, 1 WinWait, PokerStars Lobby WinActivate, PokerStars Lobby WinWaitActive, PokerStars Lobby WinMenuSelectItem, PokerStars Lobby,,View,Tile } F2:: ;__Closes tournament lobbies CloseTournamentLobby() return F3:: ;__Pushes all-in NumpadMult:: MouseGetPos,,, curWin ControlSetText, PokerStarsSliderEditorClass1, 999999, ahk_id%curWin% return ~RButton:: F4:: WinGet,id,,A WinGetTitle, title, ahk_id%id% IfInString, title, No Limit Hold'em { Slash := Instr(title, "/") + 2 Space := Instr(title, " ", false, Slash) BBLength := Space - Slash StringMid, Bigblind, title, Slash, BBLength Transform, RaiseAmount, Round, Bigblind * 2.5 MouseGetPos,,, curWin ControlSetText, PokerStarsSliderEditorClass1, %RaiseAmount%, ahk_id%curWin% } return Autoregister() {SetTitleMatchMode 2 IfWinExist, Tournament Registration { WinActivate Control, Check ControlClick, OK Sendraw keys {Space} } } CloseTournamentLobby() { Loop { SetTitleMatchMode 2 IfWinExist, Lobby,, PokerStars Lobby WinClose else break } } NoMsgBox() { IfWinExist, PokerStars, OK WinClose IfWinExist, PokerStars, Internal Sleep 500 WinClose, PokerStars, Internal IfWinExist, PokerStars, Check { ControlClick, Check Sendraw keys {Space} } return } |
|
|