Advertisement
Guest User

Untitled

a guest
Oct 18th, 2019
150
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 1.78 KB | None | 0 0
  1. #region ### GUI ###
  2. $okienko = GUICreate("MTA4Life - Kopalnia BOT (BETA)", 571, 327, 570, 370)
  3. $czas = GUICtrlCreateInput("90", 400, 115, 121, 21)
  4. $rozdzialka = GUICtrlCreateCombo("1920x1080", 400, 168, 121, 25)
  5. $podmien64 = GUICtrlCreateButton("Podmiana 64Bit", 85, 256, 90, 25)
  6. $podmien32 = GUICtrlCreateButton("Podmiana 32Bit", 180, 256, 90, 25)
  7. $ustawienia = GUICtrlCreateGroup(" Ustawienia podstawowe ", 368, 40, 185, 230, -1, $WS_EX_TRANSPARENT)
  8. $Pic1 = GUICtrlCreatePic("src\gui\logo.jpg", 40, 10, 280, 120)
  9. $info1 = GUICtrlCreateLabel("Predkosc bota domyslnie", 400, 76, 122, 17)
  10. $info2 = GUICtrlCreateLabel("90ms  [1000ms = 1 sekunda]", 392, 92, 140, 17)
  11. $info4 = GUICtrlCreateLabel("Pliki nalezy podmienic stojac przed kopalnia.", 76, 288, 213, 17)
  12. $info5 = GUICtrlCreateLabel("Jezeli bylismy w kopalni w danej sesji gry nalezy wykonac restart MTA.", 17, 304, 334, 17)
  13. $info7 = GUICtrlCreateLabel("Rozdzielczosc", 425, 147, 122, 17)
  14. $opcja1 = GUICtrlCreateCheckbox("  Wylacz bota po wykopaniu 50kg wegla.", 74, 150, 220, 17)
  15. $opcja2 = GUICtrlCreateCheckbox("  Informuj o braku rudy wegla.", 74, 182, 197, 17)
  16. $info6 = GUICtrlCreateLabel("Kazda dodatkowa opcja spowalnia bota.", 81, 212, 197, 17)
  17. $Group1 = GUICtrlCreateGroup(" Dodatkowe ustawienia ", 59, 128, 237, 105, -1, $WS_EX_TRANSPARENT)
  18. $copy = GUICtrlCreateLabel("Pozdro Zbysiu :)", 488, 310, 77, 17)
  19. $Label1 = GUICtrlCreateLabel("Bot START - F6", 420, 208, 121, 17)
  20. $Label2 = GUICtrlCreateLabel("Bot STOP - F7", 424, 231, 121, 17)
  21. $zamknij = HotKeySet('', 'zamknij')
  22. GUICtrlSetOnEvent($podmien64, "podmiana64")
  23. GUICtrlSetOnEvent($podmien32, "podmiana32")
  24. GUICtrlSetOnEvent($zamknij, "zamknij")
  25. GUISetOnEvent($GUI_EVENT_CLOSE, "zamknij")
  26. Opt("GuiOnEventMode", 1)
  27. global $y = 0, $x = 0
  28. GUISetState(@SW_SHOW)
  29. #endregion ### GUI ###
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement