summaryrefslogtreecommitdiff
path: root/npc/017-3/doug.txt
blob: 5594f07230efe64b7be0b0f6a356e1e95e983df8 (plain) (blame)
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
38
39
40
41
42
43
44
45
// TMW2/LoF scripts.
// Authors:
//    TMW-LoF Team
//    Jesusalva
// Description:
//    Permanently repeatable quest, without any special limit

017-3,68,87,0	script	Doug	NPC_PLAYER,{
    mesn;
    mesq l("This room is too dark. I want to brighten it up.");
    next;
    .@price=(getiteminfo(CaveSnakeLamp, ITEMINFO_SELLPRICE)*11/10)*5;
    mesn;
    mesq l("I am willing to pay @@ GP for each 5 @@ you bring me!", .@price, getitemlink(CaveSnakeLamp));
    next;
    select
        rif(countitem(CaveSnakeLamp) >= 5, l("Here they are!")),
        l("Not now...");
    mes "";
    if (@menu == 1) {
        delitem CaveSnakeLamp, 5;
        Zeny=Zeny+.@price;
        getexp (.@price/rand(2,3)), 5;
        mesn;
        mesq l("Many, many thanks!");
        next;
    }
    mesn;
    mesq l("Too bad these lamps wear off after a while... I am making stocks of them now!");
    close;

OnInit:
    .@npcId = getnpcid(0, .name$);
    setunitdata(.@npcId, UDT_HEADTOP, FancyHat);
    setunitdata(.@npcId, UDT_HEADMIDDLE, CreasedShirt);
    setunitdata(.@npcId, UDT_HEADBOTTOM, NPCEyes);
    setunitdata(.@npcId, UDT_WEAPON, JeansShorts);
    setunitdata(.@npcId, UDT_HAIRSTYLE, 2);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 4);

    .sex=G_MALE;
    .distance=5;
    end;
}