diff options
| -rw-r--r-- | npc/003-1/well.txt | 78 |
1 files changed, 36 insertions, 42 deletions
diff --git a/npc/003-1/well.txt b/npc/003-1/well.txt index c7e272213..272deda1a 100644 --- a/npc/003-1/well.txt +++ b/npc/003-1/well.txt @@ -1,54 +1,48 @@ // Author: // Saulc +// Jesusalva 003-1,45,80,0 script Well NPC_NO_SPRITE,{ + .@COST_PER_BOTTLE = 50; - .Item1 = IronOre; //7 - .GP = 8500; - .ItemCreate = IronIngot; - - function quest_create { - speech S_FIRST_BLANK_LINE | S_LAST_NEXT, - l("How many ingots do you want to make?"); - input .amount; - - if (countitem("Iron Ore") >= .amount * 7 && Zeny >= 8500 * .amount) - { - delitem .Item1, .amount * 7; - Zeny = Zeny - .amount * .GP; - getitem .ItemCreate, .amount; - close; - } - speech S_FIRST_BLANK_LINE | S_LAST_NEXT, - l("You don't have enough ore."); + mes l("This well have a mechanism to fill water bottles. It costs @@ gp per bottle.", .@COST_PER_BOTTLE); + mes l("You need the bottle, too. Too bad, not even water is free in this world!"); + input .@count; + + if (.@count == 0) close; - - } - - speech S_FIRST_BLANK_LINE | S_LAST_NEXT, - l("Hello! Do you want to craft @@? For that I will need 7 @@, and @@ gp.", getitemlink(.ItemCreate),getitemlink(.Item1),.GP); - - do - { - .@karim = getq(Karim_Quest); - select - l("Yes"), - menuaction(l("Quit")); - - switch (@menu) - { - case 1: - quest_create; - break; - } - } while (@menu != 2); - - closedialog; - goodbye; + .@Cost = .@count * .@COST_PER_BOTTLE; + .@empty = countitem("EmptyBottle"); + + if (.@empty < .@count) + goto L_NotEnoughBottles; + if (Zeny < .@Cost) + goto L_NotEnoughMoney; + getinventorylist; + if (@inventorylist_count == 100 + && countitem("BottleOfSweaWater") == 0 + && .@empty > .@count) + goto L_NotEnoughSlots; + + set Zeny, Zeny - .@Cost; + delitem "EmptyBottle", .@count; + getitem "BottleOfSweaWater", .@count; // TODO FIXME: "Swea" water? Also, this is not sea water... + close; + +L_NotEnoughBottles: + mes l("You don't have that many empty bottles!"); + close; + +L_NotEnoughMoney: + mes l("You don't have enough gp! You need @@ gp.", .@Cost); + close; + +L_NotEnoughSlots: + mes l("You don't have room for these bottles!"); close; OnInit: - .sex = G_MALE; + .sex = G_OTHER; .distance = 3; end; } |