Advertisement
Guest User

Survey helper, 2nd style

a guest
Jun 1st, 2014
181
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
  2. #Warn ; Enable warnings to assist with detecting common errors.
  3. SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
  4. SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
  5. SetBatchLines -1
  6. SetKeyDelay -1
  7.  
  8. global number_scale := 6 ; CHANGE THIS FROM 6 TO THE AMOUNT OF BUBBLES PER LINE
  9.  
  10. 1::
  11. Send {Space}
  12. Send {Tab %number_scale%}
  13. return
  14.  
  15. 2::
  16. Send {Tab}
  17. Send {Space}
  18. Send {Tab %number_scale%}
  19. Send +{Tab}
  20. return
  21.  
  22. 3::
  23. Send {Tab 2}
  24. Send {Space}
  25. Send {Tab %number_scale%}
  26. Send +{Tab 2}
  27. return
  28.  
  29. 4::
  30. Send {Tab 3}
  31. Send {Space}
  32. Send {Tab %number_scale%}
  33. Send +{Tab 3}
  34. return
  35.  
  36. 5::
  37. Send {Tab 4}
  38. Send {Space}
  39. Send {Tab %number_scale%}
  40. Send +{Tab 4}
  41. return
  42.  
  43. 6::
  44. Send {Tab 5}
  45. Send {Space}
  46. Send {Tab %number_scale%}
  47. Send +{Tab 5}
  48. return
  49.  
  50. 7::
  51. Send {Tab 6}
  52. Send {Space}
  53. Send {Tab %number_scale%}
  54. Send +{Tab 6}
  55. return
  56.  
  57. 8::
  58. Send {Tab 7}
  59. Send {Space}
  60. Send {Tab %number_scale%}
  61. Send +{Tab 7}
  62. return
  63.  
  64. 9::
  65. Send {Tab 8}
  66. Send {Space}
  67. Send {Tab %number_scale%}
  68. Send +{Tab 8}
  69. return
  70.  
  71. 0::
  72. Send {Tab 9}
  73. Send {Space}
  74. Send {Tab %number_scale%}
  75. Send +{Tab 9}
  76. return
  77.  
  78. F6:: ;pauses
  79. Suspend, Toggle
  80. return
  81.  
  82. F8::Reload ; refreshes script after you save a change to it
  83.  
  84. F7::ExitApp ; closes script entirely
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement