//===== eAthena Script ======================================= 
//= Quest NPCs related to Rachel
//===== By: ================================================== 
//= Playtester
//===== Current Version: ===================================== 
//= 1.1
//===== Compatible With: ===================================== 
//= eAthena svn
//===== Description: ========================================= 
//= Rachel Santuary Quest
//===== Additional Comments: ================================= 
//= 1.0 Added semi-official Rachel Santuary Quest [Playtester]
//= 1.1 Official donation items, chance guessed [Playtester]
//============================================================

//////////////////////////////////////////////////////////////
//		  Rachel Sanctuary Quest		    //
//							    //
//It's all in one NPC for now because I don't know location //
//and sprite ids of related NPCs. - Playtester		    //
//////////////////////////////////////////////////////////////
ra_temple,119,157,0	script	Statue#Rachel	111,{

	if($rachel_donate < 10000){
		mes "-A sign on the statue reads-";
		mes "Please donate ^FF000050,000 Zeny^000000 to our holy goddess.";
		mes "There have been "+$rachel_donate+" donations already.";
		next;
		if(select("Don't donate.:Donate.") == 1){
			mes "-You decided not to donate-";
			close;
		}else{
			if(Zeny >= 50000){
				set Zeny,Zeny-50000;
				mes "-You can hear a voice-";
				mes "May the goddess bless you.";
				set .@bonus_donate,rand(1000);
				if(.@bonus_donate < 600) getitem 547,1; //White Condensed Potion 60%
				else if(.@bonus_donate >= 600 && .@bonus_donate < 750) getitem 518,1; //Honey 15%
				else if(.@bonus_donate >= 750 && .@bonus_donate < 850) getitem 505,1; //Blue Potion 10%
				else if(.@bonus_donate >= 850 && .@bonus_donate < 900) getitem 526,1; //Royal Jelly 5%
				else if(.@bonus_donate >= 900 && .@bonus_donate < 930) getitem 608,1; //Yggdrasil Seed 3%
				else if(.@bonus_donate >= 930 && .@bonus_donate < 950) getitem 607,1; //Yggdrasil Berry 2%
				else if(.@bonus_donate >= 950 && .@bonus_donate < 970) getitem 604,1; //Dead Branch 2%
				else if(.@bonus_donate >= 970 && .@bonus_donate < 990) getitem 644,1; //Gift Box 2%
				else if(.@bonus_donate >= 990 && .@bonus_donate < 998) getitem 617,1; //Old Purple Box 0.8%
				else if(.@bonus_donate >= 998 && .@bonus_donate < 1000) getitem 616,1; //Old Card Album 0.2%
				set $rachel_donate,$rachel_donate+1;
				close;
			}
			else{
				mes "-You want to donate-";
				mes "-But you don't have enough zeny-";
				close;
			}
		}
	}
	if(!(MISC_QUEST & 8192)){
		mes "[Voice]";
		mes "The gates to Rachel Sanctuary have opened.";
		mes "Bring me ^0000FF40 Ice Hearts^000000, ^FF00001 Candy^000000 and ^FF000020 Firecrackers^000000 and I'll allow you to enter.";
		next;
		if(select("Do nothing.:Hand over the items.") == 1){
			mes "[Voice]";
			mes "I won't grant you access to Rachel Sanctuary.";
			close;
		}else{
			if(countitem(7561) < 40 || countitem(529) < 1 || countitem(12018) < 20){
				mes "[Voice]";
				mes "You don't have enough items.";
				mes "I won't grant you access to Rachel Sanctuary.";
				close;
			}
			delitem 7561,40;  //Ice Hearts
			delitem 529,1;    //Candy
			delitem 12018,20; //Firecrackers
			mes "[Voice]";
			mes "Very well. I shall grant you access to Rachel Sanctuary.";
			set MISC_QUEST,MISC_QUEST | 8192;
			close;
		}
	}
	mes "[Voice]";
	mes "Oh it's you my blessed child.";
	mes "Do you want to enter Rachel Sanctuary?";
	next;
	if(select("No.", "Yes.") == 2){
		mes "-The door to Rachel Sanctuary opens-";
		close2;
		warp "ra_san01",139,139;
	    	end;
	}
	mes "[Voice]";
	mes "I see, come back when you need my help.";
	close;
}