summaryrefslogtreecommitdiff
path: root/npc/016-1/laranja.txt
blob: 32c1770e7a1428a3c6e430123beeeb6deef2f604 (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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
// TMW2 Script
// Author:
//    Saulc
// Description:
//  Laranja, orange in portuges is a orange dye seller in ship

016-1,25,24,0	script	Laranja	NPC_F_SHOPKEEPER,{

    mesn;
    mesq l("I'm Laranja.");
    next;
    mesn;
    mesq l("My father lead a dye fabric, I'm in charge to sell @@ around the world.", getitemlink(OrangeDye)); 
    next;
    mesn;
    mesq l("Would you like to buy some?");
    mes "";
    menu
        l("Yeah sure let's Trade."), -,
        l("Sorry another day maybe."), L_Close;

    // Restock shop if needed (ULTRA EXPERIMENTAL)
    // It won't work if instance_id() is 0, but that should be Nard@Candor.
    if (instance_id()) {
        if ('day != gettime(5)) {
            'day=gettime(5);
            restoreshopitem OrangeDye, -1, 3;
        }
    }

    closedialog;
    shop instance_npcname(.name$);
    close;

L_Close:
    closedialog;
    goodbye;
    close;

OnInit:
    .@npcId = getnpcid(.name$);
    setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
    setunitdata(.@npcId, UDT_HEADMIDDLE, ShortTankTop);
    setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers);
    setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
    setunitdata(.@npcId, UDT_HAIRSTYLE, 10);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 9);

    .sex = G_FEMALE;
    .distance = 4;
    tradertype(NST_MARKET);

    sellitem OrangeDye, -1, 3;
    end;

OnInstanceInit:
    .@npcId = getnpcid(instance_npcname(.name$));
    setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
    setunitdata(.@npcId, UDT_HEADMIDDLE, ShortTankTop);
    setunitdata(.@npcId, UDT_HEADBOTTOM, RaidTrousers);
    setunitdata(.@npcId, UDT_WEAPON, LousyMoccasins); // Boots
    setunitdata(.@npcId, UDT_HAIRSTYLE, 10);
    setunitdata(.@npcId, UDT_HAIRCOLOR, 9);
    tradertype(NST_MARKET);

    sellitem OrangeDye, -1, 3;
    'day=gettime(5);
    end;

OnClock2000:
    restoreshopitem OrangeDye, -1, 3;
    end;

}