diff options
Diffstat (limited to 'npc/re/quests/quests_juperos.txt')
| -rw-r--r-- | npc/re/quests/quests_juperos.txt | 5116 |
1 files changed, 5116 insertions, 0 deletions
diff --git a/npc/re/quests/quests_juperos.txt b/npc/re/quests/quests_juperos.txt new file mode 100644 index 000000000..9a4675eef --- /dev/null +++ b/npc/re/quests/quests_juperos.txt @@ -0,0 +1,5116 @@ +//===== rAthena Script ======================================= +//= Juperos Dungeon Quests +//===== By =================================================== +//= MasterOfMuppets +//===== Version ============================================== +//= 1.7 +//===== Compatible With ====================================== +//= rAthena SVN +//===== Description ========================================== +//= [Partial Aegis COnversion] +//= Juperos Ruins related Quests/Events +//===== Comments ============================================= +//= 1.0 First version, partly implemented [MasterOfMuppets] +//= 1.1 Added official Juperos Ruins History Quest. Thanks +//= to Keplerk for his first version. [SinSloth] +//= 1.2 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf] +//= 1.3 Removed semi-official core access NPCs, replaced with [L0ne_W0lf] +//= event-driven story progressive NPCs. Optimization needed. +//= 1.3a Adjusted the elevafor timer. (132000 -> 142000) [L0ne_W0lf] +//= 1.3b Minor updates to juperos elevator NPCs. [L0ne_W0lf] +//= 1.4 Fixed Elevator not working after failing once. [L0ne_W0lf] +//= 1.5 Lots of Fixes, missing stopnpctimers, cleanup. [Zephyrus] +//= 1.6 Added missing close in "Popular Feats" [L0ne_W0lf] +//= 1.7 Replaced effect numerics with constants. [L0ne_W0lf] +//============================================================ + +yuno_in04,190,125,4 script Scholar 700,{ + + switch(yuno_hist) + { + case 0: + mes "[Scholar]"; + mes "...Mm? "; + mes "...Yes?"; + next; + mes "[Scholar]"; + mes "..."; + mes "......"; + mes "May I help you?"; + next; + switch( select( "Oh! N-Nothing!","Excuse me..." ) ) + { + case 1: + mes "[Scholar]"; + mes "..."; + mes "......"; + mes "Hmm?"; + mes "..........."; + mes "Hmpf."; + close; + + case 2: + mes "[Scholar]"; + mes "..."; + mes "......"; + mes "Hmm?"; + mes "..........."; + mes "Hmmm..."; + next; + mes "[Scholar]"; + mes "You must be lost."; + mes "This is the scholarly"; + mes "research section, you know,"; + mes "content you couldn't possibly"; + mes "fathom. The popular novels and picture books are someplace else."; + next; + mes "["+strcharinfo(0)+"]"; + mes "..."; + mes "......"; + next; + mes "[Scholar]"; + mes "Why don't you rummage"; + mes "through the bookshelves?"; + mes "I'm sure you can find some"; + mes "book there that can hold your"; + mes "interest. Well, depending on"; + mes "your actual attention span..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "(What's her damage?!"; + mes "Does she have an attitude problem or is she just stuck-up?)"; + close; + } + + case 1: + mes "[Scholar]"; + mes "...Mm? "; + mes "...Yes?"; + next; + mes "[Scholar]"; + mes "..."; + mes "......"; + mes "May I help you?"; + next; + switch( select( "Oh! N-Nothing!","By any chance..." ) ) + { + case 1: + mes "[Scholar]"; + mes "..."; + mes "......"; + mes "Hmm?"; + mes "..........."; + mes "Hmpf."; + close; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "By any chance..."; + mes "Are you conducting"; + mes "research about Juperos?"; + next; + mes "[Scholar]"; + mes "Why yes, that is"; + mes "correct. But how did"; + mes "you come to learn about"; + mes "my current research project?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Oh, I managed to read"; + mes "a thesis paper entitled,"; + mes "''The Fall of Juperos,'' and"; + mes "I just thought that the writing"; + mes "style and your personality"; + mes "seem to match for some reason."; + next; + mes "[Scholar]"; + mes "Oh...! You read my"; + mes "thesis? So what did"; + mes "you think about it?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "So far, it's alright, but"; + mes "quite frankly it's incomplete."; + mes "I mean, you don't have much in"; + mes "in the way of conjecture, much"; + mes "less any evidence to back up"; + mes "any of your statements."; + next; + mes "[Scholar]"; + mes "...."; + mes "Let me apologize for"; + mes "being rude to you earlier."; + mes "As you know, my name is"; + mes "Fayruz Khrhiyha. May I ask"; + mes "what your name might be?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm "+strcharinfo(0)+","; + mes "a brave adventurer in the"; + mes "service of his royal majesty,"; + mes "the wise and benevolent"; + mes "King Tristram III."; + set yuno_hist,2; + next; + mes "[Fayruz]"; + mes "Well, "+strcharinfo(0)+","; + mes "I understand that my thesis"; + mes "still requires more evidence."; + mes "But I'd need some ancient"; + mes "documents from Juperos"; + mes "to complete my research..."; + next; + mes "[Fayruz]"; + mes "If you happen to travel"; + mes "through Juperos and find"; + mes "any ancient documents, would"; + mes "you bring them to me? Having"; + mes "those would help my research"; + mes "efforts immensely. Thank you..."; + close; + } + + case 2: + if((countitem(7352)) || (countitem(7353)) || (countitem(7354)) || (countitem(7355))) + { + mes "[Fayruz]"; + mes "Ah, it's you! Listen,"; + mes "I just found a record of"; + mes "an adventurer who explored"; + mes "Juperos. There's mention"; + mes "of a stone statue here that"; + mes "just might be noteworthy..."; + next; + mes "[Fayruz]"; + mes "If you happen to find"; + mes "yourself in Juperos,"; + mes "would you find the stone"; + mes "statue at the entrance of"; + mes "its dungeon and read the"; + mes "engraved message for me?"; + next; + mes "[Fayruz]"; + mes "According to my notes,"; + mes "there's a spell that will"; + mes "make its reader memorize"; + mes "its message, even if they don't"; + mes "know the language. So come"; + mes "to me if you manage to read it."; + close; + } + mes "[Fayruz]"; + mes "If you ever chance to"; + mes "travel through Juperos,"; + mes "would you let me know if you"; + mes "find anything that might help"; + mes "my research there? I'd be"; + mes "very grateful for your help."; + close; + + case 3: + mes "[Fayruz]"; + mes "Well, you look"; + mes "quite pleased."; + mes "May I asked what"; + mes "happened to put that"; + mes "expression on your face?"; + next; + switch( select( "I found something in Juperos.","Nothing much." ) ) + { + + case 1: + mes "[" +strcharinfo(0)+"]"; + mes "I went to Juperos like"; + mes "you asked and found that"; + mes "stone statue you were talking"; + mes "about. Just like you said, there was an engraved message on it."; + next; + mes "[Fayruz]"; + mes "Fascinating!"; + mes "So is it really enchanted"; + mes "so anyone can memorize it?"; + mes "Wh-what does the message say?"; + next; + mes "^3355FFYou recite the message"; + mes "engraved on the stone"; + mes "statue, unable to interpret"; + mes "the sounds you're uttering,"; + mes "but weirdly enough, you can"; + mes "easily recall them from memory.^000000"; + next; + mes "[Fayruz]"; + mes "Ah, I see! Wait,"; + mes "give me a moment to"; + mes "properly translate this..."; + next; + mes "..."; + mes "......"; + mes "........."; + next; + mes "[Fayruz]"; + mes "It means, ''Do you wish to"; + mes "see the end of the madness?"; + mes "He is waiting where the three"; + mes "columns were destroyed, where"; + mes "two hundred illusions wander.''"; + next; + mes "[Fayruz]"; + mes "''You will see him, the one"; + mes "who was vain and extravagant,"; + mes "with your own eyes at the place where the light passes through."; + set yuno_hist,4; + next; + mes "[Fayruz]"; + mes "Ah, usually, descriptions"; + mes "of the ''vain and extravagant"; + mes "one'' refer to the mad scientist rumored to have lived in that"; + mes "ancient era. But if this is true, I may have to rework my thesis..."; + next; + mes "[Fayruz]"; + mes "I have another favor to"; + mes "ask of you. If you find any"; + mes "object of historical significance in Juperos, would you bring it to"; + mes "me? I'll reward you, of course."; + next; + mes "[Fayruz]"; + mes "It would be most helpful"; + mes "if you could manage to find"; + mes "documents that existed from that era. Fortunately, back then,"; + mes "they made all their records on material more durable than paper."; + close; + + case 2: + mes "[Fayruz]"; + mes "Nothing, huh?"; + mes "My life is also fairly"; + mes "uneventful, but somehow,"; + mes "I'm don't think I'm content."; + close; + } + + case 4: + mes "[Fayruz]"; + mes "Oh hello, "+strcharinfo(0)+"."; + mes "So what brings you to"; + mes "the Juno Library today?"; + next; + switch( select ( "Nice weather today, isn't it?","I found something in Juperos.","Nothing much.") ) + { + case 1: + mes "[Fayruz]"; + mes "Well, I wouldn't know."; + mes "It's late whenever I go"; + mes "out, so I always happen to"; + mes "miss the sunlight. I guess"; + mes "I really miss nice weather"; + mes "sometimes, you know?"; + close; + + case 2: + if((countitem(7352)) || (countitem(7353)) || (countitem(7354)) || (countitem(7355))) + { + mes "[Fayruz]"; + mes "Oh, really?!"; + mes "That's great news!"; + mes "W-what did you find?"; + next; + mes "^3355FFIn her excitement,"; + mes "Fayruz begins to"; + mes "rummage through your"; + mes "things before you get"; + mes "the chance to answer her.^000000"; + next; + mes "[Fayruz]"; + mes "Oh, this must be it!"; + mes "Would you mind if I keep"; + mes "this Transparent Plate for"; + mes "my research? In return, I'll"; + mes "tell you some tales about"; + mes "Juperos that I've learned."; + next; + switch( select ("Please, be my guest.","No way, you can't have it.") ) + { + case 1: + if(countitem(7352)) callfunc "Func_JupHist",7352,1; + else if(countitem(7353)) callfunc "Func_JupHist",7353,2; + else if(countitem(7354)) callfunc "Func_JupHist",7354,4; + else if(countitem(7355)) callfunc "Func_JupHist",7352,8; + + + case 2: + mes "[Fayruz]"; + mes "Mm? Are you serious?"; + mes "This object is very valuable"; + mes "to a researcher like me, but"; + mes "I have no idea what use it"; + mes "would be for an adventurer."; + mes "Well, you have your reasons..."; + close; + } + } + mes "[Fayruz]"; + mes "Oh, really?!"; + mes "That's great news!"; + mes "W-what did you find?"; + next; + mes "^3355FFIn her excitement,"; + mes "Fayruz begins to"; + mes "rummage through your"; + mes "things before you get"; + mes "the chance to answer her.^000000"; + next; + mes "[Fayruz]"; + mes "Oh. There isn't anything"; + mes "here that would help in my"; + mes "research, but thank you anyway."; + mes "If you find anything else while"; + mes "you're in Juperos, please come back and show it to me, alright?"; + close; + + case 3: + mes "[Fayruz]"; + mes "Ah, I see. Well, while"; + mes "you're here, why don't you"; + mes "read something? There are"; + mes "many books that cover some"; + mes "interesting topics, like the"; + mes "Schwaltzvalt economy..."; + next; + mes "[Fayruz]"; + mes "Oh, in any case, please"; + mes "don't forget the favor I asked"; + mes "of you. If you find anything"; + mes "in Juperos that's historically"; + mes "significant, I'd appreciate it"; + mes "if you bring it right away."; + close; + + } + + case 5: + mes "[Fayruz]"; + mes "Oh, "+strcharinfo(0)+"!"; + mes "Have you come back with"; + mes "something from Juperos?"; + mes "I've been hoping you'd come"; + mes "back with something that'd"; + mes "help me in my research!"; + next; + switch( select( "Take a look at this.","Oh, I'm sorry...") ) + { + case 1: + switch(jupe_hist) + { + case 1: + callfunc "Func_JupHist",7353,7354,7355,7352; + + case 2: + callfunc "Func_JupHist",7352,7354,7355,7353; + + case 4: + callfunc "Func_JupHist",7352,7353,7355,7354; + + case 8: + callfunc "Func_JupHist",7352,7353,7354,7355; + } + + case 2: + mes "[Fayruz]"; + mes "Ah, I see. Well, while"; + mes "you're here, why don't you"; + mes "read something? There are"; + mes "many books that cover some"; + mes "interesting topics, like..."; + mes "like... Self-Honesty (?)."; + next; + mes "[Fayruz]"; + mes "Oh, in any case, please"; + mes "don't forget the favor I asked"; + mes "of you. If you find anything"; + mes "in Juperos that's historically"; + mes "significant, I'd appreciate it"; + mes "if you bring it right away."; + close; + } + + case 6: + mes "[Fayruz]"; + mes "Oh, "+strcharinfo(0)+"!"; + mes "The Transparent Plate"; + mes "that you brought for me"; + mes "last time is really helping me"; + mes "in my research. If you get the"; + mes "chance, please bring me more!"; + set yuno_hist,7; + next; + mes "[Fayruz]"; + mes "This new data is adding"; + mes "a lot more credibility to my"; + mes "thesis. Oh, I'll be with you"; + mes "in a moment, let me finish"; + mes "translating this one last"; + mes "passage really quickly..."; + close; + + case 7: + mes "[Fayruz]"; + mes "Hello, "+strcharinfo(0)+"~"; + mes "Oh, were you able to look"; + mes "in Juperos for anything that"; + mes "might help me in my research?"; + next; + switch( select( "Yeah, take a look at this.","No, I'm sorry...") ) + { + case 1: + switch(jupe_hist) + { + case 3: + callfunc "Func_JupHist",7354,7355,7352,7353; + + case 5: + callfunc "Func_JupHist",7353,7355,7352,7354; + + case 6: + callfunc "Func_JupHist",7352,7355,7353,7354; + + case 9: + callfunc "Func_JupHist",7353,7354,7352,7355; + + case 10: + callfunc "Func_JupHist",7352,7354,7353,7355; + + case 12: + callfunc "Func_JupHist",7352,7353,7354,7355; + } + + case 2: + mes "[Fayruz]"; + mes "Oh, that's fine."; + mes "Besides, I don't really"; + mes "have a deadline to complete"; + mes "this research project. Still,"; + mes "I just want you to know that"; + mes "I really appreciate your help."; + close; + } + + case 8: + mes "[Fayruz]"; + mes ""+strcharinfo(0)+"..."; + mes "I'm having great difficulty in"; + mes "translating that Transparent"; + mes "Plate you brought for me that"; + mes "last time. I'm so frustrated..."; + next; + mes "[Fayruz]"; + mes "Wait a minute..."; + mes "This here means..."; + mes "Alright. Okay. Yes."; + mes "Yes! Of course, how"; + mes "could I not see it before!"; + set yuno_hist,9; + next; + mes "[Fayruz]"; + mes "I'll be with you"; + mes "in just a second!"; + mes "I think I just made"; + mes "a real through...!"; + next; + + case 9: + mes "[Fayruz]"; + mes "Ah, I've been"; + mes "expecting you, "+strcharinfo(0)+"."; + mes "So did you have been to Juperos again? I'm really hoping that you"; + mes "were able to find something new that would help in my research..."; + next; + switch( select("Actually, I did find this...","I'm sorry, I haven't...") ) + { + case 1: + switch(jupe_hist) + { + case 7: + callfunc "Func_JupHist",7355,7352,7353,7354; + + case 11: + callfunc "Func_JupHist",7354,7352,7353,7355; + + case 13: + callfunc "Func_JupHist",7353,7352,7354,7355; + + case 14: + callfunc "Func_JupHist",7352,7353,7354,7355; + } + + case 2: + mes "[Fayruz]"; + mes "Ah, I see. Well, while"; + mes "you're here, why don't you"; + mes "read something? There are"; + mes "many books that cover some"; + mes "interesting topics, like"; + mes "modern adventure history."; + next; + mes "[Fayruz]"; + mes "Oh, in any case, please"; + mes "don't forget the favor I asked"; + mes "of you. If you find anything"; + mes "in Juperos that's historically"; + mes "significant, I'd appreciate it"; + mes "if you bring it right away."; + close; + } + + case 10: + mes "[Fayruz]"; + mes "Oh hello, "+strcharinfo(0)+"..."; + mes "So what exactly brings you"; + mes "to the Juno Library this time?"; + next; + switch( select("I found another Transparent Plate.","Just visiting, really.") ) + { + case 1: + if((countitem(7352)) || (countitem(7353)) || (countitem(7354)) || (countitem(7355))) + { + mes "[Fayruz]"; + mes "Hmm, well, we've made as"; + mes "much headway as we can"; + mes "with the Transparent Plates"; + mes "you've already given me, but"; + mes "it can't hurt to have too much"; + mes "evidence to back my theories."; + next; + mes "[Fayruz]"; + mes "I really appreciate"; + mes "your continuing efforts"; + mes "to help me. Please, would"; + mes "you take this as my way"; + mes "saying ''Thanks?'' You've been"; + mes "great, "+strcharinfo(0)+"..."; + if(countitem(7352)) delitem 7352,1; + else if(countitem(7353)) delitem 7353,1; + else if(countitem(7354)) delitem 7354,1; + else delitem 7355,1; + getitem 644,1; + close; + } + mes "[Fayruz]"; + mes "Mmm...?"; + mes "It doesn't look like"; + mes "you brought another"; + mes "Transparent Plate."; + mes "Are you sure that you"; + mes "didn't misplace it?"; + close; + + case 2: + mes "[Fayruz]"; + mes "Ah, I see. Well,"; + mes "thanks to your help,"; + mes "I've made a great deal"; + mes "of progress on my thesis."; + mes "I really appreciate what you"; + mes "have done for me, adventurer."; + close; + } + } + + +} + +function script Func_JupHist { + + switch(yuno_hist) + { + case 4: + mes "[Fayruz]"; + mes "Thank you so much,"; + mes "you don't know what"; + mes "this means to me! Okay,"; + mes "please relax and take a"; + mes "seat. Close your eyes while"; + mes "I tell you this ancient story."; + next; + mes "^3355FFFayruz begins to"; + mes "relate an ancient tale"; + mes "about Juperos that seems"; + mes "typical for a classic story, but her way of storytelling subtly"; + mes "draws you into a vicarious, yet extremely vivid experience."; + next; + mes "^3355FFYou feel the protagonist's"; + mes "glories and tragedies as if"; + mes "you were actually there with"; + mes "the hero on his journeys. The"; + mes "tale eventually comes to an end"; + mes "and you awaken from the trance,"; + mes "gently brought back to reality.^000000"; + delitem getarg(0),1; + set yuno_hist,5; + set jupe_hist,getarg(1); + getexp 10000,0; + next; + mes "[Fayruz]"; + mes "Everyone can relate"; + mes "to these old, classic"; + mes "stories. I hope this tale had"; + mes "as meaning for you as it did"; + mes "for me when I first heard it."; + next; + mes "[Fayruz]"; + mes "If you can find me"; + mes "another artifact from"; + mes "Juperos, I'll share another"; + mes "tale like that with you. Now"; + mes "how does that sound? Okay"; + mes "then, I'll see you, adventurer~"; + close; + + case 5: + if((countitem(getarg(0))) || (countitem(getarg(1))) || (countitem(getarg(2)))) + { + mes "[Fayruz]"; + mes "Oh, that's unexpected."; + mes "This Transparent Plate"; + mes "seems to have been made"; + mes "in a different era than the"; + mes "one you gave me earlier."; + mes "How intriguing..."; + next; + mes "[Fayruz]"; + mes "*Sigh* I really wish"; + mes "that I could explore"; + mes "Juperos on my own, but"; + mes "I'm just not strong enough."; + mes "In a way, I'm quite jealous of you. But it can't be helped..."; + next; + mes "[Fayruz]"; + mes "You know, that reminds"; + mes "me of this great story of"; + mes "a tragic hero that I'd like to"; + mes "share with you. Let your"; + mes "mind wander as I relate this ageless, yet bittersweet tale..."; + next; + mes "^3355FFFayruz tells you a story"; + mes "with a bright beginning, full"; + mes "of hope that fills you with the"; + mes "bliss of the heavens, but then"; + mes "suddenly plummets you into all the despair and torment of hell.^000000"; + next; + mes "^3355FFThe story finally"; + mes "reaches its ending"; + mes "and you're surprised"; + mes "to find yourself sitting"; + mes "in the Juno Library.^000000"; + next; + mes "[Fayruz]"; + mes "I know it's a very"; + mes "depressing story, but"; + mes "I hope you enjoyed it."; + mes "I think you'd agree that"; + mes "it contains a truth about"; + mes "mankind that can't be ignored."; + if(countitem(getarg(0))) + { + delitem getarg(0),1; + if(getarg(0) == 7352) set jupe_hist,jupe_hist +1; + else set jupe_hist,jupe_hist +2; + } + else if(countitem(getarg(1))) + { + delitem getarg(1),1; + if(getarg(1) == 7353) set jupe_hist,jupe_hist +2; + else set jupe_hist,jupe_hist +4; + } + else + { + delitem getarg(2),1; + if(getarg(2) == 7354) set jupe_hist,jupe_hist +4; + else set jupe_hist,jupe_hist +8; + } + set yuno_hist,6; + getexp 10000,0; + next; + mes "[Fayruz]"; + mes "By now I'm sure you've"; + mes "figured that these classic"; + mes "tales are like condensed"; + mes "experiences, refined and"; + mes "immutable truths that we"; + mes "can see in our own reality."; + next; + mes "[Fayruz]"; + mes "If you find more of"; + mes "these Transparent"; + mes "Plates in Juperos, I'd be"; + mes "very happy to share another"; + mes "story with you, "+strcharinfo(0)+"."; + close; + } + else if(countitem(getarg(3))) + { + mes "[Fayruz]"; + mes "Oh, this one seems"; + mes "to have been created"; + mes "in a similar era as the"; + mes "one you gave me earlier."; + mes "I'm not sure how much new"; + mes "information this may provide..."; + next; + mes "[Fayruz]"; + mes "Still, I'm sure this will"; + mes "helpful in my research. I just"; + mes "won't be as making progress"; + mes "as quickly as I had projected."; + mes "Please, I'd like you to take this as a token of my gratitude."; + delitem getarg(3),1; + getitem 644,1; + next; + mes "[Fayruz]"; + mes "Now if you'll excuse"; + mes "me, I need to go back"; + mes "to compiling my research..."; + mes "Thank you so much for"; + mes "your help, "+strcharinfo(0)+"."; + close; + } + else + { + mes "[Fayruz]"; + mes "Oh. There isn't anything"; + mes "here that would help in my"; + mes "research, but thank you anyway."; + mes "If you find anything else while"; + mes "you're in Juperos, please come back and show it to me, alright?"; + close; + } + + case 7: + if((countitem(getarg(0))) || (countitem(getarg(1)))) + { + mes "[Fayruz]"; + mes "Is this another"; + mes "Transparent Plate?"; + mes "Yes, it's quite different"; + mes "than the last one you"; + mes "brought over to me..."; + mes "This is so exciting!"; + next; + mes "[Fayruz]"; + mes "Oh. You must be thinking"; + mes "that I'm a complete academia"; + mes "addict. Well, my life might be"; + mes "a little uneventful, but there"; + mes "are other things I think about!"; + mes "Like, well... It's weird but..."; + next; + mes "[Fayruz]"; + mes "You see, there's this"; + mes "guy that I like. I'm not sure"; + mes "where he might be now, but"; + mes "his name is Nadim Amal. He's"; + mes "my friend's brother who I first"; + mes "met 10 years ago. ^333333*Sigh...*^000000"; + next; + mes "[Fayruz]"; + mes "Just recently, I saw"; + mes "him with his sister, my"; + mes "friend from Morroc. It's"; + mes "weird to think that I'd have"; + mes "these feelings for him after"; + mes "all this time, isn't it? Oh...!"; + next; + mes "[Fayruz]"; + mes "I really should repay"; + mes "you for this Transparent"; + mes "Plate. Why don't I tell you"; + mes "the scariest story that I know?"; + next; + mes "^3355FFFayruz tells you a"; + mes "creepy horror story that"; + mes "makes you shiver with fear."; + mes "You've heard other ghost"; + mes "stories, but you've never been"; + mes "so deeply immersed in one before.^000000"; + next; + mes "It is only when the"; + mes "story ends and you return"; + mes "to your senses that you notice that you're soaked in cold sweat.^000000"; + next; + mes "[Fayruz]"; + mes "It may be a natural"; + mes "response, but all people"; + mes "fear the unknown in one way"; + mes "or another. Scary stories are"; + mes "appealing because we actually"; + mes "like the strange and grotesque."; + if(countitem(getarg(0))) + { + delitem getarg(0),1; + if(getarg(0) == 7352) set jupe_hist,jupe_hist +1; + else if(getarg(0) == 7353) set jupe_hist,jupe_hist +2; + else set jupe_hist,jupe_hist +4; + } + else if(countitem(getarg(1))) + { + delitem getarg(1),1; + if(getarg(1) == 7353) set jupe_hist,jupe_hist +2; + else if(getarg(1) == 7354) set jupe_hist,jupe_hist +4; + else set jupe_hist,jupe_hist +8; + } + set yuno_hist,8; + getexp 10000,0; + next; + mes "[Fayruz]"; + mes "Well... That's just my"; + mes "opinion. Anyway, if you"; + mes "find anything else in Juperos"; + mes "that may help in my research,"; + mes "please come back and show it"; + mes "to me, alright? See you later~"; + close; + } + else if((countitem(getarg(2))) || (countitem(getarg(3)))) + { + mes "[Fayruz]"; + mes "Oh, this one seems"; + mes "to have been created"; + mes "in a similar era as the"; + mes "one you gave me earlier."; + mes "I'm not sure how much new"; + mes "information this may provide..."; + next; + mes "[Fayruz]"; + mes "Still, I'm sure this will"; + mes "helpful in my research. I just"; + mes "won't be as making progress"; + mes "as quickly as I had projected."; + mes "Please, I'd like you to take this as a token of my gratitude."; + next; + mes "[Fayruz]"; + mes "Now if you'll excuse"; + mes "me, I need to go back"; + mes "to compiling my research..."; + mes "Thank you so much for"; + mes "your help, "+strcharinfo(0)+"."; + if(countitem(getarg(2))) delitem getarg(2),1; + else if(countitem(getarg(3))) delitem getarg(3),1; + getitem 644,1; + close; + } + else + { + mes "[Fayruz]"; + mes "Oh. There isn't anything"; + mes "here that would help in my"; + mes "research, but thank you anyway."; + mes "If you find anything else while"; + mes "you're in Juperos, please come back and show it to me, alright?"; + close; + } + + case 9: + if(countitem(getarg(0))) + { + mes "[Fayruz]"; + mes "Oooh...! This one is"; + mes "much different than the"; + mes "other ones you gave me"; + mes "before. This should provide"; + mes "a wealth of brand new insights"; + mes "into the Juperos civilization!"; + next; + mes "[Fayruz]"; + mes "All the Transparent"; + mes "Plates you've given me"; + mes "should contain more than"; + mes "enough data for me to fully"; + mes "complete my research thesis."; + mes "Once again, thank you so much~"; + next; + mes "[Fayruz]"; + mes "Still, that doesn't mean that"; + mes "I will stop collecting data for"; + mes "my research. Anyway, I have one last story to tell you, about"; + mes "a man of pure heart chosen by the gods to serve and protect mankind."; + next; + mes "[Fayruz]"; + mes "For this purpose he was given"; + mes "gaudy armor which contained"; + mes "amazing powers, as well as a"; + mes "book detailing the instructions"; + mes "for its use. However, he promptly"; + mes "lost these instructions..."; + next; + mes "^3355FFThe story about the"; + mes "greatest Juperosian hero"; + mes "that Fayruz tells you is very"; + mes "humorous at first, but then it"; + mes "covers the entire spectrum"; + mes "of emotion and humanity..."; + next; + mes "^3355FFThe story ends and you"; + mes "are left with a swelling"; + mes "feeling of indefatigable"; + mes "hope and inspiration..."; + mes "You can make it if you try!^000000"; + if(getarg(0) == 7352) set jupe_hist,jupe_hist+1; + else if(getarg(0) == 7353) set jupe_hist,jupe_hist+2; + else if(getarg(0) == 7354) set jupe_hist,jupe_hist+4; + else set jupe_hist,jupe_hist+8; + set yuno_hist,10; + delitem getarg(0),1; + getexp 10000,0; + next; + mes "[Fayruz]"; + mes "Well, that is the"; + mes "last and the best story"; + mes "that I have to share"; + mes "with you. Perhaps next"; + mes "time, I'll fill you in on my"; + mes "research progress~"; + close; + } + else if((countitem(getarg(1))) || (countitem(getarg(2))) || (countitem(getarg(3)))) + { + mes "[Fayruz]"; + mes "Hmm..."; + mes "This one seems to be created in a similar time"; + mes "as the previous one."; + next; + mes "[Fayruz]"; + mes "Don't you worry."; + mes "This will help my research of course,"; + mes "although I do not think this will"; + mes "help me in advancing my research"; + mes "with a great speed unlike this other one."; + next; + mes "[Fayruz]"; + mes "Please take this as a token of my gratitude."; + next; + mes "[Fayruz]"; + mes "Now, excuse me. I need to go back to my research."; + if(countitem(getarg(1))) delitem getarg(1),1; + else if(countitem(getarg(2))) delitem getarg(2),1; + else delitem getarg(3),1; + getitem 644,1; + close; + } + else + { + mes "[Fayruz]"; + mes "Oh. There isn't anything"; + mes "here that would help in my"; + mes "research, but thank you anyway."; + mes "If you find anything else while"; + mes "you're in Juperos, please come back and show it to me, alright?"; + close; + } + } +} + +yuno_in04,186,125,4 script Bundle of Files 111,{ + + mes "^8B6914*Thesis: The Fall of Juperos*"; + mes "By Fayruz Khrhiyha"; + mes "Sage Castle Researcher^000000"; + next; + switch( select("Table of Contents.","Leave it alone.") ) + { + case 1: + if(yuno_hist > 4) + { + mes "^8B6914 1. Preface"; + mes " 2. Juperos Background"; + mes " 3. Theory Behind Its Fall^000000"; + next; + switch( select("Preface","Juperos Background","Theory Behind Its Fall","Leave it alone.") ) + { + case 1: + mes "^8B6914Scholars are certain"; + mes "that the Juperos civilization"; + mes "used to be located above the"; + mes "ground, but it is now buried"; + mes "beneath the El Mes Plateau."; + mes "The reasons for the city's"; + if(yuno_hist < 9) + { + mes "ruin are still nebulous...^000000"; + next; + mes "^8B6914There is much speculation"; + mes "about the reasons for Jupero's"; + mes "downfall, but any documentation"; + mes "from that time period has been"; + mes "difficult to find. As for now, any evidence we have regarding"; + mes "Juperos is inconclusive.^000000"; + next; + mes "^8B6914In spite of this lack"; + mes "of empirical or concrete"; + mes "data on the civilization of"; + mes "Juperos, our modern world"; + mes "may be able to learn much"; + mes "from that ancient city's ruins."; + mes "..................^000000"; + if(yuno_hist < 7) + { + next; + mes "["+strcharinfo(0)+"]"; + mes "Hmmm..."; + mes "A whole chapter"; + mes "dedicated to saying,"; + mes "''We know absolutely"; + mes "nothing about something.''"; + mes "I should write a book~"; + } + close; + } + mes "ruin are still in debate...^000000"; + next; + mes "^8B6914However, new findings"; + mes "regarding the history"; + mes "of Juperos have allowed"; + mes "us to make a few conclusions.^000000"; + close; + + case 2: + if(yuno_hist < 9) + { + mes "^8B6914..."; + mes "......"; + mes "..........^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "This is all just idle"; + mes "conjecture! This paper"; + mes "isn't developed enough"; + mes "yet to be a real thesis..."; + close; + } + else if(yuno_hist == 9) + { + mes "^8B6914Juperos was built over"; + mes "a thousand years ago in"; + mes "an era of peace just after"; + mes "a major war. Contrary to"; + mes "popular belief, there isn't any"; + mes "evidence proving that Juno may"; + mes "have descended from Juperos.^000000"; + next; + mes "^8B6914In fact, there is a"; + mes "strong possibility that"; + mes "another war, between Juno"; + mes "and Juperos, resulted in Juno's"; + mes "independence from Juperos and"; + mes "the destruction of any existing"; + mes "documentation from that era.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Yes... Of course!"; + mes "It all makes sense now!"; + close; + } + mes "^8B6914Juperos was built over"; + mes "a thousand years ago in"; + mes "an era of peace just after"; + mes "a major war. There is now"; + mes "direct evidence linking Juno"; + mes "to Juperos proving that Juno"; + mes "was but a part of Juperos.^000000"; + next; + mes "^8B6914Just like Juno, Juperos"; + mes "was a society that prided"; + mes "itself on its advancement"; + mes "in the sciences which played"; + mes "a permeating role in civilized"; + mes "life. Science was reponsible for Juperos's rise and downfall."; + close; + + case 3: + if(yuno_hist < 10) + { + mes "^8B6914..."; + mes "......"; + mes "..........^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Huh. This writer keeps"; + mes "talking about theories,"; + mes "but the more I read, the"; + mes "less clear I am on what"; + mes "the theory actually is."; + mes "I don't think there is one..."; + emotion 4,1; + close; + } + mes "^8B6914What is most unsettling"; + mes "is recent evidence, including"; + mes "a first hand written account,"; + mes "regarding the role of one of"; + mes "Jupero's foremost scientists"; + mes "in that city's rise and fall."; + next; + mes "^8B6914If these writings are"; + mes "authentic, then what actually"; + mes "happened was that a scientific"; + mes "revolution occurred as a direct"; + mes "result of one scientist's effort to manipulate the energies of the"; + mes "artifact known as Ymir's heart."; + next; + mes "^8B6914This one man and Ymir's"; + mes "Heart are credited with"; + mes "the success and prosperity"; + mes "of the Jupero's civilization."; + mes "However, there are various accounts prior to Jupero's fall"; + mes "detailing his work with chimera...^000000"; + next; + mes "^8B6914This scientist, supposedly"; + mes "in his passion to benefit his"; + mes "people by finding a scientific"; + mes "method for immortality by using"; + mes "chimera for testing, was driven"; + mes "insane. He experimented on"; + mes "himself with disatrous results.^000000"; + next; + mes "^8B6914There was an error in the"; + mes "energy calibration of Ymir's"; + mes "Heart and the scientist was"; + mes "transformed into the monster"; + mes "we now know as Chimera. He"; + mes "and his test subjects were set"; + mes "loose into the city of Juperos.^000000"; + next; + mes "^8B6914These immortal Chimeras"; + mes "razed the entire city, killing"; + mes "countless people. Apparently,"; + mes "a team of scientists were able"; + mes "to salvage a fragment of Ymir's"; + mes "Heart, and use it to lauch part"; + mes "of Juperos into the sky.^000000"; + next; + mes "^8B6914That section of Juperos"; + mes "eventually developed into"; + mes "the city of Juno. Since the"; + mes "scientists who launched Juno into the sky all immediately died"; + mes "afterwards from an unknown cause, they left no documentation.^000000"; + next; + mes "^8B6914The Chimera, and the"; + mes "laboratory in which it"; + mes "was created, is rumored to"; + mes "remain beneath the ruins of"; + mes "the once great city of Juperos.^000000"; + close; + + case 4: + mes "["+strcharinfo(0)+"]"; + mes "Ugh... My head hurts"; + mes "too much from reading"; + mes "a book for smarty people."; + mes "I know! I'll play videogames!"; + close; + } + } + switch( select( "Preface","Close the file.") ) + { + case 1: + mes "^8B6914Scholars are certain"; + mes "that the Juperos civilization"; + mes "used to be located above the"; + mes "ground, but it is now buried"; + mes "beneath the El Mes Plateau."; + mes "The reasons for the city's"; + mes "ruin are still nebulous...^000000"; + next; + mes "^8B6914There is much speculation"; + mes "about the reasons for Jupero's"; + mes "downfall, but any documentation"; + mes "from that time period has been"; + mes "difficult to find. As for now, any evidence we have regarding"; + mes "Juperos is inconclusive.^000000"; + next; + mes "^8B6914In spite of this lack"; + mes "of empirical or concrete"; + mes "data on the civilization of"; + mes "Juperos, our modern world"; + mes "may be able to learn much"; + mes "from that ancient city's ruins."; + mes "..................^000000"; + if(!yuno_hist) set yuno_hist,1; + next; + mes "["+strcharinfo(0)+"]"; + mes "This..."; + mes "This is supposed to"; + mes "be a research thesis?"; + mes "There's barely any"; + mes "research in it..."; + close; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "Hmm..."; + mes "This isn't heavy"; + mes "enough to be a real"; + mes "academic work. It must"; + mes "not even be finished yet."; + close; + } + case 2: + if(yuno_hist < 5) + { + mes "["+strcharinfo(0)+"]"; + mes "Nah..."; + mes "I'm tired of reading."; + mes "Ironically enough."; + close; + } + else if(yuno_hist < 7) + { + mes "["+strcharinfo(0)+"]"; + mes "I don't feel like"; + mes "reading this. Not"; + mes "enough pictures..."; + close; + } + else if(yuno_hist < 9) + { + mes "["+strcharinfo(0)+"]"; + mes "It looks very sophisticated..."; + close; + } + else if(yuno_hist < 10) + { + mes "["+strcharinfo(0)+"]"; + mes "I know this book..."; + mes "But I don't feel like"; + mes "reading it right now."; + close; + } + else + { + mes "["+strcharinfo(0)+"]"; + mes "This thesis is"; + mes "looking pretty good~"; + mes "Of course, I did have"; + mes "a hand in making it..."; + close; + } + } +} + +yuno_in04,188,118,4 script Book#juperos 111,{ + + if(yuno_hist > 7) + { + mes "^8B6914*Self-Honesty*"; + mes "*'Benefits Fo' Life!'*"; + mes "By Stephen Oyoung"; + mes " "; + mes " "; + mes "Publisher:"; + mes "Wushu Publishing, Co.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "W-whoa!"; + mes "This book wasn't"; + mes "here before! It looks"; + mes "pretty interesting..."; + close; + } + mes "["+strcharinfo(0)+"]"; + mes "You know what?"; + mes "I think I'll just flip"; + mes "through some pages"; + mes "from a random book."; + mes "Hmmm, let's see..."; + next; + mes "^8B6914''Admiral, the Kylorians are"; + mes "still advancing!'' Commander"; + mes "McKenrick announced without"; + mes "his usual swagger. ''They're..."; + mes "They're not stopping!'' But"; + mes "Admiral Leh's eyes were a cold,"; + mes "unfeeling shade of sternness.^000000"; + next; + mes "^8B6914''Let the goddamned space"; + mes "aliens come,'' hissed Leh."; + mes "''We don't stand a chance"; + mes "without the Zenoi Sword"; + mes "to summon the power of"; + mes "GOD-POING. It's... It's"; + mes "all over. Damn it all...''^000000"; + next; + mes "^8B6914The doors burst open as"; + mes "Bucky flew into the room."; + mes "''The Zenoi Sword! The"; + mes "Zenoi Sword! Someone's"; + mes "found it!'' the boy yelled."; + mes "''Really?! We better hurry:"; + mes "Earth doesn't have much time!''^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "..."; + mes "......"; + mes "Whoa. I really"; + mes "should have read"; + mes "this masterpiece"; + mes "from the beginning..."; + close; +} + +// Bronze Statue - juperos_01 99 112 + +juperos_01,99,112,4 script Bronze Statue#1 844,{ + + if(yuno_hist > 3) + { + mes "^3355FF''Do you wish to see"; + mes "the end of the madness?"; + mes "He is waiting where the three"; + mes "columns were destroyed, where"; + mes "two hundred illusions wander.''^000000"; + close; + } + else if(yuno_hist == 3) + { + mes "["+strcharinfo(0)+"]"; + mes "I better go and"; + mes "see Fayruz in the"; + mes "Juno Library and tell"; + mes "her about the inscription."; + close; + } + else + { + mes "^3355FFThere's a peculiar"; + mes "engraving on the"; + mes "Bronze Statue's rod.^000000"; + next; + switch( select( "Investigate","Ignore it" ) ) + { + case 1 : + mes "^3355FFIt's an inscription that's"; + mes "written in an old language"; + mes "that you can't understand,"; + mes "but have no problem reading"; + mes "and making out the sounds"; + mes "for some weird reason.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "This is creepy!"; + mes "I know that I'm not"; + mes "supposed to be able"; + mes "to read this, but here"; + mes "I am. I know what sounds"; + mes "all of these letters make..."; + next; + if(yuno_hist == 2) + { + mes "["+strcharinfo(0)+"]"; + mes "Then again, Fayruz did"; + mes "say this was enchanted."; + mes "Okay, I guess I'll go back"; + mes "to the Juno Library and"; + mes "tell her what I found."; + set yuno_hist,3; + close; + } + mes "["+strcharinfo(0)+"]"; + mes "Huh. Only a scholar,"; + mes "maybe someone even in"; + mes "Juno, could make sense"; + mes "of what this stuff says."; + close; + + case 2 : + close; + } + } +} + +yuno_in04,169,109,1 script Ambitious Hollgrehenn 111,{ + + mes "*Hollgrehenn: The Ambition*"; + mes "By Aragham Caul*"; + mes ""; + mes ""; + mes ""; + mes ""; + mes "Publisher:"; + mes "Muha Books, Co."; + next; + mes "..."; + mes "He would stop at nothing"; + mes "to have the greatest weapon"; + mes "in the world in his possession."; + mes "He became a smith so that he"; + mes "could discern which weapons"; + mes "were the most powerful..."; + next; + mes "[" + strcharinfo(0) + "]"; + mes "That's strange..."; + mes "The next page"; + mes "has been torn out."; + close; +} + +yuno_in04,174,111,1 script Penniless Hollgrehenn 111,{ + + mes "^8B6914*Penniless Hollgrehenn*"; + mes " * Pennyless Hollgrehenn * "; + mes "By Hollgrehenn"; + mes " "; + mes " "; + mes "Publisher:"; + mes "Muha Books, Co.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "This book looks"; + mes "like a total piece of"; + mes "crap. I'd have more"; + mes "fun getting my teeth"; + mes "drilled by a blindfolded"; + mes "dentist. Or would I...?"; + close; +} + +yuno_in04,102,106,1 script Popular Feasts 111,{ + + mes "^8B6914*Popular Feasts*"; + mes "By Cabbage Pickle Community"; + mes " "; + mes " "; + mes " "; + mes "Publisher:"; + mes "Muha Books, Co.^000000"; + next; + switch( select( " 1. Fried Yoyo Tails"," 14. Poring Salad"," 252. Beak Soup" ) ) + { + case 1: + mes "^8B6914..."; + mes "If possible, try"; + mes "to use tails cut"; + mes "from live Yoyos."; + mes "Now, as for skinning...^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Um..."; + mes "Barf?"; + close; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "Hey, this page is gone!"; + mes "I guess Poring Salad is"; + mes "the most popular feast"; + mes "in this entire book."; + close; + + case 3: + mes "^8B6914..."; + mes "Fry the cut beaks"; + mes "using herbal oil until"; + mes "crisp. Then, pour the"; + mes "feathers into a blender...^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Hmm..."; + mes "Sounds a little"; + mes "too gourmet for my"; + mes "taste. And by ''gourmet,''"; + mes "I mean, ''totally gross.''"; + close; + } +} + +yuno_in04,111,108,1 script Hamerun, Rat Hunter 111,{ + + mes "["+strcharinfo(0)+"]"; + mes "I can't..."; + mes "reach it...!"; + close; +} + +yuno_in04,167,127,1 script Red Book 111,{ + + mes "^3355FFYou find a book"; + mes "with red binding.^000000"; + next; + switch( select( "Read.","Leave it alone." ) ) + { + case 1: + mes "^8B6914...^000000"; + next; + mes "^8B6914..."; + mes "......^000000"; + next; + mes "^8B6914..."; + mes "......"; + mes ".........^000000"; + next; + mes "^8B6914..."; + mes "......"; + mes "........."; + mes "............^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "This is..."; + mes "A compilation of"; + mes "Shakespeare in "; + mes "coloring book format?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Wait..."; + mes "Why would fans of"; + mes "Shakespeare even"; + mes "want a coloring book?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Hmm... Well..."; + mes "I suppose little kids who"; + mes "read Shakespeare would"; + mes "appreciate something like that."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Hold on..."; + mes "Do little kids who"; + mes "are able to read the"; + mes "works of Shakespeare"; + mes "even exist? I hope not..."; + close; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "What a strange"; + mes "and mysterious book."; + mes "I'll never know what's"; + mes "inside unless I read it!"; + mes "Come on! Doesn't the red"; + mes "binding mean something?"; + close; + } +} + +yuno_in04,121,109,1 script Scroll 111,{ + + mes "^3355FFYou've found an"; + mes "antiquated scroll"; + mes "that's collected a"; + mes "layer of fine dust.^000000"; + next; + switch( select( "Peruse","Leave it alone" ) ) + { + case 1: + mes "^8B6914Item Upgrade Introduction"; + mes " "; + mes " "; + mes " "; + mes "1. Item Upgrade Definition"; + mes " "; + mes "The key to success when"; + mes "upgrading items comes from"; + mes "only one place: Your ''Mind.''"; + mes " "; + mes " "; + mes " "; + mes "2. Power of a Positive Attitude"; + mes "Before trying to upgrade"; + mes "an item, plan out how high"; + mes "you want to upgrade and how"; + mes "much you'll spend beforehand."; + mes "But like all ladies, Lady Luck"; + mes "smiles when you fully splurge.^000000"; + mes " "; + mes " "; + next; + mes "["+strcharinfo(0)+"]"; + mes "Wait, wait..."; + mes "This thing IS old."; + mes "I mean, it's obviously"; + mes "written from a patriarchal"; + mes "standpoint that promotes"; + mes "bipartisan gender roles."; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm..."; + mes "I'm so offended."; + close; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "This scroll is far too"; + mes "primitive. There's been"; + mes "all sorts of technological"; + mes "reading advances that I can't"; + mes "live without... Like pages."; + close; + } +} + +yuno_in04,118,116,4 script Paper 111,{ + + mes "^3355FFIt's a piece of"; + mes "paper that looks"; + mes "like a personal letter.^000000"; + next; + switch( select("Read it.","Leave it alone.") ) + { + case 1: + if(yuno_hist > 7) + { + mes "^8B6914P.S."; + mes "Please..."; + mes "Come back to me."; + mes " "; + mes " "; + mes "Love,"; + mes "Fayruz^000000"; + close; + } + mes "^8B6914..."; + mes "I can't forget your smile."; + mes "No matter what, even if you"; + mes "hate me, I'll always have these"; + mes "feelings just for you. You are"; + mes "the one who is most special,"; + mes "who means the most to my heart.^000000"; + next; + mes "^8B6914I know we've had our"; + mes "differences, but please"; + mes "don't refuse my love. By"; + mes "your hands, I hope that"; + mes "you can forgive me for us."; + mes "- Love, Fayruz^000000"; + next; + if(getpartnerid()) + { + mes "["+strcharinfo(0)+"]"; + mes "Ahhhhhh~"; + mes "Love sure is nice!"; + close; + } + mes "["+strcharinfo(0)+"]"; + mes "What th--?!"; + mes "Booooooooo!"; + mes "Love stinks!"; + close; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "I guess I better"; + mes "not look at this."; + mes "I mean, I might"; + mes "regret reading it."; + close; + } +} + +juperos_01,123,92,4 script Stone Statue 844,{ + + if(yuno_hist) + { + mes "^3355FFIt's a stone statue"; + mes "that looks exactly like"; + mes "the one in the Juno Library."; + mes "However, it has sculptures"; + mes "of books instead of real ones.^000000"; + next; + mes "^3355FFIt's possible that the"; + mes "statue in the Juno Library"; + mes "was made after this one."; + mes "But who can be sure?^000000"; + close; + } + mes "^3355FFIt's an old"; + mes "statue sculpted"; + mes "out of stone.^000000"; + close; +} + +juperos_01,99,71,4 script Bronze Statue#2 844,{ + + mes "^3355FFIt's an elaborate"; + mes "bronze statue that"; + mes "is twice the height of"; + mes "a normal human being.^000000"; + close; +} + +juperos_01,79,92,4 script Sculpture 844,{ + + mes "^3355FFIt's a sculpture that"; + mes "looks familiar to you.^000000"; + close; +} + +juperos_01,215,127,4 script Machine Statue 844,{ + + mes "^3355FFThis is the bust of a"; + mes "humanoid machine with"; + mes "a familiar Crest Piece"; + mes "carved into the middle.^000000"; + next; + mes "^3355FFThe statue's entire"; + mes "form is mind boggling,"; + mes "but you manage to note"; + mes "that its outstretched"; + mes "arm points westward.^000000"; + close; +} + +//============================================================ +// Jupers Core access Story Event +//============================================================ +//============================================================ +// 1rd Floor -> 2nd Floor +//============================================================ +juperos_01,100,91,0 script jupe_goto#1 -1,2,2,{ + end; + +OnTouch: + initnpctimer "jupe_goto#1",1; + mes "^777777["+ strcharinfo(0) +"]^000000"; + mes "This light..."; + mes "It feels like..."; + mes "Its warmth is..."; + mes "Wrapping all over me..."; + next; + switch(select("Ah, it's so nice...:No! This is wrong!")) { + case 1: + mes "^777777["+ strcharinfo(0) +"]^000000"; + mes "Ahhhh..."; + mes "It feels like"; + mes "I'm floating..."; + specialeffect2 EF_LIGHTSPHERE; + close2; + stopnpctimer; + warp "juperos_02",128,278; + break; + case 2: + mes "^777777["+ strcharinfo(0) +"]^000000"; + mes "N-No! This is"; + mes "wrong! Something"; + mes "weird's happening!"; + mes "I gotta get away!"; + close2; + stopnpctimer; + warp "juperos_01",96,91; + break; + } + end; + +OnTimer10000: + stopnpctimer; + warp "juperos_02",128,278; + donpcevent "jupe_goto#2::OnEnable"; + end; +} + +juperos_01,100,91,0 script jupe_goto#2 -1,2,2,{ +OnInit: + disablenpc "jupe_goto#2"; + end; + +OnEnable: + enablenpc "jupe_goto#2"; + disablenpc "jupe_goto#1"; + initnpctimer; + end; + +OnTouch: + warp "juperos_02",128,278; + end; + +OnTimer2000: + enablenpc "jupe_goto#1"; + disablenpc "jupe_goto#2"; + end; +} + +//============================================================ +// 2nd Floor +//============================================================ + +juperos_02,97,70,0 script 3F Gate Switch#jupe -1,{ +OnInit: + initnpctimer; + end; + +Onreset: + killmonster "juperos_02","3F Gate Switch#jupe::OnMyMobDead"; + end; + +OnEnable: + enablenpc "3F Gate Switch#jupe"; + initnpctimer; + end; + +OnTimer5000: + set .MyMobs,3; + monster "juperos_02",24,275,"1st Gate Switch",1674,1,"3F Gate Switch#jupe::OnMyMobDead"; + monster "juperos_02",240,29,"2nd Gate Switch",1674,1,"3F Gate Switch#jupe::OnMyMobDead"; + monster "juperos_02",282,183,"3rd Gate Switch",1674,1,"3F Gate Switch#jupe::OnMyMobDead"; + stopnpctimer; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs == 2) + mapannounce "juperos_02","Who are you to come here?",bc_map,"0xFF0000"; + else if (.MyMobs == 1) + mapannounce "juperos_02","Have you come seeking Juperos?! It no longer exists...",bc_map,"0xFF0000"; + else if (.MyMobs == 0) { + mapannounce "juperos_02","Have you come to see me? Fine! Find me first!",bc_map,"0xFF0000"; + specialeffect2 563; + soundeffectall "earth_quake.wav",0; + disablenpc "3F Gate Switch#jupe"; + donpcevent "Restricted Area#jupe::OnEnable"; + } + end; +} + + +juperos_02,130,149,0 script Restricted Area#jupe 139,2,2,{ +OnInit: + disablenpc "Restricted Area#jupe"; + end; + +OnEnable: + enablenpc "Restricted Area#jupe"; + initnpctimer; + end; + +OnTimer5000: + mapannounce "juperos_02","Vroom! Vroom!",bc_map,"0xE559A2"; + end; + +OnTimer7000: + mapannounce "juperos_02","Attention, visitors.",bc_map,"0xE559A2"; + end; + +OnTimer9000: + mapannounce "juperos_02","You are allowed to enter the next zone for a short period of time. Please use the portal in the center of the map.",bc_map,"0xE559A2"; + end; + +OnTimer9001: +OnTimer23000: +OnTimer46000: +OnTimer69000: +OnTimer92000: +OnTimer115000: +OnTimer161000: +OnTimer184000: +OnTimer207000: +OnTimer230000: +OnTimer253000: +OnTimer276000: +OnTimer299000: +OnTimer322000: +OnTimer345000: +OnTimer368000: +OnTimer391000: +OnTimer414000: +OnTimer460000: +OnTimer483000: +OnTimer506000: +OnTimer529000: +OnTimer552000: + specialeffect 561; + end; + +OnTimer556000: + mapannounce "juperos_02","Attention, visitors. The gate to the next zone will close shortly.",bc_map,"0xE559A2"; + end; + +OnTimer561000: + mapannounce "juperos_02","1 minute remaining until Gate Closure. ",bc_map,"0xE559A2"; + end; + +OnTimer598000: + specialeffect 561; + end; + +OnTimer600000: + mapannounce "juperos_02","The gate is being closed...",bc_map,"0xE559A2"; + end; + +OnTimer603000: + mapannounce "juperos_02"," Switches will reactivate shortly.",bc_map,"0xE559A2"; + end; + +OnTimer621000: + disablenpc "Restricted Area#jupe"; + end; + +OnTimer1200000: + donpcevent "3F Gate Switch#jupe::OnEnable"; + stopnpctimer; + end; + +OnTouch: + warp "jupe_gate",50,167; + end; +} + +//============================================================ +// Security Checkpoint 1-1 +//============================================================ +jupe_area1,88,224,0 script #hole#1-1 844,{ + cutin "1",2; + if ($@JupreArea1InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "1",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7356) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "1-1",2; + next; + if ($@JupreArea1InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "1-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#1-1::OnEnable"; + enablenpc "Red Alarm#1-1"; + disablenpc "#hole#1-1"; + close2; + cutin "1-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "1",255; + end; + } + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "1",255; + end; + } + close; + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "1",255; + end; + } + +Onstop_timer: + stopnpctimer; + end; + +OnTimer22500: + stopnpctimer; + enablenpc "#hole#1-1"; + disablenpc "Red Alarm#1-1"; + end; +} + +jupe_area1,83,221,0 script Warp#1-1 139,2,2,{ +OnInit: + disablenpc "Warp#1-1"; + end; + +OnEnable: + enablenpc "Warp#1-1"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area1",47,259; + end; + +OnTimer22500: + stopnpctimer; + disablenpc "Warp#1-1"; + end; +} + +jupe_area1,47,259,0 script Red Alarm#1-1 -1,2,2,{ +OnInit: + disablenpc "Red Alarm#1-1"; + end; + +OnTouch: + donpcevent "Red Alarm On#1-1::OnEnable"; + disablenpc "Red Alarm#1-1"; + donpcevent "#hole#1-1::Onstop_timer"; + set $@JupreArea1InUse,1; + disablenpc "#hole#1-1"; + end; +} + +- script Red Alarm On#1-1 -1,{ +OnInit: + disablenpc "Red Alarm On#1-1"; + end; + +OnEnable: + enablenpc "Red Alarm On#1-1"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area1","Those of you who have come here...",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area1","I do not intend to stop you.",bc_map,"0xFF0000"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + end; + +OnTimer5000: + mapannounce "jupe_area1","But I assume you are prepared for a few obstacles...",bc_map,"0xFF0000"; + donpcevent "Monster1#1-1::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area1","After all, you are venturing through a forbidden area!",bc_map,"0xFF0000"; + end; + +OnTimer8000: + disablenpc "Red Alarm On#1-1"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + stopnpctimer; + end; +} + +- script Monster1#1-1 -1,{ +OnInit: + disablenpc "Monster1#1-1"; + end; + +OnDisable: + disablenpc "Monster1#1-1"; + killmonster "jupe_area1","Monster1#1-1::OnMyMobDead"; + end; + +OnEnable: + enablenpc "Monster1#1-1"; + initnpctimer; + set .MyMobs,8; + monster "jupe_area1",30,263,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,262,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,261,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,260,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,259,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,258,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,257,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead"; + monster "jupe_area1",30,256,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","Do you realize this is a hallucination?",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#1-1"; + stopnpctimer; + donpcevent "Monster1#1-1::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#1-1::OnEnable"; + disablenpc "Monster1#1-1"; + stopnpctimer; + } + end; +} + +- script Monster2#1-1 -1,{ +OnInit: + disablenpc "Monster2#1-1"; + end; + +OnDisable: + disablenpc "Monster2#1-1"; + killmonster "jupe_area1","Monster2#1-1::OnMyMobDead"; + end; + +OnEnable: + enablenpc "Monster2#1-1"; + initnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_area1","How about now?",bc_map,"0xFF0000"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + end; + +OnTimer4000: + mapannounce "jupe_area1","Let me see...",bc_map,"0xFF0000"; + end; + +OnTimer7000: + mapannounce "jupe_area1","Just how strong you are!",bc_map,"0xFF0000"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + soundeffectall "jupe_warning.wav",0,"jupe_area1"; + set .MyMobs,8; + monster "jupe_area1",30,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",31,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",32,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",33,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",34,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",35,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",36,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead"; + monster "jupe_area1",37,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","Bwahaha! You're only good at running away!",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#1-1"; + stopnpctimer; + donpcevent "Monster2#1-1::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area1","Zzzzt. Zzzzt..... ",bc_map,"0xFF0000"; + disablenpc "Monster2#1-1"; + enablenpc "#hole#1-1"; + set $@JupreArea1InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Security Checkpoint 1-2 +//============================================================ +jupe_area1,25,238,0 script #hole#1-2 844,{ + cutin "2",2; + if ($@JupreArea1InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "2",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7357) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "2-1",2; + next; + if ($@JupreArea1InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "2-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#1-2::OnEnable"; + enablenpc "Red Alarm#1-2"; + disablenpc "#hole#1-2"; + close2; + cutin "2-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "2",255; + end; + } + break; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "2",255; + end; + } + close; + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "2",255; + end; + } + end; + +Onstop_timer: + stopnpctimer; + end; + +OnTimer22500: + stopnpctimer; + enablenpc "#hole#1-2"; + disablenpc "Red Alarm#1-2"; + end; +} + +jupe_area1,21,225,0 script Warp#1-2 139,2,2,{ +OnInit: + disablenpc "Warp#1-2"; + end; + +OnEnable: + enablenpc "Warp#1-2"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area1",21,191; + end; + +OnTimer22500: + disablenpc "Warp#1-2"; + end; +} + +jupe_area1,21,191,0 script Red Alarm#1-2 -1,2,2,{ +OnInit: + disablenpc "Red Alarm#1-2"; + end; + +OnTouch: + set $@JupreArea1InUse,1; + donpcevent "Red Alarm On#1-2::OnEnable"; + disablenpc "Red Alarm#1-2"; + disablenpc "#hole#1-2"; + end; +} + +- script Red Alarm On#1-2 -1,{ +OnInit: + disablenpc "Red Alarm On#1-2"; + end; + +OnEnable: + enablenpc "Red Alarm On#1-2"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area1","Come on, come on!",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area1","Yes. Run... Right into my hands!",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area1","Do you want to know who I am?",bc_map,"0xFF0000"; + donpcevent "Monster1#1-2::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area1","You will know, once you defeat all of my minions!",bc_map,"0xFF0000"; + end; + +OnTimer8000: + disablenpc "Red Alarm On#1-2"; + stopnpctimer; + end; +} + +- script Monster1#1-2 -1,{ +OnInit: + disablenpc "Monster1#1-2"; + end; + +OnDisable: + disablenpc "Monster1#1-2"; + killmonster "jupe_area1","Monster1#1-2::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster1#1-2"; + set .MyMobs,8; + monster "jupe_area1",30,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",31,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",32,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",33,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",34,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",35,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",36,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead"; + monster "jupe_area1",37,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","I can't believe how cowardly you really are...",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#1-2"; + stopnpctimer; + donpcevent "Monster1#1-2::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#1-2::OnEnable"; + disablenpc "Monster1#1-2"; + stopnpctimer; + } + end; +} + +- script Monster2#1-2 -1,{ +OnInit: + disablenpc "Monster2#1-2"; + end; + +OnDisable: + disablenpc "Monster2#1-2"; + killmonster "jupe_area1","Monster2#1-2::OnMyMobDead"; + end; + +OnEnable: + enablenpc "Monster2#1-2"; + initnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_area1","I was the head of this underground laboratory.",bc_map,"0xFF0000"; + end; + +OnTimer4000: + mapannounce "jupe_area1","But that was a long time ago, back when I was merely a human.",bc_map,"0xFF0000"; + end; + +OnTimer6000: + mapannounce "jupe_area1","I was called Vesper Newton. Hahah, they called me a mad man back then.",bc_map,"0xFF0000"; + set .MyMobs,13; + monster "jupe_area1",30,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",31,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",32,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",33,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",34,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",35,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",36,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",37,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",30,150,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",31,150,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",32,150,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",33,150,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead"; + monster "jupe_area1",34,150,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","...Not yet.",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#1-2"; + stopnpctimer; + donpcevent "Monster2#1-2::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area1","Not yet!",bc_map,"0xFF0000"; + disablenpc "Monster2#1-2"; + enablenpc "#hole#1-2"; + set $@JupreArea1InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Security Checkpoint 1-3 +//============================================================ +jupe_area1,36,146,0 script #hole#1-3 844,{ + cutin "3",2; + if ($@JupreArea1InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "3",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7358) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "3-1",2; + next; + if ($@JupreArea1InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "3-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#1-3::OnEnable"; + enablenpc "Red Alarm#1-3"; + disablenpc "#hole#1-3"; + close2; + cutin "3-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "3",255; + end; + } + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "3",255; + end; + } + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "3",255; + end; + } + end; + +Onstop_timer: + stopnpctimer; + end; + +OnTimer22500: + stopnpctimer; + enablenpc "#hole#1-3"; + disablenpc "Red Alarm#1-3"; + end; +} + +jupe_area1,33,137,0 script Warp#1-3 139,2,2,{ +OnInit: + disablenpc "Warp#1-3"; + end; + +OnEnable: + enablenpc "Warp#1-3"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area1",33,105; + end; + +OnTimer22500: + disablenpc "Warp#1-3"; + end; +} + +jupe_area1,33,105,0 script Red Alarm#1-3 -1,0,4,{ +OnInit: + disablenpc "Red Alarm#1-3"; + end; + +OnTouch: + set $@JupreArea1InUse,1; + donpcevent "Red Alarm On#1-3::OnEnable"; + disablenpc "Red Alarm#1-3"; + disablenpc "#hole#1-3"; + end; +} + +- script Red Alarm On#1-3 -1,{ +OnInit: + disablenpc "Red Alarm On#1-3"; + end; + +OnEnable: + enablenpc "Red Alarm On#1-3"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area1","These security systems...",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area1","They're not really for protection.",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area1","It's sort of just a hobby to pass the time...",bc_map,"0xFF0000"; + donpcevent "Monster1#1-3::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area1","Being immortal, I have a lot of time on my hands...",bc_map,"0xFF0000"; + end; + +OnTimer8000: + disablenpc "Red Alarm On#1-3"; + stopnpctimer; + end; +} + +- script Monster1#1-3 -1,{ +OnInit: + disablenpc "Monster1#1-3"; + end; + +OnDisable: + disablenpc "Monster1#1-3"; + killmonster "jupe_area1","Monster1#1-3::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster1#1-3"; + set .MyMobs,8; + monster "jupe_area1",30,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",31,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",32,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",33,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",34,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",35,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",36,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead"; + monster "jupe_area1",37,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","Zzzzt...Zzzzt....",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + donpcevent "Monster1#1-3::OnDisable"; + enablenpc "#hole#1-3"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#1-3::OnEnable"; + disablenpc "Monster1#1-3"; + stopnpctimer; + } + end; +} + +- script Monster2#1-3 -1,{ +OnInit: + disablenpc "Monster2#1-3"; + end; + +OnDisable: + disablenpc "Monster2#1-3"; + killmonster "jupe_area1","Monster2#1-3::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster2#1-3"; + end; + +OnTimer2000: + mapannounce "jupe_area1","Why have you come?",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area1","Were you hoping to find something wonderful? Something miraculous?",bc_map,"0xFF0000"; + end; + +OnTimer8000: + mapannounce "jupe_area1","You're wrong! Welcome to Hell!",bc_map,"0xFF0000"; + set .MyMobs,15; + monster "jupe_area1",42,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",43,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",44,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",45,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",46,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",47,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",48,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",49,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",42,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",43,62,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",44,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",45,62,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",46,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",47,62,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead"; + monster "jupe_area1",48,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#1-3"; + stopnpctimer; + donpcevent "Monster2#1-3::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area1","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000"; + disablenpc "Monster2#1-3"; + enablenpc "#hole#1-3"; + set $@JupreArea1InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Security Checkpoint 1-4 +//============================================================ +jupe_area1,50,49,0 script #hole#1-4 844,{ + cutin "4",2; + if ($@JupreArea1InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "4",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7359) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "4-1",2; + next; + if ($@JupreArea1InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "4-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#1-4::OnEnable"; + donpcevent "Red Alarm#1-4::OnEnable"; + disablenpc "#hole#1-4"; + close2; + cutin "4-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "4",255; + end; + } + break; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "4",255; + end; + } + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "4",255; + end; + } + end; + +Onstop_timer: + stopnpctimer; + end; + +OnTimer5000: + stopnpctimer; + enablenpc "#hole#1-4"; + disablenpc "Red Alarm#1-4"; + end; +} + +jupe_area1,57,53,0 script Warp#1-4 139,2,2,{ +OnInit: + disablenpc "Warp#1-4"; + end; + +OnEnable: + enablenpc "Warp#1-4"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area1",83,157; + end; + +OnTimer5000: + disablenpc "Warp#1-4"; + end; +} + +jupe_area1,83,157,0 script Red Alarm#1-4 -1,2,2,{ +OnInit: + disablenpc "Red Alarm#1-4"; + end; + +OnEnable: + enablenpc "Red Alarm#1-4"; + end; + +OnTouch: + set $@JupreArea1InUse,1; + donpcevent "Red Alarm On#1-4::OnEnable"; + disablenpc "Red Alarm#1-4"; + disablenpc "#hole#1-4"; + end; +} + +- script Red Alarm On#1-4 -1,{ +OnInit: + disablenpc "Red Alarm On#1-4"; + end; + +OnEnable: + enablenpc "Red Alarm On#1-4"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area1","I've been waiting for someone strong enough to compete with me.",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area1","If you hear this, I wish you will be the one...",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area1","Perhaps, a mere shadow of my former self...",bc_map,"0xFF0000"; + donpcevent "Monster1#1-4::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area1","Is somewhere down here, wandering...",bc_map,"0xFF0000"; + end; + +OnTimer8000: + stopnpctimer; + disablenpc "Red Alarm On#1-4"; + end; +} + +- script Monster1#1-4 -1,{ +OnInit: + disablenpc "Monster1#1-4"; + end; + +OnDisable: + disablenpc "Monster1#1-4"; + killmonster "jupe_area1","Monster1#1-4::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster1#1-4"; + set .MyMobs,8; + monster "jupe_area1",92,154,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",96,154,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",100,154,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",104,154,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",92,161,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",96,161,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",100,161,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead"; + monster "jupe_area1",104,161,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area1","Zzzzt...Zzzzt....",bc_map,"0xFF0000"; + set $@JupreArea1InUse,0; + end; + +OnTimer300002: + stopnpctimer; + enablenpc "#hole#1-4"; + donpcevent "Monster1#1-4::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#1-4::OnEnable"; + disablenpc "Monster1#1-4"; + stopnpctimer; + } + end; +} + +- script Monster2#1-4 -1,{ +OnInit: + disablenpc "Monster2#1-4"; + end; + +OnDisable: + killmonster "jupe_area1","Monster2#1-4::OnMyMobDead"; + disablenpc "Monster2#1-4"; + end; + +OnEnable: + enablenpc "Monster2#1-4"; + initnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_area1","I can never rest in peace...",bc_map,"0xFF0000"; + end; + +OnTimer4000: + mapannounce "jupe_area1","I'll wait forever or until someone can put me out of my misery...",bc_map,"0xFF0000"; + end; + +OnTimer6000: + mapannounce "jupe_area1","I will be waiting for you!",bc_map,"0xFF0000"; + set .MyMobs,10; + monster "jupe_area1",104,161,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",108,161,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",111,161,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",112,161,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",115,161,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",104,154,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",108,154,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",111,154,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",112,154,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead"; + monster "jupe_area1",115,154,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead"; + end; + +OnTimer300000: + set $@JupreArea1InUse,0; + mapannounce "jupe_area1","It's funny... Isn't it?",bc_map,"0xFF0000"; + end; + +OnTimer300002: + enablenpc "#hole#1-4"; + donpcevent "Monster2#1-4::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area1","It's funny... Isn't it?",bc_map,"0xFF0000"; + disablenpc "Monster2#1-4"; + enablenpc "#hole#1-4"; + set $@JupreArea1InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Move to Elevator +//============================================================ +jupe_area1,112,162,0 script Lever#ufe 844,{ + mes "^3355FFIt's a lever"; + mes "whose function"; + mes "is not known to you.^000000"; + next; + switch(select("Pull.:Cancel.")) { + case 1: + if($@JupreArea1InUse == 1) close; + initnpctimer; + donpcevent "LeverWarp#ufe::OnEnable"; + disablenpc "Lever#ufe"; + close; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Pull this lever?"; + mes "I don't even know"; + mes "what will happen..."; + close; + } + close; + +OnTimer3000: + enablenpc "Lever#ufe"; + stopnpctimer; + end; +} + +jupe_area1,117,157,0 script LeverWarp#ufe 139,2,2,{ +OnInit: + disablenpc "LeverWarp#ufe"; + end; + +OnEnable: + enablenpc "LeverWarp#ufe"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_gate",28,30; + end; + +OnTimer3000: + stopnpctimer; + disablenpc "LeverWarp#ufe"; + end; +} + +//============================================================ +// Security Checkpoint 2-1 +//============================================================ +jupe_area2,74,224,0 script #hole#2-1 844,{ + cutin "1",2; + if ($@JupreArea2InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "1",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7356) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "1-1",2; + next; + if ($@JupreArea2InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "1-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#2-1::OnEnable"; + enablenpc "Red Alarm#2-1"; + disablenpc "#hole#2-1"; + close2; + cutin "1-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "1",255; + end; + } + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "1",255; + end; + } + close; + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "1",255; + end; + } + +Onstop_timer: + stopnpctimer; + end; + +OnTimer22500: + stopnpctimer; + enablenpc "#hole#2-1"; + disablenpc "Red Alarm#2-1"; + end; +} + +jupe_area2,80,221,0 script Warp#2-1 139,2,2,{ +OnInit: + disablenpc "Warp#2-1"; + end; + +OnEnable: + enablenpc "Warp#2-1"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area2",116,259; + end; + +OnTimer22500: + stopnpctimer; + disablenpc "Warp#2-1"; + end; +} + +jupe_area2,116,259,0 script Red Alarm#2-1 -1,2,2,{ +OnInit: + disablenpc "Red Alarm#2-1"; + end; + +OnTouch: + donpcevent "Red Alarm On#2-1::OnEnable"; + disablenpc "Red Alarm#2-1"; + donpcevent "#hole#2-1::Onstop_timer"; + set $@JupreArea2InUse,1; + disablenpc "#hole#2-1"; + end; +} + +- script Red Alarm On#2-1 -1,{ +OnInit: + disablenpc "Red Alarm On#2-1"; + end; + +OnEnable: + enablenpc "Red Alarm On#2-1"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area2","Those of you who have come here...",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area2","I do not intend to stop you.",bc_map,"0xFF0000"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + end; + +OnTimer5000: + mapannounce "jupe_area2","But I assume you are prepared for a few obstacles...",bc_map,"0xFF0000"; + donpcevent "Monster1#2-1::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area2","After all, you are venturing through a forbidden area!",bc_map,"0xFF0000"; + end; + +OnTimer8000: + disablenpc "Red Alarm On#2-1"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + stopnpctimer; + end; +} + +- script Monster1#2-1 -1,{ +OnInit: + disablenpc "Monster1#2-1"; + end; + +OnDisable: + disablenpc "Monster1#2-1"; + killmonster "jupe_area2","Monster1#2-1::OnMyMobDead"; + end; + +OnEnable: + enablenpc "Monster1#2-1"; + initnpctimer; + set .MyMobs,8; + monster "jupe_area2",126,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",127,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",128,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",129,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",130,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",131,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",132,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead"; + monster "jupe_area2",133,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","Do you realize this is a hallucination?",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#2-1"; + stopnpctimer; + donpcevent "Monster1#2-1::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#2-1::OnEnable"; + disablenpc "Monster1#2-1"; + stopnpctimer; + } + end; +} + +- script Monster2#2-1 -1,{ +OnInit: + disablenpc "Monster2#2-1"; + end; + +OnDisable: + disablenpc "Monster2#2-1"; + killmonster "jupe_area2","Monster2#2-1::OnMyMobDead"; + end; + +OnEnable: + enablenpc "Monster2#2-1"; + initnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_area2","How about now?",bc_map,"0xFF0000"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + end; + +OnTimer4000: + mapannounce "jupe_area2","Let me see...",bc_map,"0xFF0000"; + end; + +OnTimer7000: + mapannounce "jupe_area2","Just how strong you are!",bc_map,"0xFF0000"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + soundeffectall "jupe_warning.wav",0,"jupe_area2"; + set .MyMobs,8; + monster "jupe_area2",126,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",127,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",128,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",129,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",130,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",131,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",132,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead"; + monster "jupe_area2",133,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","Bwahaha! You're only good at running away!",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#2-1"; + stopnpctimer; + donpcevent "Monster2#2-1::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area2","Zzzzt. Zzzzt..... ",bc_map,"0xFF0000"; + disablenpc "Monster2#2-1"; + enablenpc "#hole#2-1"; + set $@JupreArea2InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Security Checkpoint 2-2 +//============================================================ +jupe_area2,138,238,0 script #hole#2-2 844,{ + cutin "2",2; + if ($@JupreArea2InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "2",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7357) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "2-1",2; + next; + if ($@JupreArea2InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "2-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#2-2::OnEnable"; + enablenpc "Red Alarm#2-2"; + disablenpc "#hole#2-2"; + close2; + cutin "2-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "2",255; + end; + } + break; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "2",255; + end; + } + close; + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "2",255; + end; + } + end; + +Onstop_timer: + stopnpctimer; + end; + +OnTimer22500: + stopnpctimer; + enablenpc "#hole#2-2"; + disablenpc "Red Alarm#2-2"; + end; +} + +jupe_area2,142,225,0 script Warp#2-2 139,2,2,{ +OnInit: + disablenpc "Warp#2-2"; + end; + +OnEnable: + enablenpc "Warp#2-2"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area2",142,191; + end; + +OnTimer22500: + disablenpc "Warp#2-2"; + end; +} + +jupe_area2,142,191,0 script Red Alarm#2-2 -1,2,2,{ +OnInit: + disablenpc "Red Alarm#2-2"; + end; + +OnTouch: + set $@JupreArea2InUse,1; + donpcevent "Red Alarm On#2-2::OnEnable"; + disablenpc "Red Alarm#2-2"; + disablenpc "#hole#2-2"; + end; +} + +- script Red Alarm On#2-2 -1,{ +OnInit: + disablenpc "Red Alarm On#2-2"; + end; + +OnEnable: + enablenpc "Red Alarm On#2-2"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area2","Come on, come on!",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area2","Yes. Run... Right into my hands!",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area2","Do you want to know who I am?",bc_map,"0xFF0000"; + donpcevent "Monster1#2-2::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area2","You will know, once you defeat all of my minions!",bc_map,"0xFF0000"; + end; + +OnTimer8000: + disablenpc "Red Alarm On#2-2"; + stopnpctimer; + end; +} + +- script Monster1#2-2 -1,{ +OnInit: + disablenpc "Monster1#2-2"; + end; + +OnDisable: + disablenpc "Monster1#2-2"; + killmonster "jupe_area2","Monster1#2-2::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster1#2-2"; + set .MyMobs,8; + monster "jupe_area2",126,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",127,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",128,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",129,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",130,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",131,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",132,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead"; + monster "jupe_area2",133,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","I can't believe how cowardly you really are...",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#2-2"; + stopnpctimer; + donpcevent "Monster1#2-2::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#2-2::OnEnable"; + disablenpc "Monster1#2-2"; + stopnpctimer; + } + end; +} + +- script Monster2#2-2 -1,{ +OnInit: + disablenpc "Monster2#2-2"; + end; + +OnDisable: + disablenpc "Monster2#2-2"; + killmonster "jupe_area2","Monster2#2-2::OnMyMobDead"; + end; + +OnEnable: + enablenpc "Monster2#2-2"; + initnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_area2","I was the head of this underground laboratory.",bc_map,"0xFF0000"; + end; + +OnTimer4000: + mapannounce "jupe_area2","But that was a long time ago, back when I was merely a human.",bc_map,"0xFF0000"; + end; + +OnTimer6000: + mapannounce "jupe_area2","I was called Vesper Newton. Hahah, they called me a mad man back then.",bc_map,"0xFF0000"; + set .MyMobs,13; + monster "jupe_area2",126,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",127,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",128,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",129,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",130,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",131,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",132,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",133,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",133,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",127,152,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",129,152,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",130,152,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead"; + monster "jupe_area2",132,152,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","...Not yet.",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#2-2"; + stopnpctimer; + donpcevent "Monster2#2-2::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area2","Not yet!",bc_map,"0xFF0000"; + disablenpc "Monster2#2-2"; + enablenpc "#hole#2-2"; + set $@JupreArea2InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Security Checkpoint 2-3 +//============================================================ +jupe_area2,127,146,0 script #hole#2-3 844,{ + cutin "3",2; + if ($@JupreArea2InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "3",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7358) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "3-1",2; + next; + if ($@JupreArea2InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "3-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#2-3::OnEnable"; + enablenpc "Red Alarm#2-3"; + disablenpc "#hole#2-3"; + close2; + cutin "3-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "3",255; + end; + } + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "3",255; + end; + } + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "3",255; + end; + } + end; + +Onstop_timer: + stopnpctimer; + end; + +OnTimer22500: + stopnpctimer; + enablenpc "#hole#2-3"; + disablenpc "Red Alarm#2-3"; + end; +} + +jupe_area2,130,137,0 script Warp#2-3 139,2,2,{ +OnInit: + disablenpc "Warp#2-3"; + end; + +OnEnable: + enablenpc "Warp#2-3"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area2",130,105; + end; + +OnTimer22500: + disablenpc "Warp#2-3"; + end; +} + +jupe_area2,130,105,0 script Red Alarm#2-3 -1,0,4,{ +OnInit: + disablenpc "Red Alarm#2-3"; + end; + +OnTouch: + set $@JupreArea2InUse,1; + donpcevent "Red Alarm On#2-3::OnEnable"; + disablenpc "Red Alarm#2-3"; + disablenpc "#hole#2-3"; + end; +} + +- script Red Alarm On#2-3 -1,{ +OnInit: + disablenpc "Red Alarm On#2-3"; + end; + +OnEnable: + enablenpc "Red Alarm On#2-3"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area2","These security systems...",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area2","They're not really for protection.",bc_map,"0xFF0000"; + disablenpc "#hole#2-3"; + end; + +OnTimer5000: + mapannounce "jupe_area2","It's sort of just a hobby to pass the time...",bc_map,"0xFF0000"; + donpcevent "Monster1#2-3::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area2","Being immortal, I have a lot of time on my hands...",bc_map,"0xFF0000"; + end; + +OnTimer8000: + disablenpc "Red Alarm On#2-3"; + stopnpctimer; + end; +} + +- script Monster1#2-3 -1,{ +OnInit: + disablenpc "Monster1#2-3"; + end; + +OnDisable: + disablenpc "Monster1#2-3"; + killmonster "jupe_area2","Monster1#2-3::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster1#2-3"; + set .MyMobs,8; + monster "jupe_area2",126,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",127,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",128,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",129,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",130,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",131,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",132,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead"; + monster "jupe_area2",133,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","Zzzzt...Zzzzt....",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + donpcevent "Monster1#2-3::OnDisable"; + enablenpc "#hole#2-3"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#2-3::OnEnable"; + disablenpc "Monster1#2-3"; + stopnpctimer; + } + end; +} + +- script Monster2#2-3 -1,{ +OnInit: + disablenpc "Monster2#2-3"; + end; + +OnDisable: + disablenpc "Monster2#2-3"; + killmonster "jupe_area2","Monster2#2-3::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster2#2-3"; + end; + +OnTimer2000: + mapannounce "jupe_area2","Why have you come?",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area2","Were you hoping to find something wonderful? Something miraculous?",bc_map,"0xFF0000"; + end; + +OnTimer8000: + mapannounce "jupe_area2","You're wrong! Welcome to Hell!",bc_map,"0xFF0000"; + set .MyMobs,16; + monster "jupe_area2",114,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",115,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",116,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",117,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",118,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",119,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",120,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",121,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",114,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",115,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",116,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",117,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",118,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",119,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",120,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead"; + monster "jupe_area2",121,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + enablenpc "#hole#2-3"; + stopnpctimer; + donpcevent "Monster2#2-3::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area2","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000"; + disablenpc "Monster2#2-3"; + enablenpc "#hole#2-3"; + set $@JupreArea2InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Security Checkpoint 2-4 +//============================================================ +jupe_area2,113,49,0 script #hole#2-4 844,{ + cutin "4",2; + if ($@JupreArea2InUse == 1) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "4",255; + end; + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + next; + switch(select("Insert a Crest Piece.:Cancel.")) { + case 1: + if (countitem(7359) > 0) { + mes "^3355FFYou take out your"; + mes "Crest Piece and place"; + mes "it into the slot where it"; + mes "happens to fit perfectly.^000000"; + specialeffect EF_TOPRANK; + cutin "4-1",2; + next; + if ($@JupreArea2InUse == 1) { + mes "^3355FFNothing happens."; + mes "Perhaps an alarm or"; + mes "some other safety measure"; + mes "was activated to keep the"; + mes "Crest Piece from activating"; + mes "this transportation device."; + mes "You retrieve the Crest Piece.^000000"; + close2; + cutin "4-1",255; + end; + } + else { + mes "^3355FFThe slot rotates and"; + mes "the Crest Piece moves as"; + mes "if it were turning a key. You"; + mes "feel a weak tremor as a Warp"; + mes "Portal to the other side is"; + mes "activated. You then retrieve"; + mes "your Crest Piece.^000000"; + initnpctimer; + donpcevent "Warp#2-4::OnEnable"; + donpcevent "Red Alarm#2-4::OnEnable"; + disablenpc "#hole#2-4"; + close2; + cutin "4-1",255; + end; + } + } + else { + mes "^3355FFUnfortunately, you're"; + mes "not carrying anything"; + mes "that might be able to fit"; + mes "into the slot and activate"; + mes "this mechanical device.^000000"; + close2; + cutin "4",255; + end; + } + break; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Hmmm..."; + mes "Do I have anything"; + mes "that might make this"; + mes "weird machine work?"; + close2; + cutin "4",255; + end; + } + } + else { + mes "^3355FFThis seems like"; + mes "some kind of device"; + mes "that will allow you to"; + mes "pass to the other side."; + mes "There's a slot where you"; + mes "probably need to insert"; + mes "some kind of object...^000000"; + close2; + cutin "4",255; + end; + } + end; + +Onstop_timer: + stopnpctimer; + end; + +OnTimer5000: + stopnpctimer; + enablenpc "#hole#2-4"; + disablenpc "Red Alarm#2-4"; + end; +} + +jupe_area2,106,53,0 script Warp#2-4 139,2,2,{ +OnInit: + disablenpc "Warp#2-4"; + end; + +OnEnable: + enablenpc "Warp#2-4"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_area2",80,157; + end; + +OnTimer5000: + disablenpc "Warp#2-4"; + end; +} + +jupe_area2,80,157,0 script Red Alarm#2-4 -1,2,2,{ +OnInit: + disablenpc "Red Alarm#2-4"; + end; + +OnEnable: + enablenpc "Red Alarm#2-4"; + end; + +OnTouch: + set $@JupreArea2InUse,1; + donpcevent "Red Alarm On#2-4::OnEnable"; + disablenpc "Red Alarm#2-4"; + disablenpc "#hole#2-4"; + end; +} + +- script Red Alarm On#2-4 -1,{ +OnInit: + disablenpc "Red Alarm On#2-4"; + end; + +OnEnable: + enablenpc "Red Alarm On#2-4"; + initnpctimer; + end; + +OnTimer1000: + mapannounce "jupe_area2","I've been waiting for someone strong enough to compete with me.",bc_map,"0xFF0000"; + end; + +OnTimer3000: + mapannounce "jupe_area2","If you hear this, I wish you will be the one...",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_area2","Perhaps, a mere shadow of my former self...",bc_map,"0xFF0000"; + donpcevent "Monster1#2-4::OnEnable"; + end; + +OnTimer7000: + mapannounce "jupe_area2","Is somewhere down here, wandering...",bc_map,"0xFF0000"; + end; + +OnTimer8000: + stopnpctimer; + disablenpc "Red Alarm On#2-4"; + end; +} + +- script Monster1#2-4 -1,{ +OnInit: + disablenpc "Monster1#2-4"; + end; + +OnDisable: + disablenpc "Monster1#2-4"; + killmonster "jupe_area2","Monster1#2-4::OnMyMobDead"; + end; + +OnEnable: + initnpctimer; + enablenpc "Monster1#2-4"; + set .MyMobs,8; + monster "jupe_area2",75,161,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",72,161,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",71,161,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",68,161,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",75,154,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",72,154,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",71,154,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead"; + monster "jupe_area2",68,154,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead"; + end; + +OnTimer300000: + mapannounce "jupe_area2","Zzzzt...Zzzzt....",bc_map,"0xFF0000"; + set $@JupreArea2InUse,0; + end; + +OnTimer300002: + stopnpctimer; + enablenpc "#hole#2-4"; + donpcevent "Monster1#2-4::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Monster2#2-4::OnEnable"; + disablenpc "Monster1#2-4"; + stopnpctimer; + } + end; +} + +- script Monster2#2-4 -1,{ +OnInit: + disablenpc "Monster2#2-4"; + end; + +OnDisable: + killmonster "jupe_area2","Monster2#2-4::OnMyMobDead"; + disablenpc "Monster2#2-4"; + end; + +OnEnable: + enablenpc "Monster2#2-4"; + initnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_area2","I can never rest in peace...",bc_map,"0xFF0000"; + end; + +OnTimer4000: + mapannounce "jupe_area2","I'll wait forever or until someone can put me out of my misery...",bc_map,"0xFF0000"; + end; + +OnTimer6000: + mapannounce "jupe_area2","I will be waiting for you!",bc_map,"0xFF0000"; + set .MyMobs,12; + monster "jupe_area2",63,161,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",61,161,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",59,161,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",57,161,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",55,161,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",53,161,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",53,154,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",55,154,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",57,154,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",59,154,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",61,154,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead"; + monster "jupe_area2",63,154,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead"; + end; + +OnTimer300000: + set $@JupreArea2InUse,0; + mapannounce "jupe_area2","It's funny... Isn't it?",bc_map,"0xFF0000"; + end; + +OnTimer300002: + enablenpc "#hole#2-4"; + donpcevent "Monster2#2-4::OnDisable"; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + mapannounce "jupe_area2","It's funny... Isn't it?",bc_map,"0xFF0000"; + disablenpc "Monster2#2-4"; + enablenpc "#hole#2-4"; + set $@JupreArea2InUse,0; + stopnpctimer; + } + end; +} + +//============================================================ +// Move to Elevator +//============================================================ +jupe_area2,51,162,0 script Lever#ufe2 844,{ + mes "^3355FFIt's a lever"; + mes "whose function"; + mes "is not known to you.^000000"; + next; + switch(select("Pull.:Cancel.")) { + case 1: + if($@JupreArea2InUse == 1) close; + initnpctimer; + donpcevent "LeverWarp#ufe2::OnEnable"; + disablenpc "Lever#ufe2"; + close; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Pull this lever?"; + mes "I don't even know"; + mes "what will happen..."; + close; + } + close; + +OnTimer3000: + enablenpc "Lever#ufe2"; + stopnpctimer; + end; +} + +jupe_area2,46,157,0 script LeverWarp#ufe2 139,2,2,{ +OnInit: + disablenpc "LeverWarp#ufe2"; + end; + +OnEnable: + enablenpc "LeverWarp#ufe2"; + specialeffect 561; + soundeffectall "jupe_warp.wav",0; + initnpctimer; + end; + +OnTouch: + warp "jupe_gate",71,29; + end; + +OnTimer3000: + stopnpctimer; + disablenpc "LeverWarp#ufe2"; + end; +} + +//============================================================ +// Elevator Reception Room +//============================================================ +jupe_ele_r,51,98,0 script Switch#ufe 844,{ + if ($@JupeElevatorInUse == 1) { + mes "^3355FFIt's some sort of"; + mes "lever that looks like"; + mes "it was already pulled"; + mes "by someone else.^000000"; + close; + } + else { + cutin "5",2; + mes "^3355FFIt's some sort of"; + mes "lever that's located"; + mes "next to four empty slots.^000000"; + next; + switch(select("Pull the lever.:Leave it alone.")) { + case 1: + mes "^3355FF*Snap Snap*^000000"; + next; + mes "^3355FFYou pull the lever,"; + mes "but nothing happened."; + mes "You probably need to"; + mes "insert the correct objects"; + mes "into the slots in order"; + mes "for the lever to operate.^000000"; + next; + if (countitem(7356) > 0 && countitem(7359) > 0 && countitem(7357) > 0 && countitem(7358) > 0) { + switch(select("Insert all of your Crest Pieces.")) { + case 1: + mes "^3300FF*Snap!*^000000"; + mes "^3300FFStrangely enough,"; + mes "all four of the Crest"; + mes "Pieces fit perfectly into"; + mes "the slots and begin to"; + mes "emit a strange light.^000000"; + cutin "5-1",2; + specialeffect EF_SPHERE; + delitem 7356,1; //Piece_Of_Crest1 + delitem 7359,1; //Piece_Of_Crest4 + delitem 7357,1; //Piece_Of_Crest2 + delitem 7358,1; //Piece_Of_Crest3 + next; + switch(select("Pull out the Crest Pieces.:Pull the lever.")) { + case 1: + cutin "5",2; + mes "^3355FFYou pull out all"; + mes "the Crest Pieces"; + mes "that you inserted"; + mes "into the slots.^000000"; + getitem 7356,1; //Piece_Of_Crest1 + getitem 7359,1; //Piece_Of_Crest4 + getitem 7357,1; //Piece_Of_Crest2 + getitem 7358,1; //Piece_Of_Crest3 + close2; + cutin "5",255; + end; + case 2: + if ($@JupeElevatorInUse == 1) { + mes "^3355FFIt's strange,"; + mes "but this lever has"; + mes "already been pulled.^000000"; + close2; + cutin "5",255; + end; + } + else { + mes "^3355FFOnce you pull the lever,"; + mes "the Crest Piece slots are"; + mes "suddenly covered, making"; + mes "them irretrievable, and the"; + mes "ground begins to shake"; + mes "violently. This isn't normal!^000000"; + next; + set $@JupeElevatorInUse,1; + disablenpc "Switch#ufe"; + enablenpc "Switch On#ufe"; + initnpctimer; + specialeffect2 563; + soundeffectall "earth_quake.wav",0; + close2; + cutin "5-1",255; + end; + } + } + } + } + else if (countitem(7356) > 0 || countitem(7359) > 0 || countitem(7357) > 0 || countitem(7358) > 0) { + select("Insert Crest Pieces."); + mes "^3355FFRight now, you don't"; + mes "have enough Crest Pieces"; + mes "to place into all four of these"; + mes "slots. You'll need to find and^FFFFFF ^3355FF bring them all to make this work.^000000"; + close2; + cutin "5-1",255; + end; + } + else { + mes "^3355FFYou need to find"; + mes "some kind of object"; + mes "that you can fit into"; + mes "each of these four slots...^000000"; + close2; + cutin "5-1",255; + end; + } + case 2: + mes "^3355FFWho knows what"; + mes "this lever may do?"; + mes "You'll never know unless"; + mes "you have the courage to try.^000000"; + close2; + cutin "5",255; + end; + } + } + end; + +OnTimer2000: + mapannounce "jupe_ele_r","My descendents...",bc_map,"0x66FF00"; + end; + +OnTimer3000: + mapannounce "jupe_ele_r","Do you want to know why this city was buried beneath the earth...?",bc_map,"0x66FF00"; + end; + +OnTimer7000: + mapannounce "jupe_ele_r","If so, follow my voice...",bc_map,"0x66FF00"; + end; + +OnTimer10000: + mapannounce "jupe_ele_r","I shall let you see for yourself what you desire to know...",bc_map,"0x66FF00"; + end; + +OnTimer17000: + mapannounce "jupe_ele_r","Overcome all the hallucinations.",bc_map,"0xCC6600"; + end; + +OnTimer20000: + mapannounce "jupe_ele_r","Open your eyes and see past all of the lies.",bc_map,"0xFF0000"; + end; + +OnTimer23000: + mapannounce "jupe_ele_r","I can only maintain this vision for you for 20 minutes.",bc_map,"0xFF0000"; + donpcevent "Elevator Guard1#ufe::OnEnable"; + end; + +OnTimer27000: + mapannounce "jupe_ele_r","Look! And remember!",bc_map,"0xFF0000"; + stopnpctimer; + end; +} + +jupe_ele_r,51,98,0 script Switch On#ufe 844,{ + mes "^3355FFIt seems like"; + mes "someone else is"; + mes "using this machine...^000000"; + close; + +OnInit: + disablenpc "Switch On#ufe"; + end; +} + +//============================================================ +// Elevator Receptoin Guards +//============================================================ +jupe_ele_r,10,50,0 script Elevator Guard1#ufe -1,{ +OnInit: + disablenpc "Elevator Guard1#ufe"; + end; + +OnEnable: + set .MyMobs,9; + enablenpc "Elevator Guard1#ufe"; + initnpctimer; + end; + +OnTimer1000: + monster "jupe_ele_r",44,99,"Guard",1669,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer1200: + monster "jupe_ele_r",55,99,"Guard",1675,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer1400: + monster "jupe_ele_r",45,84,"Guard",1683,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer1600: + monster "jupe_ele_r",54,84,"Guard",1675,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer1800: + monster "jupe_ele_r",45,99,"Guard",1669,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer2000: + monster "jupe_ele_r",54,99,"Guard",1683,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer2200: + monster "jupe_ele_r",48,84,"Guard",1669,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer2400: + monster "jupe_ele_r",52,84,"Guard",1683,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer2600: + monster "jupe_ele_r",50,84,"Chief Guard",1684,1,"Elevator Guard1#ufe::OnMyMobDead"; + end; + +OnTimer120000: + mapannounce "jupe_ele_r","It is disappointing to see that you are too weak to even defeat a hallucination...",bc_map,"0x66FF00"; + enablenpc "Switch#ufe"; + disablenpc "Switch On#ufe"; + donpcevent "Annihilation#ufe::OnEnable"; + set $@JupeElevatorInUse,0; + end; + +OnTimer120005: + killmonster "jupe_ele_r","Elevator Guard1#ufe::OnMyMobDead"; + stopnpctimer; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + donpcevent "Elevator Safety#ufe::OnEnable"; + stopnpctimer; + } + end; +} + +jupe_ele_r,10,52,0 script Elevator Safety#ufe -1,{ +OnInit: + disablenpc "Elevator Safety#ufe"; + end; + +OnEnable: + enablenpc "Elevator Safety#ufe"; + initnpctimer; + end; + +OnTimer5000: + mapannounce "jupe_ele_r","Those of you who have defeated the hallucination, step forward.",bc_map,"0x66FF00"; + soundeffectall "earth_quake.wav",0; + end; + +OnTimer8000: + donpcevent "Elevator On#ufe::OnEnable"; + end; + +OnTimer10000: + disablenpc "Elevator Safety#ufe"; + stopnpctimer; + end; +} + +jupe_ele_r,50,89,0 script Annihilation#ufe -1,35,50,{ +OnInit: + disablenpc "Annihilation#ufe"; + end; + +OnEnable: + enablenpc "Annihilation#ufe"; + initnpctimer; + end; + +OnTouch: + percentheal -99,-100; + end; + +OnTimer1000: + mapwarp "jupe_ele_r", "jupe_gate",49,138; + end; + +OnTimer1600: + enablenpc "Elevator Escape#ufe"; + end; + +OnTimer3000: + disablenpc "Annihilation#ufe"; + disablenpc "Elevator Escape#ufe"; + end; +} + +jupe_ele_r,50,89,0 script Elevator Escape#ufe -1,35,50,{ +OnInit: + disablenpc "Elevator Escape#ufe"; + end; + +OnTouch: + mapwarp "jupe_ele_r", "jupe_gate",49,138; + end; +} + +jupe_ele_r,10,54,0 script Elevator On#ufe -1,{ +OnInit: + disablenpc "Elevator On#ufe"; + end; + +OnEnable: + enablenpc "Elevator On#ufe"; + initnpctimer; + end; + +OnTimer1000: + mapwarp "jupe_ele_r", "jupe_ele",42,47; + set $@JupeElevatorInUse2,0; + donpcevent "TimeOut#ufe::OnEnable"; + donpcevent "Guard-1#ufe::OnEnable"; + end; + +OnTimer10000: + stopnpctimer; + disablenpc "Elevator On#ufe"; + end; +} + +//============================================================ +// Elevator NPCs +//============================================================ +jupe_ele,14,6,1 script TimeOut#ufe 844,{ +OnEnable: + initnpctimer; + end; + +OnDisable: + stopnpctimer; + end; + +OnTimer59000: + if (getmapusers("jupe_ele") == 0) { + killmonsterall "jupe_ele"; + donpcevent "Guard-1#ufe::OnDisable"; + donpcevent "Guard-2#ufe::OnDisable"; + donpcevent "Guard-3#ufe::OnDisable"; + donpcevent "Guard-4#ufe::OnDisable"; + stopnpctimer; + set $@JupeElevatorInUse2,0; + set $@JupeElevatorInUse,0; + disablenpc "Switch On#ufe"; + enablenpc "Switch#ufe"; + } + end; + +OnTimer120000: + killmonsterall "jupe_ele"; + donpcevent "Guard-1#ufe::OnDisable"; + donpcevent "Guard-2#ufe::OnDisable"; + donpcevent "Guard-3#ufe::OnDisable"; + donpcevent "Guard-4#ufe::OnDisable"; + mapannounce "jupe_ele","In the end, you can't even overcome your inner fear...",bc_map,"0xFF0000"; + end; + +OnTimer122000: + mapannounce "jupe_ele","You have never encountered your inner fears, have you?",bc_map,"0xFF0000"; + end; + +OnTimer125000: + mapannounce "jupe_ele","Did you expect this would be the end of the hallucination?",bc_map,"0xFF0000"; + end; + +OnTimer127000: + mapannounce "jupe_ele","What if the voice you're hearing is also a hallucination?",bc_map,"0xFF0000"; + end; + +OnTimer129000: + mapannounce "jupe_ele","What if you're just dreaming all of this?",bc_map,"0xFF0000"; + end; + +OnTimer131000: + mapannounce "jupe_ele","What if the existence of this city is a lie?",bc_map,"0xFF0000"; + end; + +OnTimer133000: + mapannounce "jupe_ele","Are you even real?",bc_map,"0xFF0000"; + end; + +OnTimer134000: +OnTimer135000: + mapwarp "jupe_ele", "jupe_gate",49,138; + end; + +OnTimer142000: + disablenpc "GuardEnd#ufe"; + disablenpc "4F Enter#ufe"; + donpcevent "TimeOut#ufe::OnDisable"; + set $@JupeElevatorInUse2,0; + set $@JupeElevatorInUse,0; + disablenpc "Switch On#ufe"; + enablenpc "Switch#ufe"; + stopnpctimer; + end; +} + +jupe_ele,15,6,1 script Guard-1#ufe 844,{ +OnEnable: + initnpctimer; + end; + +OnDisable: + stopnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_ele","I admire your patience.",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_ele","Let's see if everything you have experienced",bc_map,"0xFF0000"; + end; + +OnTimer8000: + mapannounce "jupe_ele","were traps for intruders...",bc_map,"0xFF0000"; + end; + +OnTimer12000: + set .MyMobs,8; + monster "jupe_ele",48,44,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",45,42,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",38,42,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",35,44,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",35,51,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",38,53,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",45,53,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead"; + monster "jupe_ele",48,51,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead"; + set $@JupeElevatorInUse2,1; + end; + +OnTimer30000: + if ($@JupeElevatorInUse2 == 1) { + donpcevent "Guard-2#ufe::OnEnable"; + stopnpctimer; + } + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + if ($@JupeElevatorInUse2 == 1) { + donpcevent "Guard-2#ufe::OnEnable"; + stopnpctimer; + } else if ($@JupeElevatorInUse2 == 4 && getvariableofnpc(.MyMobs,"Guard-2#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-3#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-4#ufe") < 1) { + donpcevent "GuardEnd#ufe::OnEnable"; + stopnpctimer; + } + } + end; +} + +jupe_ele,16,6,1 script Guard-2#ufe 844,{ +OnEnable: + initnpctimer; + end; + +OnDisable: + stopnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_ele","This city was not",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_ele","as magnificient as you thought.",bc_map,"0xFF0000"; + end; + +OnTimer8000: + mapannounce "jupe_ele","This is a place where all the fears of humans flourish.",bc_map,"0xFF0000"; + end; + +OnTimer11000: + mapannounce "jupe_ele","Yes. Nobody leaves alive!",bc_map,"0xFF0000"; + end; + +OnTimer12000: + set .MyMobs,8; + monster "jupe_ele",48,44,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",45,42,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",38,42,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",35,44,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",35,51,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",38,53,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",45,53,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead"; + monster "jupe_ele",48,51,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead"; + set $@JupeElevatorInUse2,2; + end; + +OnTimer30000: + if ($@JupeElevatorInUse2 == 2) { + donpcevent "Guard-3#ufe::OnEnable"; + stopnpctimer; + } + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + if ($@JupeElevatorInUse2 == 2) { + donpcevent "Guard-3#ufe::OnEnable"; + stopnpctimer; + } else if ($@JupeElevatorInUse2 == 4 && getvariableofnpc(.MyMobs,"Guard-1#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-3#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-4#ufe") < 1) { + donpcevent "GuardEnd#ufe::OnEnable"; + stopnpctimer; + } + } + end; +} + +jupe_ele,17,6,1 script Guard-3#ufe 844,{ +OnEnable: + initnpctimer; + end; + +OnDisable: + stopnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_ele","What do you see?",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_ele","Are your eyes actually seeing something?",bc_map,"0xFF0000"; + end; + +OnTimer8000: + mapannounce "jupe_ele","Or do you just believe you are seeing?",bc_map,"0xFF0000"; + end; + +OnTimer12000: + set .MyMobs,8; + monster "jupe_ele",48,44,"Guard",1675,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",45,42,"Guard",1669,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",38,42,"Guard",1683,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",35,44,"Guard",1675,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",35,51,"Guard",1669,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",38,53,"Guard",1683,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",45,53,"Guard",1675,1,"Guard-3#ufe::OnMyMobDead"; + monster "jupe_ele",48,51,"Guard",1669,1,"Guard-3#ufe::OnMyMobDead"; + set $@JupeElevatorInUse2,3; + end; + +OnTimer30000: + if ($@JupeElevatorInUse2 == 3) { + donpcevent "Guard-4#ufe::OnEnable"; + stopnpctimer; + } + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + if ($@JupeElevatorInUse2 == 3) { + donpcevent "Guard-4#ufe::OnEnable"; + stopnpctimer; + } + else if ($@JupeElevatorInUse2 == 4 && getvariableofnpc(.MyMobs,"Guard-1#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-2#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-4#ufe") < 1) { + donpcevent "GuardEnd#ufe::OnEnable"; + stopnpctimer; + } + } + end; +} + +jupe_ele,18,6,1 script Guard-4#ufe 844,{ +OnEnable: + initnpctimer; + end; + +OnDisable: + stopnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_ele","Do not forget. That which limits you is nothing but yourself.",bc_map,"0xFF0000"; + end; + +OnTimer5000: + mapannounce "jupe_ele","Nothing is what you fear and you have nothing to fear...",bc_map,"0xFF0000"; + end; + +OnTimer8000: + set .MyMobs,8; + monster "jupe_ele",48,44,"Guard",1684,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",45,42,"Guard",1669,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",38,42,"Guard",1684,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",35,44,"Guard",1669,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",35,51,"Guard",1675,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",38,53,"Guard",1669,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",45,53,"Guard",1683,1,"Guard-4#ufe::OnMyMobDead"; + monster "jupe_ele",48,51,"Guard",1675,1,"Guard-4#ufe::OnMyMobDead"; + set $@JupeElevatorInUse2,4; + end; + +OnMyMobDead: + set .MyMobs,.MyMobs-1; + if (.MyMobs < 1) { + if(getvariableofnpc(.MyMobs,"Guard-1#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-2#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-3#ufe") < 1) + { + donpcevent "GuardEnd#ufe::OnEnable"; + stopnpctimer; + } + } + end; +} + +jupe_ele,19,6,1 script GuardEnd#ufe 844,{ +OnInit: + disablenpc "GuardEnd#ufe"; + end; + +OnEnable: + enablenpc "GuardEnd#ufe"; + donpcevent "TimeOut#ufe::OnDisable"; + initnpctimer; + end; + +OnDisable: + disablenpc "GuardEnd#ufe"; + stopnpctimer; + end; + +OnTimer2000: + mapannounce "jupe_ele","I am not going to tell you anything.",bc_map,"0x66FF00"; + end; + +OnTimer5000: + mapannounce "jupe_ele","My city, my people are now but a memory.",bc_map,"0x66FF00"; + end; + +OnTimer8000: + mapannounce "jupe_ele","Everything was a mistake. We were not supposed to be here.",bc_map,"0x66FF00"; + end; + +OnTimer11000: + mapannounce "jupe_ele","Is this a place where humans are forbidden?",bc_map,"0x66FF00"; + end; + +OnTimer12000: + mapannounce "jupe_ele","You want to know, don't you? Go ahead... Go deeper.",bc_map,"0x66FF00"; + enablenpc "4F Enter#ufe"; + end; + +OnTimer22000: + mapannounce "jupe_ele","It's not real anyway. All of it's safe, it can't hurt you...",bc_map,"0x66FF00"; + soundeffectall "earth_quake.wav",0; + disablenpc "4F Enter#ufe"; + end; + +OnTimer24000: + mapwarp "jupe_ele","jupe_core",150,286; + end; + +OnTimer25000: + mapwarp "jupe_ele","jupe_core",151,286; + end; + +OnTimer26000: + set $@JupeElevatorInUse2,0; + set $@JupeElevatorInUse,0; + disablenpc "Switch On#ufe"; + enablenpc "Switch#ufe"; + donpcevent "GuardEnd#ufe::OnDisable"; +} + +jupe_ele,41,33,0 script 4F Enter#ufe 45,4,4,{ +OnInit: + disablenpc "4F Enter#ufe"; + end; + +OnTouch: + warp "jupe_core",rand(149,151),286; + end; +} + +//============================================================ +// Warps +//============================================================ +jupe_gate,50,173,0 script gate#start -1,2,3,{ + end; + +OnTouch: + initnpctimer "gate#start",1; + mes "^3355FFIt's a Warp Portal"; + mes "that will teleport you"; + mes "to the previous floor.^000000"; + next; + switch(select("Use it.:Ignore it.")) { + case 1: + specialeffect2 EF_LIGHTSPHERE; + close2; + stopnpctimer; + warp "juperos_02",130,142; + break; + case 2: + mes "[" + strcharinfo(0) + "]"; + mes "Not now!"; + mes "I can't leave yet!"; + close2; + stopnpctimer; + warp "jupe_gate",50,168; + break; + } + end; + +OnTimer10000: + warp "juperos_02",128,278; + enablenpc "gate#start#2"; + disablenpc "gate#start"; + end; +} + +jupe_gate,50,171,0 script gate#start#2 -1,2,2,{ +OnInit: + disablenpc "gate#start#2"; + end; + +OnTouch: + warp "juperos_02",130,142; + end; + +OnTimer2000: + enablenpc "gate#start"; + disablenpc "gate#start#2"; + end; +} + +juperos_02,33,59,0 script jupe_goto2F 45,2,2,{ +OnTouch: + switch(rand(1,4)) { + case 1: warp "juperos_01",120,72; end; + case 2: warp "juperos_01",120,112; end; + case 3: warp "juperos_01",79,112; end; + case 4: warp "juperos_01",79,72; end; + } + end; +} |