Here is an example of adding Crude Defiant in Crushbone to the  stock orc_centurion.pl
	Code:
	#Orc chit-chat
#Revised Angelox 10-23-06
#zone: Crushbone
sub EVENT_COMBAT{ 
 $rand = rand(); 
 
if(($rand < .3)&&($combat_state == 1))  {  quest::say("Death!!  Death to all who oppose the Crushbone orcs!!"); 
 }  
if(($rand > .67)&&($combat_state == 1)) { 
 quest::say("Hail, Emporer Crush!!");
 }  
if(($rand >= .3)  && ($rand <= .67)&&($combat_state == 1))  {  
 quest::say("Fall before the might of Clan Crushbone!!"); 
 }
}
sub EVENT_ATTACK{  quest::say("Centurions!!  Legionnaires!!  Come join the fight!");
}
sub EVENT_DEATH{ 
 quest::say("You shall have all the Crushbone orc legions on your tail for my death!");
}
sub EVENT_TIMER{
 $defiantrand = rand(28);
 $defiantrand = $defiantrand + 50004; 
 $defiantchance = rand(100);
 if ($defiantchance <= 50) { 
  quest::addloot($defiantrand,1); #Adds x-charges of an item to the NPC's loot
 }
quest::stopalltimers();
}
sub EVENT_SPAWN{
   quest::settimer($mytimer,5); 
}