Bot do gry działający w tle

[NetroPL]

Witam, mam problem, ponieważ piszę bota do gry i nie wiem co zrobić by działał on w tle. Czy mógłby ktos mi powiedzieć co mam zrobić (najlepiej żeby działał na przeglądarce google chrome)

 

Kod:

 

HotKeySet("{End}","Stop")

 

 

#include <ButtonConstants.au3>

#include <GUIConstantsEx.au3>

#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=c:\users\hp\desktop\bot v1.kxf

Global $Form1_1 = GUICreate("Pokebot v1.0 (by NetrO)", 610, 344, 194, 140)

Global $In_gdzie = GUICtrlCreateGroup("Gdzie isc ? (od lewej)", 16, 8, 257, 193)

Global $M_1 = GUICtrlCreateRadio("Miejsce 1", 24, 32, 113, 17)

Global $M_2 = GUICtrlCreateRadio("Miejsce 2", 24, 48, 113, 17)

Global $M_3 = GUICtrlCreateRadio("Miejsce 3", 24, 64, 113, 17)

Global $M_4 = GUICtrlCreateRadio("Miejsce 4", 24, 80, 113, 17)

Global $M_5 = GUICtrlCreateRadio("Miejsce 5", 24, 96, 113, 17)

Global $M_6 = GUICtrlCreateRadio("Miejsce 6", 24, 112, 113, 17)

Global $M_7 = GUICtrlCreateRadio("Miejsce 7", 24, 128, 113, 17)

Global $M_8 = GUICtrlCreateRadio("Miejsce 8", 24, 144, 113, 17)

Global $M_9 = GUICtrlCreateRadio("Miejsce 9", 24, 160, 113, 17)

Global $M_10 = GUICtrlCreateRadio("Miejsce 10", 24, 176, 113, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

Global $In_ktorym = GUICtrlCreateGroup("Którym pokemonem isc ?? (od lewej)", 16, 208, 257, 129)

Global $P_1 = GUICtrlCreateRadio("Pierwszym", 24, 232, 113, 17)

Global $P_2 = GUICtrlCreateRadio("Drugim", 24, 248, 113, 17)

Global $P_3 = GUICtrlCreateRadio("Trzecim", 24, 264, 113, 17)

Global $P_4 = GUICtrlCreateRadio("Czwartym", 24, 280, 113, 17)

Global $P_5 = GUICtrlCreateRadio("Piątym", 24, 296, 113, 17)

Global $P_6 = GUICtrlCreateRadio("Szóstym", 24, 312, 113, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

Global $In_dodatkowe = GUICtrlCreateGroup("Dodatkowe", 376, 8, 225, 193)

Global $D_1 = GUICtrlCreateCheckbox("Czy leczyć ?", 384, 32, 97, 17)

Global $D_2 = GUICtrlCreateCheckbox("Czy odnawiać energię ?", 384, 48, 137, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

Global $In_lapac = GUICtrlCreateGroup("Czym łapać pokemony ??", 376, 208, 225, 129)

Global $K_1 = GUICtrlCreateRadio("Pokeballem", 384, 232, 113, 17)

Global $K_2 = GUICtrlCreateRadio("Nestballem", 384, 248, 113, 17)

Global $K_3 = GUICtrlCreateRadio("Greatballem", 384, 264, 113, 17)

Global $K_4 = GUICtrlCreateRadio("Levelballem", 384, 280, 113, 17)

Global $K_5 = GUICtrlCreateRadio("Lureballem", 384, 296, 113, 17)

Global $K_Nie = GUICtrlCreateRadio("Nie łap", 384, 312, 113, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

Global $In_control = GUICtrlCreateGroup("Panel Kontrolny", 280, 8, 89, 329)

Global $B_start = GUICtrlCreateButton("START !", 288, 32, 73, 41)

Global $B_spr = GUICtrlCreateButton("Sprawdź ", 288, 80, 73, 41)

Global $B_wyjdz = GUICtrlCreateButton("WYJSCIE", 288, 128, 73, 41)

GUICtrlCreateGroup("", -99, -99, 1, 1)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

 

 

 

 

 

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

 

 

Case $GUI_EVENT_CLOSE

Exit

 

 

Case $B_start

WinActivate("PokeWalki.pl - gra pokemon online - Google Chrome")

_Bot()

EndSwitch

 

WEnd

 

 

;Miejsca

 ;$m1 = PixelSearch(314, 823,365, 854,0x90C6C0,5)

 ;$m2 = PixelSearch(368, 823,419, 857,0x58635F,5)

 ;$m3 = PixelSearch(422, 823,473, 856,0x0D1908,5)

 ;$m4 = PixelSearch(476, 823,527, 856,0x1EC880,5)

 ;$m5 = PixelSearch(530, 823,581, 856,0x675958,5)

 ;$m6 = PixelSearch(584, 823,635, 856,0xD1C0A4,5)

 ;$m7 = PixelSearch(638, 823,689, 856,0x164E31,5)

 ;$m8 = PixelSearch(692, 823,742, 856,0x1F9F66,5)

 ;$m9 = PixelSearch(746, 823,797, 856,0xF59433,5)

 ;$m10 = PixelSearch(800, 823,851, 856,0x3A3F2B,5)

  ;If GUICtrlRead($M_1) = 1 Then Global $miejsce = PixelSearch(314, 823,365, 854,0x90C6C0,5)

; If GUICtrlRead($M_2) = 1 Then Global $m2 = $miejsce

; If GUICtrlRead($M_3) = 1 Then Global $m3 = $miejsce

; If GUICtrlRead($M_4) = 1 Then Global $m4 = $miejsce

; If GUICtrlRead($M_5) = 1 Then Global $m5 = $miejsce

; If GUICtrlRead($M_6) = 1 Then Global $m6 = $miejsce

 

 

 

 

 

 While 1

sleep(100)

 WEnd

 

Func Stop()

   Exit

EndFunc

 

 

 

 

 

 

 

Func _Bot()

   _Chodzenie()

   Sleep(2200)

   _Pokemon()

   sleep(2200)

   _Przekierowanie()

   EndFunc

 

Func _Chodzenie()

   MouseMove(337, 830,0)

   MouseClick('left')

   Sleep(1000)

 

EndFunc

 

Func _Pokeball()

 

$pokeball = PixelSearch(320, 352,988, 813,0xC90908,5)

If Not @error Then

   MouseMove($pokeball[0],$pokeball[1],0)

   MouseClick('left')

   Sleep(2500)

   _Bot()

 

ElseIf @error Then

   MouseWheel("down",2)

   Sleep(500)

   _Pokeball()

 

EndIf

EndFunc

 

Func _Pokemon()

   MouseMove(380, 695,0)

 

   MouseClick('left')

   EndFunc

 

Func _Przekierowanie()

   _leczenie()

   PixelSearch(322, 254,975, 315, 0xFF4444,5)

   If Not @error Then

 _Odnawianie()

 Sleep(1200)

 _Bot()

 

   ElseIf @error Then

 _Blad()

 

EndIf

EndFunc

 

Func _leczenie()

    ;Region Kanto  MouseMove(982, 845,0)

MouseMove(935, 836,0) ;Region Sinnoh

   MouseClick('left')

   EndFunc

 

Func _Odnawianie()

   PixelSearch(1191, 385,1205, 397,0x000000,5)

   If @error Then

MouseMove(1140, 840,0)

 MouseClick('left')

 sleep(500)

 EndIf

 EndFunc

 

Func _Blad()

   PixelSearch(331, 373,972, 416,0x33CCFF,5)

   If Not @error Then

 _Bot()

   ElseIf @error Then

 _Pokeball()

 EndIf

   EndFunc

 

Z góry dziękuję za pomoc

[Ktosiu]

Nie będzie działał bo wyszukiwanie nie działa w tle więc pomocy nie dostaniesz, trzeba całego przepisać z obsługą chroma, szukaj sobie udf do niego. 

[Ozzzj]

Lepiej pod IE napisz jak chciałbyś żeby on był też dla kogoś, bo Chrome nie ma każdy. :P

A IE myśle że bardziej przypadnie Ci do gustu.

[malydiabel]

Kiedyś tam grzebalem właśnie bota do jakiś pokemonow, i wydaje mi się że najlepiej wykorzystać ie, gdyż Twoja wersja może nie działać w 100% dobrze na innych komputerach