Hotkey program to switch between table layouts on Ps? - Gambling and Poker Software Forum

Two Plus Two Forums Online Poker Sites & Marketplaces Poker Software General Software Discussion

Hotkey program to switch between table layouts on Ps?

Post Reply Subscribe

...

06-23-2011 , 04:16 AM

prosims

enthusiast

Join Date: Aug 2007 Posts: 89

Hi everyone,

I am looking for a simple program which allows switch between custom table layouts on Pokerstars. I mean a quick change of custom layouts by pressing a keyboard buttons during the game.

It is very difficult to do it with a mouse while multitabling, some very simple hotkey program/script would help a lot.

Can onyone help me? Thanks a lot.

Quote

150% up to $2,000 Welcome Bonus on CoinPoker

Join the action now

Daily Rewards • Splash Pots • CoinRaces

06-23-2011 , 08:57 AM

fozzy71

Carpal \'Tunnel

Join Date: Mar 2007 Posts: 38,222

There is an old AHK program for changing backgrounds, by _dave_ I believe, but I dont know if it still works.

http://forumserver.twoplustwo.com/45...rstars-147088/

Quote

06-23-2011 , 02:09 PM

_dave_

_Pooh_Bah_

Join Date: Feb 2005 Posts: 13,154

I'd bet the code will still work, but overcards.com being knackered isn't gonna help anyone get it

I think bar nuthin still includes it in some tiltbuster downloads?

I'll try and find it on my computer and re-upload it later on too, but I'm a forgetful soul so bump if I don't!

Quote

06-23-2011 , 03:56 PM

fozzy71

Carpal \'Tunnel

Join Date: Mar 2007 Posts: 38,222

Quote:

Originally Posted by _dave_

I'd bet the code will still work, but overcards.com being knackered isn't gonna help anyone get it

I think bar nuthin still includes it in some tiltbuster downloads?

I'll try and find it on my computer and re-upload it later on too, but I'm a forgetful soul so bump if I don't!

ModManager-ApplyToAllTables.ahk

Code:

;
; by _dave_ of twoplustwo software forum
; 
; contributions by Jukofyork, Roland
;


#NoEnv
SendMode Input
#SingleInstance, Force
SysGet, border, 32
SysGet, caption, 4
caption := border + caption


GroupAdd, StarsTables, ahk_class PokerStarsTableFrameClass
bglist := ""
bgnames := ""
Loop, *.jpg
{
  bglist := bglist . A_LoopFileLongPath . "`n"
  StringTrimRight, picname, A_LoopFileName, 4
  bgnames := bgnames . picname . "`n"
}
StringTrimRight, bglist, bglist, 1
StringTrimRight, bgnames, bgnames, 1

;Msgbox %bgnames%

return

^RButton::
id := getid()
IfWinExist, ahk_id%id% ahk_group StarsTables

{
  Loop, Parse, bgnames, `n
  {
    Menu, menu, Add, %a_loopfield%, changeBackground
  }
  Menu, menu, Show
}
return

changeBackground:

Loop, Parse, bglist, `n
{
  if (A_Index = A_ThisMenuItemPos)
  {
    newpic := A_LoopField
  }
}
SetBackground(id, newpic)
WinActivate, ahk_id%id%
return

SetBackground(win, newpic)
{
  SetTitleMatchMode, 2
  WinGet, pspid, pid, PokerStars Lobby
  
  PostStarsClick(400, 52, win)
  WinWait, Options ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, id, id
  Sleep, -1
  
  ControlFocus, Button12, ahk_id%id%
  ControlSend, Button12, {SPACE}, ahk_id%id%
  WinWait, Table Themes ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, themes_id, id
  Sleep, -1
  
  ControlFocus, Button1, ahk_id%themes_id%
  ControlSend, Button1, {SPACE}, ahk_id%themes_id%
  
  WinWait, Background ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, background_id, id
  Sleep, -1
  
  Loop, 10
  {
    ControlGet, en_test, Enabled, , Edit1, ahk_id%background_id%
    if !(en_test)
    {
      WinActivate, ahk_id%background_id%
      ControlClick, Button1, ahk_id%background_id%
      Sleep, 333
    }
    else
    {
      break
    }
  }
  ControlSetText, Edit1, %newpic%, ahk_id%background_id%
  Sleep, -1
  ControlFocus, Button4, ahk_id%background_id%
  ControlSend, Button4, {SPACE}, ahk_id%background_id%
  Loop, 9
  {
    ControlGetText, apply_test, Button3, ahk_id%themes_id%
    if (apply_test = "Apply")
    {
      break
    }
    Sleep, 333
  }
  WinActivate, ahk_id%background_id%
  ControlFocus, Button5, ahk_id%background_id%
  ControlSend, Button5, {SPACE}, ahk_id%background_id%
  Sleep, -1
  
  WinActivate, ahk_id%themes_id%
  ControlFocus, Button3, ahk_id%themes_id%
  ControlSend, Button3, {SPACE}, ahk_id%themes_id%
  Sleep, -1
  
  WinWait, Apply Theme ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, at_id, id
  Sleep, -1
  WinActivate, ahk_id%at_id%
  ControlFocus, Button3, ahk_id%at_id%
  ControlSend, Button3, {SPACE}, ahk_id%at_id%
  Sleep, -1
  ControlFocus, Button4, ahk_id%at_id%
  ControlSend, Button4, {SPACE}, ahk_id%at_id%
  Sleep, -1
  
  WinActivate, ahk_id%win%
}

getid()
{
  ;MsgBox, Table Under Cursor Mode
  MouseGetPos, , , id
  return id
}

relStarsClientPoint(id, ByRef x, ByRef y)
{
  global border
  global caption
  rw := 792
  rh := 546
  WinGetPos, , , w, h, ahk_id%id%
  w := w - (2*border)
  h := h - (2*border) - caption
  
  x := Floor( (x / rw ) * w )
  y := Floor( (y / rh) * h  )
  
}

;Juks rocks
PostLeftClick(x, y, table_id, activate=1) {
; ### JUK: Send the down left click, then the mouse-up messages.
; NOTE: This is relative to the top left of the client area and NOT the top left of the
;       window (ie: It *doesn't* include the title-bar like AHK's MouseClick does!!!).
If activate
 WinActivate, ahk_id%table_id%
PostMessage, 0x201, 0x0001, ((y<<16)^x), , ahk_id%table_id%
PostMessage, 0x202 , 0, ((y<<16)^x), , ahk_id%table_id%
}

PostStarsClick(x, y, id)
{
  relStarsClientPoint(id, x, y)
  PostLeftClick(x, y, id)
}

~^!q::
ExitApp
return

ModManager-ApplyTo1Table.ahk

Code:

;
; by _dave_ of twoplustwo software forum
; 
; contributions by Jukofyork, Roland
;


#NoEnv
SendMode Input
#SingleInstance, Force
SysGet, border, 32
SysGet, caption, 4
caption := border + caption


GroupAdd, StarsTables, ahk_class PokerStarsTableFrameClass
bglist := ""
bgnames := ""
Loop, *.jpg
{
  bglist := bglist . A_LoopFileLongPath . "`n"
  StringTrimRight, picname, A_LoopFileName, 4
  bgnames := bgnames . picname . "`n"
}
StringTrimRight, bglist, bglist, 1
StringTrimRight, bgnames, bgnames, 1

;Msgbox %bgnames%

return

^RButton::
id := getid()
IfWinExist, ahk_id%id% ahk_group StarsTables

{
  Loop, Parse, bgnames, `n
  {
    Menu, menu, Add, %a_loopfield%, changeBackground
  }
  Menu, menu, Show
}
return

changeBackground:

Loop, Parse, bglist, `n
{
  if (A_Index = A_ThisMenuItemPos)
  {
    newpic := A_LoopField
  }
}
SetBackground(id, newpic)
WinActivate, ahk_id%id%
return

SetBackground(win, newpic)
{
  SetTitleMatchMode, 2
  WinGet, pspid, pid, PokerStars Lobby
  
  PostStarsClick(400, 52, win)
  WinWait, Options ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, id, id
  Sleep, -1
  
  ControlFocus, Button12, ahk_id%id%
  ControlSend, Button12, {SPACE}, ahk_id%id%
  WinWait, Table Themes ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, themes_id, id
  Sleep, -1
  
  ControlFocus, Button1, ahk_id%themes_id%
  ControlSend, Button1, {SPACE}, ahk_id%themes_id%
  
  WinWait, Background ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, background_id, id
  Sleep, -1
  
  Loop, 10
  {
    ControlGet, en_test, Enabled, , Edit1, ahk_id%background_id%
    if !(en_test)
    {
      WinActivate, ahk_id%background_id%
      ControlClick, Button1, ahk_id%background_id%
      Sleep, 333
    }
    else
    {
      break
    }
  }
  ControlSetText, Edit1, %newpic%, ahk_id%background_id%
  Sleep, -1
  ControlFocus, Button4, ahk_id%background_id%
  ControlSend, Button4, {SPACE}, ahk_id%background_id%
  Loop, 9
  {
    ControlGetText, apply_test, Button3, ahk_id%themes_id%
    if (apply_test = "Apply")
    {
      break
    }
    Sleep, 333
  }
  WinActivate, ahk_id%background_id%
  ControlFocus, Button5, ahk_id%background_id%
  ControlSend, Button5, {SPACE}, ahk_id%background_id%
  Sleep, -1
  
  WinActivate, ahk_id%themes_id%
  ControlFocus, Button3, ahk_id%themes_id%
  ControlSend, Button3, {SPACE}, ahk_id%themes_id%
  Sleep, -1
  
  WinWait, Apply Theme ahk_pid%pspid% ahk_class #32770,, 5
  If (errorLevel)
  {
    return
  }
  WinGet, at_id, id
  Sleep, -1
  WinActivate, ahk_id%at_id%
  ControlFocus, Button4, ahk_id%at_id%
  ControlSend, Button4, {SPACE}, ahk_id%at_id%
  Sleep, -1
  
  WinActivate, ahk_id%win%
}

getid()
{
  ;MsgBox, Table Under Cursor Mode
  MouseGetPos, , , id
  return id
}

relStarsClientPoint(id, ByRef x, ByRef y)
{
  global border
  global caption
  rw := 792
  rh := 546
  WinGetPos, , , w, h, ahk_id%id%
  w := w - (2*border)
  h := h - (2*border) - caption
  
  x := Floor( (x / rw ) * w )
  y := Floor( (y / rh) * h  )
  
}

;Juks rocks
PostLeftClick(x, y, table_id, activate=1) {
; ### JUK: Send the down left click, then the mouse-up messages.
; NOTE: This is relative to the top left of the client area and NOT the top left of the
;       window (ie: It *doesn't* include the title-bar like AHK's MouseClick does!!!).
If activate
 WinActivate, ahk_id%table_id%
PostMessage, 0x201, 0x0001, ((y<<16)^x), , ahk_id%table_id%
PostMessage, 0x202 , 0, ((y<<16)^x), , ahk_id%table_id%
}

PostStarsClick(x, y, id)
{
  relStarsClientPoint(id, x, y)
  PostLeftClick(x, y, id)
}

~^!q::
ExitApp
return

Quote

06-24-2011 , 02:03 AM

Bar Nuthin

veteran

Join Date: Aug 2006 Posts: 2,279

or are you talking about layout as in stack and tile?

Quote

06-24-2011 , 02:07 AM

_dave_

_Pooh_Bah_

Join Date: Feb 2005 Posts: 13,154

Quote:

Originally Posted by Bar Nuthin

or are you talking about layout as in stack and tile?

Oh wow I read OP again and I think it's this!

Quote

06-24-2011 , 02:10 AM

Bar Nuthin

veteran

Join Date: Aug 2006 Posts: 2,279

Quote:

Originally Posted by _dave_

Oh wow I read OP again and I think it's this!

at least we got a bump for some fresh ModManager scripts

and yes, it is almost standard addition to stars themes these days.

Quote

06-24-2011 , 03:38 AM

prosims

enthusiast

Join Date: Aug 2007 Posts: 89

Quote:

Originally Posted by Bar Nuthin

or are you talking about layout as in stack and tile?

I am talking about custom saved layout, which is under "View" in Lobby after "Stack tables"

For example, when u play with layout with 20 positionaly saved tables and suddenly 21 table comes, it comes in the middle, big (not resized) and I have to click with mouse manually to change the layout to the next layout and it is very difficult to do because it looses focus then the action comes on some other table.

So it would be nice to have a hotkey for this action.

Thanks guys and sorry for my english.

Quote

150% up to $2,000 Welcome Bonus on CoinPoker

Join the action now

Daily Rewards • Splash Pots • CoinRaces

Post Reply Subscribe

...