Advertisement
Ex0rpl4net

Untitled

Oct 9th, 2014
238
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.82 KB | None | 0 0
  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. #SingleInstance force
  6.  
  7.  
  8. us = a`nb`nc
  9. id = 1`n2`n3
  10.  
  11.  
  12. inputbox,input,enter input
  13.  
  14.  
  15. if input is integer
  16. {
  17. Loop, parse, id, `n, `r
  18. {
  19. if (A_loopfield == input)
  20. counter := A_index
  21. }
  22.  
  23. Loop, parse, us, `n, `r
  24. {
  25. if (A_index == counter)
  26. outcome := A_loopfield
  27. }
  28.  
  29. }
  30. else
  31. {
  32. Loop, parse, us, `n, `r
  33. {
  34. if (A_loopfield == input)
  35. counter := A_index
  36. }
  37.  
  38. Loop, parse, id, `n, `r
  39. {
  40. if (A_index == counter)
  41. outcome := A_loopfield
  42. }
  43.  
  44. }
  45.  
  46. msgbox,%outcome%
  47.  
  48. return
  49. f11::exitapp
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement