O.K, I used to be a half decent scripter but that was then and this is now, I've pretty much forgotten all of my knowledge of scripting, and I've decided to take it up again. BUT before I start on RuneScape, I want to write some scripts for other games on mousebreaker.com.

I want to write a script for the game 'Hammer Throw', if you play on it you can see that really this game is a scripters dream because it is soo easy to write a really good script for it! However, that's the problem, I've forgotten and it seems hard!!

I want to be able to get 3 good throws that will enable me to get on the scoreboard eveytime, but it seems so hard!

My script at the moment for it:


program New;
var
x: integer;

procedure FirstStartOffSlow;
begin
MoveMouse (349,202);//EAST
wait(1000);
HoldMouse (349,202,true);//EAST
wait(200);
MoveMouse (325,132);//NORTH EAST
wait(200);
MoveMouse (276,104);//NORTH
wait(200);
MoveMouse (205,137);//NORTH WEST
wait(200);
MoveMouse (177,203);//WEST
wait(200);
MoveMouse (211,268);//SOUTH WEST
wait(200);
MoveMouse (272,289);//SOUTH
wait(200);
MoveMouse (341,258);//SOUTH EAST
wait(100);
MoveMouse (349,202);//EAST
wait(100);
MoveMouse (325,132);//NORTH EAST
wait(100);
MoveMouse (276,104);//NORTH
wait(100)
end;

procedure two;
begin
x:=1;
repeat
MoveMouse (205,137);//NORTH WEST
wait(90);
MoveMouse (177,203);//WEST
wait(90);
MoveMouse (211,268);//SOUTH WEST
wait(90);
MoveMouse (272,289);//SOUTH
wait(90);
MoveMouse (341,258);//SOUTH EAST
wait(90);
MoveMouse (349,202);//EAST
wait(90);
MoveMouse (325,132);//NORTH EAST
wait(90);
MoveMouse (276,104);//NORTH
wait(100);
x:= x + 1;
until (x > 3);
end;


procedure middle;
begin
x:=1
repeat
MoveMouse (205,137);//NORTH WEST
wait(70);
MoveMouse (177,203);//WEST
wait(70);
MoveMouse (211,268);//SOUTH WEST
wait(70);
MoveMouse (272,289);//SOUTH
wait(70);
MoveMouse (341,258);//SOUTH EAST
wait(70);
MoveMouse (349,202);//EAST
wait(70);
MoveMouse (325,132);//NORTH EAST
wait(70);
MoveMouse (276,104);//NORTH
x:= x + 1;
until (x > 2);
end;


procedure midlast;
begin
MoveMouse (205,137);//NORTH WEST
wait(70);
MoveMouse (177,203);//WEST
wait(65);
MoveMouse (211,268);//SOUTH WEST
wait(60);
MoveMouse (272,289);//SOUTH
wait(55);
MoveMouse (341,258);//SOUTH EAST
wait(50);
MoveMouse (349,202);//EAST
wait(45);
MoveMouse (325,132);//NORTH EAST
wait(40);
MoveMouse (276,104);//NORTH

end;













procedure LastSwing;
begin

MoveMouse (205,137);//NORTH WEST
wait(30);
MoveMouse (177,203);//WEST
wait(30);
MoveMouse (211,268);//SOUTH WEST
wait(30);
MoveMouse (272,289);//SOUTH
wait(30);
MoveMouse (341,258);//SOUTH EAST
wait(30);
MoveMouse (349,202);//EAST
wait(30);
MoveMouse (325,132);//NORTH EAST
wait(30);
MoveMouse (276,104);//NORTH

end;









procedure RMouse;
begin
wait(300);
ReleaseMouse (276,104,true);//NORTH
end;

begin
FirstStartOffSlow;
two;
middle;
midlast;
LastSwing;
Rmouse;
end.



As you can see, I am rubiish at scripts. Here is the link to the game: http://www.mousebreaker.com/games/hammerthrow/play.php

So, can ayone help me by suggesting a better way to write a script for this game? I'm sure someone will be able to write a script for this easily in less than an hour, because it loks to me like scripting has moved on alot since I was in my hayday. I'm not used to any of the new functions or taggs or anything. If someone wrote an example script, it would help me because I would learn from it. If anyone would give me any ideas, I would also greatly appreciate them.