Advertisement
Kurisutaru

PriconneR - DMM Desktop Keymapper

Jun 19th, 2018
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoEnv  ;
  2. ; #Warn  ;
  3. SendMode Input  ;
  4. SetWorkingDir %A_ScriptDir%  ;
  5. CoordMode, Mouse, Client
  6. SetTitleMatchMode, 2
  7. SetControlDelay -1
  8.  
  9. #IfWinActive PrincessConnectReDive
  10. ;Kuri-Note : use window spy for checking the distance (xIncr) and coordinate
  11. x := 320 ;Starting X coordinate
  12. y := 650 ;Y coordinate, usually fixed
  13. xIncr := 160 ;X coordinate increment
  14.  
  15.     ;Normal Key
  16.     1::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 0), y)
  17.     2::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 1), y)
  18.     3::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 2), y)
  19.     4::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 3), y)
  20.     5::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 4), y)
  21.     ;Numpad Alternative
  22.     Numpad1::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 0), y)
  23.     Numpad2::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 1), y)
  24.     Numpad3::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 2), y)
  25.     Numpad4::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 3), y)
  26.     Numpad5::KuriPriconneRActivateAndClick(KuriCalcXCoor(x, xIncr, 4), y)
  27.    
  28. return
  29.  
  30. KuriPriconneRActivateAndClick(x, y)
  31. {
  32.     ;Self-Reject, seems to intrusive
  33.     ;if(WinExist("PrincessConnectReDive")){
  34.     ;   WinActivate
  35.  
  36.     ;Make sure keymap work only when Window on foremost front
  37.     if(WinActive("PrincessConnectReDive"))
  38.     {  
  39.         Click, %x%, %y%
  40.         return
  41.     }
  42. }
  43.  
  44. KuriCalcXCoor(x, xIncr, multiplier)
  45. {
  46.     return x + ( xIncr * multiplier )
  47. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement