//##########################################################################
//By: ____                    _      __        __           ____    _____  
//   |    \   ___ __    __ _ | |     \ \      / /_  _   _  / ___\  / ____| 
//   | ||  | / _ \\ \  / /| || |      \ \    / /| || \ | || | ___ | (___   
//   | ||  ||  __/ \ \/ / | || |__     \ \/\/ / | ||  \| || |___|\ \___ \  
// __|____/__\___|__\__/__|_||____|_____\_/\_/__|_||_|\__|_\_____/_____) | 
//|_____________________________________________________________________/ 
//                                                                         
//##########################################################################
//                                                                        
//== Dice Event                                                            
//                                                                         
//##########################################################################
//== Edited by Keale													   
//== Removed 30 Min Timer and added trigger NPC							   
//== Able to set prize and amount via the NPC							   
//== Added Mapflags														  
//== Edited area warps                                                          
//##########################################################################
	
-	script	Dice#disable	-1,{
end;

OnInit:
	disablenpc "prtevent";
	disablenpc "Dice#evnt1";
	end;
	
//OnMinute00:
OnDiceEventStart:
	announce "Mr. Dice: The Dice event will be starting shortly.",0;
	sleep2 10000;
	announce "Mr. Dice: Those who want to play, please proceed to Prontera 150 150 and enter the Warp Portal.",0;
	sleep2 10000;
	announce "Mr. Dice: After 1 Minute the Portal will close.",0;
	sleep2 10000;
	announce "Mr. Dice: Please go to  Prontera 150 150 and enter the Warp Portal now if you want to join.",0;
	enablenpc "prtevent";
	initnpctimer;
	end;

OnTimer30000:
	announce "Mr. Dice: Last 30 seconds.",0;
	sleep2 5000;
	announce "Mr. Dice: If you want to join please enter the Warp Portal in Prontera.",0;
	end;
	
OnTimer50000:
	announce "Mr. Dice: Last 10 seconds.",0;
	end;
	
OnTimer55000:
	announce "Mr. Dice: 5.",0;
	end;
	
OnTimer56000:
	announce "Mr. Dice: 4.",0;
	end;
	
OnTimer57000:
	announce "Mr. Dice: 3.",0;
	end;
	
OnTimer58000:
	announce "Mr. Dice: 2.",0;
	end;
	
OnTimer59000:
	announce "Mr. Dice: 1.",0;
	end;
	
OnTimer60000:
	announce "Mr. Dice: Time's up.",0;
	end;
	
OnTimer61000:
	disablenpc "prtevent";
	donpcevent "Dice#evnt1::OnEnable";
	announce "Mr. Dice: The next Dice event will start after 30 minutes.",0;
	stopnpctimer;
	end;
}
//--------------------------------------------------
	
prontera,150,150,0	script	prtevent	45,2,2,{
end;
OnTouch:
	warp "quiz_01",204,90;
	end;
}	
	
//--------------------------------------------------

quiz_01,204,93,6	script	Dice#evnt1	715,{
	mes "[Mr. Dice]";
	mes "Congrats. You've won.";
	announce "Mr. Dice: We have a winner! well done "+ strcharinfo(0) +".",0;
	getitem 7227,1;
	warp "prontera",180,150;
	disablenpc "Dice#evnt1";
	close;
	
OnEnable:
	mapannounce "quiz_01","Mr. Dice: We are about to start the Dice event.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: But before we start the event here's how to play the game...",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: I'm only gonna say this once so read carefully.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: I'm going to roll a number, 1 to 4. Then I'll do a count down from 5 to 0.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: All you have to do is go stand on the box of the number you want.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: For example, If I roll a number 4, All the players standing on numbers 1 to 3 will be warped back to town.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: We will do it until we only have 1 player left on the map.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: Oh yeah! Before I forget you MUST GO INSIDE THE BOX, because if you're caught standing on the stairs you'll be automatically disqualified.",0;
	sleep2 4000;
	mapannounce "quiz_01","Mr. Dice: Simple huh?.. Let's play...",0;
	
L_Start:
	if(getmapusers("quiz_01") == 1) goto L_Champ;
	if(getmapusers("quiz_01") == 0) goto L_None;
		mapannounce "quiz_01","Mr. Dice: . . . . .",0;
		set $@number, rand(1,4);
		sleep2 10000;
		mapannounce "quiz_01","Mr. Dice: I have rolled. Please pick a number and go stand there.... GO!",0;
		sleep2 10000;
		mapannounce "quiz_01","Mr. Dice: 5",0;
		sleep2 5000;
		mapannounce "quiz_01","Mr. Dice: 4",0;
		sleep2 4000;
		mapannounce "quiz_01","Mr. Dice: 3",0;
		sleep2 3000;
		mapannounce "quiz_01","Mr. Dice: 2",0;
		sleep2 2000;
		mapannounce "quiz_01","Mr. Dice: 1",0;
		sleep2 1000;
		mapannounce "quiz_01","Mr. Dice: Time's up.",0;
		donpcevent "evnt#1::OnEnable";
		mapannounce "quiz_01","Mr. Dice: The winning number is "+$@number+".",0;
		if(($@number != 1) && ($@number != 2) && ($@number != 3)) goto L_Lose1;
		if(($@number != 1) && ($@number != 2) && ($@number != 4)) goto L_Lose2;
		if(($@number != 1) && ($@number != 3) && ($@number != 4)) goto L_Lose3;
		if(($@number != 2) && ($@number != 3) && ($@number != 4)) goto L_Lose4;
		end;
	
L_Lose1:
	areawarp "quiz_01",183,81,191,59,"prontera",180,150;
	areawarp "quiz_01",195,81,203,59,"prontera",180,150;
	areawarp "quiz_01",207,81,215,59,"prontera",180,150;
	goto L_Start;
	end;

L_Lose2:
	areawarp "quiz_01",183,81,191,59,"prontera",180,150;
	areawarp "quiz_01",195,81,203,59,"prontera",180,150;
	areawarp "quiz_01",219,81,227,59,"prontera",180,150;
	goto L_Start;
	end;
	
L_Lose3:
	areawarp "quiz_01",183,81,191,59,"prontera",180,150;
	areawarp "quiz_01",207,81,215,59,"prontera",180,150;
	areawarp "quiz_01",219,81,227,59,"prontera",180,150;
	goto L_Start;
	end;
	
L_Lose4:
	areawarp "quiz_01",195,81,203,59,"prontera",180,150;
	areawarp "quiz_01",207,81,215,59,"prontera",180,150;
	areawarp "quiz_01",219,81,227,59,"prontera",180,150;
	goto L_Start;
	end;
	
L_Champ:
	mapannounce "quiz_01","Mr. Dice: Come to me and tell me your name.",0;
	enablenpc "Dice#evnt1";
	end;
	
L_None:
	//disablenpc "Dice#evnt1";
	disablenpc "Dice#evnt1";
	end;
}
	
-	script	evnt#1	-1,{

OnEnable:
	areawarp "quiz_01",182,94,228,88,"prontera",180,150;
	areawarp "quiz_01",185,87,188,82,"prontera",180,150;
	areawarp "quiz_01",197,87,200,82,"prontera",180,150;
	areawarp "quiz_01",209,87,212,82,"prontera",180,150;
	areawarp "quiz_01",221,87,224,82,"prontera",180,150;
	end;
}

// -- Mapflags
quiz_01	mapflag	nowarp
quiz_01	mapflag	nowarpto
quiz_01	mapflag	noteleport
quiz_01	mapflag	nosave
quiz_01	mapflag	nomemo
quiz_01	mapflag	nobranch
//quiz_01	mapflag	pvp