Post by crabcakes on Mar 20, 2006 22:25:07 GMT -5
Hi i am new to the whole scripting i know this is a old subject as i have read the forums here
www.rpgexpert.com/2114.html
and that is how i found this nice forum i have been messing with this script for 2 days now i really want the fishing to work but i cant seem to get it to work this is what i have tryed so far i have started FFXI with play FFXI.exe shortcut on the desk top got all the way in did the macro /echo . /wait 12 /fish and /equipe ammo "Insect Ball" i turned all the chat filters on and set all the fonts to defult i cpy and past this code
Sleep(100000);give time to open FFXI
$fisha = 2;
$event = 0;
$bite = 0;
$failsafe=0;
$nobait = 0;
WinWaitActive("FFXiApp");
While $fisha > 1
AutoItSetOption("SendKeyDelay", 40);
Send ("!1"); fishing macro
$event = 0;
$failsafe = 0;
$nobait = 0;
Do
Sleep(250);
If PixelGetColor(23,571) = 16777215 AND PixelGetColor(145,574) = 16777215 AND PixelGetColor(239,569) = 16777215 Then
AutoItSetOption("SendKeyDelay", 40);
Sleep(Random(3000,3200));
Send("{ENTER}");
Sleep(5400);
EndIf
If PixelGetColor(59,573) = 16777215 AND PixelGetColor(83,575) = 16777215 AND PixelGetColor(175,572) = 16777215 Then
Sleep(Random(5100,5400));You lost your catch. Finish and speed things up a little.
$event = 1;
EndIf
If PixelGetColor(33,576) = 16777215 AND PixelGetColor(91,569) = 16777215 AND PixelGetColor(225,577) = 16777215 Then
Sleep(Random(5100,5400));You didn't catch anything. Finish and speed things up a little.
$event = 1;
EndIf
If PixelGetColor(86,569) = 16777215 AND PixelGetColor(210,571) = 16777215 AND PixelGetColor(338,576) = 16777215 Then
$nobait = 1;You ran out of bait so let's get ready to change it.
EndIf
If PixelGetColor(21,572) = 16777215 AND PixelGetColor(43,572) = 16777215 AND PixelGetColor(85,571) = 16777215 Then
autosort()
Sleep(Random(2100,2200));
$event = 1;You caught something so now autosort, sleep a bit, and finish the event.
EndIf
$failsafe = $failsafe+1;
If $failsafe = 175 Then
$event = 1;
EndIf
Until $event = 1
sleep(2000);
If $nobait = 1 Then
Send("!2");change bait
EndIf
WEnd
Func autosort()
Sleep(9000);
AutoItSetOption("SendKeyDelay", 0235);
Send ("!i");
Sleep(0250);
Send ("{NUMPADADD}");
Sleep (0250);
Send ("{ENTER}");
sleep(0350);
Send ( "a" );
sleep(0350);
Send ("{ENTER}");
sleep(0250);
Send ("{ESCAPE}");
sleep(0250);
Send ("{ESCAPE}");
Sleep (0250);
EndFunc
Note this is for 800x600 overlay with 512x512 background witch is set on the ffxi config i then log all the way out to the desktop copy and past the above code to note pad then i go to file save as then i click on the save file type to all files then i save it as this ffaf.au3 then it turns the file into a autoit icon and ffaf i then click on it and say RUN SCRIPT i then click on playonline even tryed it with the play ffxi icon and then sign in as fast as i can i click on the char i wish to fish with he is striped with nothing but a rod and bait he is already faceing the water and can fish from were he is standing but NOTHING happends i even sat there for 30min to see if anything will happen nothing at all im puzzeld at what to do i have been reading for hours and hours on end in forums sites stickys blogs you name it and iv tryed 15 different ones and nothing non of them work what am i doing wroung do you guys mean macro as in set the FFXI in game macros or macros in the script is so how do i do this i know this is a out dated subject but i started playing FFXI because it was the only good MMO on the ps2 as i did not have a computer at the time and my EQOA account got jacked so i picked up FFXI and now i have a PC lvl 54 pld is my main so im still fairly new to the game and know NOTHING at this kinda work but i am willing to learn i ask again please lend me a helping hand at how to get this to work also my email is V_Canabis@hotmail.com incase you need it and my MSN is the same
www.rpgexpert.com/2114.html
and that is how i found this nice forum i have been messing with this script for 2 days now i really want the fishing to work but i cant seem to get it to work this is what i have tryed so far i have started FFXI with play FFXI.exe shortcut on the desk top got all the way in did the macro /echo . /wait 12 /fish and /equipe ammo "Insect Ball" i turned all the chat filters on and set all the fonts to defult i cpy and past this code
Sleep(100000);give time to open FFXI
$fisha = 2;
$event = 0;
$bite = 0;
$failsafe=0;
$nobait = 0;
WinWaitActive("FFXiApp");
While $fisha > 1
AutoItSetOption("SendKeyDelay", 40);
Send ("!1"); fishing macro
$event = 0;
$failsafe = 0;
$nobait = 0;
Do
Sleep(250);
If PixelGetColor(23,571) = 16777215 AND PixelGetColor(145,574) = 16777215 AND PixelGetColor(239,569) = 16777215 Then
AutoItSetOption("SendKeyDelay", 40);
Sleep(Random(3000,3200));
Send("{ENTER}");
Sleep(5400);
EndIf
If PixelGetColor(59,573) = 16777215 AND PixelGetColor(83,575) = 16777215 AND PixelGetColor(175,572) = 16777215 Then
Sleep(Random(5100,5400));You lost your catch. Finish and speed things up a little.
$event = 1;
EndIf
If PixelGetColor(33,576) = 16777215 AND PixelGetColor(91,569) = 16777215 AND PixelGetColor(225,577) = 16777215 Then
Sleep(Random(5100,5400));You didn't catch anything. Finish and speed things up a little.
$event = 1;
EndIf
If PixelGetColor(86,569) = 16777215 AND PixelGetColor(210,571) = 16777215 AND PixelGetColor(338,576) = 16777215 Then
$nobait = 1;You ran out of bait so let's get ready to change it.
EndIf
If PixelGetColor(21,572) = 16777215 AND PixelGetColor(43,572) = 16777215 AND PixelGetColor(85,571) = 16777215 Then
autosort()
Sleep(Random(2100,2200));
$event = 1;You caught something so now autosort, sleep a bit, and finish the event.
EndIf
$failsafe = $failsafe+1;
If $failsafe = 175 Then
$event = 1;
EndIf
Until $event = 1
sleep(2000);
If $nobait = 1 Then
Send("!2");change bait
EndIf
WEnd
Func autosort()
Sleep(9000);
AutoItSetOption("SendKeyDelay", 0235);
Send ("!i");
Sleep(0250);
Send ("{NUMPADADD}");
Sleep (0250);
Send ("{ENTER}");
sleep(0350);
Send ( "a" );
sleep(0350);
Send ("{ENTER}");
sleep(0250);
Send ("{ESCAPE}");
sleep(0250);
Send ("{ESCAPE}");
Sleep (0250);
EndFunc
Note this is for 800x600 overlay with 512x512 background witch is set on the ffxi config i then log all the way out to the desktop copy and past the above code to note pad then i go to file save as then i click on the save file type to all files then i save it as this ffaf.au3 then it turns the file into a autoit icon and ffaf i then click on it and say RUN SCRIPT i then click on playonline even tryed it with the play ffxi icon and then sign in as fast as i can i click on the char i wish to fish with he is striped with nothing but a rod and bait he is already faceing the water and can fish from were he is standing but NOTHING happends i even sat there for 30min to see if anything will happen nothing at all im puzzeld at what to do i have been reading for hours and hours on end in forums sites stickys blogs you name it and iv tryed 15 different ones and nothing non of them work what am i doing wroung do you guys mean macro as in set the FFXI in game macros or macros in the script is so how do i do this i know this is a out dated subject but i started playing FFXI because it was the only good MMO on the ps2 as i did not have a computer at the time and my EQOA account got jacked so i picked up FFXI and now i have a PC lvl 54 pld is my main so im still fairly new to the game and know NOTHING at this kinda work but i am willing to learn i ask again please lend me a helping hand at how to get this to work also my email is V_Canabis@hotmail.com incase you need it and my MSN is the same