PartyPoker_Helper AHK Tool

    • Kongotto
      Kongotto
      Global
      Dabei seit: 05.05.2007 Beiträge: 5.194
      Hi Leute,

      ich wollte hier mal mein kleines, aber feines Tool für Partypoker vorstellen.

      Was kann es?

      1. Es macht beide Komma-Tasten zu Punkt-Tasten.

      2. Es positioniert die Tische auf dem Bildschirm. Man gibt einmal die gewünscht Tischgrösse in der PartyPoker_Helper.ini Datei an (Tool einmal starten, dann wird die erstellt) und kann dann über die Tastenkombination STRG + Numpadzahl bestimmen, wo der Tisch liegen soll. Bsp.: STRG + Numpad 7 => der Tisch springt nach links oben, weil die 7 links oben auf dem Nummernblock ist.

      3. Doch, wie findet man heraus wie gross der Tisch ist? Dazu klickt ihr einen Tisch an und drückt dann STRG + Leertaste. Das sagt Euch wie die Breite und Höhe des aktiven Tisches ist. Diese Werte könnt ihr dann in der PartyPoker_Helper.ini Datei verwenden. Tool neustarten und dann funktionieren die neuen Einstellungen.

      4. STRG + Numpad 0 beendet das Tool

      Momentan funktioniert es auf allen Tischen die "Table", "Speed" und "Turbo heissen. Wenn PartyPoker das mal ändert, muss ich es auch nochmal ändern.

      Voraussetzungen:
      Windowsleiste befindet sich UNTEN auf dem Bildschirm.

      Fragen, Anmerkungen und Kritik erwünscht. Postet einfach hier rein.

      EDIT: Hier der Link zur PartyPoker_Helper.exe

      http://www.megaupload.com/de/?d=7YNWT48A


      Hier der AHK PartyPoker_Helper Source Code:

      code:
      #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
      SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
      SetKeyDelay, 20
      SetMouseDelay, 20
      ;Process, Priority, , High
      
      ;WinGetPos, X, Y, Width, Height, A
      ;MsgBox, POS %X%  %X%  DIMENSION is %Width% %Height%
      ;MsgBox, %A_ScreenWidth% %A_ScreenHeight% %Width%
      
      width = 545
      height = 404
      
      ;MsgBox, The value is %width%.
      ;IniWrite, %width%, oj.ini, Section1, width
      ;IniWrite, %height%, oj.ini, Section1, height
      
      if FileExist("PartyPoker_Helper.ini")
      {
      ;MsgBox, File exists!
      } 	else
      	{
      	IniWrite, %width%, PartyPoker_Helper.ini, Section1, width
      	IniWrite, %height%, PartyPoker_Helper.ini, Section1, height
      	}
      
      IniRead, width, PartyPoker_Helper.ini, Section1, width
      IniRead, height, PartyPoker_Helper.ini, Section1, height
      
      
      
      SetTimer, KeepRunning2
      return
      
      ;derzeit ist KeepRunning2 aktiv
      KeepRunning:
      ; Get the process name of the active window (i.e. Notepad.exe)
      WinGet, szProcessName, ProcessName, A
      if szProcessName = PartyGaming.exe 
      {
      		IfWinActive , PartyPoker.com 
      	{
      	Suspend, on
      	}
      	else
      	{
      	Suspend, off
      	}
      }
      else 
      {
      	
      	Suspend, on
      	
      }
      return
      
      
      KeepRunning2:
      ; Get the process name of the active window (i.e. Notepad.exe)
      WinGet, szProcessName, ProcessName, A
      if szProcessName = PartyGaming.exe 
      {
      	if WinActive("Table") or WinActive("Speed")  or WinActive("Jackpot")
      	{
      		Suspend, off
      	}
      	else
      
      	{
      		Suspend, on
      	}
      			
      	
      
      }
      ; nicht die PartyGaming.exe
      else 
      {
      	Suspend, on
      }
      return
      
      ; Standard Komma wird zu Punkt
      SC033::
      Send, {. Down}
      Send, {. Up}
      return
      
      ; Numpad Komma wird zu Punkt
      SC053::
      Send, {. Down}
      Send, {. Up}
      return
      
      ;STRG + Leertaste
      ~^SC039::
      WinGetPos, X, Y, Width, Height, A
      MsgBox, X = %X%  Y = %Y%  Breite = %Width% Höhe = %Height%
      return
      
      
      ; Ende Taste
      ;SC14F::
      
      ; STRG + NUMPAD
      ~^SC052::
      Suspend, off
      ExitApp
      return
      
      ;~^SC019::
      ;WinMove,A,, 0 , 0 , 545, 404 ;
      ;return
      
      
      ;MITTE OBEN
      ~^SC048::
      moveActiveWindowTo(8,width,height)
      return
      
      ;MITTE MITTE
      ~^SC04C::
      moveActiveWindowTo(5,width,height)
      return
      
      ;MITTE LINKS
      ~^SC04B::
      moveActiveWindowTo(4,width,height)
      return
      
      ;MITTE RECHTS
      ~^SC04D::
      moveActiveWindowTo(6,width,height)
      return
      
      ;MITTE UNTEN
      ~^SC050::
      moveActiveWindowTo(2,width,height)
      return
      
      ;LINKS OBEN
      ~^SC047::
      moveActiveWindowTo(7,width,height)
      return
      
      ;RECHTS OBEN
      ~^SC049::
      moveActiveWindowTo(9,width,height)
      return
      
      ;RECHTS UNTEN
      ~^SC051::
      moveActiveWindowTo(3,width,height)
      return
      
      ;LINKS UNTEN
      ~^SC04F::
      moveActiveWindowTo(1,width,height) 
      return
      
      
      moveActiveWindowTo(key,width,height)
      {
      WinGetPos, X, Y, Width, Height, A
      WinGetPos, X2, Y2, Width2, Height2, ahk_class Shell_TrayWnd
      
          if(key=1)
          {
          WinMove,A,, 0 , (A_ScreenHeight-Height-Height2), %width%, %height% ;
          }  
          if(key=2)
          {
          WinMove,A,, (A_ScreenWidth/2)-(Width/2), A_ScreenHeight-Height-Height2, %width%, %height% ;
          }
          if(key=3)
          {
          WinMove,A,, (A_ScreenWidth)-(Width) , A_ScreenHeight-Height-Height2, %width%, %height% ;
          }
          if(key=4)
          {
          WinMove,A,, 0 , (A_ScreenHeight/2)-(Height/2), %width%, %height% ;
          }
          if(key=5)
          {
          WinMove,A,, (A_ScreenWidth/2)-(Width/2), (A_ScreenHeight/2)-(Height/2), %width%, %height% ;
          }
          if(key=6)
          {
          WinMove,A,, (A_ScreenWidth)-(Width) , (A_ScreenHeight/2)-(Height/2), %width%, %height% ;
          }
          if(key=7)
          {
          WinMove,A,, 0, 0, %width%, %height% ;
          }
          if(key=8)
          {
          WinMove,A,, (A_ScreenWidth/2)-(Width/2), 0, %width%, %height% ;
          }
          if(key=9)
          {
          WinMove,A,, (A_ScreenWidth)-(Width), 0, %width%, %height% ;
          }  	
      
      }return 
      
      
  • 1 Antwort
    • sxxe
      sxxe
      Bronze
      Dabei seit: 03.07.2005 Beiträge: 1.031
      Danke für das Prog.

      Zu 4.) Ich könnte mir vorstellen, dass man durch die Tastenkombination öfter mal versehentlich das Programm schließt. Da man das AHK Skript ja auch über die Taskleiste beenden kann, würde ich die Funktion zum schliessen raus nehmen.

      bye