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
75
76
77
78
79
|
// TMW2 Script.
// Author:
// Jesusalva
// Description:
// Random Hurnscald Shopper with random overpriced stuff and gifts
012-1,58,64,0 script Shoppa Kep NPC_SHOPPAKEP,{
mesn;
mesq lg("Welcome! Only the finest wares!");
next;
closedialog;
npcshopattach(.name$);
shop .name$;
close;
function ShoppaKepItem {
.@i=rand(0,100);
if (.@i > 75)
return Aquada;
else if (.@i < 35)
return Manana;
else
return HalfEggshell;
}
OnInit:
.CurrentItem=ShoppaKepItem();
.ThisRebootAmou=rand(30,70);
.sex = G_FEMALE;
.distance = 5;
tradertype(NST_MARKET);
sellitem CottonSkirt, 100000, 1;
sellitem MiniSkirt, 100000, 1;
sellitem ShortTankTop, 100000, 1;
sellitem CottonTrousers, 80000, 1;
sellitem CottonGloves, 20000, 1;
sellitem CottonBoots, 10000, 1;
sellitem PinkieLeg, 500, 1;
sellitem Piberries, -1, 30;
sellitem Plushroom, -1, 3;
sellitem Chagashroom, -1, 3;
sellitem PiouFeathers, -1, .ThisRebootAmou;
sellitem .CurrentItem, -1, rand(1,4);
end;
OnClock1759:
restoreshopitem PinkieLeg, 500, 1;
OnClock0546:
restoreshopitem LeatherShirt, 50000, 1;
restoreshopitem CottonSkirt, 100000, 1;
restoreshopitem MiniSkirt, 100000, 1;
restoreshopitem ShortTankTop, 100000, 1;
restoreshopitem CottonTrousers, 80000, 1;
restoreshopitem CottonGloves, 20000, 1;
restoreshopitem CottonBoots, 10000, 1;
restoreshopitem Piberries, -1, 30;
restoreshopitem Plushroom, -1, 3;
restoreshopitem Chagashroom, -1, 3;
restoreshopitem PiouFeathers, -1, .ThisRebootAmou;
stopselling(.CurrentItem);
.CurrentItem=ShoppaKepItem();
sellitem .CurrentItem, -1, rand(1,4);
end;
// Pay your taxes!
OnBuyItem:
debugmes("Purchase confirmed");
PurchaseTaxes("Hurns");
end;
}
|
