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
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
|
//===== Hercules Script ======================================
//= Job Repairs
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.2
//===== Description: =========================================
//= [Official Conversion]
//= Removes potentially conflicting job data.
//===== Additional Comments: =================================
//= 1.0 First version.
//= 1.1 Added GM management function. [Euphy]
//= 1.2 Removed pointless comment. [Kisuka]
//============================================================
prt_in,38,104,4 script Valerie 4_F_VALKYRIE,{
if (checkweight(1201,1) == 0) {
mes "I think you have too many items. Let's try it again after you take some out.";
close;
}
if (MaxWeight - Weight < 1000) {
mes "You're overweight with items so I don't think we can proceed any further. Challenge me after you've taken some items off.";
close;
}
mes "[Valerie]";
mes "I am Valerie; I help those with abnormalities. I am friends with Valkyrie.";
next;
mes "[Valerie]";
mes "If both abnormalities disappear then we must start the test over from scratch. What would you like to do?";
next;
switch(select("I don't have any abnormalities:I think my body has some abnormalities")) {
case 1:
mes "[Valerie]";
mes "That's a relief. Then please take care.";
close;
case 2:
mes "[Valerie]";
mes "Are you sure you want to intialize it and start over?";
next;
if(select("Nope:Yes, I want to start completely over") == 1) {
mes "[Valerie]";
mes "I understand. I'll see you next time";
close;
}
mes "[Valerie]";
mes "All items related to the existing conditions will disappear. Are you okay with this?";
next;
if(select("Nope:Yes, I want to start completely over.") == 1) {
mes "[Valerie]";
mes "I understand. I'll see you next time.";
close;
}
mes "[Valerie]";
mes "It seems that there are a sea of people who seemed to be cursed of not being able to get a significant other after going through with this. Are you still okay with this? ";
next;
if(select("Nope:I still want to intialize.") == 1) {
mes "[Valerie]";
mes "I understand. I will see you next time.";
close;
}
mes "[Valerie]";
mes "In extreme cases, some become crippled and can get ulcers. Do you still want to intilize former processes?";
next;
if(select("Nope:Please intilize the former processes") == 1) {
mes "[Valerie]";
mes "I understand. I will see you next time";
close;
}
specialeffect2 EF_INVENOM;
progressbar "0xffff00",3;
// Warlock - quest items
if (isequipped(2796) || isequipped(2797)) {
mes "[Valerie]";
mes "Please unequip the Magical Stone or Magical Stone Ring and try again.";
close;
}
if (countitem(2796) || countitem(2797)) {
if (isequipped(2796) || isequipped(2797)) {
mes "[Valerie]";
mes "Please talk to me after your replace all Magical Stones.";
close;
}
setarray .@items[0], 2796, 2797, 6152, 6151; //Magical_Stone,Magical_Stone_,Glittering_Crystal,Peice_Of_Great_Bradium
for(set .@i,0; .@i<4; set .@i,.@i+1) {
if (countitem(.@items[.@i]))
delitem .@items[.@i], countitem(.@items[.@i]);
}
mes "[Valerie]";
mes "You're carrying something that is unnecessary. I will sort it out for you.";
close;
}
// Baby and third job characters meet no further conditions.
if (eaclass()&(EAJL_BABY|EAJL_THIRD)) {
mes "[Valerie]";
mes "I don't think you should have any further business with me.";
close;
}
// Rebirth - variable
if ((Class >= Job_Swordman && Class <= Job_Crusader2) && ADVJOB != 0) {
set ADVJOB,0;
mes "[Valerie]";
mes "You're carrying big karma- You should erase it.";
next;
mes "[Valerie]";
mes "Please talk to me again as there could be additional problems.";
close;
}
// Second job - variable and quests
// callsub L_Second, "<variable>", <quest>;
if (Class == Job_Swordman) {
callsub L_Second, "KNIGHT_Q", 9012;
callsub L_Second, "CRUS_Q", 3015;
} else if (Class == Job_Archer) {
callsub L_Second, "HNTR_Q", 4013;
callsub L_Second, "BARD_Q", 3004;
callsub L_Second, "DANC_Q", 7006;
} else if (Class == Job_Mage) {
callsub L_Second, "WIZ_Q", 9018;
callsub L_Second, "SAGE_Q", 2052;
} else if (Class == Job_Merchant) {
callsub L_Second, "BSMITH_Q", 2016;
callsub L_Second, "ALCH_Q", 2040;
} else if (Class == Job_Thief) {
callsub L_Second, "ASSIN_Q", 8008;
callsub L_Second, "ROGUE_Q", 2027;
} else if (Class == Job_Acolyte) {
callsub L_Second, "PRIEST_Q", 8016;
callsub L_Second, "MONK_Q", 3032;
}
// Third job - variable and quests
// callsub L_Third, "<variable>", <main quest>, <first quest>, <last quest>{, <additional quest>};
if (BaseJob == Job_Assassin)
callsub L_Third, "job_3rd_gc", 7100, 7091, 7116;
else if (BaseJob == Job_Blacksmith)
callsub L_Third, "job__mechanic", 10101, 10090, 10101;
else if (BaseJob == Job_Hunter)
callsub L_Third, "job_ranger01", 8262, 8254, 8262;
else if (BaseJob == Job_Knight)
callsub L_Third, "job_rune_edq", 3219, 3200, 3220;
else if (BaseJob == Job_Priest)
callsub L_Third, "job_arch", 2191, 2187, 2191;
else if (BaseJob == Job_Wizard)
callsub L_Third, "job_wl", 11112, 11106, 11112;
else if (BaseJob == Job_Alchemist)
callsub L_Third, "job_gen", 2223, 2209, 2217, 2223;
else if (BaseJob == Job_Bard)
callsub L_Third, "job_min", 11154, 11135, 11154;
else if (BaseJob == Job_Crusader)
callsub L_Third, "job_royal", 0, 12090, 12094;
else if (BaseJob == Job_Dancer)
callsub L_Third, "job_wan", 2222, 2218, 2222;
else if (BaseJob == Job_Monk)
callsub L_Third, "job_shu", 11158, 11155, 11158;
else if (BaseJob == Job_Rogue)
callsub L_Third, "job_sha", 7180, 7160, 7180;
else if (BaseJob == Job_Sage)
callsub L_Third, "job_soc", 12098, 12096, 12098;
mes "[Valerie]";
mes "I don't think you should have any further business with me.";
close;
}
L_Second:
if (getd(getarg(0)) != 0) {
setd getarg(0),0;
if (checkquest(getarg(1)) == 2)
erasequest getarg(1);
mes "[Valerie]";
mes "I will help clear your problems for you that came from your former attempts.";
next;
mes "[Valerie]";
mes "Please talk to me again as there could be additional problems.";
close;
} else
return;
L_Third:
if (getd(getarg(0)) != 0) {
setd getarg(0),0;
if (getarg(1)) {
if (checkquest(getarg(1)) == 2)
erasequest getarg(1);
}
for(set .@i,getarg(2); .@i<=getarg(3); set .@i,.@i+1) {
if (checkquest(.@i) > -1)
erasequest .@i;
}
if (getarg(4,0)) {
if (checkquest(getarg(4)) > -1)
erasequest getarg(4);
}
mes "[Valerie]";
mes "I will help clear your problems for you that came from your former attempts.";
next;
mes "[Valerie]";
mes "Please talk to me again as there could be additional problems.";
close;
} else
return;
}
- script Valerie#sign -1,{
mes "^ff00ffI couldn't pay the office rent so I am temporarily relocating to the building across from the Prontera Refinery.^000000";
mes " ";
mes "^ff00ffValerie^000000";
close;
}
in_moc_16,17,33,4 duplicate(Valerie#sign) Valerie#asn 2_BULLETIN_BOARD
ein_in01,13,28,4 duplicate(Valerie#sign) Valerie#bls 2_BULLETIN_BOARD
hu_in01,386,377,4 duplicate(Valerie#sign) Valerie#hnt 2_BULLETIN_BOARD
prt_in,88,108,4 duplicate(Valerie#sign) Valerie#knt 2_BULLETIN_BOARD
prt_church,19,36,4 duplicate(Valerie#sign) Valerie#prst 2_BULLETIN_BOARD
gef_tower,110,30,4 duplicate(Valerie#sign) Valerie#wiz 2_BULLETIN_BOARD
comodo,215,155,4 duplicate(Valerie#sign) Valerie#danc 2_BULLETIN_BOARD
prt_castle,45,167,4 duplicate(Valerie#sign) Valerie#cru 2_BULLETIN_BOARD
prt_monk,59,253,4 duplicate(Valerie#sign) Valerie#mnk 2_BULLETIN_BOARD
moc_ruins,90,104,4 duplicate(Valerie#sign) Valerie#rg 2_BULLETIN_BOARD
yuno_in02,43,62,4 duplicate(Valerie#sign) Valerie#sag 2_BULLETIN_BOARD
prt_church,103,86,4 duplicate(Valerie#sign) Valerie#arch 2_BULLETIN_BOARD
que_job01,75,92,4 duplicate(Valerie#sign) Valerie#gc 2_BULLETIN_BOARD
yuno,129,150,4 duplicate(Valerie#sign) Valerie#mech 2_BULLETIN_BOARD
tur_dun01,159,40,4 duplicate(Valerie#sign) Valerie#ran 2_BULLETIN_BOARD
prt_in,167,24,4 duplicate(Valerie#sign) Valerie#rk 2_BULLETIN_BOARD
spl_in02,81,102,4 duplicate(Valerie#sign) Valerie#wl 2_BULLETIN_BOARD
alde_alche,38,181,4 duplicate(Valerie#sign) Valerie#alche 2_BULLETIN_BOARD
alberta,198,129,4 duplicate(Valerie#sign) Valerie#min 2_BULLETIN_BOARD
in_rogue,376,104,4 duplicate(Valerie#sign) Valerie#sc 2_BULLETIN_BOARD
ve_in,244,122,4 duplicate(Valerie#sign) Valerie#shu 2_BULLETIN_BOARD
xmas,166,209,4 duplicate(Valerie#sign) Valerie#wan 2_BULLETIN_BOARD
sec_in02,12,40,5 script Job Repair 1_M_LIBRARYMASTER,1,1,{
callfunc "F_GM_NPC";
mes "Please input your password.";
next;
if (callfunc("F_GM_NPC","1854",1) == 1) {
set job_arch,100;
set job_3rd_gc,100;
set job__mechanic,100;
set job_ranger01,100;
set job_rune_edq,100;
set job_wl,100;
set job_gen,100;
set job_min,100;
set job_royal,100;
set job_sha,100;
set job_soc,100;
set job_shu,100;
set job_wan,100;
set KNIGHT_Q,100;
set PRIEST_Q,100;
set WIZ_Q,100;
set BSMITH_Q,100;
set ASSIN_Q,100;
set HNTR_Q,100;
set CRUS_Q,100;
set MONK_Q,100;
set SAGE_Q,100;
set ALCH_Q,100;
set ROGUE_Q,100;
set BARD_Q,100;
set DANC_Q,100;
set ADVJOB,15;
}
close;
}
|
