summaryrefslogblamecommitdiff
path: root/npc/021-2_Tulimshar/jhedia.txt
blob: 2677a0997b2a5360ec93e6f3c71f79203bd423ff (plain) (tree)
1
2
3
4
5
6
7
8
9







                                                                         


                                                                                                                                                                                                                                                                                                                                                   















                                                                                                                                                                                                           
                                


                       
                                                             


                        
                                                         


                        
                                                              


                        
                                                                                 

              
// 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;

}