Bramble
2009-09-05 07:24:12
BUG EXPLOIT HAS BEEN FIXED DO NOT USE THIS SCRIPT, YOU CAN USE THIS FOR GENERAL KNOWLEDGE IF YOU WANT TO LEARN HOW TO SCRIPT ON FACEBOOK GAMES.
////////////////////////////////////////////////////////////////////////////////
//*~*~*~*~*~*~*~*~*~*~*~*~*~*INFORMATION*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~*~//
//This script exploits a bug in a game on Facebook called Fish World. //
//I do not condone the use of this script, because excessive use will probably//
//result in banning or temporary suspension from the game known as Fish World.//
//This script merely takes advantage of a bug in the gift window, which allows//
//us to sell or have multiple of one gift, obviously this script sells, //
//logging out of Fish World will remove gift from window and cause you to //
//start over again //
////////////////////////////////////////////////////////////////////////////////
// Setup //
//There are variables right after the begin in main script, numbamax //
//maxloopbreak, and breaktime. these you need to change or feel free to use //
//what i have put in there, description of variable is next to it. You must //
//also have latest SRL i think is revision 37. //
////////////////////////////////////////////////////////////////////////////////
// How it works //
//1.You must have a gift ready to click and use in game(dont touch it) //
//This works on first gift u accepted through Facebook //
//2.Login open game, and prefferably go to a tank with lesser or no fish //
//3.Target Fish World app in browser //
//4.Start script //
////////////////////////////////////////////////////////////////////////////////
program New;
{.include SRL\SRL.scar}
var numba:integer; numbamax:integer; loopbreak:integer; maxloopbreak:integer;
breaktime:integer;
begin
setupsrl;
numbamax := 50+random(12); //this is how many times it sells items without break
maxloopbreak := 5; //this is how many times the entire script loops back
//ex:numbamax is 50 forget randomness with maxloopbreak at 5
//you will have sold all together amount of 250
breaktime := 120000; //this is how long the break is in milliseconds it has a
//randomness built in of 30 seconds, 1000 ms = 1 second
// dont touch below here unless you know what your doing
numba := 0;
loopbreak := 0;
repeat
repeat
mousebox(693,490,731,531,1); //supply store button click
wait(375+ random(250));
mousebox(383,154,499,171,1); //gift button click
wait(375+ random(250));
mousebox(124,233,230,353,1); //clicks first gift button
wait(375+ random(250));
mousebox(74,68,738,450,1); //clicks gift into tank
wait(375+ random(250));
mousebox(406,525,501,538,1); //clicks sell button
wait(375+ random(250));
mousebox(249,297,367,316,1); //clicks yes button to sell
numba := numba + 1;
until (numba = numbamax)
wait(breaktime + random(30000));
loopbreak := loopbreak + 1;
until(loopbreak = maxloopbreak);
end.