EQEmulator Forums - neriaka/pungla.pl

This appears to be missing; its part of the HEHE Quest

Code:

# Pungla.pl npcID:(40083)

# written by dagulus2



sub EVENT_SAY {

  if ($text=~ /Hail/i) {

    quest::say("Welcome! Drink you shall, some of de finest drinks of da lands! [Flaming Pungla], I suggest to you. It all me sells.");

  }

  if ($text=~ /Flaming Pungla/i) {

    quest::say("Greatest drink and Plunga's creation. Buy one you should. Dey so gud me gots da charge t'ree golds.");

  }

}



sub EVENT_ITEM {

  if ($gold == 3) {

        quest::say("Bottoms up!");

    quest::summonitem(13382);

  }

  else {

    quest::givecash($copper, $silver, $gold, $plat); #Return Cash if wrong amount

  }

  plugin::return_items(\%itemcount);

}