//===== eAthena Script =======================================
//= Berzebub Card Quest Script
//===== By: ==================================================
//= botskill100 <botskill100@gmail.com>
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= Any eAthena Version; RO Episode XX
//===== Description: =========================================
//= Quest to get the WIngs
//===== Additional Comments: =================================
//= U must have custom items, PM mr in eathena forums
//============================================================

prontera.gat,164,150,4	script	Wing Maker	874,{
	mes "[Wing Maker]";
	mes "Hello, I bet you came here to get ur Wings. Choose the Wing you want to get..";
	next;
	menu "Angel Wing",a_wing,"Demon Wing",d_wing,"Fairy Wing",f_wing,"Seraphim Wing",s_wing,"Later",exit;
	
		exit:
			mes "[Wing Maker]";
			mes "I'm always here so come back anytime...";
		close;
			
		a_wing:
			mes "[Wing Maker]";
			mes "To get the Angel Wings,";
			mes "I need you to give me the following...";
			mes "100 Harpy Feathers";
			mes "20 Fake Angel's Wings";
			mes "40 Skirt of Virgin	";
			mes "10 Staff of Wing";
			mes "10 Million Zeny";
		next;
			if(countitem(7115) < 100) goto noItems;
			if(countitem(7104) < 20) goto noItems;
			if(countitem(1049) < 40) goto noItems;
			if(countitem(1616) < 10) goto noItems;
			if (Zeny < 10000000) goto nozeny;
			delitem 7115, 100;
			delitem 7104, 20;
			delitem 1049, 20;
			delitem 1616, 10;
			set Zeny, - 10000000;
			getitem 13051, 1;
			mes "[Wing Maker]";
			mes "There you have it, it's all yours. Use it for good";
		close;
		d_wing:
			mes "[Wing Maker]";
			mes "To get the Demon Wings,";
			mes "I need you to give me the following...";
			mes "100 Cotton Mat";
			mes "1 Brionac";
			mes "40 Worn Out Page";
			mes "20 Old Shuriken";
			mes "10 Million Zeny";
		next;
			if(countitem(7050) < 100) goto noItems;
			if(countitem(1470) < 1) goto noItems;
			if(countitem(1097) < 40) goto noItems;
			if(countitem(7072) < 20) goto noItems;
			if (Zeny < 10000000) goto nozeny;
			delitem 7050, 100;
			delitem 1470, 1;
			delitem 1097, 40;
			delitem 7072, 20;
			set Zeny, - 10000000;
			getitem 13052, 1;
			mes "[Wing Maker]";
			mes "There you have it, it's all yours. Use it for good";
		close;

		f_wing:
			mes "[Wing Maker]";
			mes "To get the Fairy Wings,";
			mes "I need you to give me the following...";
			mes "100 Slingshot";
			mes "2 Stormy Knight Card";
			mes "20 Piece of Dullahan's Armor";
			mes "20 Dragon Horn";
			mes "10 Million Zeny";
		next;
			if(countitem(7195) < 100) goto noItems;
			if(countitem(4318) < 2) goto noItems;
			if(countitem(7210) < 20) goto noItems;
			if(countitem(1514) < 20) goto noItems;
			if (Zeny < 10000000) goto nozeny;
			delitem 7195, 100;
			delitem 4318, 2;
			delitem 7210, 20;
			delitem 1514, 20;
			set Zeny, - 10000000;
			getitem 13053, 1;
			mes "[Wing Maker]";
			mes "There you have it, it's all yours. Use it for good";
		close;

		s_wing:
			mes "[Wing Maker]";
			mes "The quest for this wing will be available soon.";
		close;

		noItems:
			mes "[Wing Maker]";
			mes "Check your items, you lack something.";
		close;

		nozeny:
			mes "[Wing Maker]";
			mes "You don't have enough zeny";
		close;
}