View Single Post
  #5  
Old 12-22-2014, 05:24 PM
ghanja's Avatar
ghanja
Dragon
 
Join Date: Aug 2012
Location: Hershey, PA
Posts: 499
Default

I'm out the door, hoping syntax is correct:
Code:
sub EVENT_ENTERZONE {

	quest::settimer ("dopopup",5);

}


sub EVENT_TIMER {
use Switch;

	switch ($timer) {
		
		case ("dopopup") {
			quest::stoptimer ("dopopup");
			
			my $Indent = plugin::PWIndent();
			my $Yel = plugin::PWColor ("Yellow");
			my $PopupLink = plugin::PWHyperLink ("HERE","http://www.google.com");
			my $PopupLink2 = plugin::PWHyperLink ("HERE","http://www.eqemulator.org");
			my $PopupTextCentered = plugin::PWAutoCenter ("Welcome");
			
			quest::popup ("Popup Window Title", 
			"<br>$Indent $Indent $Indent [$Yel Welcome </c> ]<br> <br>
			If you wish to search Google click $PopupLink<br><br>
			If you wish to go to the EQEMu Site click $PopupLink2<br> <br> <br>
			So do you understand the webz?",1,1,0); 
			
			# usage quest::popup (title,text,popupid,buttons,duration) 
			# 	-- whereas buttons 0 = just ok, 1 = yes (1) and no (0) 
			# 	-- duration in seconds before vanish 0 = wait for click response
		}
	}
}


sub EVENT_POPUPRESPONSE {

	if ($popupid == 1) {
		quest::gmsay ("Hey all $name understands the interwebz!",335,1,0,0);
	}
}
Reply With Quote