npc/003-1/oldwell.txt


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37

// TMW-2 Script
// Author:
//    Saulc
//    Jesusalva
// Description:
//    Free well that give sewer water. a good place for tulim kids to miss school :b

003-1,53,144,0	script	Old Well#003-1	NPC_NO_SPRITE,{

    mesc l("You found an old well with a bucket on it! It's time to fill plenty of @@!", getitemlink(EmptyBottle));
    input .@count;

    if (.@count == 0)
        close;
    .@empty = countitem(EmptyBottle);

    if (.@empty < .@count)
        goto L_NotEnoughBottles;
    getinventorylist;
    inventoryplace BottleOfSewerWater, .@count;

    delitem EmptyBottle, .@count;
    getitem "BottleOfSewerWater", .@count;
    dispbottom("Eek, Sewer Water! What the?! Better not drink this!");
    close;

L_NotEnoughBottles:
    mesc l("You don't have that many empty bottles!");
    close;


OnInit:
    .sex = G_OTHER;
    .distance = 3;
    end;
}