warfar

Typingweb Hack

Nov 18th, 2013
545
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. IniRead, MX1, type.ini, Vars, MX1, 0
  2. IniRead, MY1, type.ini, Vars, MY1, 0
  3. IniRead, MX2, type.ini, Vars, MX2, 0
  4. IniRead, MY2, type.ini, Vars, MY2, 0
  5.  
  6. IfNotExist, %A_WorkingDir%\type.ini
  7. {
  8. MsgBox, Press F8 to set starting letter. Press F9 to set end letter.
  9. }
  10.  
  11. F8::
  12. MouseGetPos, MX1, MY1
  13. IniWrite, %MX1%, type.ini, Vars, MX1
  14. IniWrite, %MY1%, type.ini, Vars, MY1
  15. MsgBox, Done!
  16. return
  17.  
  18. F9::
  19. MouseGetPos, MX2, MY2
  20. IniWrite, %MX2%, type.ini, Vars, MX2
  21. IniWrite, %MY2%, type.ini, Vars, MY2
  22. MsgBox, Done!
  23. return
  24.  
  25. F7::
  26. Click %MX1%,%MY1%
  27. MouseClickDrag, Left, %MX1%,%MY1%,%MX2%,%MY2%,1
  28. Send ^c
  29. Click 300,300
  30. SetKeyDelay, 0,0
  31. StringReplace, clipboard,clipboard,`r`n,,1
  32. SendRaw %clipboard%
  33. return
Add Comment
Please, Sign In to add comment