infinite grenades script

[Xxypher]

Can someone make me a script that gives the players infinite grenades every 10 minutes? If so that would be great!

[mikembm]

Why every 10 minutes? Are the infinite grenades going to run out? Lol.

[Xxypher]

Sorry...
Every other 10 minutes grenades are infinite, where you can keep throwing them until the 10 minutes are over, then you have have wait 10 minutes for it to happen again, I am trying to get an arcade server going soon...

[EnEsCe]

Can't be done with scripting sorry.

[Xxypher]

Crap...
Is there a way to do it with the knifes?

[Avarax]

Can't be done with scripting sorry.

not true ;Q

Code: [Select]

var kitID: array[1..32] of byte;
      infinitenades: boolean;

procedure AppOnIdle(Ticks: integer);
var i: byte;
begin
  If Ticks mod 36000 = 0 then
    case infinitenades of
      true: infinitenades:=false;
      false: infinitenades:=true;
    end;
 
  If infinitenades then
    for i:=1 to 32 do begin
      If (GetObjectStat(kitID[i],'Active') = true) and (GetObjectStat(kitID[i],'Style') = 17) then
        KillObject(kitID[i]);
      If (GetPlayerStat(i,'Active') = true) then
        kitID[i]:=SpawnObject(GetPlayerStat(i,'X'),GetPlayerStat(i,'Y'),17);
    end;     
end;


[Xxypher]

Thanks!