world/map/npc/items/purification_potion.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

// This is the function to use the PurificationPotion

function|script|usePurificationPotion|{
    if (isat("011-1.gat", 88,67))
        goto L_Wyara_Pond;

L_NoUse:
    message strcharinfo(0), "You don't know what to do with this.";
    getitem "PurificationPotion", 1;
    return;

L_Wyara_Pond:
    set @Q_MASK, NIBBLE_2_MASK;
    set @Q_SHIFT, NIBBLE_2_SHIFT;
    set @Q_status, (QUEST_MAGIC2 & @Q_MASK) >> @Q_SHIFT;

    if (@Q_status < 1)
        goto L_NoUse;
    if (@Q_status <= 2)
        set @Q_status, @Q_status + 1;

    message strcharinfo(0), "You pour the potion into the pond.";

    set QUEST_MAGIC2,
        (QUEST_MAGIC2 & ~(@Q_MASK)
        | (@Q_status << @Q_SHIFT));
    return;
}