| jshirley |
10-07-2010 09:15 PM |
Barindu::#Apprentice_Udranda.pl fixed
Original file I got from repo had a curly bracket in the wrong spot.
Code:
sub EVENT_SAY {
$InInstanceVxed = quest::GetInstanceID("vxed",0);
$InInstanceTipt = quest::GetInstanceID("tipt",0);
$group = $client->GetGroup();
if ($text=~/hail/i) {
quest::say("Do you wish to enter the [mountains], or are you ready for Tipt]?");
}
if ($text=~/mountains/i) {
if($group){
if(defined $qglobals{god_vxed_access} && $qglobals{god_vxed_access} == 1){
quest::say("Your work in the sewers has been vital to our progression, please proceed with caution in the mountain pass.
Find the Stonespiritist for further advancement.");
if($InInstanceVxed == 0 && $InInstanceTipt == 0){
$Instance = quest::CreateInstance("vxed", 0, 21600);
quest::AssignGroupToInstance($Instance);
quest::say("Instance added.");
}
else {
$client->Message(13, "You are already in an instance!");
}
}
else {
quest::say("You have not proven ready for this task. Please speak to the High Priest.");
}
}
else {
$client->Message(13, "You are not in a group!");
}
}
if ($text=~/tipt/i) {
if($group){
if(defined $qglobals{god_tipt_access} && $qglobals{god_tipt_access} == 1){
quest::say("Proceed with caution, you must face several trials to find your way past through this pass.");
if($InInstanceVxed == 0 && $InInstanceTipt == 0){
$Instance = quest::CreateInstance("tipt", 0, 21600);
quest::AssignGroupToInstance($Instance);
quest::say("Instance added.");
}
else {
$client->Message(13, "You are already in an instance!");
}
}
else {
quest::say("You must speak with Stonespiritist Ekikoa in the mountains before I can grant you access.");
}
}
else {
$client->Message(13, "You are not in a group!");
}
}
}
|