For future reference, you can format your code in forum posts using SIMBA tags, as shown below.
I've cleaned up the code you posted.
Simba Code:
program Agility;
procedure click1;
begin
MoveMouse(696,460);
ClickMouse(696,460);
wait(1500);
end;
procedure click2;
begin
MoveMouse(); // ?? you don't put any coordinate to move/click
ClickMouse();// ??
wait(1500);
end;
procedure click3;
begin
MoveMouse(); // same issue
ClickMouse();
wait(1500);
end;
procedure click4;
begin
MoveMouse(); // still no coordinates specified
ClickMouse();
wait(5000);
end;
begin
click1;
click2;
click3;
click4;
end.
Your primary issue is that for the latter three click procedures you don't specify any X/Y values to move or click the mouse on.