View Single Post
  #1  
Old 12-23-2013, 05:12 AM
Township EQ
Hill Giant
 
Join Date: Sep 2013
Posts: 118
Default Handling task rewards via sub event task_stage_complete

Task ID: 272
Last Activity ID in task: 4

I'm just trying to hand out a reward by class via the perl system. This is my player.pl for the zone that it's in. I've been messing around with it and can't seem to find the problem. The whole quest is handled via Perl and everything is working properly with the steps of the task and completing it.. but I'm not even getting the reward message that's in there. Am I using the sub event wrong or something? The rest of my player.pl is working properly.

Code:
sub EVENT_TASK_STAGE_COMPLETE {
  if($task_id == 272 && $activity_id == 4) {
  $client->Message(15,"REWARD TOWN USA");
    if($class eq "Warrior"){quest::summonitem(1377);}
    elsif($class eq "Cleric") {quest::summonitem(1385);}
    elsif($class eq "Paladin") {quest::summonitem(1384);}
    elsif($class eq "Ranger") {quest::summonitem(1387);}
    elsif($class eq "Shadowknight"){quest::summonitem(1384);}
    elsif($class eq "Druid"){quest::summonitem(1389);}
    elsif($class eq "Monk"){quest::summonitem(1391);}
    elsif($class eq "Bard"){quest::summonitem(1386);}
    elsif($class eq "Rogue"){quest::summonitem(1387);}
    elsif($class eq "Shaman"){quest::summonitem(1388);}
    elsif($class eq "Necromancer"){quest::summonitem(1392);}
    elsif($class eq "Wizard"){quest::summonitem(1392);}
    elsif($class eq "Magician"){quest::summonitem(1392);}
    elsif($class eq "Enchanter"){quest::summonitem(1392);}
  }
}
Reply With Quote