prontera,146,80,5	script	Katu	4_M_DEWOLDMAN,{
	if (#IDIND_Q == 3) {
		mes "[Katu]";
		mes "Hello [" + strcharinfo(PC_NAME) + "] !!!!";
		mes "Happy Independece Day!!!";
		close;
	}		
	if (#IDIND_Q == 0) {
		mes "[Katu]";
		mes "Hello [" + strcharinfo(PC_NAME) + "]";
		mes "We would like to celebrate Indonesia Independece Day today!!!";
		next;
		mes "[Katu]";
		mes "I'm giving Bandana Merah Putih an Indonesian Bandana to you but I need you to answer question and collecting some items first.";
		next;
		if (select("What is Bandana Merah Puti?", "Yes, Let me take the test.") == 1) {
			mes "[Katu]";
			mes "Bandana Merah Puti";
			mes "A special bandana that shows the courage of Indonesian patriots.";
			mes "[^ff0000Event Bonus until 8/25^000000]";
			mes "^777777Increase Attack Speed.^000000";
			mes "^777777Full HP and SP when resurrected.^000000";
			mes "^777777Add a 5% of auto casting Level 3 Heal on the user when the user receives Physical Damage.^000000";
			mes "^777777DEF + 4, MDEF + 4, All Stats + 5^000000";
			close;
		}	
		mes "[Katu]";
		mes "1. what is the element of monster wootan shooter ?";
		next;
		if (select("Fire", "Earth", "Wind") == 2)
			mes "Correct";
			.@id_ind += 10;	
		mes "[Katu]";
		mes "2. how many hp poring monster have ?";
		next;
		if (select("50 HP", "60 HP", "65 HP") == 1)
			mes "Correct";
			.@id_ind += 10;	
		mes "[Katu]";
		mes "3. if eddga and phreeone fight each other, who will win ?";
		next;
		if (select("None of them", "Eddga", "Phreeoni") == 2)
			mes "Correct";
			.@id_ind += 10;
		mes "[Katu]";
		mes "4. if angeling has 10 hp, and you use level 10 soul strike, how many damage angeling will received ?";
		next;
		if (select("0 Damage", "You will miss", "10 Damage") == 2)
			mes "Correct";
			.@id_ind += 10;
		mes "[Katu]";
		mes "5. how many transcendent npc in valhalla ?";
		next;
		if (select("11 NPC", "12 NPC", "13 NPC") == 3)
			mes "Correct";
			.@id_ind += 10;
		mes "[Katu]";
		mes "Umm. You did a good job!";
		next;
		mes "[Katu]";
		mes "Let's see...your score is..." + .@id_ind + " points.";
		if (.@id_ind == 50) {
			#IDIND_Q = 1;
			mes "Oh ho ho~";
			mes "You'll have";
			mes "no problem";
			mes "with this score!";
			next;
			mes "[Katu]";
			mes "I will entrust you with a task!";
			mes "Give me a little time to make the necessary arrangements.";
			mes "When you get back, I'll be ready!";
			close;
		}
		mes "Hmm...";
		mes "It pains me to say this, but it seems you need to study a little more. You can never have";
		mes "that Bandana Merah Putih with";
		mes "this score!";
		close;
	}
	if (#IDIND_Q == 1) { 
		mes "[Katu]";
		mes "Your next task is to bring me these items";
		mes "10x Scarlet Dyestuff";
		mes "10x White Dyestuff";
		mes "1x Bandana";
		mes "10,000 Zeny";
		#IDIND_Q = 2;		
		close;
	}
	if (#IDIND_Q == 2) { 
		disable_items;
		if( countitem(Scarlet_Dyestuffs) > 9 && countitem(White_Dyestuffs) > 9 && countitem(Bandana) > 0 && Zeny > 10000) {	
			mes "[Katu]";
			mes "Great job!!";
			mes "Thanks for bringing these items";
			next;
			mes "[Katu]";
			mes "Remember";
			mes "The Bandana Merah Putih is ^ff0000CHARACTER BOUND^000000.  You will ^ff0000NOT^000000 be allowed to transfer or put to storage.";
			next;
			mes "[Katu]";
			mes "Are you sure you want to claim at this character?";
			if (select("No, thanks", "Yes, I'm sure") == 2) {
				Zeny -= 10000;
				delitem Scarlet_Dyestuffs,10;
				delitem White_Dyestuffs,10;
				delitem Bandana,1;
				getitembound Indonesian_Bandana,1,4;
				#IDIND_Q = 3;
				close;
			}
			next;
			mes "[Katu]";
			mes "Okay, makeup your mind and return to me when ready.";
			close;
		
		} else {
			mes "[Katu]";
			mes "Let me see what you got.";
			mes ". . . . .";
			next;
			mes "You have:";
			mes countitem(Scarlet_Dyestuffs)+ " / 10x Scarlet Dyestuff";
			mes countitem(White_Dyestuffs)+ " / 10x White Dyestuff";
			mes countitem(Bandana)+ " / 1x Bandana";
			mes callfunc("F_InsertComma",Zeny)+ " / 10,000 Zeny";
			close;
		}
	}
}