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
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
// TMW2 Script
// Author:
// Jesusalva
// Description:
// Trades Strange Coins for useful items
001-1,243,26,0 script Aeros Trader NPC_M_COINKEEPER,{
mesn;
mesq l("Oh, hello there! Welcome to the Mana Plane Of Existence!");
next;
mesn;
mesq l("In this wonderful realm, you can find and earn many @@, our currency!", getitemlink(StrangeCoin));
next;
mesn;
mesq l("You can then trade these coins for items with me!");
next;
openshop;
closedialog;
close;
OnInit:
.@npcId = getnpcid(.name$);
setunitdata(.@npcId, UDT_HEADTOP, TopHat);
setunitdata(.@npcId, UDT_HEADMIDDLE, GoldenWarlordPlate);
setunitdata(.@npcId, UDT_WEAPON, JeansChaps);
setunitdata(.@npcId, UDT_HEADBOTTOM, AssassinBoots);
setunitdata(.@npcId, UDT_HAIRSTYLE, 25);
setunitdata(.@npcId, UDT_HAIRCOLOR, 4);
.sex = G_MALE;
.distance = 5;
tradertype(NST_CUSTOM);
// Rare Equipment selection.
// *these* are really rare!
// Maximum 30,000
sellitem MysteriousFruit,10000; // This is OP
sellitem DoggyDog,9000;
sellitem CattyCat,9000;
if ($GAME_STORYLINE >= 5)
sellitem SunnyCrystal, 8000;
sellitem DarkPulsar,4500;
sellitem ThunderStaff,4000;
sellitem PiouEgg,3915;
sellitem DeliciousCookie,3240;
// Normal rares
sellitem TornWings, 3500;
sellitem Zambacutou, 2000;
sellitem SmileyCap, 1820;
sellitem EyePatch, 1620;
sellitem Doll, 1420;
sellitem TopHat, 1220;
sellitem HeartGlasses,960;
sellitem BowlerHat, 720;
sellitem AshUrn,630;
sellitem BrimmedFeatherHat, 540;
sellitem Googles,540;
sellitem LeatherBall, 480;
sellitem ClericCap, 440;
sellitem Barrel,400;
// Temporary, Seasonal, for events, rare drops, next release
sellitem MercBoxEE,1200;
sellitem MercBoxDD,950;
sellitem MercBoxE,900;
sellitem MercBoxD,600;
sellitem ArcmageBoxset,500;
sellitem BoneAmmoBox,180;
sellitem ThornAmmoBox,80;
// Dye Shop
// RARE 3
sellitem PurpleDye, 300;
sellitem DarkRedDye, 270;
sellitem BlackDye, 250;
// RARE 2
sellitem SilverDye, 200;
sellitem NavyBlueDye, 200;
sellitem BlueGrayDye, 200;
sellitem FuschiaDye, 200;
sellitem BrownDye, 200;
sellitem MauveDye, 200;
// Rare 1
sellitem RedDye, 100;
sellitem CamelDye, 100;
sellitem CrimsonDye, 100;
sellitem KhakiDye, 100;
sellitem MintDye, 100;
// Normal
sellitem TealDye, 45;
sellitem PinkDye, 45;
sellitem GreenDye, 45; // Quest
sellitem LimeDye, 30; // Shop, 1200 GP
// Low rarity
sellitem BlueDye, 22;
sellitem YellowDye, 22;
sellitem ChocolateDye, 22;
sellitem OrangeDye, 22; // Shop, 495 GP
// Consumables
sellitem MagicApple,115;
sellitem SacredLifePotion,60;
sellitem SacredManaPotion,60;
sellitem ElixirOfLife,32;
sellitem ScrollMagnusHealA,28;
sellitem WhiskeyAle,28;
sellitem YerbaMate,22;
sellitem CelestiaTea,17;
sellitem BottleOfDivineWater, 15;
sellitem PrecisionPotion,9;
sellitem DodgePotion,9;
sellitem Wurtzite,8;
sellitem PetcaringGuide,5; // I needed to add this somewhere
sellitem ScrollSCave,3;
sellitem SmokeGrenade,3;
end;
/* set currency to be item 828 */
OnCountFunds:
setcurrency(countitem(StrangeCoin));
end;
/* @price is total cost. @points is if we accept two items as currency. */
OnPayFunds:
//dispbottom "Hi: price="+@price+" and points="+@points;
if( countitem(StrangeCoin) < @price )
end;
delitem StrangeCoin,@price;
purchaseok();
end;
}
|