HotKeySet ("{ESC}", "Sair")
HotKeySet ("{Space}", "Pause")

Global $Pocoes = 0
Global $Mortes = 0

Func Sair ()
   MsgBox (1, "Bot Fechado", "Poções gastas: " & $Pocoes)
   MsgBox (1, "Bot Fechado", "Você morreu: " & $Mortes)
   Exit 1
EndFunc
Func Pause ()
   MsgBox (1, "Bot Pausado!", "O bot está pausado.")
EndFunc
WinActivate ("Pets | Battle | Gaia Online - Google Chrome") ;colocar o title da pagina de onde o kindred ta aberto

MsgBox (1, "Kindred BOT 2.0","Esc fechará o bot, F1 o pausará.")

While 1
   $morte = PixelGetColor (-669, 305) ;parte azul, colocar mause na parte azul da poção e copiar a cor do pixel e colocar aqui em baixo v
   If $morte = "0x3BCCD4" Then ;Se, morrer, reviver (entre aspas deve ser a cor do pixel correspondendo a cordenadas de cima ^
      Sleep (1350)
      MouseClick ("left", -620, 394,1,2) ; botão para voltar batalha
      Sleep(1000)

      $Mortes += 1
   EndIf

   $semStamina = PixelGetColor (-950, 317) ;mesmo esquema do pixelgetcolor do de cima, colocar mouse na posição que você quer que de quando chegar de stamina ele usar a poção N
   If $semStamina = "0x5F4326" Then ;Se, chegar a pouca stamina, usar poção // a cor deve ser a parte marrom,  a parte "sem stamina" N
      Sleep (1350)
      MouseClick ("left",-966, 221,1,2) ;kindred aleatorio
      MouseClick ("left",-986, 139,1,2) ;kindred aleatorio 2 (nao me pergunte apenas faça isso)
        Sleep (10000)
      MouseClick ("left",-496, 486 ,1,2) ;fugir
          Sleep (5000)
      MouseClick ("left",-606, 133 ,1,2) ;"ITEMS"
          Sleep (5000)
      MouseClick ("left",-704, 226 ,1,2) ;poção de stamnia
          Sleep (5000)
      MouseClick ("left",-425, 361 ,1,2) ;use
          Sleep (5000)
      MouseClick ("left", -908, 388 ,1,2) ;sakura
          Sleep (5000)
      MouseClick ("left", -766, 338 ,1,2) ;use²
          Sleep (5000)
      MouseClick ("left",-363, 113 ,1,2) ;botão de voltar para voltar ao mapa (não é o X é uma bolotinha maior atraz dele)
      Sleep (1000)
      $Pocoes += 1
      EndIf

      $verify = PixelGetColor (-615, 236) ;esquema padrão do pixelgetcolor, o local exato pode ser a letra preta
   If $verify = "0x000000" Then ;Se, aparecer CAPTCHA, dar 3 cliques aleatorios nos itens // a cor correspondente as cordenadas acima
      Sleep (500)
      MouseClick ("left" , Random (-719,-565), Random (266,331), 1, 10)
      Sleep (500)
      MouseClick ("left" , Random (-719,-565), Random (266,331), 1, 10)
   EndIf

   $sycamorteOn = PixelGetColor (-343, 154) ;setar a codernada na parte rosa do olho da syca
   If $sycamorteOn = "0xFFA0CE" Then ;Se, sycamorte aparecer vivo, usar skills e pegar recompensa // já sabe, a cor correspondente nas cord acima
      MouseClick ("left", -917, 317,1,2) ;sakura
      MouseClick ("left", -877, 484,1,2) ;"SKILLS"
      MouseClick ("left", -815, 308,1,2) ;"CLOUD RAIN"
Sleep(50)
ElseIf $sycamorteOn <> "0xFFA0CE" Then ;E se, não for sycamorte, sair do combate e entrar em outro
      MouseClick ("left", -622, 456,1,2) ;uma parte muito especifica do "PLAY AGAIN", tem que ser no maximo da altura do botão
      MouseClick ("left", -1019, 320,1,2) ;sakura
      MouseClick ("left", -496, 486,1,2) ;fugir
      MouseClick ("left", -460, 217,1,2) ;fase da syca
      MouseClick ("left", -693, 381,1,2);start battle
      Sleep(50)

EndIf
WEnd