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
|
//===== Hercules Script ======================================
//= Manuk & Splendide Coin Merchants
//===== By: ==================================================
//= rAthena Dev Team
//===== Current Version: =====================================
//= 1.2
//===== Description: =========================================
//= [Official Conversion]
//= Coin redemption NPCs.
//===== Additional Comments: =================================
//= 1.0 First version
//= 1.1 Fixed checkweight. [Gepard]
//= 1.2 Optimized and merged into one file. [Euphy]
//============================================================
// Manuk & Splendide
//============================================================
- script ::merchant_13_2 -1,{
set .@n$, "["+strnpcinfo(1)+"]";
mes .@n$;
if (isequipped(2782) && ep13_2_rhea == 100) {
if (!checkweight(1201,1)) {
mes "It looks like you're carrying too many things.";
mes "Why not put some of your items in storage and come back?";
close;
}
mes "Hello.";
mes "What are you looking for?";
next;
if (strnpcinfo(1) == "Merchant of Manuk") {
setarray .@Items[2],12342,12343,12348;
set .@Book,11019; //Manuk_Selling_Item
set .@Coin,6080; //Manuk_Coin
set .@i, select("View item description:Manuk's Opportunity:Manuk's Courage:Manuk's Faith:Cancel");
}
else {
setarray .@Items[2],12344,12345,12349;
set .@Book,11018; //Splendide_Selling_Item
set .@Coin,6081; //Splendide_Coin
set .@i, select("View item description:Buy Pinguicula's Fruit Jam:Buy Luciola's Honey Jam:Buy Cornus' Tears:Do nothing");
}
mes .@n$;
if (.@i == 1) {
mes "Here are the item descriptions.";
close2;
ReadBook .@Book,1;
end;
}
else if (.@i < 5) {
mes "I can sell you 3 "+getitemname(.@Items[.@i])+" for ^3131FF1 coin^000000.";
next;
switch(select("Purchase:Do not purchase")) {
case 1:
if (countitem(.@Coin)) {
mes .@n$;
mes "Thank you for coming.";
delitem .@Coin,1;
getitem .@Items[.@i],3;
close;
}
else {
mes .@n$;
mes "You don't have enough coins.";
close;
}
case 2:
mes .@n$;
break;
}
}
mes "Come again if you change your mind.";
close;
}
else {
if (strnpcinfo(1) == "Merchant of Manuk") {
mes "Rtt od d";
mes "Qwo hd is d irr";
}
else {
mes "BurWehAla";
mes "tasnarAndu Ie Ru";
}
close;
}
}
man_in01,286,16,1 duplicate(merchant_13_2) Merchant of Manuk 454
spl_in01,110,326,5 duplicate(merchant_13_2) Merchant of Splendide 439
|
