customtitlebar для Poker Stars

    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      Хорошая програмка, которая раскрашивает окно в зависимости, например от стадии турнира (бабл, итм) при игре "столы стопкой" просто незаменима.
      Кто-нибудь настраивал эту прогу ? Я не совсем понял, чтобы она показывала состояние турниров, там что, должны быть открыты все лобби этих турниров ?
      Вот сама прога
  • 22 ответов
    • vpmarat
      vpmarat
      Модератор
      Модератор
      На форуме с: 22.01.2008 Сообщения: 83.744
      Придется подождать отзывов тех, кто ею пользовался.
      Лично мне хватает AHK скрипта чтобы переназначить цвет фона в нужных стадиях турниров.
    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      Оригинал пользователя vpmarat
      Лично мне хватает AHK скрипта чтобы переназначить цвет фона в нужных стадиях турниров.
      Оо я тоже хочу такой ! Где бы мне его взять ? Или поменяться на что-нибудь ? (у меня почти целая коллекция AHK скриптов для Poker Stars :club:)
    • vpmarat
      vpmarat
      Модератор
      Модератор
      На форуме с: 22.01.2008 Сообщения: 83.744
      Лн на 2+2 давно лежит, бери
      Скопировать код, сохранить в файл с расширением ".ahk"
      Собрать в отдельную папочку несколько фоновых картинок и положить в ту же папку скрипт. По нажатию на столе Ctrl + Right click даст меню со списком картинок из этой папки.

      ой, сломался при копировании
      хотя... попробуй так и взять


      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
    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      не работает что то ;(
    • vpmarat
      vpmarat
      Модератор
      Модератор
      На форуме с: 22.01.2008 Сообщения: 83.744
      Вот, возьми так
      там еще колода в качестве бонуса
    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      Спасибо ! Правда кроме колоды я там ничего не нашёл :s_biggrin:
    • vpmarat
      vpmarat
      Модератор
      Модератор
      На форуме с: 22.01.2008 Сообщения: 83.744
      Забыл засунуть. Возьми еще раз
    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      Ещё раз спасибо !
    • GoodGame1989
      GoodGame1989
      Бронза
      На форуме с: 02.06.2010 Сообщения: 806
      Спасибо за тему.
    • bezbanta
      bezbanta
      Бронза
      На форуме с: 30.09.2009 Сообщения: 3.318
      ех было бы здорово красить еще в зависимости от статов хиро. при игре стопкой тоже полезно было бы - где сидишь очень тайтово, а где наоборот лузово.Жаль тут такого нет.
    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      GoodGame1989 а ты случайно не с PS SNG 0.5$ - 1$ ?
      Ник знакомый ....
    • Groging
      Groging
      Бронза
      На форуме с: 15.09.2010 Сообщения: 19.011
      спасибо за тему.
    • Basoski
      Basoski
      Золото
      На форуме с: 13.03.2008 Сообщения: 224
      Оригинал пользователя vpmarat
      По нажатию на столе Ctrl + Right click даст меню со списком картинок из этой папки.
      При нажатии на столе Ctrl + Right Click выскакивает менюшка со списком картинок в папке но при выборе одной из них ничего не происходит. Фон остается прежний. Подскажите в чем может быть дело ?
    • vpmarat
      vpmarat
      Модератор
      Модератор
      На форуме с: 22.01.2008 Сообщения: 83.744
      Запускать скрипт из той же папки.
      А может, просто тема стола = Нова. У меня на а ней не работает
    • sekkuro
      sekkuro
      Бронза
      На форуме с: 02.08.2010 Сообщения: 2
      Всё работает. Только после смены фона надо нажать на вкладку Option
    • Basoski
      Basoski
      Золото
      На форуме с: 13.03.2008 Сообщения: 224
      Оригинал пользователя sekkuro
      Всё работает. Только после смены фона надо нажать на вкладку Option
      Можно подробнее? Какую вкладку option и для чего ?
    • SanInBev
      SanInBev
      Бронза
      На форуме с: 11.01.2010 Сообщения: 238
      AC90210, привет поделись скриптами
    • sekkuro
      sekkuro
      Бронза
      На форуме с: 02.08.2010 Сообщения: 2
      Оригинал пользователя Basoski
      Оригинал пользователя sekkuro
      Всё работает. Только после смены фона надо нажать на вкладку Option
      Можно подробнее? Какую вкладку option и для чего ?
      На открытотом столе есть кнопка опции, кликаем по ней и фон автоматом меняется на выбранный ранее. На ГиперСимпэл при выборе фона меняется автоматом.
    • AC90210
      AC90210
      Золото
      На форуме с: 07.04.2010 Сообщения: 475
      Оригинал пользователя SanInBev
      AC90210, привет поделись скриптами
      написал в ЛС
    • 1
    • 2