path: root/world/map/npc/021-2/jhedia.txt

// Ingot maker takes iron ore, gives ingots for future crafting purposes.

021-2.gat,23,55,0|script|Jhedia|160,{

    set @Cost_Per_Ingot, 1000;
    set @Iron_Ore_Per, 5;
    set @Coal_Per, 10;

    mes "[Jhedia]";
    mes "\"I forge Iron Ore into ingots.  Ingots are more useful for skilled smiths, like armorers, because the ore is refined and made into useful units which can be worked with.  To make ingots, I need " + @Iron_Ore_Per + " Iron Ore and " + @Cost_Per_Ingot + " gp per ingot. I also need " + @Coal_Per + " Coal for my forge.\"";
    next;
    mes "[Jhedia]";
    mes "\"How many ingots would you like?\"";
    input @ingot_count;

    if (@ingot_count == 0)
        goto L_Jhedia_Bye;
    set @Zeny_cost, @ingot_count * @Cost_Per_Ingot;
    if (countitem("IronOre") < @Iron_Ore_Per * @ingot_count)
        goto L_Jhedia_NotEnough_Ore;
    if (countitem("Coal") < @Coal_Per * @ingot_count)
        goto L_Jhedia_NotEnough_Coal;
    if (zeny < @Zeny_cost)
        goto L_Jhedia_NotEnough_Zeny;
    getinventorylist;
    if (@inventorylist_count == 100
        && countitem("IngotIron") == 0
        && countitem("IronOre") > @ingot_count * @Iron_Ore_Per
        | countitem("Coal") > @ingot_count * @Coal_Per)
            goto L_Jhedia_NotEnoughSlots;
    set zeny, zeny - @Zeny_cost;
    delitem "IronOre", @ingot_count * @Iron_Ore_Per;
    delitem "Coal", @ingot_count * @Coal_Per;
    getitem "IngotIron", @ingot_count;
    close;

L_Jhedia_Bye:
    mes "[Jhedia]";
    mes "\"Goodbye then.\"";
    close;

L_Jhedia_NotEnough_Ore:
    mes "[Jhedia]";
    mes "\"You do not seem to have enough Iron Ore.\"";
    close;

L_Jhedia_NotEnough_Coal:
    mes "[Jhedia]";
    mes "\"You do not seem to have enough Coal.\"";
    close;

L_Jhedia_NotEnough_Zeny:
    mes "[Jhedia]";
    mes "\"You do not seem to have enough gold pieces.\"";
    close;

L_Jhedia_NotEnoughSlots:
    mes "[Jhedia]";
    mes "\"You do not seem to have enough room to carry this many ingots.\"";
    close;

}