summaryrefslogtreecommitdiff
path: root/npc/other
diff options
context:
space:
mode:
authorLupus <Lupus@54d463be-8e91-2dee-dedb-b68131a5f0ec>2006-10-23 18:53:48 +0000
committerLupus <Lupus@54d463be-8e91-2dee-dedb-b68131a5f0ec>2006-10-23 18:53:48 +0000
commit7d9c60fd321696ac11aecbfcc008299d7625f418 (patch)
treeefb845da0031eca9e1804a157e3444e2782fb3ca /npc/other
parent42e1d3fd8849d608dc1e4136b0acc99b8649f083 (diff)
downloadhercules-7d9c60fd321696ac11aecbfcc008299d7625f418.tar.gz
hercules-7d9c60fd321696ac11aecbfcc008299d7625f418.tar.bz2
hercules-7d9c60fd321696ac11aecbfcc008299d7625f418.tar.xz
hercules-7d9c60fd321696ac11aecbfcc008299d7625f418.zip
added official Gonryn Power Arena
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@9050 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/other')
-rw-r--r--npc/other/powernpc.txt332
1 files changed, 332 insertions, 0 deletions
diff --git a/npc/other/powernpc.txt b/npc/other/powernpc.txt
new file mode 100644
index 000000000..63bdd1f13
--- /dev/null
+++ b/npc/other/powernpc.txt
@@ -0,0 +1,332 @@
+//===== eAthena Script =======================================
+//= Official Gonryun Power Arena
+//===== By: ==================================================
+//= KarLaeda (Aegis script cnversion)
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= Athena SVN 9000+
+//===== Additional Comments: =================================
+//=
+//============================================================
+
+
+gonryun.gat,180,118,4 script Iron man#gnp 85,{
+ if (countitem(1201) > 0) {
+ mes "- Wait a minute !! -";
+ mes "- Currently you're carrying -";
+ mes "- too many items with you. -";
+ mes "- Please try again -";
+ mes "- after you loose some weight. -";
+ close;
+ }
+ if (BaseJob == Job_Novice) {
+ mes "[Songmoodoo]";
+ mes "Children are not allowed in here.";
+ close;
+ }
+ if (in_battle == 3) set in_battle,1;
+ if (in_battle < 1) {
+ mes "[Songmoodoo]";
+ mes "Hey hey~ This is not something";
+ mes "You can see everyday.";
+ mes "Oh~ you look strong!";
+ mes "Wanna try?";
+ next;
+ switch(select("Why not?:?????:No thanks.")){
+ case 1:
+ mes "[Songmoodoo]";
+ mes "Haha~ I knew you would try.";
+ mes "If you could lift this up,";
+ mes "I'll tell you something interesting.";
+ mes "Ready?";
+ next;
+ mes "^0000FFSongmoodoo pointed to a rock";
+ mes "and asked you to lift.";
+ if (BaseJob < Job_Knight) {
+ if (checkweight(7049,690)) {
+ mes "^0000FFYou lifted the Stone lightly.^000000";
+ set in_battle,1;
+ getitem 7049,690; // Stone
+ next;
+ emotion e_no1;
+ mes "[Songmoodoo]";
+ mes "Wow~ Excellent~";
+ mes "I'll take you to someplace nice";
+ mes "next time I see you.";
+ mes "See ya~";
+ } else {
+ mes "Looks too heavy for you.^000000";
+ next;
+ mes "[Songmoodoo]";
+ mes "You are yet lack of training.";
+ mes "Come after more practice.";
+ }
+ } else if (BaseClass == Job_Swordman || BaseClass == Job_Thief || BaseClass == Job_Merchant || BaseJob == Job_Monk) {
+ if (checkweight(7049,1100)) {
+ mes "^0000FFYou lifted the Stone lightly.^000000";
+ set in_battle,1;
+ getitem 7049,1100; // Stone
+ next;
+ emotion e_no1;
+ mes "[Songmoodoo]";
+ mes "Wow~ Excellent~";
+ mes "I'll take you to someplace nice";
+ mes "next time I see you.";
+ mes "See ya~";
+ } else {
+ mes "Seemed too heavy to lift.^000000";
+ next;
+ mes "[Songmoodoo]";
+ mes "You are yet lack of training.";
+ mes "come after more practice.";
+ }
+ } else {
+ if (checkweight(7049,730)) {
+ mes "^0000FFYou lifted the Stone lightly.^000000";
+ set in_battle,1;
+ getitem 7049,730; // Stone
+ next;
+ emotion e_no1;
+ mes "[Songmoodoo]";
+ mes "Wow~ Excellent~";
+ mes "I'll take you to someplace nice";
+ mes "next time I see you.";
+ mes "See ya~";
+ } else {
+ mes "Seemed too heavy to lift.^000000";
+ next;
+ mes "[Songmoodoo]";
+ mes "You are yet lack of training.";
+ mes "come after more practice.";
+ }
+ }
+ break;
+ case 2:
+ mes "[Songmoodoo]";
+ mes "That's not a big deal.";
+ mes "If you believe you're strong,";
+ mes "This might be a good chance to experience";
+ mes "something new. Wanna try??";
+ break;
+ case 3:
+ mes "[Songmoodoo]";
+ mes "I guess not..";
+ mes "....";
+ emotion e_pif;
+ break;
+ }
+ } else if (in_battle == 1) {
+ mes "[Songmoodoo]";
+ mes "Good to see you again!";
+ mes "Wanna go??";
+ next;
+ if (select("Sure:Maybe next time") == 1) {
+ mes "[Songmoodoo]";
+ mes "Good! Haha.";
+ mes "I like your confidence.";
+ mes "Good luck on you~";
+ close2;
+ warp "gon_test.gat",53,6;
+ end;
+ } else {
+ mes "[Songmoodoo]";
+ mes "well..";
+ mes "alright.";
+ mes "I'll see you next time then.";
+ }
+ } else {
+ mes "[Songmoodoo]";
+ mes "You ran away from there?";
+ mes "Guess you're not strong enough?";
+ mes "I'll give you another chance.";
+ mes "See you again.";
+ emotion e_pif;
+ set in_battle,1;
+ }
+ close;
+}
+
+gon_test.gat,50,14,4 script Administrator#gnp 780,{
+ mes "[Administrator]";
+ if (BaseJob == Job_Novice) {
+ mes "Children are not allowed in here.";
+ close;
+ }
+ if ($@in_battle) {
+ mes "Sorry, a field of fight";
+ mes "is occupied right now.";
+ mes "Try again later.";
+ close;
+ }
+ mes "Are you ready?";
+ mes "";
+ mes "Remember, you have to pay";
+ mes "500z to fight.";
+ next;
+ if (select("Yes, let me fight!:One moment, please.") == 2) {
+ mes "[Administrator]";
+ mes "Ok, see you later.";
+ close;
+ }
+ if (Zeny < 500) {
+ mes "[Administrator]";
+ mes "I'm sorry but you don't have enough zeny.";
+ close;
+ }
+ set Zeny,Zeny - 500;
+ set in_battle,1;
+ warp "gon_test.gat",42,86;
+ set $@in_battle,1;
+ setnpctimer 0,"Summoner#gnp";
+ startnpctimer "Summoner#gnp";
+ end;
+}
+
+gon_test.gat,42,89,4 script Summoner#gnp 774,{
+ mes "[SongYeunWoo]";
+ if (in_battle == 3) {
+ mes "Please come back after registration.";
+ close;
+ } else if (in_battle == 2) {
+ mes "You had a single match already.";
+ mes "You can have a match once at a time.";
+ mes "Please re-enter if you want a match";
+ mes "with other monsters.";
+ close;
+ }
+ mes "Welcome.";
+ mes "Which monster would you recall?";
+ next;
+ 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");
+ set @gnpGroupMob$,.gnpMobsName$[(@gnpGroup-1)*6];
+ for (set @i,1; @i < 6; set @i, @i+1) {
+ set @gnpGroupMob$, @gnpGroupMob$ + ":" + .gnpMobsName$[(@gnpGroup-1)*6 + @i];
+ }
+ set @gnpMob,select(@gnpGroupMob$);
+ mes "[SongYeunWoo]";
+ mes "Let the fight begin!";
+ close2;
+ set in_battle,2;
+ if (getnpctimer(0) < 180000) monster "gon_test.gat",56,86,.gnpMobsName$[(@gnpGroup-1)*6 + @gnpMob - 1],.gnpMobsId[(@gnpGroup-1)*6 + @gnpMob - 1],1,"Summoner#gnp::OnGnpMobDead";
+// do init timer on mob select ?
+// setnpctimer 0;
+ end;
+
+ OnInit:
+ initnpctimer;
+ stopnpctimer;
+ setarray .gnpMobsName$[0],"Leather ribbon","Sitotoxism","Certificate of blood donation","Tarantulla","DangRangKwon","Molar of Desert";
+ setarray .gnpMobsId[0],1419,1428,1434,1430,1457,1432;
+ setarray .gnpMobsName$[6],"Hog Skeleton","Cannibal Bear","Miner","Fighting Dog","Mermaid Princess","Only Son";
+ setarray .gnpMobsId[6],1462,1442,1469,1460,1425,1472;
+ setarray .gnpMobsName$[12],"SamYeupchoom","Hunting Dog","Nutcracker","Sea Horse","JAKK","Corpse";
+ setarray .gnpMobsId[12],1454,1455,1443,1426,1436,1423;
+ setarray .gnpMobsName$[18],"Marduk","Onion Stem","Worm","Autodoll","Girl with Matches","Red Evil";
+ setarray .gnpMobsId[18],1458,1440,1429,1459,1444,1422;
+ setarray .gnpMobsName$[24],"Naga","Mold","Tracing Missiles","Aryong","Abiryong","Bacterium";
+ setarray .gnpMobsId[24],1421,1481,1424,1465,1466,1433;
+ setarray .gnpMobsName$[30],"Winning System","Fat Archer","Little black goat","Perverted","Treasure Box","Greenhorn";
+ setarray .gnpMobsId[30],1427,1473,1431,1446,1474,1471;
+ setarray .gnpMobsName$[36],"Hurricane","External Hog","Landlord of Maze","Knight of grudge","Archer of grudge","Papillon";
+ setarray .gnpMobsId[36],1450,1439,1461,1467,1453,1479;
+ setarray .gnpMobsName$[42],"Lip","Wendigo","E Card","Tentacle Monster","Muscular Alarm","Devil Cross";
+ setarray .gnpMobsId[42],1451,1475,1437,1441,1476,1435;
+ setarray .gnpMobsName$[48],"Maggot","Large Frame","Season of reading","Shining Fingers","Handbag","Major knight of grudge";
+ setarray .gnpMobsId[48],1477,1448,1478,1489,1488,1438;
+ setarray .gnpMobsName$[54],"Queen","Man of Fire","Sword of Executor","Mutant Dragon","Mixed Soup","Great Sword";
+ setarray .gnpMobsId[54],1482,1464,1487,1449,1456,1486;
+ setarray .gnpMobsName$[60],"Monster Bird","Torturer","Warrior","Vice-Torturer","Huge Sword";
+ setarray .gnpMobsId[60],1447,1483,1490,1484,1485;
+ end;
+
+ OnTimer120000:
+ areaannounce "gon_test.gat",41,81,74,92,"1 min. left",0;
+ end;
+
+ OnTimer180000:
+ killmonster "gon_test.gat","Summoner#gnp::OnGnpMobDead";
+ end;
+
+ OnTimer182000:
+ areaannounce "gon_test.gat",41,81,74,92,"Time Over.",0;
+ end;
+
+ OnGnpMobDead:
+ setnpctimer 0;
+ set in_battle,1;
+ areaannounce "gon_test.gat",41,81,74,92,"Thank you. Please, come again.",0;
+ sleep 4000;
+ OnTimer184000:
+ stopnpctimer;
+ areawarp "gon_test.gat",41,81,74,92,"gon_test.gat",44,4;
+ set $@in_battle,0;
+ end;
+}
+
+gon_test.gat,46,14,3 script Guide of field of fight#gnp 770,{
+ mes "[SongHeeYeon]";
+ mes ".....";
+ mes "Hi, there~";
+ mes "This is a field of fight.";
+ mes "Got any questions?";
+ next;
+ switch(select("A field of fight?:You got a minute lady?:Get in.:Out.:Nope.")){
+ case 1:
+ mes "[SongHeeYeon]";
+ mes "Just like the name of this place,";
+ mes "it is a field for matches.";
+ mes "We have various monsters";
+ mes "in different levels.";
+ next;
+ mes "[SongHeeYeon]";
+ mes "1st Class Boss Monsters are in middle of preparation yet.";
+ mes "We charge you a small fee to enter here.";
+ break;
+ case 2:
+ mes "[SongHeeYeon]";
+ mes "eh.... excuse me?";
+ mes "ah..I'm afraid I have to work right now...";
+ mes "I am sorry..";
+ break;
+ case 3:
+ mes "[SongHeeYeon]";
+ mes "Yes, Thank you.";
+ mes "Have a good time.";
+ close2;
+ set in_battle,3;
+ warp "gon_test.gat",25,98;
+ end;
+ case 4:
+ mes "[SongHeeYeon]";
+ mes "Thank you.";
+ mes "Please come again.";
+ close2;
+ warp "gonryun.gat",177,112;
+ end;
+ case 5:
+ mes "[SongHeeYeon]";
+ mes "........";
+ mes "Good bye..";
+ break;
+ }
+ close;
+}
+
+gon_test,70,103,3 script ChowAnAn#gnp 773,{
+ mes "[ChowAnAn]";
+ mes "Want to go back?";
+ next;
+ if (select("Yes.:No.") == 1) {
+ mes "[ChowAnAn]";
+ mes "Thank you.";
+ mes "Please come again.";
+ close2;
+ set in_battle,1;
+ warp "gon_test.gat",44,4;
+ end;
+ }
+ mes "[ChowAnAn]";
+ mes "Thank you.";
+ close;
+} \ No newline at end of file