Random Timer in same spawngroup

[Figback65]

Hey all,

I use this script to simulate a random spawn time for invisible spawners in the same spawngroup. This way I didn't have to make 5 different NPCs and 5 different scripts all with different timers. Even then each invisible spawner will be a set time causing each spot to always spawn its npcs the same time every respawn.

So I make 1 invisible npc to be the spawner and add multiples to the spawn group and they will all random the spawn times.

Imagine it could be used in many ways.

____.pl

#Spawn Sequence
#Set timer
#When Timer hits
#Choose random timer
#When random timer hits
#Choose random spawn
#
sub EVENT_SPAWN {
quest::settimer(1, 40);
}

sub EVENT_TIMER {
my $Rndtime = quest::ChooseRandom(1,2,3);
my $Spawn = quest::ChooseRandom(1,2,3,4,5,6);

if($timer == 1) {
if($Rndtime == 1){
quest::settimer(2, 5);
}
if($Rndtime == 2){
quest::settimer(3, 15);
}
if($Rndtime == 3){
quest::settimer(4, 25);
}
}

if($timer == 2) {

if($Spawn == 1) {
quest::spawn2(1000300,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 2) {
quest::spawn2(1000305,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 3) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 4) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 5) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 6) {
quest::spawn2(1000300,0,0,$x,$y,$z,0);
#object
}
quest::stoptimer(2);
}

if($timer == 3) {

if($Spawn == 1) {
quest::spawn2(1000300,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 2) {
quest::spawn2(1000305,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 3) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 4) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 5) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 6) {
quest::spawn2(1000300,0,0,$x,$y,$z,0);
#object
}
quest::stoptimer(3);
}

if($timer == 4) {

if($Spawn == 1) {
quest::spawn2(1000300,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 2) {
quest::spawn2(1000305,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 3) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 4) {
quest::spawn2(1000306,0,0,$x,$y,$z,0);
#object
}

elsif($Spawn == 5) {
#object
}

elsif($Spawn == 6) {
quest::spawn2(1000300,0,0,$x,$y,$z,0);
#object
}
quest::stoptimer(4);
}


}