View Single Post
  #1  
Old 01-13-2013, 11:41 PM
javewow's Avatar
javewow
Sarnak
 
Join Date: Aug 2012
Location: work
Posts: 74
Default varlink--DOWN ZONE

varlink--->Items Lead to ZONE DOWN

Help!

Code:
        my $Warriora = quest::varlink(101229);
	my $Clericbb = quest::varlink(83935);
        my $Paladinc = quest::varlink(83937);
        my $Monk =  quest::varlink(83936);

sub EVENT_SPAWN {
quest::settimer("dreadlands5min",300); #Live like is 900
}

sub EVENT_TIMER {
if ($timer eq "dreadlands5min") {
quest::stoptimer("dreadlands5min");
quest::say("The portal to Luclin will become active in five minutes. Please begin gathering at the Spires if you wish to travel.rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::settimer("dreadlands3min",120);
}
if ($timer eq "dreadlands3min") {
quest::stoptimer("dreadlands3min");
quest::say("As a reminder, the portal will become active in three minutes rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk].");
quest::settimer("dreadlands2min",60);
}
if ($timer eq "dreadlands2min") {
quest::stoptimer("dreadlands2min");
quest::say("Two minutes till teleportation. Please be prepared to step inside the circle of Spires. rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::settimer("dreadlands1min",60);
}
if ($timer eq "dreadlands1min") {
quest::stoptimer("dreadlands1min");
quest::say("One minute till teleportation. Please be prepared to step inside the circle of Spires. rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::settimer("dreadlandstimer",60);
}
if ($timer eq "dreadlandstimer") {
quest::stoptimer("dreadlandstimer");
quest::say("The portal to Luclin is about to become active. Please stand inside the circle of Spires and have a shard upon your person. rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::setglobal(nexus_dre,1,3,"S60"); #when the portal is open, global is set true for 1 min.
quest::settimer("dreadlands5min",900);
quest::signalwith(86051,101,0); #triggers the flavor
}
 }

next pl Cannot display Warriora ->Item=101229

Code:
sub EVENT_SAY {

        my $Warriora = quest::varlink(101229);
	my $Clericbb = quest::varlink(83935);
        my $Paladinc = quest::varlink(83937);
        my $Monk =  quest::varlink(83936);

sub EVENT_SPAWN {
quest::settimer("dreadlands5min",300); #Live like is 900
}

sub EVENT_TIMER {
if ($timer eq "dreadlands5min") {
quest::stoptimer("dreadlands5min");
quest::say("The portal to Luclin will become active in five minutes. Please begin gathering at the Spires if you wish to travel.rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::settimer("dreadlands3min",120);
}
if ($timer eq "dreadlands3min") {
quest::stoptimer("dreadlands3min");
quest::say("As a reminder, the portal will become active in three minutes rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk].");
quest::settimer("dreadlands2min",60);
}
if ($timer eq "dreadlands2min") {
quest::stoptimer("dreadlands2min");
quest::say("Two minutes till teleportation. Please be prepared to step inside the circle of Spires. rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::settimer("dreadlands1min",60);
}
if ($timer eq "dreadlands1min") {
quest::stoptimer("dreadlands1min");
quest::say("One minute till teleportation. Please be prepared to step inside the circle of Spires. rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::settimer("dreadlandstimer",60);
}
if ($timer eq "dreadlandstimer") {
quest::stoptimer("dreadlandstimer");
quest::say("The portal to Luclin is about to become active. Please stand inside the circle of Spires and have a shard upon your person. rewards[$Warriora]-[$Clericbb]-[$Paladinc]-[$Monk]");
quest::setglobal(nexus_dre,1,3,"S60"); #when the portal is open, global is set true for 1 min.
quest::settimer("dreadlands5min",900);
quest::signalwith(86051,101,0); #triggers the flavor
}
 }

I want to see if NPC --But not's Working??
__________________
To create the most beautiful server for "!!~[BP] PLARYBOT EQ~!" Welcome to our server
Reply With Quote