[question] Pascal/scar Divi

[SeafightSellShip's]

 Spoiler

{.Script Info:
# ScriptName = iKorupted bot.
# Author = iKorupted
# Description = Script to for farming & coinclicking.
# Version = v1.o
# Date = 09/292015
# Comments = Ask author if there are any errors.
/Script Info}

//=====================iKorupted bot================================\\
program New;
procedure ClickButton;
begin
WriteLn('(!) Read the green instructions!');
WriteLn('(!) Use this script at your own risk!');
ClickMouse(947, 113, true);//Farm assistant button
wait(3000);//wachttijd om FA te openen
ClickMouse(1046, 177, true);//adelshoeve button
wait(2000);//wachttijd om van button adelshoeve naar button goudmunten slaan te gaan.
ClickMouse(479, 398, true);//goudmunten slaan button
wait(2000);//wachttijd om van button goudmunten slaan naar button selecteren te gaan.
ClickMouse(1310, 500, true);//selecteren button
wait(2000);//wachtijd om van button selecteren naar goudmunten slaan te gaan.
ClickMouse(711, 501, true);//goudmunten slaan button
ClickButton;
end;
begin
Clickbutton;
end.
//=====================iKorupted bot================================\\

I'd like to know how to but a RandomWait into my script. I'd like to run a script which clicks non stop on some buttons and once in every 5-10 on a certain button, anyone knows how to do this?

[warfley]

Using function you can generate a number between 5 and 10, give it to in int variable, then you could do a while loop to press your buttons, counting your variable down, when it reaches 0 you press that special button, and generate a new number
something like this:

procedure Clickbuttons;
var
  c: Integer;
begin
  c := RandomRange(5, 10);
  While True do
  begin
    // Press your Buttons here
    dec(c);
    if c = 0 then
    begin
      //Press the special button here
      c := RandomRange(5, 10);
    end;
  end;
end;