Advertisement
Guest User

Untitled

a guest
Jul 6th, 2015
225
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.98 KB | None | 0 0
  1. ;
  2. ; AutoHotkey Version: 1.x
  3. ; Language: English
  4. ; Platform: Win9x/NT
  5. ; Author: A.N.Other <myemail@nowhere.com>
  6. ;
  7. ; Script Function:
  8. ; Template script (you can customize this template by editing "ShellNew\Template.ahk" in your Windows folder)
  9. ;
  10.  
  11.  
  12. SetWorkingDir %A_ScriptDir%; Ensures a consistent starting directory.
  13.  
  14. DetectHiddenWindows, On
  15. Script_Hwnd := WinExist("ahk_class AutoHotkey ahk_pid " DllCall("GetCurrentProcessId"))
  16. DetectHiddenWindows, Off
  17. DllCall("RegisterShellHookWindow", "uint", Script_Hwnd)
  18. OnMessage(DllCall("RegisterWindowMessage", "str", "SHELLHOOK"), "ShellEvent")
  19. ShellEvent(wParam, lParam) {
  20. if (wParam = 0x8006) HSHELL_FLASH
  21. {
  22. WinGet,descobre,ProcessName, ahk_id %lParam%
  23. if(descobre = "DofusMod.exe")
  24. WinActivate, ahk_id %lParam%
  25.  
  26. }
  27. }
  28.  
  29. GroupAdd, Dofus, ahk_class ApolloRuntimeContentWindow
  30. Tab::GroupActivate, Dofus, r
  31. F2:: WinActivate, Tossit
  32. F3:: WinActivate, Pheory
  33. F4:: WinActivate, Reckon
  34. F5:: WinActivate, Sahira
  35. ^Backspace::Suspend
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement