//=============Valkyrie Quest==============
//===================== BTS =====================================================

prontera,154,198,6	script	Guardian of Prontera	811,{

if(dar_dar >= 1) goto L_taposme;
if(hen_hen >= 1) goto L_taposna;
if(hen_hen >= 1) goto L_taposbts;
if(hen_hen < 1)

	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "The Guardian of Prontera is looking ";
	mes "for brave warriors willing to";
	mes "defend our world against evil and darkness.";
	next;
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "Are you worthy to Break the Seal";
	mes "and recieve blessings powerful";
	mes "enough to to defend our land?";
	next;
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "I've been protecting Midgard for so ";
	mes "long, and now I think it is the";
	mes "right time to unleash the power of Valkyrie.";
	next;
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "Thounsand of people are required to ";
	mes "Break The Seal so Valkyrie will";
	mes "have enough power to rise again.";
	next;
	menu "I am willing to help!",Lbts,"I'm totally fine.",Lleave;
Lbts:
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "In order to Break the Seal, you";
	mes "need to have patience. You also";
	mes "have to retrieve the items on this";
	mes "lits:";
	mes " ";
	mes "- 300 ^FF0000Cursed Seal^000000,";
	mes "- 200 ^FF0000Hand Of God^000000,";
	mes "- 100 ^FF0000Ancient Lips^000000,";
	mes "- 20 ^FF0000Peridots^000000,";
	mes "- 10 ^FF0000Pyroxene^000000,";
	mes "- 10 ^FF0000Muscovite^000000,";
	mes "- 10 ^FF0000Biotite^000000 and...";
	next;
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes " - 10 ^FF0000Talon of Griffon,^000000";
	mes " - 10 ^FF0000Rose Quartz,^000000";
	mes " - 10 ^FF0000Agate^000000,";
	mes " - 10 ^FF0000Young Twig^000000,";
	mes " - 10 ^FF0000Fragment of Rosatta Stone^000000,";
	mes " - 10 ^FF0000Mothers Nightmare^000000,";
	mes " - 10 ^FF0000Matchstick^000000,";
	mes " - 10 ^FF0000MPhlogophite^000000,";
	mes "Its a huge list. I know, but that is the only way.";
	next;
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "Goodluck on your journey..It will";
	mes "take some time to complete the list";
	close;

Lleave:
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "If you change your mind, just come back and talk to me.";
	close;

	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "Welcome back, ^1DCE63" + strcharinfo(0) + ",^000000";
	mes " ";
	mes "Do you have everything I need?";
	next;
	menu "Yes, I have it now ",-, "Could you repeat the list again?",L_later;
	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "You missed something, This is the list:";
	mes "- 300 ^FF0000Cursed Seal^000000,";
	mes "- 200 ^FF0000Hand Of God^000000,";
	mes "- 100 ^FF0000Ancient Lips^000000,";
	mes "- 20 ^FF0000Peridots^000000,";
	mes "- 10 ^FF0000Pyroxene^000000,";
	mes "- 10 ^FF0000Muscovite^000000,";
	mes "- 10 ^FF0000Biotite^000000,";
	next;
	mes " - 10 ^FF0000Talon of Griffon,^000000";
	mes " - 10 ^FF0000Rose Quartz,^000000";
	mes " - 10 ^FF0000Agate^000000,";
	mes " - 10 ^FF0000Young Twig^000000,";
	mes " - 10 ^FF0000Fragment of Rosatta Stone^000000,";
	mes " - 10 ^FF0000Mothers Nightmare^000000,";
	mes " - 10 ^FF0000Matchstick^000000,";
	mes " - 10 ^FF0000MPhlogophite^000000,";
	mes "Please check your item..";
	next;
	if(countitem(7442) < 300 || countitem(1009) < 200 || countitem(1054) < 100 || countitem(7289) < 20 || countitem(7296)  < 10 || countitem(7292) < 10 || countitem(7297) < 10 || countitem(7048) < 10 || countitem(7293) < 10 || countitem(7291) < 10 || countitem(7018) < 10 || countitem(7211) < 10 || countitem(7020) < 10 || countitem(7035) < 10 || countitem(7290) < 10) goto L_later2;

	delitem 7442,300;
	delitem 1009,200;
	delitem 1054,100;
	delitem 7289,20;
	delitem 7296,10;
	delitem 7292,10;
	delitem 7297,10;
	delitem 7048,10;
	delitem 7293,10;
	delitem 7291,10;
	delitem 7018,10;
	delitem 7211,10;
	delitem 7020,10;
	delitem 7035,10;
	delitem 7290,10;

	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "So thank you for the help";
	mes "you have broken the seal.";
	set hen_hen,1;
	next;

	switch (select("Your Welcome")) {

	case 1: // Castle Drops
			set .@gamble1,rand(1,500);
			if ((.@gamble1 > 200) && (.@gamble1 < 205)) {
				set .@gamble2,rand(1,10);
				if      ((.@gamble2 > 0) && (.@gamble2 <  3)) set .@item,7086; // esg
				else if ((.@gamble2 > 2) && (.@gamble2 <  5)) set .@item,7090; // ripple
				else if ((.@gamble2 > 4) && (.@gamble2 <  7)) set .@item,7091; // billow
				else if ((.@gamble2 > 6) && (.@gamble2 <  9)) set .@item,7077; // silver
				else if ((.@gamble2 > 8) && (.@gamble2 < 11)) set .@item,7078; // wov
			}
			else if ((.@gamble1 >   0) && (.@gamble1 < 201)) set .@item,7086; // esg
			else if ((.@gamble1 > 204) && (.@gamble1 < 301)) set .@item,7090; // ripple
			else if ((.@gamble1 > 300) && (.@gamble1 < 401)) set .@item,7091; // billow
			else if ((.@gamble1 > 401) && (.@gamble1 < 481)) set .@item,7077; // silver
			else if ((.@gamble1 > 480) && (.@gamble1 < 501)) set .@item,7078; // wov
	break;

	}

	getitem .@item,1;

	mes "[ ^C6A518Guardian of Prontera^000000 ]";
	mes "Ah, you have out done your self!!";
	mes "Thank you for your help";
	mes "Now start your journey to find";
	mes "my nephews who hold the valkyries";
	announce "has"+strcharinfo(0)+" broken the seal!! and will now begin the quest of valkyrie!","0x33FF66";
	close2;

	end;
L_taposna:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "Go out and search the fields of payon the fields of geffen and the towns of lighthalzen and comodo for the valkyrie equips";
close;

L_taposme:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "You have already done this quest and there is no point in doing it again";
close;

L_later:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "- 300 ^FF0000Cursed Seal^000000,";
mes "- 200 ^FF0000Hand Of God^000000,";
mes "- 100 ^FF0000Ancient Lips^000000,";
mes "- 20 ^FF0000Peridots^000000,";
mes "- 10 ^FF0000Pyroxene^000000,";
mes "- 10 ^FF0000Muscovite^000000,";
mes "- 10 ^FF0000Biotite^000000,";
next;
mes " - 10 ^FF0000Talon of Griffon,^000000";
mes " - 10 ^FF0000Rose Quartz,^000000";
mes " - 10 ^FF0000Agate^000000,";
mes " - 10 ^FF0000Young Twig^000000,";
mes " - 10 ^FF0000Fragment of Rosatta Stone^000000,";
mes " - 10 ^FF0000Mothers Nightmare^000000,";
mes " - 10 ^FF0000Matchstick^000000,";
mes " - 10 ^FF0000MPhlogophite^000000,";
mes "Its so hard right?";
close;

L_later2:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "Come back when your really done";
close;


}

pay_fild10.gat,182,157,5	script	Russell	900,{

if(dar_dar >= 1) goto L_udone;
if(rus_rus >= 1) goto L_tapospopo;
if(hen_hen >= 1) goto continueq;
if(hen_hen < 1)
{
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "Are you the delivery boy of pizza hut?";
mes "If not go way i don't need you";
close;
}
continueq:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "Oh my grasya santisimo!!";
mes "You have spoken to uncle henry!";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "By the way i am Russell of Payon the crafter of the valkyrie armor";
mes "would you like to have one?";
menu "Yes",-,"No",L_ayaw;
next;

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "This great armor is very complicated, it needs very rare materials to craft it if you really want it go get me these";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "100 Three-Headed Dragon's head";
mes "7 Emblem of Sun God";
mes "1 Chain Mail[1]";
mes "100 Treasure Box";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "I'll be waiting for you chosen one!";
if(countitem(7443) < 100 || countitem(7086) < 7 || countitem(7444) < 100 || countitem(2315) < 1) goto koolang;
if(countitem(7443) >= 100 || countitem(7086) >= 7 || countitem(7444) >= 100 || countitem(2315) >= 1) goto kontinueq;
close;

L_ayaw:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "Wacha Wachi Wacho... go shoooo";
mes "Just speak to me if you want it already";
close;


koolang:
next;
mes "[ Russell ]";
mes "As i said one missing material and all the others go to waste";
close;

kontinueq:
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "Very well done my friend you have finished the valkyrie armor quest";
delitem 7443,100;
delitem 7086,7;
delitem 7444,100;
delitem 2315,1;
next;
getitem 2357,1;
set rus_rus,1;
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "Good job sir, enjoy your new armor";
mes "Now you should seek my brothers and cousins and finish the quest";
mes "And when you gain the valkyrie set speak to Daryl";
mes "By the way my brothers and cousins are scattered";
mes "around Rune-Midgard and Daryl is in valkyrie";
announce "has "+strcharinfo(0)+" just created the Valkyrie Armor.",8;
close;

L_tapospopo:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "As i said complete the valkyrie quest";
mes "And then speak to Daryl";
close;

L_udone:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Russell ]";
mes "This quest, once done no more repeating";
close;
}

gef_fild07.gat,185,249,5	script	Jhames	899,{

if(dar_dar >=1) goto L_bulmadone;

if(jmz_bit >=1) goto L_bulmatapos;

if(hen_hen >=1) goto B_ulma;
if(hen_hen < 1)
{
mes "[ Jhames ]";
mes "I am sight seeing don't disturb me";
mes "go far far away from me!!";
close;
}
B_ulma:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "Oh, you know my uncle";
mes "Nice to meet you i'm jhames";
mes "I craft the valkyrie shield";
mes "Would you like me to craft the said shield?";
menu "Okay",-,"Nope",M_ofo;
next;

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "The valkyrie shield is a very difficult item to craft the materials are rare. Well if your sure you want to make it";
mes "these are the items i need.";
next;
mes "50 Fire Dragon Scale";
mes "7 Ripple";
mes "1 Buckler[1]";
mes "100 Treasure Box";
next;
if(bulma >= 1 || countitem(7451) < 50 || countitem(7090) < 7 || countitem(2104) < 1 || countitem(7444) < 100) goto K_ulangot;
if(bulma >= 1 || countitem(7451) >= 50 || countitem(7090) >= 7 || countitem(2104) >= 1 || countitem(7444) >= 100) goto K_umpleto;
close;

M_ofo:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "Okay, Talk to me later.";
close;

K_ulangot:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "You don't have the items";
close;

K_umpleto:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "Wow, thanks!";
delitem 7451,50;
delitem 7090,7;
delitem 2104,1;
delitem 7444,100;
getitem 2115,1;
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "Nicely done enjoy the shield";
mes "Continue searching for my friends";
mes "And when you gain the valkyrie set speak to Daryl";
mes "Again my brothers and cousins are scattered";
mes "Around Rune-Midgard and Daryl is in valkyrie";
announce "has "+strcharinfo(0)+" just created the Valkyrie Shield.",8;
set jmz_bit,1;
close;


L_bulmatapos:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "Complete the valkyrie quest and speak to Daryl";
close;

L_bulmadone:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Jhames ]";
mes "Dude, you can only do this quest once";
close;
}

lighthalzen.gat,189,297,5	script	Anthonie	904,{

if(dar_dar >=1) goto L_chichix;
if(tonton >=1) goto L_chichi;
if(hen_hen >= 1) goto tsitsi;
if(hen_hen < 1)
{
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "I miss Donna";
mes "I wish i could see her again";
close;
	}
tsitsi:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "You have spoken to my great uncle Henry";
mes "I am Anthonie the crafter of the Valkyrie Shoes";
mes "Would you like me to craft you the shoes?";
next;
menu "Sure",-,"Maybe Later",L_basho;
next;



mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "The shoe is quite brittle";
mes "So it need some hard to find items to make";
mes "Here are the requirements";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "20 Bone Armor Piece";
mes "7 Billow";
mes "1 Boots[1]";
mes "100 Treasure Box";
next;
if(countitem(7450) < 20 || countitem(7091) < 7 || countitem(7444) < 100 || countitem(2406) < 1) goto M_wala;
if(countitem(7450) >= 20 || countitem(7091) >= 7 || countitem(7444) >= 100 || countitem(2406) >= 1) goto M_eron;
mes "[ Anthonie ]";
mes "Hurry up i have something to do";
close;
L_basho:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "Talk to me when you want it already.";
close;

M_wala:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "You lack some few items.";
close;

M_eron:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "Oh thank you!";
delitem 7450,20;
delitem 7091,7;
delitem 2406,1;
delitem 7444,100;
getitem 2421,1;
set tonton,1;
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "Good one dude Enjoy the shoes";
mes "continue the holy valkyrie quest";
mes "and when you gain the valkyrie set speak to Daryl";
mes "my brothers and cousins are scattered around Rune-Midgard and Daryl is at the valkyrie hall";
announce "has "+strcharinfo(0)+" just created the Valkyrie Shoes.",8;
close;

L_chichi:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "Search my cousins and after that";
mes "Find Daryl!";
close;

L_chichix:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Anthonie ]";
mes "Nice to meet you again brave warrior, how is life treating you with your new (GODLY!) equips!";
close;
}

comodo.gat,172,229,5	script	Christian	731,{

if(dar_dar >=1) goto L_puten;
if(tan_tan >=1) goto L_buten;
if(hen_hen >=1) goto M_buten;
if(hen_hen < 1)
{
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Hi.... Now fly you noob";
close;
	}

M_buten:


mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "You know my uncle henry?? wow this is great!!";
mes "I can make the Valkyrie Manteau!";
mes "Do you want one??";
menu "Yeye",-,"No thanks",karpenter;


next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Okay if you want it bring me these";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "50 Matchstick";
mes "7 Silver Ornament";
mes "1 Manteau[1]";
mes "100 Treasure Box";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "I'll be waiting for you";
if (countitem(7035) < 50 || countitem(7077) < 7 || countitem(2506) < 1 || countitem(7444) < 100) goto Kewlung;
if (countitem(7035) >= 50 || countitem(7077) >= 7 || countitem(2506) >= 1 || countitem(7444) >= 100) goto Kempleto;
close;

karpenter:
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Huhuhuhu T_T cry cry.. you wasted my time";
close;

Kewlung:
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Incomplete items noob!";
close;

Kempleto:
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "You are trustworthy!!";
delitem 7444,100;
delitem 2506,1;
delitem 7077,7;
delitem 7035,50;
getitem 2524,1;
set tan_tan,1;
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Rawr, take the robe then continue the valkyrie quest,";
mes "and when you gain the valkyrie set speak to Daryl.";
mes "my brothers and cousins are scattered around Rune-Midgard and Daryl is in the valkyrie hall";
announce "has "+strcharinfo(0)+" just created the Valkyrie Manteau.",8;
close;

L_buten:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Finish my uncle's quest and speak to Daryl at the valkyrie";
close;

L_puten:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Christian ]";
mes "Wow, your one of the Mega-Warrior. How is life treating you my friend?";
close;
}

valkyrie.gat,49,49,5	script	Daryl	733,{

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Hello there my friend i am Daryl";
next;
if(dar_dar >= 1) goto L_kalbo;
if(countitem(2524) < 1 || countitem(2421) < 1 || countitem(2357) < 1 || countitem(2115) < 1) goto daryl;

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Good you have the valkyrie set if you must know i am the crafter of the Sleipnir";
next;

if(tan_tan >= 1) goto darylquest;
if(tan_tan < 1) goto daryl;

darylquest:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "I see you really have spoken to my brothers.";
mes "Very well then!";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "By the way i am Daryl of the valkyries and you already know what i make,";
mes "Do you desire the Sleipnir?";
menu "Yes",-,"No",L_nono;
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "The great sleipnir named after Odin's trusty";
mes "steed, is the most powerful shoe in the land";
mes "Gather these things so i may craft it";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "300 Handcuffs";
mes "50 Emblem of Sun God";
mes "10 Matchstick";
mes "100 Gold";
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "I'll be waiting for you chosen one!";
if(countitem(7345) < 300 || countitem(7086) < 50 || countitem(7035) < 10 || countitem(969) < 100) goto kikiki;
if(countitem(7345) >= 300 || countitem(7086) >= 50 || countitem(7035) >= 10 || countitem(969) >= 100) goto killhim;
close;

L_nono:

mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Go away if you don't want it";
mes "Just speak to me if you want it already";
close;


kikiki:
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Incomplete supplies dude";
close;

killhim:
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Very well done my friend";
mes "You are very good!!";
delitem 7345,300;
delitem 7086,50;
delitem 969,100;
delitem 7035,10;
getitem2 2410,1,1,@ref,0,254,0,getcharid(0)&0xffff,(getcharid(0)>>16)&0xffff;
set dar_dar,1;
next;
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Success!!!! Enjoy the sleipnir";
mes "You are now a Mega-Warrior of Tsukiohana";
mes "Go free now you noble man";
announce "ROFLMAO "+strcharinfo(0)+" has just become the Mega-Warrior and gained Sleipnir.",8;
close;

L_kalbo:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "You have already gained sleipnir";
mes "How dare you speak to me again now i order you to go back to prontera!";
next;
percentheal -100,0;
warp "prontera.gat",0,0;
close;

daryl:
mes "[ ^C6A518Guardian of Prontera^000000 ]";
mes "[ Daryl ]";
mes "Oh, your just another newbie";
mes "Go fly away";
close;

}