SAIL - RandExplosionInArea

Gotowe kody SAIL'a, informacje na temat moddingu, itd.

Moderator: zoNE

Post Reply
User avatar

Topic author
zoNE
The Great Uniter & Site Administrator
The Great Uniter & Site Administrator
Posts: 1570
Joined: Fri Feb 17, 2006 3:44 pm
Location: Poland
Contact:

SAIL - RandExplosionInArea

#1

Post by zoNE » Sat Nov 07, 2015 5:40 am

Serpent wrote:

Code: Select all

Export Function RandExplosionInArea(area, time, num);
var i, c, tmp;
begin
tmp := AreaToList(area, 0);
Randomize;

for i = 1 to num do
    begin
    c := Rand(1, tmp[1]);
    MineExplosion(tmp[1][c], tmp[2][c], 1);
    Wait(time);
    end;

End;
Funkcja powoduje losowe wybuchy w danej arei.

Code: Select all

RandExplosionInArea(area, time, num);
area - Area w której mają wystąpić wybuchy.
time - Czas pomiędzy wybuchami.
num - Ilość wybuchów.
Author: Serpent
Topic: viewtopic.php?f=42&t=4558

Post Reply

Who is online

Users browsing this forum: No registered users and 1 guest