Vahlara Revised

[Angelox]

Vahlara (Tutorialb or Gloomingdeep) was not giving out all the armor or multiple pieces.
Too large to fit in the post;
Vahlara.pl

Vahlara also does a few other things aside from trading out nice noobie armor;

  }
  elsif ($amote==2){
    quest::spawn2(189119,0,0,-126.0,-295.8,3.0,124.8);
  }
  elsif ($bmote==2){
    quest::spawn2(189120,0,0,-385.2,-516.3,-39.3,135.1);
  }

These are two invisible NPCs that temporarily spawn further down the caves with emotes;

# Emotes
# Zone: Tutorialb

sub EVENT_SPAWN
{
	$x = $npc->GetX();
	$y = $npc->GetY();
	quest::set_proximity($x - 50, $x + 50, $y - 50, $y + 50);
	quest::delglobal("amote");
	quest::setglobal("amote",3,3,"F");
	$amote=undef;
}

sub EVENT_ENTER
{
	quest::emote("A vast mine lays before you. From deep within the mine you can hear the clanging of pulleys and carts. It appears as though they are inhabited . . .");
	quest::depop();
	quest::delglobal("amote");
	quest::setglobal("amote",2,3,"F");
	$amote=undef;
}

But will not spawn, unless a "first timer" player hails her (Vahlara);

  if (($text=~/hail/i)&&(${$name}==2)){

(avoids spamming the caves with emotes)
That little piece of script gives every player in Gloomingdeep their own variable ($name).
The $name variable is also used in the #AriasLoY.pl and when finally set with the turn in needed, he sends you off to the LoY zones at level 35 (provided you used this pl)

At one time quest_globals would not work unless I "initialized" the variable and made it available, so this was Celraks job;

# Emotes
# Zone: Tutorialb

sub EVENT_SPAWN
{
	$x = $npc->GetX();
	$y = $npc->GetY();
	quest::set_proximity($x - 50, $x + 50, $y - 50, $y + 50);
}

sub EVENT_ENTER
{
  quest::setglobal("$name",1,3,"F");
  $name=undef;
}

This is where new characters started out in the dungeon (by Celrak). I think this is not needed anymore (with Blehs fix).

Finally, Arias deletes your $name variable when you exit the dungeon, so as not to fill up the quest_globals table with unused variables.