SRL Archive - Other Scripts

Freerice is part of the UN to end world hunger. I made a script to just click the questions for hours on end.

All you do is go to www.freerice.com click the first answer and then run the script. in the loop you can chance how long and if turn off computer.

I donated 10,000 grains of rice in 3 hours. That would feed most of a village in africa. Please do it, for the sake of the children.

hey tails, nice idea but i think i read somewhere or maybe on their website that this wont benefit them since the company will run out of rice and so the people wont benefit as the company goes bust or something, ill confirm it otherwise nice idea :)

~Spaz

Simple, but effective. Still say we should create a database for the words and go from there.


READ THIS BEFORE YOU POST: Any noob that is going to complain about it clicking in the wrong spot, its because you have a different resolution than Talis did when he made this so you have to change the mouse coordinates. If you can't figure that out, you shouldn't be here.

Lol thanks, but yeah I was going to work on a database of words but it didnt occur to me to do it, too much work. I will when i get time, also They said they will run out of rice because we dont click the adds on the bottom.

I did it at 11 at night just because I had donated 20k grains of rice and wanted more, next morning I woke up and donated 60k grains, so I decided just to release it.

Mozilla Firefox, do not drag the crosshair :

program New;

var I: Integer;

procedure WaitForPage;
begin
  Wait(1500);
end;


Function WhichWord: Integer;
Begin
  Result := Random(4);
End;


Procedure Click;
Var
  X, Y, R: Integer;
Begin
  R := WhichWord;
  X := 389;
  Y := 447 + R * 38;
  ClickMouse(X, Y, True);
End;

begin
  i := 0;
  Repeat
    Click;
    i := i + 1;
    WaitForPage;
  Until(i = 10000);
end.

:)

Lol mine is for IE 7

*Cringes at the sudden urge to be nice and help people*

*Sigh*

Seems you've inspired me to make a Delphi app for it =]

Looks interesting, i'll run it on my other computer.
I like helping people. :)