Advertisement
Crimsxn_K1ra

New AutoHotkey Roblox Piano Autoplayer AHK Script

Jun 15th, 2024 (edited)
63,926
0
Never
1
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.37 KB | None | 0 0
  1. Gui, +AlwaysOnTop
  2. Gui, Add, Text,, ----------------------------------------PASTE SHEETS HERE-----------------------------------------
  3. Gui, Add, Edit, R10 w300 vPianoMusic
  4. Gui, Add, Text,, Press - = [ ] to start autoplaying.
  5. Gui, Add, Text,, Modified by: Crimsxn K1ra
  6. Gui, Add, Text,, NOTE: restart the app before pasting a new sheet.
  7. Gui, Add, Text,, ----------------------------------Progress-----------------------------------
  8. Gui, Add, Edit, ReadOnly w300 vNextNotes
  9. Gui, Show
  10.  
  11. PianoMusic := ""
  12. CurrentPos := 1
  13. KeyPressStartTime := 0
  14.  
  15. PlayNextNote()
  16. {
  17. global PianoMusic, CurrentPos, KeyDelay, KeyPressStartTime
  18. Gui, Submit, Nohide
  19. PianoMusic := RegExReplace(PianoMusic, "`n|`r|/| ")
  20.  
  21. if (CurrentPos > StrLen(PianoMusic))
  22. {
  23. CurrentPos := 1
  24. }
  25.  
  26. if (CurrentPos <= StrLen(PianoMusic) && A_TickCount - KeyPressStartTime < 3000)
  27. {
  28. if (RegExMatch(PianoMusic, "U)(\[.*]|.)", Keys, CurrentPos))
  29. {
  30. CurrentPos += StrLen(Keys)
  31. Keys := Trim(Keys, "[]")
  32. SendInput, {Raw}%Keys%
  33. Sleep, %KeyDelay%
  34. }
  35. }
  36.  
  37. NextNotes := SubStr(PianoMusic, CurrentPos, 50)
  38. GuiControl,, NextNotes, %NextNotes%
  39. }
  40.  
  41. -::
  42. =::
  43. [::
  44. ]::
  45. KeyPressStartTime := A_TickCount
  46. PlayNextNote()
  47. KeyPressStartTime := 0
  48. return
  49.  
  50. GuiClose:
  51. ExitApp
Advertisement
Comments
  • Crimsxn_K1ra
    1 year
    # text 0.12 KB | 0 0
    1. now i made this because MediaFire kept blocking the download link for my autoplayer app. F.
    2.  
    3. hopefully no issues this time.
Add Comment
Please, Sign In to add comment
Advertisement