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
134
135
136
137
138
139
|
//================= Hercules Script =======================================
//= _ _ _
//= | | | | | |
//= | |_| | ___ _ __ ___ _ _| | ___ ___
//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
//= | | | | __/ | | (__| |_| | | __/\__ \
//= \_| |_/\___|_| \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2012-2015 Hercules Dev Team
//= Copyright (C) Euphy
//= Copyright (C) rAthena Dev Team
//= Copyright (C) eAthena Dev Team
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program. If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= Alchemist Shop
//================= Description ===========================================
//= Merchants for Alchemist Materials and Manuals.
//================= Current Version =======================================
//= 1.0
//=========================================================================
alde_alche,31,186,3 script Craft Book Merchant#alde 4_M_ALCHE_D,{
mes "[Craft Book Merchant]";
mes "Welcome.";
mes "I'm here to sell";
mes "^0000FFspecial craft books^000000 for Geneticists.";
next;
mes "[Craft Book Merchant]";
mes "Geneticists have some skills";
mes "that require craft books to activate.";
next;
mes "[Craft Book Merchant]";
mes "The more craft books you have,";
mes "the more skills you can use.";
next;
mes "[Craft Book Merchant]";
mes "Please understand that";
mes "I specialize in the sale of these special books and";
mes "I ^FF0000don't sell other items^000000.";
next;
mes "[Craft Book Merchant]";
mes "Would you like to take a look at my craft books?";
next;
if(select("Sure.", "No.") == 2) {
mes "[Craft Book Merchant]";
mes "Thank you for visiting my shop.";
mes "Please be safe on your travels.";
close;
}
if (checkweight(Knife,1) == 0) {
mes "[Craft Book Merchant]";
mes "I'm sorry, but your inventory is almost full.";
mes "Please empty your inventory first.";
close;
}
if (MaxWeight - Weight < 2500) {
mes "[Craft Book Merchant]";
mes "Please empty your inventory first.";
close;
}
mes "[Craft Book Merchant]";
mes "Okay then, here's the list of available craft books.";
next;
switch(select("[Apple Bomb Craft Book] 100,000 zeny", "[Pineapple Bomb Craft Book] 100,000 zeny", "[Coconut Bomb Craft Book] 100,000 zeny", "[Melon Bomb Craft Book] 100,000 zeny", "[Banana Bomb Craft Book] 100,000 zeny", "[Plant Gene Cultivation Method] 100,000 zeny", "[Superior Potion Craft Manual] 100,000 zeny", "[Mix Cooking Book] 100,000 zeny", "[Health Improvement Research Book] 100,000 zeny", "[Vigor Drink Recipe] 100,000 zeny", "Close")){
case 1: .@item = 6279; break;
case 2: .@item = 6280; break;
case 3: .@item = 6281; break;
case 4: .@item = 6282; break;
case 5: .@item = 6283; break;
case 6: .@item = 6284; break;
case 7: .@item = 6285; break;
case 8: .@item = 11022; break;
case 9: .@item = 11023; break;
case 10: .@item = 11024; break;
case 11:
mes "[Craft Book Merchant]";
mes "Thank you for your patronage.";
mes "Please come again.";
close;
}
mes "[Craft Book Merchant]";
mes "^0000FF["+getitemname(.@item)+"] costs";
mes "100,000 zeny.";
mes "How many would you like to purchase?";
next;
input(.@amount);
if (.@amount <= 0) {
mes "[Craft Book Merchant]";
mes "Would you like to see some different books?";
close;
}
if (.@amount > 99 ){
mes "[Craft Book Merchant]";
mes "You cannot purchase more than 100 at a time.";
close;
}
mes "[Craft Book Merchant]";
mes "You've entered "+.@amount+"x ^0000FF["+getitemname(.@item)+"]^000000 to be purchased.";
mes "Would you like to continue?";
next;
if (select("Yes", "No") == 1) {
.@total = .@amount * 100000;
if (Zeny < .@total) {
mes "[Craft Book Merchant]";
mes "I'm sorry, but you don't have enough money.";
close;
}
if (checkweight(.@item,.@amount) == 0){
mes "[Craft Book Merchant]";
mes "It doesn't seem like you can carry everything.";
mes "Please check the space in your inventory.";
close;
}
mes "[Craft Book Merchant]";
mes "Thank you for your patronage.";
Zeny -= .@total;
getitem .@item,.@amount;
close;
}
mes "[Craft Book Merchant]";
mes "Please take your time";
mes "before you make your decision.";
close;
}
|
