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_PLAYER,{
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(0, .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(0, 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;
}
|
