// This is from LoF, to replace LoF Paxel
//----------------------------------------------------
// PRSM Helmet quest
// Create Quest: Darlord (Depredador) 
//----------------------------------------------------

// Old Paxel turned Raw Coal in Coal... But we don't have Raw Coal.
// He probably used the nice furnace NPC too... We will need another NPC to use that...

//012-1.gat,122,115,0 script Paxel 126,{
016-1,40,39,0	script	Paxel	NPC141,{
    if(QUEST_Warrior1 == 2) goto L_Done1;
    if(QUEST_Warrior1 == 1) goto L_Ask2; 

    if (BaseLevel >= 60 && countitem(IronIngot) > 0) goto L_Ask1;

	mesn;
	mes "\"Hello! Calm wind today!\"";
    menu
    "Yes, but I like windy days.", L_Wind,
    "Hmm... sorry but gotta go...", L_Go;
    close;

L_Go:
	mesn;
	mes "\"Ok, good trip then.\"";
	close;

L_Wind:
	mesn;
	mes "\"I don't like them, i can't fly straight.\"";
	close;

// ----------------------------------------------------
// Desert Helmet quest start
// ----------------------------------------------------
L_Ask1:
	mesn;
	mes "\"Hello "+ strcharinfo(0) + "! I see you have some [Iron Ore] with you!\"";

    menu
    "Yes... right... what about [Iron Ore]?", L_Quest1,
    "Yes, but i have grown attached to [Iron Ore]...", L_No,
    "Right, but now i have business in other places.", L_Rude;
    close;

L_Quest1:
	mesn;
	mes "\"Iron Ore is a really special item. People without helmets can't understand [Iron Ore] real power, anyway if you could give me some of them you would understand why they are so special.\"";

    menu
    "Certainly, you can have all my [Iron Ore]", L_Check1,
    "Sorry but i am not interested in that.", L_No;
    close;

L_No:
	mesn;
	mes "\"Ok, come back me when you want to know [Iron Ore] real power\"";
    close;

L_Rude:
	mesn;
	mes "\"Well, good luck with your business.\"";
    close;

L_Check1:
    if (countitem(IronIngot) > 11)
        goto L_Progress1;
    goto L_More_Needed1;

L_More_Needed1:
	mesn;
	mes "\"Your [Iron Ore] are not enough, please look for more.\"";
    close;

// ----------------------------------------------------
// Got Iron Ores
// ----------------------------------------------------
L_Progress1:
    delitem IronIngot, 12;
    getexp 10000, 0;
    set QUEST_Warrior1, 1;
	mes "[Angel]";
	mes "\"Perfect! you have enough Iron Ore, i will take them for now but i need other items in order to bring them to life.\"";

L_Ask2:
	mesn;
	mes "\"I need a two Infantry Helmet to enchant them, one Warlord Helmet to make them full of vitality and a lot of Terranite Ore to make it more magical. And 10000 GP.\"";

    menu
    "Please have a look, i have what you asked", L_Check2,
    "On my way to get what you need.", -;
    close;


L_Check2:
    if (countitem(InfantryHelmet) < 2 || countitem(WarlordHelmet) < 1 || countitem(TerraniteOre) < 6)
        goto L_More_Needed2;
    if (Zeny < 10000) {
        mesn;
        mes "\"You can't afford that much work! Do some odd jobs and come back.\"";
        close;
    }
    goto L_Progress2;


L_More_Needed2:
	mesn;
	mes "\"I am sorry but i can see that you don't have all that i asked you.\"";
	next;
	mesn;
	mes "\"Please bring me that or i won't be able to make something really special for you.\"";
	close;

// ----------------------------------------------------
// Got Desert
// ----------------------------------------------------
L_Progress2:
    inventoryplace PrsmHelmet, 1;
    delitem InfantryHelmet, 2;
    delitem WarlordHelmet, 1;
    delitem TerraniteOre, 20;
    getexp 60000, 0;
    getitem PrsmHelmet, 1;
    set QUEST_Warrior1, 2;
	mesn;
	mes "\"There you go a special Desert Helmet!.\"";
	close;

L_Done1:
	mesn;
	mes "\"Hello winged friend! How is the wind today?\"";

    menu
    "Calm, perfect for a fly!", L_Fly,
    "Gale, not good to fly.", L_Wind2;
	close;

L_Fly:
	mesn;
	mes "\"Haha yes, you are right!\"";
	close;

L_Wind2:
	mesn;
	mes "\"Yep, i never fly in these days.\"";
	close;

}