Sleep(4000);
AutoItSetOption("SendKeyDelay", 30);

Func sense()
     PixelSearch(19, 480, 23, 580, 16731221);
     If Not @error Then
       Send("{PRINTSCREEN}");
       Send("/p huh?");
       Sleep(1000); 	
       Send("/p huh?");
       Sleep(30000);
       Sleep(1000);
       Send("!{TAB}");
       Sleep(7000);
       Send("!{TAB}!{F4}");
       Sleep(3000);
       Send("{LEFT}{ENTER}");
     EndIf
EndFunc

Func reel()
			sense();
			Send("{ENTER}");
			Sleep(9000);
			Send("^I");
			Sleep(500);
			Send("{RIGHT}");
			$rusty1 = PixelGetColor(74,212);
			$rusty12 = PixelGetColor(44,201);
			sense();
			If $rusty1 = 16777215 AND $rusty12 = 16777215 Then
				MouseClick("left", 44, 201);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$rusty2 = PixelGetColor(74,194);
			$rusty22 = PixelGetColor(44,183);
			sense();
			If $rusty2 = 16777215 AND $rusty22 = 16777215 Then
				MouseClick("left", 44, 183);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$rusty1 = PixelGetColor(74,230);
			$rusty12 = PixelGetColor(44,219);
			sense();
			If $rusty1 = 16777215 AND $rusty12 = 16777215 Then
				MouseClick("left", 44, 219);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$rusty1 = PixelGetColor(74,176);
			$rusty12 = PixelGetColor(44,165);
			sense();
			If $rusty1 = 16777215 AND $rusty12 = 16777215 Then
				MouseClick("left", 44, 201);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$rusty1 = PixelGetColor(74,158);
			$rusty12 = PixelGetColor(44,147);
			sense();
			If $rusty1 = 16777215 AND $rusty12 = 16777215 Then
				MouseClick("left", 44, 201);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$rusty3 = PixelGetColor(74,122);
			$rusty32 = PixelGetColor(44,111);
			sense();
			If $rusty3 = 16777215 AND $rusty32 = 16777215 Then
				MouseClick("left", 44, 111);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$pamtam1 = PixelGetColor(44,220);
			$pamtam12 = PixelGetColor(105,219);
			sense();
			If $pamtam1 = 16777215 AND $pamtam12 = 16777215 Then
				MouseClick("left", 105, 219);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			$copper1 = PixelGetColor(44,220);
			$copper12 = PixelGetColor(125,230);
			sense();
			If $copper1 = 16777215 AND $copper12 = 16777215 Then
				MouseClick("left", 105, 219);
				Sleep(500);
				Send("{ENTER}{DOWN}{ENTER}{UP}{ENTER}");
				Sleep(500);
			EndIf
			Send("o{ENTER}{UP}{ENTER}{ESC}{ESC}{ESC}");
			sense();
			Send("^9");
			Sleep(300);
			Send("^9");
			Sleep(300);
			Send("^8");
			Sleep(1000);
			Send("^8");
			Sleep(1000);
			sense();
EndFunc

$fish = 300
While $fish > 0
	Sleep(500)
		sense();
		$y = 567;
		$x = 22;
		$reeling = PixelGetColor($x, $y)
		If $reeling = 3755263 Then
			reel();
		Endif
		$y = 552;
		$x = 22;
		$reeling = PixelGetColor($x, $y)
		If $reeling = 3952895 Then
			reel();
		Endif
		$y = 535;
		$x = 22;
		$reeling = PixelGetColor($x, $y)
		If $reeling = 2901247 Then
			reel();
		Endif
Wend
Send("!{TAB}")