Facebook
From JoaqX3, 2 Months ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 90
  1. #include <GUIConstantsEx.au3>
  2. HotKeySet("{HOME}", "_Exit")
  3. $hGUI = GUICreate("Bot na siłownie LS-Stories", 300, 50)
  4. $hLabel = GUICtrlCreateLabel("Działa! Aby wyjść naciśnij HOME." & @LF & "Autor: JoaqX3"  & @LF & "Data wydania: 16.01.2018", 10, 10)
  5. GUISetState()
  6. While 1
  7. While Sleep(1000)
  8. Send('{Space down}')
  9. Sleep(1700)
  10. Send('{space up}')
  11. Wend
  12. Switch GUIGetMsg()
  13. Case $GUI_E VENT_CLOSE
  14. Exit
  15. EndSwitch
  16. WEnd
  17. Func _Exit()
  18. MsgBox(0, "Bot na siłownie LS-Stories", "Do następnego razu! :)")
  19. Exit
  20. EndFunc