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
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
|
// TMW2 Script
// Author:
// Jesusalva
// Description:
// Intense Beard is the crafting master
003-8,27,42,4 script Intense Beard NPC_HUMAN_M_ARTIS,{
if (BaseLevel < 35)
goto L_SemNivel;
if (!countitem(RecipeBook))
goto L_SemLivro;
mesn;
mesq l("Hello my friend! I see you've brought your @@ with you this time!", getitemlink(RecipeBook));
next;
mesn;
mesq l("Let's learn new recipes! Do you wanna?");
next;
csysGUI_Report();
do {
mesc l("Craft Skill Lv: "+getskilllv(TMW2_CRAFT));
mesc l("Monster Points: @@ | Gold: @@",
format_number(Mobpt), format_number(Zeny));
mesc l("Learn what?");
mes "";
.@opt$="Nothing";
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_BASE);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_ATK);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_DEF);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_ACC);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_EVD);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_REGEN);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_SPEED);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_DOUBLE);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_MAXPC);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_SCRESIST);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_SCINFLICT);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_MANAUSE);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_BOSSATK);
.@opt$+=":"+csysGUI_OptLearnMenu(CRGROUP_FINAL);
select (.@opt$);
mes "";
switch (@menu) {
case 2:
if (csysGUI_RaiseOpt(CRGROUP_BASE))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 3:
if (csysGUI_RaiseOpt(CRGROUP_ATK))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 4:
if (csysGUI_RaiseOpt(CRGROUP_DEF))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 5:
if (csysGUI_RaiseOpt(CRGROUP_ACC))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 6:
if (csysGUI_RaiseOpt(CRGROUP_EVD))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 7:
if (csysGUI_RaiseOpt(CRGROUP_REGEN))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 8:
if (csysGUI_RaiseOpt(CRGROUP_SPEED))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 9:
if (csysGUI_RaiseOpt(CRGROUP_DOUBLE))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 10:
if (csysGUI_RaiseOpt(CRGROUP_MAXPC))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 11:
if (csysGUI_RaiseOpt(CRGROUP_SCRESIST))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 12:
if (csysGUI_RaiseOpt(CRGROUP_SCINFLICT))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 13:
if (csysGUI_RaiseOpt(CRGROUP_MANAUSE))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 14:
if (csysGUI_RaiseOpt(CRGROUP_BOSSATK))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
case 15:
if (csysGUI_RaiseOpt(CRGROUP_FINAL))
mesc l("Success!"), 3;
else
mesc l("Not enough Monster Points!"), 1;
break;
} while (@menu != 1);
close;
L_SemNivel:
mesn;
mesq l("Please don't disturb me, I'm busy crafting my own customized power mega blaster weapon. I just keep failing to apply +100% exp gain bonus on it!");
close;
L_SemLivro:
mesn;
mesq l("Heya, noob. Do you have a @@? No? I thought everyone gained one at birth from their parents!", getitemlink(RecipeBook));
next;
mesn;
mesq l("That's too bad, because I could teach you some amazing craft skills! This will need to wait another day, I guess. Oh well.");
next;
mesn;
mesq l("Better ask your parents for one... Failing that, maybe someone in the Alliance can gift you one.");
close;
OnInit:
.sex=G_MALE;
.distance=5;
npcsit;
end;
}
|