Bot perfect for fishing!

Bot perfect for fishing

I'm here to inform you that I have a bot to fishing without worrying about fish that I'm automatically going to you just the perfect and put your bait in place because you should only be with your aika open and put the fishing rod in the corner upper left, just that!
To run the program you need Blue Eye Macro Version 2.5!

Thank you!

Script:

Code:

---

begin
    Keyboard.Press key("1")
    Color.Limit area of interest to coordinates("15", "10", "340", "20")
    Mouse.Click("Left")
    Macro.Pause("4000")
    Function.Execute with timeout("fish", "7000")
    Keyboard.Press key("{<space>}")
    Macro.Pause("100")
 end

function("fish")
    begin
          begin loop()
              if  Color.Can be located on screen (RGB)("108", "140", "239", "10")
                    begin
                        Color.Find coordinate of first occurrence (RGB)("108", "140", "239", "10", "x", "y")
                        Variable.Add (Math)("x", "06")
                        begin loop()
                              if  Color.Near coordinate is within (RGB range)("184", "237", "206", "20", "{x}", "{y}", "25")
                                  begin
                                        Macro.Break from loop("no")
                                  end
                        end
                        Macro.Break from loop("no")
                    end
          end
    end
function

---

Português

Estou aqui para informar que possuo um bot para pescar sem se preocupar em pescar automaticamente esse que estou passando a vocês apenas da Perfeito e de colocar a sua isca no local devido você apenas deve estar com seu aika aberto e colocar a barra de pesca no canto superior a esquerda, apenas isso!
Para funcionar você precisa do Programa Blue Eye Macro Versão 2.5!

Obrigado!


Script:

begin
Keyboard.Press key("1")
Color.Limit area of interest to coordinates("15", "10", "340", "20")
Mouse.Click("Left")
Macro.Pause("4000")
Function.Execute with timeout("fish", "7000")
Keyboard.Press key("{<space>}")
Macro.Pause("100")
end

function("fish")
begin
begin loop()
if Color.Can be located on screen (RGB)("108", "140", "239", "10")
begin
Color.Find coordinate of first occurrence (RGB)("108", "140", "239", "10", "x", "y")
Variable.Add (Math)("x", "06")
begin loop()
if Color.Near coordinate is within (RGB range)("184", "237", "206", "20", "{x}", "{y}", "25")
begin
Macro.Break from loop("no")
end
end
Macro.Break from loop("no")
end
end
end
function

I get hit with that perfect forever?

version 32bit or 64 bit?

Dear Vleaugs.
Simple and Functional. You have my thanks!!

The script looks fine. But if you want a turbo fishing, use Cheat Engine and set the speedhack to 1.2-1.3 and change the timer at Function.Execute with timeout("fish", "7000") to 1000.

---------- Post added at 06:55 AM ---------- Previous post was at 06:50 AM ----------

Hi @Aizen, I believed this script will give you upto 9/10 perfect hit depends on how you setting the color.
And yes @sauros, it's work both 32bit & 64bit.

This script, just copy and necklace in the blue eye?
Still Work?