PDA

View Full Version : SoulSplit Rocktail Fisher!



Hexless V2
04-19-2014, 10:16 PM
SoulSplit Rocktail,Shark, and Manta Ray Fisher;

Instructions:
Start at closest spot to bank(catherby)
Camera : Max Height,North.
Brightness : 2.

Best results in SoulSplit Downloadable Client!

Please leave any bugs here on the thread and I'll try my best to try and fix them!(NO PROMISES!!!)

Script:

stepis69
06-24-2014, 09:33 PM
Exception in Script: Unknown declaration "ClickMouse2" at line 20, column 1 this happend when im changed to srl-6

Cody44
07-09-2014, 09:58 AM
As long as you get the angle facing as North as possible this script is flawless as it gets. Took me about 30 minutes trying different angles but once I got it, it ran incredibly. Currently got it at 11 hours, 247 inventories 8400+ fish and 139M Xp. Very nice man, very nice indeed!

stocky8
07-10-2014, 06:36 PM
Exception in Script: Unknown declaration "ClickMouse2" at line 20, column 1 this happend when im changed to srl-6

Can't use SRL-6 download SRL for OldSchool and use it.

Marcu_s
07-10-2014, 11:08 PM
Excellent script. Worked all night and caught around 10k fish.

stocky8
07-11-2014, 07:11 AM
Excellent script. Worked all night and caught around 10k fish.

Hmm... I can't get it working. The client automatically put north so that's good and I put the camera all the way up. It always clicks the wrong spots and tried to go above where the actual bank is.

liklox
07-11-2014, 07:12 AM
Excellent script. Worked all night and caught around 10k fish.

Damn i started script did nothing how workd on you -.-

stocky8
07-11-2014, 06:05 PM
I have edited the script to make it more reliable and added DTM and Bitmap detection. When it was 3:00am I decided I wanted to fish so I stayed up a few hours and got it working for myself because it wasn't clicking properly at all. Then this morning I edited stuff that I forgot when tired. I am still planning to add more features like Fish/Hr and Inv/Hr. But, currently I added better clicking.

**About 868 Fish/Hr**
Make sure to point exactly north! Log out and log back in and it should automatically point you full north!

The settings are:

Brightness : MAX
Camera Zoom: 0


Start at the same place as the original script. And make sure to have the camera facing as high and far away as possible.
More instructions and reminders in the Script.



program sFisher;

///////////////////////////////////////////////////////////////////////////
{$i SRL-OSR/SRL.simba} //You may have to change this to: {$i SRL/SRL.simba}
///////////////////////////////////////////////////////////////////////////

var rocktails, shark, manta, x , y , FishCount , FishCountPH ,InvsDone , InvsPH:integer;
//Original Script By: Hexless V2
//Edited By: stocky8
//Settings to use;
//Oldschool, 562 gameframe!
//Brightness MAX
//Camera: 0 || FARTHEST OUT!!
//North || Log out and log back in to make sure its true North
//Max Hieght of Camera
//Version: 1.2
//Start At Rocktails Fishing Spot Closest to the bank.
Procedure FishNShiz;
var x,X2,Y2 , y :integer;

Begin
wait(500);
Mouse(255,258,1,1,false);
MoveMouse(255,258 + 40);
Sleep(180);
ClickMouse2(Mouse_Left);
Writeln('Fishing...');
Sleep(85250);
End;

function checkSharks():boolean;
begin
shark := DTMFromString('mbQAAAHicY2VgYOhnZWDoBOKZQDwViKcB8T tGBobHQPwMiBmYGBi+AulZE/qBHEYUDFSKAZgwVEEBALFCCHU=');
result:= findDTM(shark,x,y,548,260,739,520);
end;

function checkMantas():boolean;
begin
manta := DTMFromString('mbQAAAHicY2VgYHjGysDwBohfAPF1IL4FxO ZMDAxaQGwPxAZA7ArEadnTgKoZUTBQKQZgwlAFBQBqvwcf');
result:= findDTM(manta,x,y,548,260,739,520);
end;

function checkRocktails():boolean;
begin
rocktails := DTMFromString('mbQAAAHicY2VgYDjExMBwAoi3APFxIN4OxG cYGRgOAPFtIL4ExX5J/kDVjCiYlQETMGGoggIA6zkI6g==');
result:= findDTM(rocktails,x,y,548,260,739,520);
end;

Procedure BankFish;
var storeAll,openBank: integer;
Begin
storeAll := BitmapFromString(54, 7, 'meJxjYAAB95BYBhjjPxhA2LRAcPO' +
'RrUOTQmbDZTFNoLUL8bgKzYVojvyPBKgliMt8OMDjQrRwRosF NMVo' +
'PkI2H79KXLEMV4bfhXgSA5ERQTDKKIllYkwm0hDMGER2PCUux BVTZ' +
'LuQAQlQnlMAF4tDIQ==');
openBank := BitmapFromString(69, 6, 'meJylU1sOwCAI43a7wH53/2Mwo4l' +
'hlDZkEj4q8qqgu5vZdT9Dfco+/taRY6axhE/yNB2c0/GvxBA0YpWt' +
'S/CK+WO3yV4GajobR0l2xiiy+NZSduycvYng25xOGk2i1l82HFxJ M' +
'9oZl7KQoDMUp5A2UD8aw2XbDLNNY3RWq7FDiFJL2KlyiPXfic 4vRe' +
'ks/w==');

wait(1000);
Mouse(588, 113,0,0,true);

Wait(6250);
Mouse(264,200,1,1,false);
Sleep(250);
findBitmapToleranceIn(openBank, x,y,100,100,368,335,145);
wait(100);
mmouse(x, y, 0,0);
ClickMouse(x,y,MOUSE_LEFT);
wait(2500);
freeBitmap(openBank);

//New Bank Sharks
if checkSharks then
begin
findDTM(shark,x,y,548,260,739,520);
mmouse(x,y,5,5);
clickMouse(x,y,MOUSE_RIGHT);
wait(100);
findBitmapToleranceIn(storeAll, x,y,488,202,746,542,145);
wait(350);
mmouse(x,y,0,0);
clickMouse(x,y,MOUSE_LEFT);
freeDTM(shark);
wait(1200);
end;

//New Bank Rocktails
if checkRocktails then
begin
findDTM(rocktails,x,y,548,260,739,520);
mmouse(x,y,5,5);
clickMouse(x,y,MOUSE_RIGHT);
wait(100);
findBitmapToleranceIn(storeAll, x,y,488,202,746,542,145);
wait(350);
mmouse(x,y,0,0);
clickMouse(x,y,MOUSE_LEFT);
freeDTM(shark);
wait(1200);
end;

//New Bank Manta Rays
if checkMantas then
begin
findDTM(manta,x,y,548,260,739,520);
mmouse(x,y,5,5);
ClickMouse(x,y,MOUSE_RIGHT);
wait(100);
findBitmapToleranceIn(storeAll, x,y,488,202,746,542,145);
wait(350);
mmouse(x,y,0,0);
clickMouse(x,y,MOUSE_LEFT);
freeDTM(manta);
wait(1200);
end;
InvsDone := InvsDone + 1;
FishCount := FishCount + 27;
freeBitmap(storeAll);
End;
Procedure GoFish;
Begin
wait(250);
Mouse(669, 166,0,0,true);
Writeln('Going To Fishing Spot!');
Wait(6750);
Writeln('At Fishing Spot!');
wait(1000);
End;
Procedure Proggy;
Begin
ClearDebug;
Writeln('Total Time: ' + TimeRunning);
Writeln('Inventorys Fished : ' + IntToStr(InvsDone) + ' (' + IntToStr(InvsPH) + ' Per Hour)'); //Ignore the p/h
Writeln('Fish Caught : ' + IntToStr(FishCount) + ' (' + IntToStr(FishCountPH) + ' Per Hour)'); //Ignore the p/h
Writeln('Please leave any bugs on the thread!');
End;
begin
//SetupSRL; Not required
//ActivateClient; Not Required
mouseSpeed := 25; //Need to set mouse speed or it will take ages to click
//BankFish;
//GoFish;
Repeat
FishNShiz;
BankFish;
GoFish;
Proggy;
Until(false);
end.

If you have any problems or questions with this edit please contact me and I will try my best to fix it!
Thanks for the release Hexless V2!

liklox
07-11-2014, 06:21 PM
I have edited the script to make it more reliable and added DTM and Bitmap detection. When it was 3:00am I decided I wanted to fish so I stayed up a few hours and got it working for myself because it wasn't clicking properly at all. Then this morning I edited stuff that I forgot when tired. I am still planning to add more features like Fish/Hr and Inv/Hr. But, currently I added better clicking.

**About 868 Fish/Hr**
Make sure to point exactly north! Log out and log back in and it should automatically point you full north!

The settings are:

Brightness : MAX
Camera Zoom: 0


Start at the same place as the original script. And make sure to have the camera facing as high and far away as possible.
More instructions and reminders in the Script.



program sFisher;

///////////////////////////////////////////////////////////////////////////
{$i SRL-OSR/SRL.simba} //You may have to change this to: {$i SRL/SRL.simba}
///////////////////////////////////////////////////////////////////////////

var rocktails, shark, manta, x , y , FishCount , FishCountPH ,InvsDone , InvsPH:integer;
//Original Script By: Hexless V2
//Edited By: stocky8
//Settings to use;
//Oldschool, 562 gameframe!
//Brightness MAX
//Camera: 0 || FARTHEST OUT!!
//North || Log out and log back in to make sure its true North
//Max Hieght of Camera
//Version: 1.2
//Start At Rocktails Fishing Spot Closest to the bank.
Procedure FishNShiz;
var x,X2,Y2 , y :integer;

Begin
wait(500);
Mouse(255,258,1,1,false);
MoveMouse(255,258 + 40);
Sleep(180);
ClickMouse2(Mouse_Left);
Writeln('Fishing...');
Sleep(85250);
End;

function checkSharks():boolean;
begin
shark := DTMFromString('mbQAAAHicY2VgYOhnZWDoBOKZQDwViKcB8T tGBobHQPwMiBmYGBi+AulZE/qBHEYUDFSKAZgwVEEBALFCCHU=');
result:= findDTM(shark,x,y,548,260,739,520);
end;

function checkMantas():boolean;
begin
manta := DTMFromString('mbQAAAHicY2VgYHjGysDwBohfAPF1IL4FxO ZMDAxaQGwPxAZA7ArEadnTgKoZUTBQKQZgwlAFBQBqvwcf');
result:= findDTM(manta,x,y,548,260,739,520);
end;

function checkRocktails():boolean;
begin
rocktails := DTMFromString('mbQAAAHicY2VgYDjExMBwAoi3APFxIN4OxG cYGRgOAPFtIL4ExX5J/kDVjCiYlQETMGGoggIA6zkI6g==');
result:= findDTM(rocktails,x,y,548,260,739,520);
end;

Procedure BankFish;
var storeAll,openBank: integer;
Begin
storeAll := BitmapFromString(54, 7, 'meJxjYAAB95BYBhjjPxhA2LRAcPO' +
'RrUOTQmbDZTFNoLUL8bgKzYVojvyPBKgliMt8OMDjQrRwRosF NMVo' +
'PkI2H79KXLEMV4bfhXgSA5ERQTDKKIllYkwm0hDMGER2PCUux BVTZ' +
'LuQAQlQnlMAF4tDIQ==');
openBank := BitmapFromString(69, 6, 'meJylU1sOwCAI43a7wH53/2Mwo4l' +
'hlDZkEj4q8qqgu5vZdT9Dfco+/taRY6axhE/yNB2c0/GvxBA0YpWt' +
'S/CK+WO3yV4GajobR0l2xiiy+NZSduycvYng25xOGk2i1l82HFxJ M' +
'9oZl7KQoDMUp5A2UD8aw2XbDLNNY3RWq7FDiFJL2KlyiPXfic 4vRe' +
'ks/w==');

wait(1000);
Mouse(588, 113,0,0,true);

Wait(6250);
Mouse(264,200,1,1,false);
Sleep(250);
findBitmapToleranceIn(openBank, x,y,100,100,368,335,145);
wait(100);
mmouse(x, y, 0,0);
ClickMouse(x,y,MOUSE_LEFT);
wait(2500);
freeBitmap(openBank);

//New Bank Sharks
if checkSharks then
begin
findDTM(shark,x,y,548,260,739,520);
mmouse(x,y,5,5);
clickMouse(x,y,MOUSE_RIGHT);
wait(100);
findBitmapToleranceIn(storeAll, x,y,488,202,746,542,145);
wait(350);
mmouse(x,y,0,0);
clickMouse(x,y,MOUSE_LEFT);
freeDTM(shark);
wait(1200);
end;

//New Bank Rocktails
if checkRocktails then
begin
findDTM(rocktails,x,y,548,260,739,520);
mmouse(x,y,5,5);
clickMouse(x,y,MOUSE_RIGHT);
wait(100);
findBitmapToleranceIn(storeAll, x,y,488,202,746,542,145);
wait(350);
mmouse(x,y,0,0);
clickMouse(x,y,MOUSE_LEFT);
freeDTM(shark);
wait(1200);
end;

//New Bank Manta Rays
if checkMantas then
begin
findDTM(manta,x,y,548,260,739,520);
mmouse(x,y,5,5);
ClickMouse(x,y,MOUSE_RIGHT);
wait(100);
findBitmapToleranceIn(storeAll, x,y,488,202,746,542,145);
wait(350);
mmouse(x,y,0,0);
clickMouse(x,y,MOUSE_LEFT);
freeDTM(manta);
wait(1200);
end;
InvsDone := InvsDone + 1;
FishCount := FishCount + 27;
freeBitmap(storeAll);
End;
Procedure GoFish;
Begin
wait(250);
Mouse(669, 166,0,0,true);
Writeln('Going To Fishing Spot!');
Wait(6750);
Writeln('At Fishing Spot!');
wait(1000);
End;
Procedure Proggy;
Begin
ClearDebug;
Writeln('Total Time: ' + TimeRunning);
Writeln('Inventorys Fished : ' + IntToStr(InvsDone) + ' (' + IntToStr(InvsPH) + ' Per Hour)'); //Ignore the p/h
Writeln('Fish Caught : ' + IntToStr(FishCount) + ' (' + IntToStr(FishCountPH) + ' Per Hour)'); //Ignore the p/h
Writeln('Please leave any bugs on the thread!');
End;
begin
//SetupSRL; Not required
//ActivateClient; Not Required
mouseSpeed := 25; //Need to set mouse speed or it will take ages to click
//BankFish;
//GoFish;
Repeat
FishNShiz;
BankFish;
GoFish;
Proggy;
Until(false);
end.

If you have any problems or questions with this edit please contact me and I will try my best to fix it!
Thanks for the release Hexless V2!

Can you edit wc and mining scripts? :L

exilednoob2
02-07-2015, 09:16 PM
You should make it work at the rock crabs area. You know, the rocktail fishing area by the rockcrabs you can use after completing Rellekian Dispute quest where you only get rocktails using a small fishing net? start script at the fishing spot - When inventory full, tele home to grand exchange - tele back to rockrabs, run a little west to start fishing again and repeat until you can afford full torva ^.^

exilednoob2
02-08-2015, 10:35 AM
Exception in Script: Unable to find file 'SRL/SRL.simba' used from 'C:\Simba\Scripts\sFisher (Public).simba'


bleh.. i guess at least I tried

Tristana
02-09-2015, 04:00 AM
Exception in Script: Unable to find file 'SRL/SRL.simba' used from 'C:\Simba\Scripts\sFisher (Public).simba'


bleh.. i guess at least I tried

Do you have the SRL plugin enabled and updated?

exilednoob2
02-19-2015, 04:01 AM
Do you have the SRL plugin enabled and updated?

yep!

ephyxishard
05-29-2015, 01:11 AM
How do you install it to soulsplit?

ephyxishard
05-29-2015, 02:11 AM
I open up the .simba file and in soulsplit im facing the direction with my harpoon in my inventoory, looking north with the view all the way back and up and when i enter the script it says {$i SRL/SRL.simba}and i updates the SRL and i made sure to enable it. please help!

Hexless V2
05-30-2015, 02:19 PM
This is old... I'm gonna release my new one :)