root/npc/other/powernpc.txt @ 8

Revision 1, 9.8 kB (checked in by jinshiro, 17 years ago)
Line 
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
14gonryun,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
150gon_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
186gon_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
267gon_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
316gon_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}
Note: See TracBrowser for help on using the browser.