1 | //===== eAthena Script ======================================= |
---|
2 | //= Official Gonryun Power Arena |
---|
3 | //===== By: ================================================== |
---|
4 | //= KarLaeda (Aegis script cnversion) |
---|
5 | //===== Current Version: ===================================== |
---|
6 | //= 1.1 |
---|
7 | //===== Compatible With: ===================================== |
---|
8 | //= Athena SVN 9000+ |
---|
9 | //===== Additional Comments: ================================= |
---|
10 | //= 1.1 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf] |
---|
11 | //============================================================ |
---|
12 | |
---|
13 | |
---|
14 | gonryun,180,118,4 script Iron man#gnp 85,{ |
---|
15 | if (checkweight(1201,1) == 0) { |
---|
16 | mes "- Wait a minute !! -"; |
---|
17 | mes "- Currently you're carrying -"; |
---|
18 | mes "- too many items with you. -"; |
---|
19 | mes "- Please try again -"; |
---|
20 | mes "- after you loose some weight. -"; |
---|
21 | close; |
---|
22 | } |
---|
23 | if (BaseJob == Job_Novice) { |
---|
24 | mes "[Songmoodoo]"; |
---|
25 | mes "Children are not allowed in here."; |
---|
26 | close; |
---|
27 | } |
---|
28 | if (in_battle == 3) set in_battle,1; |
---|
29 | if (in_battle < 1) { |
---|
30 | mes "[Songmoodoo]"; |
---|
31 | mes "Hey hey~ This is not something"; |
---|
32 | mes "You can see everyday."; |
---|
33 | mes "Oh~ you look strong!"; |
---|
34 | mes "Wanna try?"; |
---|
35 | next; |
---|
36 | switch(select("Why not?:?????:No thanks.")){ |
---|
37 | case 1: |
---|
38 | mes "[Songmoodoo]"; |
---|
39 | mes "Haha~ I knew you would try."; |
---|
40 | mes "If you could lift this up,"; |
---|
41 | mes "I'll tell you something interesting."; |
---|
42 | mes "Ready?"; |
---|
43 | next; |
---|
44 | mes "^0000FFSongmoodoo pointed to a rock"; |
---|
45 | mes "and asked you to lift."; |
---|
46 | if (BaseJob < Job_Knight) { |
---|
47 | if (checkweight(7049,690)) { |
---|
48 | mes "^0000FFYou lifted the Stone lightly.^000000"; |
---|
49 | set in_battle,1; |
---|
50 | getitem 7049,690; // Stone |
---|
51 | next; |
---|
52 | emotion e_no1; |
---|
53 | mes "[Songmoodoo]"; |
---|
54 | mes "Wow~ Excellent~"; |
---|
55 | mes "I'll take you to someplace nice"; |
---|
56 | mes "next time I see you."; |
---|
57 | mes "See ya~"; |
---|
58 | } else { |
---|
59 | mes "Looks too heavy for you.^000000"; |
---|
60 | next; |
---|
61 | mes "[Songmoodoo]"; |
---|
62 | mes "You are yet lack of training."; |
---|
63 | mes "Come after more practice."; |
---|
64 | } |
---|
65 | } else if (BaseClass == Job_Swordman || BaseClass == Job_Thief || BaseClass == Job_Merchant || BaseJob == Job_Monk) { |
---|
66 | if (checkweight(7049,1100)) { |
---|
67 | mes "^0000FFYou lifted the Stone lightly.^000000"; |
---|
68 | set in_battle,1; |
---|
69 | getitem 7049,1100; // Stone |
---|
70 | next; |
---|
71 | emotion e_no1; |
---|
72 | mes "[Songmoodoo]"; |
---|
73 | mes "Wow~ Excellent~"; |
---|
74 | mes "I'll take you to someplace nice"; |
---|
75 | mes "next time I see you."; |
---|
76 | mes "See ya~"; |
---|
77 | } else { |
---|
78 | mes "Seemed too heavy to lift.^000000"; |
---|
79 | next; |
---|
80 | mes "[Songmoodoo]"; |
---|
81 | mes "You are yet lack of training."; |
---|
82 | mes "come after more practice."; |
---|
83 | } |
---|
84 | } else { |
---|
85 | if (checkweight(7049,730)) { |
---|
86 | mes "^0000FFYou lifted the Stone lightly.^000000"; |
---|
87 | set in_battle,1; |
---|
88 | getitem 7049,730; // Stone |
---|
89 | next; |
---|
90 | emotion e_no1; |
---|
91 | mes "[Songmoodoo]"; |
---|
92 | mes "Wow~ Excellent~"; |
---|
93 | mes "I'll take you to someplace nice"; |
---|
94 | mes "next time I see you."; |
---|
95 | mes "See ya~"; |
---|
96 | } else { |
---|
97 | mes "Seemed too heavy to lift.^000000"; |
---|
98 | next; |
---|
99 | mes "[Songmoodoo]"; |
---|
100 | mes "You are yet lack of training."; |
---|
101 | mes "come after more practice."; |
---|
102 | } |
---|
103 | } |
---|
104 | break; |
---|
105 | case 2: |
---|
106 | mes "[Songmoodoo]"; |
---|
107 | mes "That's not a big deal."; |
---|
108 | mes "If you believe you're strong,"; |
---|
109 | mes "This might be a good chance to experience"; |
---|
110 | mes "something new. Wanna try??"; |
---|
111 | break; |
---|
112 | case 3: |
---|
113 | mes "[Songmoodoo]"; |
---|
114 | mes "I guess not.."; |
---|
115 | mes "...."; |
---|
116 | emotion e_pif; |
---|
117 | break; |
---|
118 | } |
---|
119 | } else if (in_battle == 1) { |
---|
120 | mes "[Songmoodoo]"; |
---|
121 | mes "Good to see you again!"; |
---|
122 | mes "Wanna go??"; |
---|
123 | next; |
---|
124 | if (select("Sure:Maybe next time") == 1) { |
---|
125 | mes "[Songmoodoo]"; |
---|
126 | mes "Good! Haha."; |
---|
127 | mes "I like your confidence."; |
---|
128 | mes "Good luck on you~"; |
---|
129 | close2; |
---|
130 | warp "gon_test",53,6; |
---|
131 | end; |
---|
132 | } else { |
---|
133 | mes "[Songmoodoo]"; |
---|
134 | mes "well.."; |
---|
135 | mes "alright."; |
---|
136 | mes "I'll see you next time then."; |
---|
137 | } |
---|
138 | } else { |
---|
139 | mes "[Songmoodoo]"; |
---|
140 | mes "You ran away from there?"; |
---|
141 | mes "Guess you're not strong enough?"; |
---|
142 | mes "I'll give you another chance."; |
---|
143 | mes "See you again."; |
---|
144 | emotion e_pif; |
---|
145 | set in_battle,1; |
---|
146 | } |
---|
147 | close; |
---|
148 | } |
---|
149 | |
---|
150 | gon_test,50,14,4 script Administrator#gnp 780,{ |
---|
151 | mes "[Administrator]"; |
---|
152 | if (BaseJob == Job_Novice) { |
---|
153 | mes "Children are not allowed in here."; |
---|
154 | close; |
---|
155 | } |
---|
156 | if ($@in_battle) { |
---|
157 | mes "Sorry, a field of fight"; |
---|
158 | mes "is occupied right now."; |
---|
159 | mes "Try again later."; |
---|
160 | close; |
---|
161 | } |
---|
162 | mes "Are you ready?"; |
---|
163 | mes ""; |
---|
164 | mes "Remember, you have to pay"; |
---|
165 | mes "500z to fight."; |
---|
166 | next; |
---|
167 | if (select("Yes, let me fight!:One moment, please.") == 2) { |
---|
168 | mes "[Administrator]"; |
---|
169 | mes "Ok, see you later."; |
---|
170 | close; |
---|
171 | } |
---|
172 | if (Zeny < 500) { |
---|
173 | mes "[Administrator]"; |
---|
174 | mes "I'm sorry but you don't have enough zeny."; |
---|
175 | close; |
---|
176 | } |
---|
177 | set Zeny,Zeny - 500; |
---|
178 | set in_battle,1; |
---|
179 | warp "gon_test",42,86; |
---|
180 | set $@in_battle,1; |
---|
181 | setnpctimer 0,"Summoner#gnp"; |
---|
182 | startnpctimer "Summoner#gnp"; |
---|
183 | end; |
---|
184 | } |
---|
185 | |
---|
186 | gon_test,42,89,4 script Summoner#gnp 774,{ |
---|
187 | mes "[SongYeunWoo]"; |
---|
188 | if (in_battle == 3) { |
---|
189 | mes "Please come back after registration."; |
---|
190 | close; |
---|
191 | } else if (in_battle == 2) { |
---|
192 | mes "You had a single match already."; |
---|
193 | mes "You can have a match once at a time."; |
---|
194 | mes "Please re-enter if you want a match"; |
---|
195 | mes "with other monsters."; |
---|
196 | close; |
---|
197 | } |
---|
198 | mes "Welcome."; |
---|
199 | mes "Which monster would you recall?"; |
---|
200 | next; |
---|
201 | set @gnpGroup,select("Group 1:Group 2:Group 3:Group 4:Group 5:Group 6:Group 7:Group 8:Group 9:Group 10:Group 11"); |
---|
202 | set @gnpGroupMob$,.gnpMobsName$[(@gnpGroup-1)*6]; |
---|
203 | for (set @i,1; @i < 6; set @i, @i+1) { |
---|
204 | set @gnpGroupMob$, @gnpGroupMob$ + ":" + .gnpMobsName$[(@gnpGroup-1)*6 + @i]; |
---|
205 | } |
---|
206 | set @gnpMob,select(@gnpGroupMob$); |
---|
207 | mes "[SongYeunWoo]"; |
---|
208 | mes "Let the fight begin!"; |
---|
209 | close2; |
---|
210 | set in_battle,2; |
---|
211 | if (getnpctimer(0) < 180000) monster "gon_test",56,86,.gnpMobsName$[(@gnpGroup-1)*6 + @gnpMob - 1],.gnpMobsId[(@gnpGroup-1)*6 + @gnpMob - 1],1,"Summoner#gnp::OnGnpMobDead"; |
---|
212 | // do init timer on mob select ? |
---|
213 | // setnpctimer 0; |
---|
214 | end; |
---|
215 | |
---|
216 | OnInit: |
---|
217 | initnpctimer; |
---|
218 | stopnpctimer; |
---|
219 | setarray .gnpMobsName$[0],"Leather ribbon","Sitotoxism","Certificate of blood donation","Tarantulla","DangRangKwon","Molar of Desert"; |
---|
220 | setarray .gnpMobsId[0],1419,1428,1434,1430,1457,1432; |
---|
221 | setarray .gnpMobsName$[6],"Hog Skeleton","Cannibal Bear","Miner","Fighting Dog","Mermaid Princess","Only Son"; |
---|
222 | setarray .gnpMobsId[6],1462,1442,1469,1460,1425,1472; |
---|
223 | setarray .gnpMobsName$[12],"SamYeupchoom","Hunting Dog","Nutcracker","Sea Horse","JAKK","Corpse"; |
---|
224 | setarray .gnpMobsId[12],1454,1455,1443,1426,1436,1423; |
---|
225 | setarray .gnpMobsName$[18],"Marduk","Onion Stem","Worm","Autodoll","Girl with Matches","Red Evil"; |
---|
226 | setarray .gnpMobsId[18],1458,1440,1429,1459,1444,1422; |
---|
227 | setarray .gnpMobsName$[24],"Naga","Mold","Tracing Missiles","Aryong","Abiryong","Bacterium"; |
---|
228 | setarray .gnpMobsId[24],1421,1481,1424,1465,1466,1433; |
---|
229 | setarray .gnpMobsName$[30],"Winning System","Fat Archer","Little black goat","Perverted","Treasure Box","Greenhorn"; |
---|
230 | setarray .gnpMobsId[30],1427,1473,1431,1446,1474,1471; |
---|
231 | setarray .gnpMobsName$[36],"Hurricane","External Hog","Landlord of Maze","Knight of grudge","Archer of grudge","Papillon"; |
---|
232 | setarray .gnpMobsId[36],1450,1439,1461,1467,1453,1479; |
---|
233 | setarray .gnpMobsName$[42],"Lip","Wendigo","E Card","Tentacle Monster","Muscular Alarm","Devil Cross"; |
---|
234 | setarray .gnpMobsId[42],1451,1475,1437,1441,1476,1435; |
---|
235 | setarray .gnpMobsName$[48],"Maggot","Large Frame","Season of reading","Shining Fingers","Handbag","Major knight of grudge"; |
---|
236 | setarray .gnpMobsId[48],1477,1448,1478,1489,1488,1438; |
---|
237 | setarray .gnpMobsName$[54],"Queen","Man of Fire","Sword of Executor","Mutant Dragon","Mixed Soup","Great Sword"; |
---|
238 | setarray .gnpMobsId[54],1482,1464,1487,1449,1456,1486; |
---|
239 | setarray .gnpMobsName$[60],"Monster Bird","Torturer","Warrior","Vice-Torturer","Huge Sword"; |
---|
240 | setarray .gnpMobsId[60],1447,1483,1490,1484,1485; |
---|
241 | end; |
---|
242 | |
---|
243 | OnTimer120000: |
---|
244 | areaannounce "gon_test",41,81,74,92,"1 min. left",0; |
---|
245 | end; |
---|
246 | |
---|
247 | OnTimer180000: |
---|
248 | killmonster "gon_test","Summoner#gnp::OnGnpMobDead"; |
---|
249 | end; |
---|
250 | |
---|
251 | OnTimer182000: |
---|
252 | areaannounce "gon_test",41,81,74,92,"Time Over.",0; |
---|
253 | end; |
---|
254 | |
---|
255 | OnGnpMobDead: |
---|
256 | setnpctimer 0; |
---|
257 | set in_battle,1; |
---|
258 | areaannounce "gon_test",41,81,74,92,"Thank you. Please, come again.",0; |
---|
259 | sleep 4000; |
---|
260 | OnTimer184000: |
---|
261 | stopnpctimer; |
---|
262 | areawarp "gon_test",41,81,74,92,"gon_test",44,4; |
---|
263 | set $@in_battle,0; |
---|
264 | end; |
---|
265 | } |
---|
266 | |
---|
267 | gon_test,46,14,3 script Guide of field of fight 770,{ |
---|
268 | mes "[SongHeeYeon]"; |
---|
269 | mes "....."; |
---|
270 | mes "Hi, there~"; |
---|
271 | mes "This is a field of fight."; |
---|
272 | mes "Got any questions?"; |
---|
273 | next; |
---|
274 | switch(select("A field of fight?:You got a minute lady?:Get in.:Out.:Nope.")){ |
---|
275 | case 1: |
---|
276 | mes "[SongHeeYeon]"; |
---|
277 | mes "Just like the name of this place,"; |
---|
278 | mes "it is a field for matches."; |
---|
279 | mes "We have various monsters"; |
---|
280 | mes "in different levels."; |
---|
281 | next; |
---|
282 | mes "[SongHeeYeon]"; |
---|
283 | mes "1st Class Boss Monsters are in middle of preparation yet."; |
---|
284 | mes "We charge you a small fee to enter here."; |
---|
285 | break; |
---|
286 | case 2: |
---|
287 | mes "[SongHeeYeon]"; |
---|
288 | mes "eh.... excuse me?"; |
---|
289 | mes "ah..I'm afraid I have to work right now..."; |
---|
290 | mes "I am sorry.."; |
---|
291 | break; |
---|
292 | case 3: |
---|
293 | mes "[SongHeeYeon]"; |
---|
294 | mes "Yes, Thank you."; |
---|
295 | mes "Have a good time."; |
---|
296 | close2; |
---|
297 | set in_battle,3; |
---|
298 | warp "gon_test",25,98; |
---|
299 | end; |
---|
300 | case 4: |
---|
301 | mes "[SongHeeYeon]"; |
---|
302 | mes "Thank you."; |
---|
303 | mes "Please come again."; |
---|
304 | close2; |
---|
305 | warp "gonryun",177,112; |
---|
306 | end; |
---|
307 | case 5: |
---|
308 | mes "[SongHeeYeon]"; |
---|
309 | mes "........"; |
---|
310 | mes "Good bye.."; |
---|
311 | break; |
---|
312 | } |
---|
313 | close; |
---|
314 | } |
---|
315 | |
---|
316 | gon_test,70,103,3 script ChowAnAn#gnp 773,{ |
---|
317 | mes "[ChowAnAn]"; |
---|
318 | mes "Want to go back?"; |
---|
319 | next; |
---|
320 | if (select("Yes.:No.") == 1) { |
---|
321 | mes "[ChowAnAn]"; |
---|
322 | mes "Thank you."; |
---|
323 | mes "Please come again."; |
---|
324 | close2; |
---|
325 | set in_battle,1; |
---|
326 | warp "gon_test",44,4; |
---|
327 | end; |
---|
328 | } |
---|
329 | mes "[ChowAnAn]"; |
---|
330 | mes "Thank you."; |
---|
331 | close; |
---|
332 | } |
---|