diff options
Diffstat (limited to 'npc/re/quests/eden/71-85.txt')
-rw-r--r-- | npc/re/quests/eden/71-85.txt | 95 |
1 files changed, 48 insertions, 47 deletions
diff --git a/npc/re/quests/eden/71-85.txt b/npc/re/quests/eden/71-85.txt index 57102982c..e88e388cb 100644 --- a/npc/re/quests/eden/71-85.txt +++ b/npc/re/quests/eden/71-85.txt @@ -22,10 +22,10 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ } // Clear the original quest data (no longer used). - if (slv_quest) set slv_quest,0; - if (checkquest(10102) > -1 || checkquest(10103) > -1 || checkquest(10104) > -1 || checkquest(10105) > -1 || checkquest(10106) > -1) { - for(set .@quest,10102; .@quest<=10106; set .@quest,.@quest+1) { - if (checkquest(.@quest) > -1) + if (slv_quest) slv_quest = 0; + if (questprogress(10102) || questprogress(10103) || questprogress(10104) || questprogress(10105) || questprogress(10106)) { + for(.@quest = 10102; .@quest<=10106; ++.@quest) { + if (questprogress(.@quest)) erasequest .@quest; } mes "- Since the client has moved -"; @@ -49,19 +49,19 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ 10114,10115,10116,10117, 10118,10119,10120, 10121,10122,10123,5055,5056; - for(set .@i,0; .@i<getarraysize(.@quests); set .@i,.@i+1) { - if (checkquest(.@quests[.@i],HUNTING) == 2) - set .@complete[getarraysize(.@complete)], .@quests[.@i]; + for(.@i = 0; .@i<getarraysize(.@quests); ++.@i) { + if (questprogress(.@quests[.@i],HUNTING) == 2) + .@complete[getarraysize(.@complete)] = .@quests[.@i]; } - if (checkquest(5057) > -1 && countitem(7187) >= 30) - set .@complete[getarraysize(.@complete)],5057; + if (questprogress(5057) && countitem(7187) >= 30) + .@complete[getarraysize(.@complete)] = 5057; if (getarraysize(.@complete)) { mes "You have quests in progress."; mes "Do you want to turn them in?"; next; if(select("Of course.:No.") == 2) close; - for(set .@i,0; .@i<getarraysize(.@complete); set .@i,.@i+1) + for(.@i = 0; .@i<getarraysize(.@complete); ++.@i) callsub L_Quest,.@complete[.@i]; close; } @@ -81,8 +81,8 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ mes "- related to the Sphinx Dungeon -"; mes "- on this mission Board. -"; next; - set .@str1$,"The villagers of Morroc are worried by the increasing number of monsters in the Sphinx Dungeon. "; - set .@str2$,"- Meidi from Morroc -"; + .@str1$ = "The villagers of Morroc are worried by the increasing number of monsters in the Sphinx Dungeon. "; + .@str2$ = "- Meidi from Morroc -"; switch(select("Hunt Requiem:Hunt Marduk:Hunt Pasana")) { case 1: callsub L_Quest,10107,.@str1$+"Hunt 10 Requiems.",.@str2$; case 2: callsub L_Quest,10108,.@str1$+"Hunt 10 Marduks.",.@str2$; @@ -93,8 +93,8 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ mes "- related to Glast Heim -"; mes "- on this mission Board. -"; next; - set .@str1$,"I am very afraid that the monsters from Glast Heim will attack us. "; - set .@str2$,"- Ancellia from Geffen -"; + .@str1$ = "I am very afraid that the monsters from Glast Heim will attack us. "; + .@str2$ = "- Ancellia from Geffen -"; switch(select("Hunt Dark Frame:Hunt Evil Druid:Hunt Wraith:Hunt Raydric Archer")) { case 1: callsub L_Quest,10110,.@str1$+"Hunt 10 Dark Frames.",.@str2$; case 2: callsub L_Quest,10111,.@str1$+"Hunt 10 Evil Druids.",.@str2$; @@ -106,8 +106,8 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ mes "- related to the area -"; mes "- around Juno. -"; next; - set .@str1$,"Those who can't fight, like me, find it much more difficult to travel due to the large number of monsters. "; - set .@str2$,"- Jeanbai, traveler -"; + .@str1$ = "Those who can't fight, like me, find it much more difficult to travel due to the large number of monsters. "; + .@str2$ = "- Jeanbai, traveler -"; switch(select("Hunt Grand Peco:Hunt Sleeper:Hunt Goat:Hunt Harpy")) { case 1: callsub L_Quest,10114,.@str1$+"Hunt 20 Grand Pecos.",.@str2$; case 2: callsub L_Quest,10115,.@str1$+"Hunt 20 Sleepers.",.@str2$; @@ -119,8 +119,8 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ mes "- related to the Clock Tower -"; mes "- on this mission Board. -"; next; - set .@str1$,"I used to love listening to the sweet melody of the Al De Baran Clock Tower but I can't hear anything anymore because of all the noises the monsters are making. "; - set .@str2$,"- Rizingsetter, President of the Love Clock community -"; + .@str1$ = "I used to love listening to the sweet melody of the Al De Baran Clock Tower but I can't hear anything anymore because of all the noises the monsters are making. "; + .@str2$ = "- Rizingsetter, President of the Love Clock community -"; switch(select("Hunt Clock:Hunt Punk:Hunt Rideword")) { case 1: callsub L_Quest,10118,.@str1$+"Hunt 15 Clocks before it breaks.",.@str2$; case 2: callsub L_Quest,10119,.@str1$+"Hunt 15 Punks before it breaks.",.@str2$; @@ -131,8 +131,8 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ mes "- related to the Localized Islands -"; mes "- on this mission Board. -"; next; - set .@str1$,"I want to go on an adventure but there are so many things I have to deal with. If I can't, then others can't either! "; - set .@str2$,"- Funfy, who wants to go on an adventure -"; + .@str1$ = "I want to go on an adventure but there are so many things I have to deal with. If I can't, then others can't either! "; + .@str2$ = "- Funfy, who wants to go on an adventure -"; switch(select("Hunt Kikimora:Hunt Miyabi Doll:Hunt Mi Gao:Hunt Headless Mule:Hunt Tamruan:Gather Festival Masks for the Festival")) { case 1: callsub L_Quest,10121,.@str1$+"Hunt 15 Kikimoras in Moscovia!",.@str2$; case 2: callsub L_Quest,10122,.@str1$+"Hunt 15 Miyabi Dolls in Amatsu!",.@str2$; @@ -146,28 +146,28 @@ moc_para01,44,38,3 script Mission [71 - 85] 4_BOARD3,{ //callsub L_Quest,<quest ID>{,"<description1>","<description2>"}; L_Quest: - set .@quest, getarg(0); + .@quest = getarg(0); switch(.@quest) { - case 10107: set .@name$,"Hunt Requiem"; set .@exp,15000; break; - case 10108: set .@name$,"Hunt Marduk"; set .@exp,15000; break; - case 10109: set .@name$,"Hunt Pasana"; set .@exp,15000; break; - case 10110: set .@name$,"Hunt Dark Frame"; set .@exp,20000; break; - case 10111: set .@name$,"Hunt Evil Druid"; set .@exp,20000; break; - case 10112: set .@name$,"Hunt Wraith"; set .@exp,20000; break; - case 10113: set .@name$,"Hunt Raydric Archer"; set .@exp,20000; break; - case 10114: set .@name$,"Hunt Grand Peco"; set .@exp,30000; break; - case 10115: set .@name$,"Hunt Sleeper"; set .@exp,30000; break; - case 10116: set .@name$,"Hunt Goat"; set .@exp,30000; break; - case 10117: set .@name$,"Hunt Harpy"; set .@exp,30000; break; - case 10118: set .@name$,"Hunt Clock"; set .@exp,25000; break; - case 10119: set .@name$,"Hunt Punk"; set .@exp,25000; break; - case 10120: set .@name$,"Hunt Rideword"; set .@exp,25000; break; - case 10121: set .@name$,"Hunt Kikimora"; set .@exp,30000; break; - case 10122: set .@name$,"Hunt Miyabi Doll"; set .@exp,30000; break; - case 10123: set .@name$,"Hunt Mi Gao"; set .@exp,30000; break; - case 5055: set .@name$,"Hunt Headless Mule"; set .@exp,30000; break; - case 5056: set .@name$,"Hunt Tamruan"; set .@exp,30000; break; - case 5057: set .@name$,"Gather Festival Masks for the Festival"; set .@exp,30000; break; + case 10107: .@name$ = "Hunt Requiem"; .@exp = 15000; break; + case 10108: .@name$ = "Hunt Marduk"; .@exp = 15000; break; + case 10109: .@name$ = "Hunt Pasana"; .@exp = 15000; break; + case 10110: .@name$ = "Hunt Dark Frame"; .@exp = 20000; break; + case 10111: .@name$ = "Hunt Evil Druid"; .@exp = 20000; break; + case 10112: .@name$ = "Hunt Wraith"; .@exp = 20000; break; + case 10113: .@name$ = "Hunt Raydric Archer"; .@exp = 20000; break; + case 10114: .@name$ = "Hunt Grand Peco"; .@exp = 30000; break; + case 10115: .@name$ = "Hunt Sleeper"; .@exp = 30000; break; + case 10116: .@name$ = "Hunt Goat"; .@exp = 30000; break; + case 10117: .@name$ = "Hunt Harpy"; .@exp = 30000; break; + case 10118: .@name$ = "Hunt Clock"; .@exp = 25000; break; + case 10119: .@name$ = "Hunt Punk"; .@exp = 25000; break; + case 10120: .@name$ = "Hunt Rideword"; .@exp = 25000; break; + case 10121: .@name$ = "Hunt Kikimora"; .@exp = 30000; break; + case 10122: .@name$ = "Hunt Miyabi Doll"; .@exp = 30000; break; + case 10123: .@name$ = "Hunt Mi Gao"; .@exp = 30000; break; + case 5055: .@name$ = "Hunt Headless Mule"; .@exp = 30000; break; + case 5056: .@name$ = "Hunt Tamruan"; .@exp = 30000; break; + case 5057: .@name$ = "Gather Festival Masks for the Festival"; .@exp = 30000; break; } if (getargcount() == 1) { mes "'"+.@name$+"' completed. Do you want to turn it in and receive your reward?"; @@ -184,13 +184,14 @@ L_Quest: } else { if (.@quest == 5057) { // Quest 5057 is the only collection quest, so separate conditions are unnecessary. - if (checkquest(5057) == -1) - set .@hunting,-1; + if (!questprogress(5057)) + .@hunting = 0; else if (countitem(7187) >= 30) - set .@hunting,2; - } else - set .@hunting, checkquest(.@quest,HUNTING); - if (.@hunting == 0 || .@hunting == 1) { + .@hunting = 2; + } else { + .@hunting = questprogress(.@quest,HUNTING); + } + if (.@hunting == 1) { mes getarg(1); mes getarg(2); next; |