View Single Post
  #40  
Old 02-25-2016, 10:36 AM
jpyou127's Avatar
jpyou127
Discordant
 
Join Date: Nov 2005
Posts: 270
Default Roxxanne.pl

Roxxanne.pl

Code:
sub EVENT_SAY {
    if ($text=~/hail/i) {
        quest::say("Well hello! We are great dancers. Would you like to see us dance? Or maybe you would like us to teach you to dance?");
    } 
	
	elsif($text=~/see you dance/i) {
        quest::settimer("do_the_marinara", 1);     
    } 
	
	elsif($text=~/teach me to dance/i) {
        quest::say("Look at you! You can dance! Go, go, go! That's the spirit, you got it! Keep up the good work! Don't get too tired now, you are looking a little pale!");
        quest::selfcast(1246);
    }    
}

sub EVENT_TIMER{
    if($timer eq "do_the_marinara"){
        my @nlist = $entity_list->GetNPCList();
        foreach my $n (@nlist){
            if($n->GetCleanName()=~/Roxxanne/i){
                $n->DoAnim(33);
            }
			
			if($n->GetCleanName()=~/Ashley/i){
                $n->Say("Hey! Yeah! Do the Marinara!");
                $n->DoAnim(33);
            }
            
            if($n->GetCleanName()=~/Brittina/i){
                $n->Say("Hey! Yeah! Do the Marinara!");
                $n->DoAnim(33);
            }
            
            if($n->GetCleanName()=~/Diana/i){
                $n->Say("Hey! Yeah! Do the Marinara!");
                $n->DoAnim(33);
            }
        }
        quest::stoptimer("do_the_marinara");
    }
}
The only thing I cannot get to happen, is for the PC to actually spin as it did in the original. I tested this with Underfoot.


Celestial