$log = FileOpen ( "fish.txt", 1 );
$znacznik = 0;
$przerwa = 9000;
$bait = 1
$sortowanie = 0
WinWaitActive("FFXiApp");
FileWriteLine($log, "startujemy " & @MON & " " & @MDAY & ", " & @YEAR & " || " & @HOUR & ":" & @MIN & ":" & @SEC );
Sleep(80000);
;fish();

;*******************************GŁÓWNA PĘTLA***********************************************
For $i = 1 to 99999999999999999
;FileWriteLine($log, @HOUR & ":" & @MIN & ":" & @SEC & "-" & Pixelgetcolor(91,736) & " - " & Pixelgetcolor(91,735) & " - " & Pixelgetcolor(255,745) & " - " & Pixelgetcolor(255,744) );
sleep(1000);

;*************SPRAWDZA CZY BYL KOMUNIKAT SOMETHING CATCH THE HOOK**************************
If Pixelgetcolor(239,745) = 16777215 AND Pixelgetcolor(239,744) = 16777215 AND Pixelgetcolor(239,739) = 16777215 AND Pixelgetcolor(239,738) = 16777215 AND Pixelgetcolor(239,737) = 16777215 AND Pixelgetcolor(239,736) = 16777215 AND Pixelgetcolor(239,735) = 16777215 AND Pixelgetcolor(79,735) = 16777215 AND $znacznik <> 1 then
FileWriteLine($log, @MON & " " & @MDAY & ", " & @YEAR & " || " & @HOUR & ":" & @MIN & ":" & @SEC & " - Something Catch the Hook!");
Sleep(Random(1500, 2500));
AutoItSetOption("MouseClickDelay", 40);
MouseClick("left", 100, 100);
$znacznik = 1;
$bait = 0;
FileWriteLine($log, @MON & " " & @MDAY & ", " & @YEAR & " || " & @HOUR & ":" & @MIN & ":" & @SEC & " - CLICK CLICK CLICK");
sleep(1000);
$sortowanie = $sortowanie + 1
If $sortowanie = 10 then
;If Pixelgetcolor(58,745) = 16777215 AND Pixelgetcolor(58,744) = 16777215 AND Pixelgetcolor(58,743) = 16777215 AND Pixelgetcolor(58,742) = 16777215 AND Pixelgetcolor(58,741) = 16777215 AND Pixelgetcolor(58,740) = 16777215 AND Pixelgetcolor(58,739) = 16777215 AND Pixelgetcolor(58,738) = 16777215 AND Pixelgetcolor(74,745) = 16777215 AND Pixelgetcolor(74,744) = 16777215 AND Pixelgetcolor(74,743) = 16777215 AND Pixelgetcolor(74,742) = 16777215 AND Pixelgetcolor(74,741) = 16777215 AND Pixelgetcolor(74,740) = 16777215 AND Pixelgetcolor(74,739) = 16777215 AND Pixelgetcolor(74,738) = 16777215 AND Pixelgetcolor(74,737) = 16777215 AND Pixelgetcolor(74,736) = 16777215 AND Pixelgetcolor(74,735) = 16777215 then
sortuj();
EndIf
sleep($przerwa+2000);
fish();
sleep(2000)
$znacznik = 0;
EndIf



;************SPRAWDZA CZY BYŁ KOMUNIKAT YOU DIDNT CATCH ANYTHING***************************
If Pixelgetcolor(91,736) = 16777215 AND Pixelgetcolor(91,735) = 16777215 AND Pixelgetcolor(225,745) = 16777215 AND Pixelgetcolor(225,744) = 16777215 AND Pixelgetcolor(203,735) = 16777215 AND Pixelgetcolor(144,735) = 16777215 AND Pixelgetcolor(22,735) = 16777215 AND Pixelgetcolor(28,735) = 16777215 AND $znacznik <> 2 then
FileWriteLine($log, @MON & " " & @MDAY & ", " & @YEAR & " || " & @HOUR & ":" & @MIN & ":" & @SEC & " - You din't catch anything");
;FileWriteLine($log, Pixelgetcolor(91,736) & Pixelgetcolor(91,735) & Pixelgetcolor(225,745) & Pixelgetcolor(225,744) & Pixelgetcolor(203,735) & Pixelgetcolor(144,735) & Pixelgetcolor(22,735) & Pixelgetcolor(28,735))
Sleep($przerwa);
$znacznik = 2;
fish()
$znacznik = 0;
Endif




Next

;**********************************************fish***************************************
Func fish()
sleep(3000);
MouseClick("left", 100, 100);
sleep(100);
MouseClick("left");
sleep(500);
MouseClick("right");
sleep(500);
MouseClick("left");
sleep(500);
$pos = MouseGetPos()
sleep(5);
MouseClick("left", $pos[0], $pos[1]+65);
sleep(1500);
If Pixelgetcolor(86,737) = 16777215 AND Pixelgetcolor(86,736) = 16777215 AND Pixelgetcolor(112,735) = 16777215 AND Pixelgetcolor(152,735) = 16777215 AND Pixelgetcolor(224,735) = 16777215 AND Pixelgetcolor(338,744) = 16777215 AND Pixelgetcolor(338,745) = 16777215 AND $bait =0 then
MouseClick("right");
sleep(500);
MouseClick("middle"); otworzenie duzego menu
sleep(500);
MouseClick("left", 955, 80); click na equipment
sleep(500);
MouseClick("left", 270, 75); click na ammo
sleep(800);
MouseClick("left"); załadowanie ammo
sleep(1000);
MouseClick("right");
sleep(500);
MouseClick("right");
sleep(500);
$bait = 1;
fish();
EndIf
EndFunc



;***************************************************sortuj*********************************************
Func Sortuj()
sleep(6000);
MouseClick("right");
sleep(500);
MouseClick("middle"); otworzenie duzego menu
sleep(1000);
MouseClick("right");
sleep(500);
MouseClick("middle"); otworzenie duzego menu
sleep(500);
MouseClick("left", 955, 110); click na items
sleep(800)
MouseClick("left", 955, 80); click na auto
sleep(800)
MouseClick("left", 955, 120); click na yes
sleep(500);
MouseClick("right");
sleep(500);
MouseClick("right");
$sortowanie = 0
EndFunc