Context Navigation

quests_juperos.txt @ 1

Revision 1, 135.8 kB (checked in by jinshiro, 17 years ago)

Rev	Line
[1]	1	//===== eAthena Script =======================================
	2	//= Juperos Dungeon Quests
	3	//===== By ===================================================
	4	//= MasterOfMuppets
	5	//===== Version ==============================================
	6	//= 1.5
	7	//===== Compatible With ======================================
	8	//= eAthena SVN
	9	//===== Description ==========================================
	10	//= [Partial Aegis COnversion]
	11	//= Juperos Ruins related Quests/Events
	12	//===== Comments =============================================
	13	//= 1.0 First version, partly implemented [MasterOfMuppets]
	14	//= 1.1 Added official Juperos Ruins History Quest. Thanks
	15	//= to Keplerk for his first version. [SinSloth]
	16	//= 1.2 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
	17	//= 1.3 Removed semi-official core access NPCs, replaced with [L0ne_W0lf]
	18	//= event-driven story progressive NPCs. Optimization needed.
	19	//= 1.3a Adjusted the elevafor timer. (132000 -> 142000) [L0ne_W0lf]
	20	//= 1.3b Minor updates to juperos elevator NPCs. [L0ne_W0lf]
	21	//= 1.4 Fixed Elevator not working after failing once. [L0ne_W0lf]
	22	//= 1.5 Lots of Fixes, missing stopnpctimers, cleanup. [Zephyrus]
	23	//============================================================
	24
	25	yuno_in04,190,125,4 script Scholar 700,{
	26
	27	switch(yuno_hist)
	28	{
	29	case 0:
	30	mes "[Scholar]";
	31	mes "...Mm? ";
	32	mes "...Yes?";
	33	next;
	34	mes "[Scholar]";
	35	mes "...";
	36	mes "......";
	37	mes "May I help you?";
	38	next;
	39	switch( select( "Oh! N-Nothing!","Excuse me..." ) )
	40	{
	41	case 1:
	42	mes "[Scholar]";
	43	mes "...";
	44	mes "......";
	45	mes "Hmm?";
	46	mes "...........";
	47	mes "Hmpf.";
	48	close;
	49
	50	case 2:
	51	mes "[Scholar]";
	52	mes "...";
	53	mes "......";
	54	mes "Hmm?";
	55	mes "...........";
	56	mes "Hmmm...";
	57	next;
	58	mes "[Scholar]";
	59	mes "You must be lost.";
	60	mes "This is the scholarly";
	61	mes "research section, you know,";
	62	mes "content you couldn't possibly";
	63	mes "fathom. The popular novels and picture books are someplace else.";
	64	next;
	65	mes "["+strcharinfo(0)+"]";
	66	mes "...";
	67	mes "......";
	68	next;
	69	mes "[Scholar]";
	70	mes "Why don't you rummage";
	71	mes "through the bookshelves?";
	72	mes "I'm sure you can find some";
	73	mes "book there that can hold your";
	74	mes "interest. Well, depending on";
	75	mes "your actual attention span...";
	76	next;
	77	mes "["+strcharinfo(0)+"]";
	78	mes "(What's her damage?!";
	79	mes "Does she have an attitude problem or is she just stuck-up?)";
	80	close;
	81	}
	82
	83	case 1:
	84	mes "[Scholar]";
	85	mes "...Mm? ";
	86	mes "...Yes?";
	87	next;
	88	mes "[Scholar]";
	89	mes "...";
	90	mes "......";
	91	mes "May I help you?";
	92	next;
	93	switch( select( "Oh! N-Nothing!","By any chance..." ) )
	94	{
	95	case 1:
	96	mes "[Scholar]";
	97	mes "...";
	98	mes "......";
	99	mes "Hmm?";
	100	mes "...........";
	101	mes "Hmpf.";
	102	close;
	103
	104	case 2:
	105	mes "["+strcharinfo(0)+"]";
	106	mes "By any chance...";
	107	mes "Are you conducting";
	108	mes "research about Juperos?";
	109	next;
	110	mes "[Scholar]";
	111	mes "Why yes, that is";
	112	mes "correct. But how did";
	113	mes "you come to learn about";
	114	mes "my current research project?";
	115	next;
	116	mes "["+strcharinfo(0)+"]";
	117	mes "Oh, I managed to read";
	118	mes "a thesis paper entitled,";
	119	mes "''The Fall of Juperos,'' and";
	120	mes "I just thought that the writing";
	121	mes "style and your personality";
	122	mes "seem to match for some reason.";
	123	next;
	124	mes "[Scholar]";
	125	mes "Oh...! You read my";
	126	mes "thesis? So what did";
	127	mes "you think about it?";
	128	next;
	129	mes "["+strcharinfo(0)+"]";
	130	mes "So far, it's alright, but";
	131	mes "quite frankly it's incomplete.";
	132	mes "I mean, you don't have much in";
	133	mes "in the way of conjecture, much";
	134	mes "less any evidence to back up";
	135	mes "any of your statements.";
	136	next;
	137	mes "[Scholar]";
	138	mes "....";
	139	mes "Let me apologize for";
	140	mes "being rude to you earlier.";
	141	mes "As you know, my name is";
	142	mes "Fayruz Khrhiyha. May I ask";
	143	mes "what your name might be?";
	144	next;
	145	mes "["+strcharinfo(0)+"]";
	146	mes "I'm "+strcharinfo(0)+",";
	147	mes "a brave adventurer in the";
	148	mes "service of his royal majesty,";
	149	mes "the wise and benevolent";
	150	mes "King Tristram III.";
	151	set yuno_hist,2;
	152	next;
	153	mes "[Fayruz]";
	154	mes "Well, "+strcharinfo(0)+",";
	155	mes "I understand that my thesis";
	156	mes "still requires more evidence.";
	157	mes "But I'd need some ancient";
	158	mes "documents from Juperos";
	159	mes "to complete my research...";
	160	next;
	161	mes "[Fayruz]";
	162	mes "If you happen to travel";
	163	mes "through Juperos and find";
	164	mes "any ancient documents, would";
	165	mes "you bring them to me? Having";
	166	mes "those would help my research";
	167	mes "efforts immensely. Thank you...";
	168	close;
	169	}
	170
	171	case 2:
	172	if((countitem(7352)) \|\| (countitem(7353)) \|\| (countitem(7354)) \|\| (countitem(7355)))
	173	{
	174	mes "[Fayruz]";
	175	mes "Ah, it's you! Listen,";
	176	mes "I just found a record of";
	177	mes "an adventurer who explored";
	178	mes "Juperos. There's mention";
	179	mes "of a stone statue here that";
	180	mes "just might be noteworthy...";
	181	next;
	182	mes "[Fayruz]";
	183	mes "If you happen to find";
	184	mes "yourself in Juperos,";
	185	mes "would you find the stone";
	186	mes "statue at the entrance of";
	187	mes "its dungeon and read the";
	188	mes "engraved message for me?";
	189	next;
	190	mes "[Fayruz]";
	191	mes "According to my notes,";
	192	mes "there's a spell that will";
	193	mes "make its reader memorize";
	194	mes "its message, even if they don't";
	195	mes "know the language. So come";
	196	mes "to me if you manage to read it.";
	197	close;
	198	}
	199	mes "[Fayruz]";
	200	mes "If you ever chance to";
	201	mes "travel through Juperos,";
	202	mes "would you let me know if you";
	203	mes "find anything that might help";
	204	mes "my research there? I'd be";
	205	mes "very grateful for your help.";
	206	close;
	207
	208	case 3:
	209	mes "[Fayruz]";
	210	mes "Well, you look";
	211	mes "quite pleased.";
	212	mes "May I asked what";
	213	mes "happened to put that";
	214	mes "expression on your face?";
	215	next;
	216	switch( select( "I found something in Juperos.","Nothing much." ) )
	217	{
	218
	219	case 1:
	220	mes "[" +strcharinfo(0)+"]";
	221	mes "I went to Juperos like";
	222	mes "you asked and found that";
	223	mes "stone statue you were talking";
	224	mes "about. Just like you said, there was an engraved message on it.";
	225	next;
	226	mes "[Fayruz]";
	227	mes "Fascinating!";
	228	mes "So is it really enchanted";
	229	mes "so anyone can memorize it?";
	230	mes "Wh-what does the message say?";
	231	next;
	232	mes "^3355FFYou recite the message";
	233	mes "engraved on the stone";
	234	mes "statue, unable to interpret";
	235	mes "the sounds you're uttering,";
	236	mes "but weirdly enough, you can";
	237	mes "easily recall them from memory.^000000";
	238	next;
	239	mes "[Fayruz]";
	240	mes "Ah, I see! Wait,";
	241	mes "give me a moment to";
	242	mes "properly translate this...";
	243	next;
	244	mes "...";
	245	mes "......";
	246	mes ".........";
	247	next;
	248	mes "[Fayruz]";
	249	mes "It means, ''Do you wish to";
	250	mes "see the end of the madness?";
	251	mes "He is waiting where the three";
	252	mes "columns were destroyed, where";
	253	mes "two hundred illusions wander.''";
	254	next;
	255	mes "[Fayruz]";
	256	mes "''You will see him, the one";
	257	mes "who was vain and extravagant,";
	258	mes "with your own eyes at the place where the light passes through.";
	259	set yuno_hist,4;
	260	next;
	261	mes "[Fayruz]";
	262	mes "Ah, usually, descriptions";
	263	mes "of the ''vain and extravagant";
	264	mes "one'' refer to the mad scientist rumored to have lived in that";
	265	mes "ancient era. But if this is true, I may have to rework my thesis...";
	266	next;
	267	mes "[Fayruz]";
	268	mes "I have another favor to";
	269	mes "ask of you. If you find any";
	270	mes "object of historical significance in Juperos, would you bring it to";
	271	mes "me? I'll reward you, of course.";
	272	next;
	273	mes "[Fayruz]";
	274	mes "It would be most helpful";
	275	mes "if you could manage to find";
	276	mes "documents that existed from that era. Fortunately, back then,";
	277	mes "they made all their records on material more durable than paper.";
	278	close;
	279
	280	case 2:
	281	mes "[Fayruz]";
	282	mes "Nothing, huh?";
	283	mes "My life is also fairly";
	284	mes "uneventful, but somehow,";
	285	mes "I'm don't think I'm content.";
	286	close;
	287	}
	288
	289	case 4:
	290	mes "[Fayruz]";
	291	mes "Oh hello, "+strcharinfo(0)+".";
	292	mes "So what brings you to";
	293	mes "the Juno Library today?";
	294	next;
	295	switch( select ( "Nice weather today, isn't it?","I found something in Juperos.","Nothing much.") )
	296	{
	297	case 1:
	298	mes "[Fayruz]";
	299	mes "Well, I wouldn't know.";
	300	mes "It's late whenever I go";
	301	mes "out, so I always happen to";
	302	mes "miss the sunlight. I guess";
	303	mes "I really miss nice weather";
	304	mes "sometimes, you know?";
	305	close;
	306
	307	case 2:
	308	if((countitem(7352)) \|\| (countitem(7353)) \|\| (countitem(7354)) \|\| (countitem(7355)))
	309	{
	310	mes "[Fayruz]";
	311	mes "Oh, really?!";
	312	mes "That's great news!";
	313	mes "W-what did you find?";
	314	next;
	315	mes "^3355FFIn her excitement,";
	316	mes "Fayruz begins to";
	317	mes "rummage through your";
	318	mes "things before you get";
	319	mes "the chance to answer her.^000000";
	320	next;
	321	mes "[Fayruz]";
	322	mes "Oh, this must be it!";
	323	mes "Would you mind if I keep";
	324	mes "this Transparent Plate for";
	325	mes "my research? In return, I'll";
	326	mes "tell you some tales about";
	327	mes "Juperos that I've learned.";
	328	next;
	329	switch( select ("Please, be my guest.","No way, you can't have it.") )
	330	{
	331	case 1:
	332	if(countitem(7352)) callfunc "Func_JupHist",7352,1;
	333	else if(countitem(7353)) callfunc "Func_JupHist",7353,2;
	334	else if(countitem(7354)) callfunc "Func_JupHist",7354,4;
	335	else if(countitem(7355)) callfunc "Func_JupHist",7352,8;
	336
	337
	338	case 2:
	339	mes "[Fayruz]";
	340	mes "Mm? Are you serious?";
	341	mes "This object is very valuable";
	342	mes "to a researcher like me, but";
	343	mes "I have no idea what use it";
	344	mes "would be for an adventurer.";
	345	mes "Well, you have your reasons...";
	346	close;
	347	}
	348	}
	349	mes "[Fayruz]";
	350	mes "Oh, really?!";
	351	mes "That's great news!";
	352	mes "W-what did you find?";
	353	next;
	354	mes "^3355FFIn her excitement,";
	355	mes "Fayruz begins to";
	356	mes "rummage through your";
	357	mes "things before you get";
	358	mes "the chance to answer her.^000000";
	359	next;
	360	mes "[Fayruz]";
	361	mes "Oh. There isn't anything";
	362	mes "here that would help in my";
	363	mes "research, but thank you anyway.";
	364	mes "If you find anything else while";
	365	mes "you're in Juperos, please come back and show it to me, alright?";
	366	close;
	367
	368	case 3:
	369	mes "[Fayruz]";
	370	mes "Ah, I see. Well, while";
	371	mes "you're here, why don't you";
	372	mes "read something? There are";
	373	mes "many books that cover some";
	374	mes "interesting topics, like the";
	375	mes "Schwaltzvalt economy...";
	376	next;
	377	mes "[Fayruz]";
	378	mes "Oh, in any case, please";
	379	mes "don't forget the favor I asked";
	380	mes "of you. If you find anything";
	381	mes "in Juperos that's historically";
	382	mes "significant, I'd appreciate it";
	383	mes "if you bring it right away.";
	384	close;
	385
	386	}
	387
	388	case 5:
	389	mes "[Fayruz]";
	390	mes "Oh, "+strcharinfo(0)+"!";
	391	mes "Have you come back with";
	392	mes "something from Juperos?";
	393	mes "I've been hoping you'd come";
	394	mes "back with something that'd";
	395	mes "help me in my research!";
	396	next;
	397	switch( select( "Take a look at this.","Oh, I'm sorry...") )
	398	{
	399	case 1:
	400	switch(jupe_hist)
	401	{
	402	case 1:
	403	callfunc "Func_JupHist",7353,7354,7355,7352;
	404
	405	case 2:
	406	callfunc "Func_JupHist",7352,7354,7355,7353;
	407
	408	case 4:
	409	callfunc "Func_JupHist",7352,7353,7355,7354;
	410
	411	case 8:
	412	callfunc "Func_JupHist",7352,7353,7354,7355;
	413	}
	414
	415	case 2:
	416	mes "[Fayruz]";
	417	mes "Ah, I see. Well, while";
	418	mes "you're here, why don't you";
	419	mes "read something? There are";
	420	mes "many books that cover some";
	421	mes "interesting topics, like...";
	422	mes "like... Self-Honesty (?).";
	423	next;
	424	mes "[Fayruz]";
	425	mes "Oh, in any case, please";
	426	mes "don't forget the favor I asked";
	427	mes "of you. If you find anything";
	428	mes "in Juperos that's historically";
	429	mes "significant, I'd appreciate it";
	430	mes "if you bring it right away.";
	431	close;
	432	}
	433
	434	case 6:
	435	mes "[Fayruz]";
	436	mes "Oh, "+strcharinfo(0)+"!";
	437	mes "The Transparent Plate";
	438	mes "that you brought for me";
	439	mes "last time is really helping me";
	440	mes "in my research. If you get the";
	441	mes "chance, please bring me more!";
	442	set yuno_hist,7;
	443	next;
	444	mes "[Fayruz]";
	445	mes "This new data is adding";
	446	mes "a lot more credibility to my";
	447	mes "thesis. Oh, I'll be with you";
	448	mes "in a moment, let me finish";
	449	mes "translating this one last";
	450	mes "passage really quickly...";
	451	close;
	452
	453	case 7:
	454	mes "[Fayruz]";
	455	mes "Hello, "+strcharinfo(0)+"~";
	456	mes "Oh, were you able to look";
	457	mes "in Juperos for anything that";
	458	mes "might help me in my research?";
	459	next;
	460	switch( select( "Yeah, take a look at this.","No, I'm sorry...") )
	461	{
	462	case 1:
	463	switch(jupe_hist)
	464	{
	465	case 3:
	466	callfunc "Func_JupHist",7354,7355,7352,7353;
	467
	468	case 5:
	469	callfunc "Func_JupHist",7353,7355,7352,7354;
	470
	471	case 6:
	472	callfunc "Func_JupHist",7352,7355,7353,7354;
	473
	474	case 9:
	475	callfunc "Func_JupHist",7353,7354,7352,7355;
	476
	477	case 10:
	478	callfunc "Func_JupHist",7352,7354,7353,7355;
	479
	480	case 12:
	481	callfunc "Func_JupHist",7352,7353,7354,7355;
	482	}
	483
	484	case 2:
	485	mes "[Fayruz]";
	486	mes "Oh, that's fine.";
	487	mes "Besides, I don't really";
	488	mes "have a deadline to complete";
	489	mes "this research project. Still,";
	490	mes "I just want you to know that";
	491	mes "I really appreciate your help.";
	492	close;
	493	}
	494
	495	case 8:
	496	mes "[Fayruz]";
	497	mes ""+strcharinfo(0)+"...";
	498	mes "I'm having great difficulty in";
	499	mes "translating that Transparent";
	500	mes "Plate you brought for me that";
	501	mes "last time. I'm so frustrated...";
	502	next;
	503	mes "[Fayruz]";
	504	mes "Wait a minute...";
	505	mes "This here means...";
	506	mes "Alright. Okay. Yes.";
	507	mes "Yes! Of course, how";
	508	mes "could I not see it before!";
	509	set yuno_hist,9;
	510	next;
	511	mes "[Fayruz]";
	512	mes "I'll be with you";
	513	mes "in just a second!";
	514	mes "I think I just made";
	515	mes "a real through...!";
	516	next;
	517
	518	case 9:
	519	mes "[Fayruz]";
	520	mes "Ah, I've been";
	521	mes "expecting you, "+strcharinfo(0)+".";
	522	mes "So did you have been to Juperos again? I'm really hoping that you";
	523	mes "were able to find something new that would help in my research...";
	524	next;
	525	switch( select("Actually, I did find this...","I'm sorry, I haven't...") )
	526	{
	527	case 1:
	528	switch(jupe_hist)
	529	{
	530	case 7:
	531	callfunc "Func_JupHist",7355,7352,7353,7354;
	532
	533	case 11:
	534	callfunc "Func_JupHist",7354,7352,7353,7355;
	535
	536	case 13:
	537	callfunc "Func_JupHist",7353,7352,7354,7355;
	538
	539	case 14:
	540	callfunc "Func_JupHist",7352,7353,7354,7355;
	541	}
	542
	543	case 2:
	544	mes "[Fayruz]";
	545	mes "Ah, I see. Well, while";
	546	mes "you're here, why don't you";
	547	mes "read something? There are";
	548	mes "many books that cover some";
	549	mes "interesting topics, like";
	550	mes "modern adventure history.";
	551	next;
	552	mes "[Fayruz]";
	553	mes "Oh, in any case, please";
	554	mes "don't forget the favor I asked";
	555	mes "of you. If you find anything";
	556	mes "in Juperos that's historically";
	557	mes "significant, I'd appreciate it";
	558	mes "if you bring it right away.";
	559	close;
	560	}
	561
	562	case 10:
	563	mes "[Fayruz]";
	564	mes "Oh hello, "+strcharinfo(0)+"...";
	565	mes "So what exactly brings you";
	566	mes "to the Juno Library this time?";
	567	next;
	568	switch( select("I found another Transparent Plate.","Just visiting, really.") )
	569	{
	570	case 1:
	571	if((countitem(7352)) \|\| (countitem(7353)) \|\| (countitem(7354)) \|\| (countitem(7355)))
	572	{
	573	mes "[Fayruz]";
	574	mes "Hmm, well, we've made as";
	575	mes "much headway as we can";
	576	mes "with the Transparent Plates";
	577	mes "you've already given me, but";
	578	mes "it can't hurt to have too much";
	579	mes "evidence to back my theories.";
	580	next;
	581	mes "[Fayruz]";
	582	mes "I really appreciate";
	583	mes "your continuing efforts";
	584	mes "to help me. Please, would";
	585	mes "you take this as my way";
	586	mes "saying ''Thanks?'' You've been";
	587	mes "great, "+strcharinfo(0)+"...";
	588	if(countitem(7352)) delitem 7352,1;
	589	else if(countitem(7353)) delitem 7353,1;
	590	else if(countitem(7354)) delitem 7354,1;
	591	else delitem 7355,1;
	592	getitem 644,1;
	593	close;
	594	}
	595	mes "[Fayruz]";
	596	mes "Mmm...?";
	597	mes "It doesn't look like";
	598	mes "you brought another";
	599	mes "Transparent Plate.";
	600	mes "Are you sure that you";
	601	mes "didn't misplace it?";
	602	close;
	603
	604	case 2:
	605	mes "[Fayruz]";
	606	mes "Ah, I see. Well,";
	607	mes "thanks to your help,";
	608	mes "I've made a great deal";
	609	mes "of progress on my thesis.";
	610	mes "I really appreciate what you";
	611	mes "have done for me, adventurer.";
	612	close;
	613	}
	614	}
	615
	616
	617	}
	618
	619	function script Func_JupHist {
	620
	621	switch(yuno_hist)
	622	{
	623	case 4:
	624	mes "[Fayruz]";
	625	mes "Thank you so much,";
	626	mes "you don't know what";
	627	mes "this means to me! Okay,";
	628	mes "please relax and take a";
	629	mes "seat. Close your eyes while";
	630	mes "I tell you this ancient story.";
	631	next;
	632	mes "^3355FFFayruz begins to";
	633	mes "relate an ancient tale";
	634	mes "about Juperos that seems";
	635	mes "typical for a classic story, but her way of storytelling subtly";
	636	mes "draws you into a vicarious, yet extremely vivid experience.";
	637	next;
	638	mes "^3355FFYou feel the protagonist's";
	639	mes "glories and tragedies as if";
	640	mes "you were actually there with";
	641	mes "the hero on his journeys. The";
	642	mes "tale eventually comes to an end";
	643	mes "and you awaken from the trance,";
	644	mes "gently brought back to reality.^000000";
	645	delitem getarg(0),1;
	646	set yuno_hist,5;
	647	set jupe_hist,getarg(1);
	648	getexp 100000,0;
	649	next;
	650	mes "[Fayruz]";
	651	mes "Everyone can relate";
	652	mes "to these old, classic";
	653	mes "stories. I hope this tale had";
	654	mes "as meaning for you as it did";
	655	mes "for me when I first heard it.";
	656	next;
	657	mes "[Fayruz]";
	658	mes "If you can find me";
	659	mes "another artifact from";
	660	mes "Juperos, I'll share another";
	661	mes "tale like that with you. Now";
	662	mes "how does that sound? Okay";
	663	mes "then, I'll see you, adventurer~";
	664	close;
	665
	666	case 5:
	667	if((countitem(getarg(0))) \|\| (countitem(getarg(1))) \|\| (countitem(getarg(2))))
	668	{
	669	mes "[Fayruz]";
	670	mes "Oh, that's unexpected.";
	671	mes "This Transparent Plate";
	672	mes "seems to have been made";
	673	mes "in a different era than the";
	674	mes "one you gave me earlier.";
	675	mes "How intriguing...";
	676	next;
	677	mes "[Fayruz]";
	678	mes "Sigh I really wish";
	679	mes "that I could explore";
	680	mes "Juperos on my own, but";
	681	mes "I'm just not strong enough.";
	682	mes "In a way, I'm quite jealous of you. But it can't be helped...";
	683	next;
	684	mes "[Fayruz]";
	685	mes "You know, that reminds";
	686	mes "me of this great story of";
	687	mes "a tragic hero that I'd like to";
	688	mes "share with you. Let your";
	689	mes "mind wander as I relate this ageless, yet bittersweet tale...";
	690	next;
	691	mes "^3355FFFayruz tells you a story";
	692	mes "with a bright beginning, full";
	693	mes "of hope that fills you with the";
	694	mes "bliss of the heavens, but then";
	695	mes "suddenly plummets you into all the despair and torment of hell.^000000";
	696	next;
	697	mes "^3355FFThe story finally";
	698	mes "reaches its ending";
	699	mes "and you're surprised";
	700	mes "to find yourself sitting";
	701	mes "in the Juno Library.^000000";
	702	next;
	703	mes "[Fayruz]";
	704	mes "I know it's a very";
	705	mes "depressing story, but";
	706	mes "I hope you enjoyed it.";
	707	mes "I think you'd agree that";
	708	mes "it contains a truth about";
	709	mes "mankind that can't be ignored.";
	710	if(countitem(getarg(0)))
	711	{
	712	delitem getarg(0),1;
	713	if(getarg(0) == 7352) set jupe_hist,jupe_hist +1;
	714	else set jupe_hist,jupe_hist +2;
	715	}
	716	else if(countitem(getarg(1)))
	717	{
	718	delitem getarg(1),1;
	719	if(getarg(1) == 7353) set jupe_hist,jupe_hist +2;
	720	else set jupe_hist,jupe_hist +4;
	721	}
	722	else
	723	{
	724	delitem getarg(2),1;
	725	if(getarg(2) == 7354) set jupe_hist,jupe_hist +4;
	726	else set jupe_hist,jupe_hist +8;
	727	}
	728	set yuno_hist,6;
	729	getexp 100000,0;
	730	next;
	731	mes "[Fayruz]";
	732	mes "By now I'm sure you've";
	733	mes "figured that these classic";
	734	mes "tales are like condensed";
	735	mes "experiences, refined and";
	736	mes "immutable truths that we";
	737	mes "can see in our own reality.";
	738	next;
	739	mes "[Fayruz]";
	740	mes "If you find more of";
	741	mes "these Transparent";
	742	mes "Plates in Juperos, I'd be";
	743	mes "very happy to share another";
	744	mes "story with you, "+strcharinfo(0)+".";
	745	close;
	746	}
	747	else if(countitem(getarg(3)))
	748	{
	749	mes "[Fayruz]";
	750	mes "Oh, this one seems";
	751	mes "to have been created";
	752	mes "in a similar era as the";
	753	mes "one you gave me earlier.";
	754	mes "I'm not sure how much new";
	755	mes "information this may provide...";
	756	next;
	757	mes "[Fayruz]";
	758	mes "Still, I'm sure this will";
	759	mes "helpful in my research. I just";
	760	mes "won't be as making progress";
	761	mes "as quickly as I had projected.";
	762	mes "Please, I'd like you to take this as a token of my gratitude.";
	763	delitem getarg(3),1;
	764	getitem 644,1;
	765	next;
	766	mes "[Fayruz]";
	767	mes "Now if you'll excuse";
	768	mes "me, I need to go back";
	769	mes "to compiling my research...";
	770	mes "Thank you so much for";
	771	mes "your help, "+strcharinfo(0)+".";
	772	close;
	773	}
	774	else
	775	{
	776	mes "[Fayruz]";
	777	mes "Oh. There isn't anything";
	778	mes "here that would help in my";
	779	mes "research, but thank you anyway.";
	780	mes "If you find anything else while";
	781	mes "you're in Juperos, please come back and show it to me, alright?";
	782	close;
	783	}
	784
	785	case 7:
	786	if((countitem(getarg(0))) \|\| (countitem(getarg(1))))
	787	{
	788	mes "[Fayruz]";
	789	mes "Is this another";
	790	mes "Transparent Plate?";
	791	mes "Yes, it's quite different";
	792	mes "than the last one you";
	793	mes "brought over to me...";
	794	mes "This is so exciting!";
	795	next;
	796	mes "[Fayruz]";
	797	mes "Oh. You must be thinking";
	798	mes "that I'm a complete academia";
	799	mes "addict. Well, my life might be";
	800	mes "a little uneventful, but there";
	801	mes "are other things I think about!";
	802	mes "Like, well... It's weird but...";
	803	next;
	804	mes "[Fayruz]";
	805	mes "You see, there's this";
	806	mes "guy that I like. I'm not sure";
	807	mes "where he might be now, but";
	808	mes "his name is Nadim Amal. He's";
	809	mes "my friend's brother who I first";
	810	mes "met 10 years ago. ^333333Sigh...^000000";
	811	next;
	812	mes "[Fayruz]";
	813	mes "Just recently, I saw";
	814	mes "him with his sister, my";
	815	mes "friend from Morroc. It's";
	816	mes "weird to think that I'd have";
	817	mes "these feelings for him after";
	818	mes "all this time, isn't it? Oh...!";
	819	next;
	820	mes "[Fayruz]";
	821	mes "I really should repay";
	822	mes "you for this Transparent";
	823	mes "Plate. Why don't I tell you";
	824	mes "the scariest story that I know?";
	825	next;
	826	mes "^3355FFFayruz tells you a";
	827	mes "creepy horror story that";
	828	mes "makes you shiver with fear.";
	829	mes "You've heard other ghost";
	830	mes "stories, but you've never been";
	831	mes "so deeply immersed in one before.^000000";
	832	next;
	833	mes "It is only when the";
	834	mes "story ends and you return";
	835	mes "to your senses that you notice that you're soaked in cold sweat.^000000";
	836	next;
	837	mes "[Fayruz]";
	838	mes "It may be a natural";
	839	mes "response, but all people";
	840	mes "fear the unknown in one way";
	841	mes "or another. Scary stories are";
	842	mes "appealing because we actually";
	843	mes "like the strange and grotesque.";
	844	if(countitem(getarg(0)))
	845	{
	846	delitem getarg(0),1;
	847	if(getarg(0) == 7352) set jupe_hist,jupe_hist +1;
	848	else if(getarg(0) == 7353) set jupe_hist,jupe_hist +2;
	849	else set jupe_hist,jupe_hist +4;
	850	}
	851	else if(countitem(getarg(1)))
	852	{
	853	delitem getarg(1),1;
	854	if(getarg(1) == 7353) set jupe_hist,jupe_hist +2;
	855	else if(getarg(1) == 7354) set jupe_hist,jupe_hist +4;
	856	else set jupe_hist,jupe_hist +8;
	857	}
	858	set yuno_hist,8;
	859	getexp 100000,0;
	860	next;
	861	mes "[Fayruz]";
	862	mes "Well... That's just my";
	863	mes "opinion. Anyway, if you";
	864	mes "find anything else in Juperos";
	865	mes "that may help in my research,";
	866	mes "please come back and show it";
	867	mes "to me, alright? See you later~";
	868	close;
	869	}
	870	else if((countitem(getarg(2))) \|\| (countitem(getarg(3))))
	871	{
	872	mes "[Fayruz]";
	873	mes "Oh, this one seems";
	874	mes "to have been created";
	875	mes "in a similar era as the";
	876	mes "one you gave me earlier.";
	877	mes "I'm not sure how much new";
	878	mes "information this may provide...";
	879	next;
	880	mes "[Fayruz]";
	881	mes "Still, I'm sure this will";
	882	mes "helpful in my research. I just";
	883	mes "won't be as making progress";
	884	mes "as quickly as I had projected.";
	885	mes "Please, I'd like you to take this as a token of my gratitude.";
	886	next;
	887	mes "[Fayruz]";
	888	mes "Now if you'll excuse";
	889	mes "me, I need to go back";
	890	mes "to compiling my research...";
	891	mes "Thank you so much for";
	892	mes "your help, "+strcharinfo(0)+".";
	893	if(countitem(getarg(2))) delitem getarg(2),1;
	894	else if(countitem(getarg(3))) delitem getarg(3),1;
	895	getitem 644,1;
	896	close;
	897	}
	898	else
	899	{
	900	mes "[Fayruz]";
	901	mes "Oh. There isn't anything";
	902	mes "here that would help in my";
	903	mes "research, but thank you anyway.";
	904	mes "If you find anything else while";
	905	mes "you're in Juperos, please come back and show it to me, alright?";
	906	close;
	907	}
	908
	909	case 9:
	910	if(countitem(getarg(0)))
	911	{
	912	mes "[Fayruz]";
	913	mes "Oooh...! This one is";
	914	mes "much different than the";
	915	mes "other ones you gave me";
	916	mes "before. This should provide";
	917	mes "a wealth of brand new insights";
	918	mes "into the Juperos civilization!";
	919	next;
	920	mes "[Fayruz]";
	921	mes "All the Transparent";
	922	mes "Plates you've given me";
	923	mes "should contain more than";
	924	mes "enough data for me to fully";
	925	mes "complete my research thesis.";
	926	mes "Once again, thank you so much~";
	927	next;
	928	mes "[Fayruz]";
	929	mes "Still, that doesn't mean that";
	930	mes "I will stop collecting data for";
	931	mes "my research. Anyway, I have one last story to tell you, about";
	932	mes "a man of pure heart chosen by the gods to serve and protect mankind.";
	933	next;
	934	mes "[Fayruz]";
	935	mes "For this purpose he was given";
	936	mes "gaudy armor which contained";
	937	mes "amazing powers, as well as a";
	938	mes "book detailing the instructions";
	939	mes "for its use. However, he promptly";
	940	mes "lost these instructions...";
	941	next;
	942	mes "^3355FFThe story about the";
	943	mes "greatest Juperosian hero";
	944	mes "that Fayruz tells you is very";
	945	mes "humorous at first, but then it";
	946	mes "covers the entire spectrum";
	947	mes "of emotion and humanity...";
	948	next;
	949	mes "^3355FFThe story ends and you";
	950	mes "are left with a swelling";
	951	mes "feeling of indefatigable";
	952	mes "hope and inspiration...";
	953	mes "You can make it if you try!^000000";
	954	if(getarg(0) == 7352) set jupe_hist,jupe_hist+1;
	955	else if(getarg(0) == 7353) set jupe_hist,jupe_hist+2;
	956	else if(getarg(0) == 7354) set jupe_hist,jupe_hist+4;
	957	else set jupe_hist,jupe_hist+8;
	958	set yuno_hist,10;
	959	delitem getarg(0),1;
	960	getexp 100000,0;
	961	next;
	962	mes "[Fayruz]";
	963	mes "Well, that is the";
	964	mes "last and the best story";
	965	mes "that I have to share";
	966	mes "with you. Perhaps next";
	967	mes "time, I'll fill you in on my";
	968	mes "research progress~";
	969	close;
	970	}
	971	else if((countitem(getarg(1))) \|\| (countitem(getarg(2))) \|\| (countitem(getarg(3))))
	972	{
	973	mes "[Fayruz]";
	974	mes "Hmm...";
	975	mes "This one seems to be created in a similar time";
	976	mes "as the previous one.";
	977	next;
	978	mes "[Fayruz]";
	979	mes "Don't you worry.";
	980	mes "This will help my research of course,";
	981	mes "although I do not think this will";
	982	mes "help me in advancing my research";
	983	mes "with a great speed unlike this other one.";
	984	next;
	985	mes "[Fayruz]";
	986	mes "Please take this as a token of my gratitude.";
	987	next;
	988	mes "[Fayruz]";
	989	mes "Now, excuse me. I need to go back to my research.";
	990	if(countitem(getarg(1))) delitem getarg(1),1;
	991	else if(countitem(getarg(2))) delitem getarg(2),1;
	992	else delitem getarg(3),1;
	993	getitem 644,1;
	994	close;
	995	}
	996	else
	997	{
	998	mes "[Fayruz]";
	999	mes "Oh. There isn't anything";
	1000	mes "here that would help in my";
	1001	mes "research, but thank you anyway.";
	1002	mes "If you find anything else while";
	1003	mes "you're in Juperos, please come back and show it to me, alright?";
	1004	close;
	1005	}
	1006	}
	1007	}
	1008
	1009	yuno_in04,186,125,4 script Bundle of Files 111,{
	1010
	1011	mes "^8B6914Thesis: The Fall of Juperos";
	1012	mes "By Fayruz Khrhiyha";
	1013	mes "Sage Castle Researcher^000000";
	1014	next;
	1015	switch( select("Table of Contents.","Leave it alone.") )
	1016	{
	1017	case 1:
	1018	if(yuno_hist > 4)
	1019	{
	1020	mes "^8B6914 1. Preface";
	1021	mes " 2. Juperos Background";
	1022	mes " 3. Theory Behind Its Fall^000000";
	1023	next;
	1024	switch( select("Preface","Juperos Background","Theory Behind Its Fall","Leave it alone.") )
	1025	{
	1026	case 1:
	1027	mes "^8B6914Scholars are certain";
	1028	mes "that the Juperos civilization";
	1029	mes "used to be located above the";
	1030	mes "ground, but it is now buried";
	1031	mes "beneath the El Mes Plateau.";
	1032	mes "The reasons for the city's";
	1033	if(yuno_hist < 9)
	1034	{
	1035	mes "ruin are still nebulous...^000000";
	1036	next;
	1037	mes "^8B6914There is much speculation";
	1038	mes "about the reasons for Jupero's";
	1039	mes "downfall, but any documentation";
	1040	mes "from that time period has been";
	1041	mes "difficult to find. As for now, any evidence we have regarding";
	1042	mes "Juperos is inconclusive.^000000";
	1043	next;
	1044	mes "^8B6914In spite of this lack";
	1045	mes "of empirical or concrete";
	1046	mes "data on the civilization of";
	1047	mes "Juperos, our modern world";
	1048	mes "may be able to learn much";
	1049	mes "from that ancient city's ruins.";
	1050	mes "..................^000000";
	1051	if(yuno_hist < 7)
	1052	{
	1053	next;
	1054	mes "["+strcharinfo(0)+"]";
	1055	mes "Hmmm...";
	1056	mes "A whole chapter";
	1057	mes "dedicated to saying,";
	1058	mes "''We know absolutely";
	1059	mes "nothing about something.''";
	1060	mes "I should write a book~";
	1061	}
	1062	close;
	1063	}
	1064	mes "ruin are still in debate...^000000";
	1065	next;
	1066	mes "^8B6914However, new findings";
	1067	mes "regarding the history";
	1068	mes "of Juperos have allowed";
	1069	mes "us to make a few conclusions.^000000";
	1070	close;
	1071
	1072	case 2:
	1073	if(yuno_hist < 9)
	1074	{
	1075	mes "^8B6914...";
	1076	mes "......";
	1077	mes "..........^000000";
	1078	next;
	1079	mes "["+strcharinfo(0)+"]";
	1080	mes "This is all just idle";
	1081	mes "conjecture! This paper";
	1082	mes "isn't developed enough";
	1083	mes "yet to be a real thesis...";
	1084	close;
	1085	}
	1086	else if(yuno_hist == 9)
	1087	{
	1088	mes "^8B6914Juperos was built over";
	1089	mes "a thousand years ago in";
	1090	mes "an era of peace just after";
	1091	mes "a major war. Contrary to";
	1092	mes "popular belief, there isn't any";
	1093	mes "evidence proving that Juno may";
	1094	mes "have descended from Juperos.^000000";
	1095	next;
	1096	mes "^8B6914In fact, there is a";
	1097	mes "strong possibility that";
	1098	mes "another war, between Juno";
	1099	mes "and Juperos, resulted in Juno's";
	1100	mes "independence from Juperos and";
	1101	mes "the destruction of any existing";
	1102	mes "documentation from that era.^000000";
	1103	next;
	1104	mes "["+strcharinfo(0)+"]";
	1105	mes "Yes... Of course!";
	1106	mes "It all makes sense now!";
	1107	close;
	1108	}
	1109	mes "^8B6914Juperos was built over";
	1110	mes "a thousand years ago in";
	1111	mes "an era of peace just after";
	1112	mes "a major war. There is now";
	1113	mes "direct evidence linking Juno";
	1114	mes "to Juperos proving that Juno";
	1115	mes "was but a part of Juperos.^000000";
	1116	next;
	1117	mes "^8B6914Just like Juno, Juperos";
	1118	mes "was a society that prided";
	1119	mes "itself on its advancement";
	1120	mes "in the sciences which played";
	1121	mes "a permeating role in civilized";
	1122	mes "life. Science was reponsible for Juperos's rise and downfall.";
	1123	close;
	1124
	1125	case 3:
	1126	if(yuno_hist < 10)
	1127	{
	1128	mes "^8B6914...";
	1129	mes "......";
	1130	mes "..........^000000";
	1131	next;
	1132	mes "["+strcharinfo(0)+"]";
	1133	mes "Huh. This writer keeps";
	1134	mes "talking about theories,";
	1135	mes "but the more I read, the";
	1136	mes "less clear I am on what";
	1137	mes "the theory actually is.";
	1138	mes "I don't think there is one...";
	1139	emotion 4,1;
	1140	close;
	1141	}
	1142	mes "^8B6914What is most unsettling";
	1143	mes "is recent evidence, including";
	1144	mes "a first hand written account,";
	1145	mes "regarding the role of one of";
	1146	mes "Jupero's foremost scientists";
	1147	mes "in that city's rise and fall.";
	1148	next;
	1149	mes "^8B6914If these writings are";
	1150	mes "authentic, then what actually";
	1151	mes "happened was that a scientific";
	1152	mes "revolution occurred as a direct";
	1153	mes "result of one scientist's effort to manipulate the energies of the";
	1154	mes "artifact known as Ymir's heart.";
	1155	next;
	1156	mes "^8B6914This one man and Ymir's";
	1157	mes "Heart are credited with";
	1158	mes "the success and prosperity";
	1159	mes "of the Jupero's civilization.";
	1160	mes "However, there are various accounts prior to Jupero's fall";
	1161	mes "detailing his work with chimera...^000000";
	1162	next;
	1163	mes "^8B6914This scientist, supposedly";
	1164	mes "in his passion to benefit his";
	1165	mes "people by finding a scientific";
	1166	mes "method for immortality by using";
	1167	mes "chimera for testing, was driven";
	1168	mes "insane. He experimented on";
	1169	mes "himself with disatrous results.^000000";
	1170	next;
	1171	mes "^8B6914There was an error in the";
	1172	mes "energy calibration of Ymir's";
	1173	mes "Heart and the scientist was";
	1174	mes "transformed into the monster";
	1175	mes "we now know as Chimera. He";
	1176	mes "and his test subjects were set";
	1177	mes "loose into the city of Juperos.^000000";
	1178	next;
	1179	mes "^8B6914These immortal Chimeras";
	1180	mes "razed the entire city, killing";
	1181	mes "countless people. Apparently,";
	1182	mes "a team of scientists were able";
	1183	mes "to salvage a fragment of Ymir's";
	1184	mes "Heart, and use it to lauch part";
	1185	mes "of Juperos into the sky.^000000";
	1186	next;
	1187	mes "^8B6914That section of Juperos";
	1188	mes "eventually developed into";
	1189	mes "the city of Juno. Since the";
	1190	mes "scientists who launched Juno into the sky all immediately died";
	1191	mes "afterwards from an unknown cause, they left no documentation.^000000";
	1192	next;
	1193	mes "^8B6914The Chimera, and the";
	1194	mes "laboratory in which it";
	1195	mes "was created, is rumored to";
	1196	mes "remain beneath the ruins of";
	1197	mes "the once great city of Juperos.^000000";
	1198	close;
	1199
	1200	case 4:
	1201	mes "["+strcharinfo(0)+"]";
	1202	mes "Ugh... My head hurts";
	1203	mes "too much from reading";
	1204	mes "a book for smarty people.";
	1205	mes "I know! I'll play videogames!";
	1206	close;
	1207	}
	1208	}
	1209	switch( select( "Preface","Close the file.") )
	1210	{
	1211	case 1:
	1212	mes "^8B6914Scholars are certain";
	1213	mes "that the Juperos civilization";
	1214	mes "used to be located above the";
	1215	mes "ground, but it is now buried";
	1216	mes "beneath the El Mes Plateau.";
	1217	mes "The reasons for the city's";
	1218	mes "ruin are still nebulous...^000000";
	1219	next;
	1220	mes "^8B6914There is much speculation";
	1221	mes "about the reasons for Jupero's";
	1222	mes "downfall, but any documentation";
	1223	mes "from that time period has been";
	1224	mes "difficult to find. As for now, any evidence we have regarding";
	1225	mes "Juperos is inconclusive.^000000";
	1226	next;
	1227	mes "^8B6914In spite of this lack";
	1228	mes "of empirical or concrete";
	1229	mes "data on the civilization of";
	1230	mes "Juperos, our modern world";
	1231	mes "may be able to learn much";
	1232	mes "from that ancient city's ruins.";
	1233	mes "..................^000000";
	1234	if(!yuno_hist) set yuno_hist,1;
	1235	next;
	1236	mes "["+strcharinfo(0)+"]";
	1237	mes "This...";
	1238	mes "This is supposed to";
	1239	mes "be a research thesis?";
	1240	mes "There's barely any";
	1241	mes "research in it...";
	1242	close;
	1243
	1244	case 2:
	1245	mes "["+strcharinfo(0)+"]";
	1246	mes "Hmm...";
	1247	mes "This isn't heavy";
	1248	mes "enough to be a real";
	1249	mes "academic work. It must";
	1250	mes "not even be finished yet.";
	1251	close;
	1252	}
	1253	case 2:
	1254	if(yuno_hist < 5)
	1255	{
	1256	mes "["+strcharinfo(0)+"]";
	1257	mes "Nah...";
	1258	mes "I'm tired of reading.";
	1259	mes "Ironically enough.";
	1260	close;
	1261	}
	1262	else if(yuno_hist < 7)
	1263	{
	1264	mes "["+strcharinfo(0)+"]";
	1265	mes "I don't feel like";
	1266	mes "reading this. Not";
	1267	mes "enough pictures...";
	1268	close;
	1269	}
	1270	else if(yuno_hist < 9)
	1271	{
	1272	mes "["+strcharinfo(0)+"]";
	1273	mes "It looks very sophisticated...";
	1274	close;
	1275	}
	1276	else if(yuno_hist < 10)
	1277	{
	1278	mes "["+strcharinfo(0)+"]";
	1279	mes "I know this book...";
	1280	mes "But I don't feel like";
	1281	mes "reading it right now.";
	1282	close;
	1283	}
	1284	else
	1285	{
	1286	mes "["+strcharinfo(0)+"]";
	1287	mes "This thesis is";
	1288	mes "looking pretty good~";
	1289	mes "Of course, I did have";
	1290	mes "a hand in making it...";
	1291	close;
	1292	}
	1293	}
	1294	}
	1295
	1296	yuno_in04,188,118,4 script Book#juperos 111,{
	1297
	1298	if(yuno_hist > 7)
	1299	{
	1300	mes "^8B6914Self-Honesty";
	1301	mes "'Benefits Fo' Life!'";
	1302	mes "By Stephen Oyoung";
	1303	mes " ";
	1304	mes " ";
	1305	mes "Publisher:";
	1306	mes "Wushu Publishing, Co.^000000";
	1307	next;
	1308	mes "["+strcharinfo(0)+"]";
	1309	mes "W-whoa!";
	1310	mes "This book wasn't";
	1311	mes "here before! It looks";
	1312	mes "pretty interesting...";
	1313	close;
	1314	}
	1315	mes "["+strcharinfo(0)+"]";
	1316	mes "You know what?";
	1317	mes "I think I'll just flip";
	1318	mes "through some pages";
	1319	mes "from a random book.";
	1320	mes "Hmmm, let's see...";
	1321	next;
	1322	mes "^8B6914''Admiral, the Kylorians are";
	1323	mes "still advancing!'' Commander";
	1324	mes "McKenrick announced without";
	1325	mes "his usual swagger. ''They're...";
	1326	mes "They're not stopping!'' But";
	1327	mes "Admiral Leh's eyes were a cold,";
	1328	mes "unfeeling shade of sternness.^000000";
	1329	next;
	1330	mes "^8B6914''Let the goddamned space";
	1331	mes "aliens come,'' hissed Leh.";
	1332	mes "''We don't stand a chance";
	1333	mes "without the Zenoi Sword";
	1334	mes "to summon the power of";
	1335	mes "GOD-POING. It's... It's";
	1336	mes "all over. Damn it all...''^000000";
	1337	next;
	1338	mes "^8B6914The doors burst open as";
	1339	mes "Bucky flew into the room.";
	1340	mes "''The Zenoi Sword! The";
	1341	mes "Zenoi Sword! Someone's";
	1342	mes "found it!'' the boy yelled.";
	1343	mes "''Really?! We better hurry:";
	1344	mes "Earth doesn't have much time!''^000000";
	1345	next;
	1346	mes "["+strcharinfo(0)+"]";
	1347	mes "...";
	1348	mes "......";
	1349	mes "Whoa. I really";
	1350	mes "should have read";
	1351	mes "this masterpiece";
	1352	mes "from the beginning...";
	1353	close;
	1354	}
	1355
	1356	// Bronze Statue - juperos_01 99 112
	1357
	1358	juperos_01,99,112,4 script Bronze Statue#1 844,{
	1359
	1360	if(yuno_hist > 3)
	1361	{
	1362	mes "^3355FF''Do you wish to see";
	1363	mes "the end of the madness?";
	1364	mes "He is waiting where the three";
	1365	mes "columns were destroyed, where";
	1366	mes "two hundred illusions wander.''^000000";
	1367	close;
	1368	}
	1369	else if(yuno_hist == 3)
	1370	{
	1371	mes "["+strcharinfo(0)+"]";
	1372	mes "I better go and";
	1373	mes "see Fayruz in the";
	1374	mes "Juno Library and tell";
	1375	mes "her about the inscription.";
	1376	close;
	1377	}
	1378	else
	1379	{
	1380	mes "^3355FFThere's a peculiar";
	1381	mes "engraving on the";
	1382	mes "Bronze Statue's rod.^000000";
	1383	next;
	1384	switch( select( "Investigate","Ignore it" ) )
	1385	{
	1386	case 1 :
	1387	mes "^3355FFIt's an inscription that's";
	1388	mes "written in an old language";
	1389	mes "that you can't understand,";
	1390	mes "but have no problem reading";
	1391	mes "and making out the sounds";
	1392	mes "for some weird reason.^000000";
	1393	next;
	1394	mes "["+strcharinfo(0)+"]";
	1395	mes "This is creepy!";
	1396	mes "I know that I'm not";
	1397	mes "supposed to be able";
	1398	mes "to read this, but here";
	1399	mes "I am. I know what sounds";
	1400	mes "all of these letters make...";
	1401	next;
	1402	if(yuno_hist == 2)
	1403	{
	1404	mes "["+strcharinfo(0)+"]";
	1405	mes "Then again, Fayruz did";
	1406	mes "say this was enchanted.";
	1407	mes "Okay, I guess I'll go back";
	1408	mes "to the Juno Library and";
	1409	mes "tell her what I found.";
	1410	set yuno_hist,3;
	1411	close;
	1412	}
	1413	mes "["+strcharinfo(0)+"]";
	1414	mes "Huh. Only a scholar,";
	1415	mes "maybe someone even in";
	1416	mes "Juno, could make sense";
	1417	mes "of what this stuff says.";
	1418	close;
	1419
	1420	case 2 :
	1421	close;
	1422	}
	1423	}
	1424	}
	1425
	1426	yuno_in04,169,109,1 script Ambitious Hollgrehenn 111,{
	1427
	1428	mes "Hollgrehenn: The Ambition";
	1429	mes "By Aragham Caul*";
	1430	mes "";
	1431	mes "";
	1432	mes "";
	1433	mes "";
	1434	mes "Publisher:";
	1435	mes "Muha Books, Co.";
	1436	next;
	1437	mes "...";
	1438	mes "He would stop at nothing";
	1439	mes "to have the greatest weapon";
	1440	mes "in the world in his possession.";
	1441	mes "He became a smith so that he";
	1442	mes "could discern which weapons";
	1443	mes "were the most powerful...";
	1444	next;
	1445	mes "[" + strcharinfo(0) + "]";
	1446	mes "That's strange...";
	1447	mes "The next page";
	1448	mes "has been torn out.";
	1449	close;
	1450	}
	1451
	1452	yuno_in04,174,111,1 script Penniless Hollgrehenn 111,{
	1453
	1454	mes "^8B6914Penniless Hollgrehenn";
	1455	mes " * Pennyless Hollgrehenn * ";
	1456	mes "By Hollgrehenn";
	1457	mes " ";
	1458	mes " ";
	1459	mes "Publisher:";
	1460	mes "Muha Books, Co.^000000";
	1461	next;
	1462	mes "["+strcharinfo(0)+"]";
	1463	mes "This book looks";
	1464	mes "like a total piece of";
	1465	mes "crap. I'd have more";
	1466	mes "fun getting my teeth";
	1467	mes "drilled by a blindfolded";
	1468	mes "dentist. Or would I...?";
	1469	close;
	1470	}
	1471
	1472	yuno_in04,102,106,1 script Popular Feasts 111,{
	1473
	1474	mes "^8B6914Popular Feasts";
	1475	mes "By Cabbage Pickle Community";
	1476	mes " ";
	1477	mes " ";
	1478	mes " ";
	1479	mes "Publisher:";
	1480	mes "Muha Books, Co.^000000";
	1481	next;
	1482	switch( select( " 1. Fried Yoyo Tails"," 14. Poring Salad"," 252. Beak Soup" ) )
	1483	{
	1484	case 1:
	1485	mes "^8B6914...";
	1486	mes "If possible, try";
	1487	mes "to use tails cut";
	1488	mes "from live Yoyos.";
	1489	mes "Now, as for skinning...^000000";
	1490	next;
	1491	mes "["+strcharinfo(0)+"]";
	1492	mes "Um...";
	1493	mes "Barf?";
	1494	close;
	1495
	1496	case 2:
	1497	mes "["+strcharinfo(0)+"]";
	1498	mes "Hey, this page is gone!";
	1499	mes "I guess Poring Salad is";
	1500	mes "the most popular feast";
	1501	mes "in this entire book.";
	1502
	1503	case 3:
	1504	mes "^8B6914...";
	1505	mes "Fry the cut beaks";
	1506	mes "using herbal oil until";
	1507	mes "crisp. Then, pour the";
	1508	mes "feathers into a blender...^000000";
	1509	next;
	1510	mes "["+strcharinfo(0)+"]";
	1511	mes "Hmm...";
	1512	mes "Sounds a little";
	1513	mes "too gourmet for my";
	1514	mes "taste. And by ''gourmet,''";
	1515	mes "I mean, ''totally gross.''";
	1516	close;
	1517	}
	1518	}
	1519
	1520	yuno_in04,111,108,1 script Hamerun, Rat Hunter 111,{
	1521
	1522	mes "["+strcharinfo(0)+"]";
	1523	mes "I can't...";
	1524	mes "reach it...!";
	1525	close;
	1526	}
	1527
	1528	yuno_in04,167,127,1 script Red Book 111,{
	1529
	1530	mes "^3355FFYou find a book";
	1531	mes "with red binding.^000000";
	1532	next;
	1533	switch( select( "Read.","Leave it alone." ) )
	1534	{
	1535	case 1:
	1536	mes "^8B6914...^000000";
	1537	next;
	1538	mes "^8B6914...";
	1539	mes "......^000000";
	1540	next;
	1541	mes "^8B6914...";
	1542	mes "......";
	1543	mes ".........^000000";
	1544	next;
	1545	mes "^8B6914...";
	1546	mes "......";
	1547	mes ".........";
	1548	mes "............^000000";
	1549	next;
	1550	mes "["+strcharinfo(0)+"]";
	1551	mes "This is...";
	1552	mes "A compilation of";
	1553	mes "Shakespeare in ";
	1554	mes "coloring book format?";
	1555	next;
	1556	mes "["+strcharinfo(0)+"]";
	1557	mes "Wait...";
	1558	mes "Why would fans of";
	1559	mes "Shakespeare even";
	1560	mes "want a coloring book?";
	1561	next;
	1562	mes "["+strcharinfo(0)+"]";
	1563	mes "Hmm... Well...";
	1564	mes "I suppose little kids who";
	1565	mes "read Shakespeare would";
	1566	mes "appreciate something like that.";
	1567	next;
	1568	mes "["+strcharinfo(0)+"]";
	1569	mes "Hold on...";
	1570	mes "Do little kids who";
	1571	mes "are able to read the";
	1572	mes "works of Shakespeare";
	1573	mes "even exist? I hope not...";
	1574	close;
	1575
	1576	case 2:
	1577	mes "["+strcharinfo(0)+"]";
	1578	mes "What a strange";
	1579	mes "and mysterious book.";
	1580	mes "I'll never know what's";
	1581	mes "inside unless I read it!";
	1582	mes "Come on! Doesn't the red";
	1583	mes "binding mean something?";
	1584	close;
	1585	}
	1586	}
	1587
	1588	yuno_in04,121,109,1 script Scroll 111,{
	1589
	1590	mes "^3355FFYou've found an";
	1591	mes "antiquated scroll";
	1592	mes "that's collected a";
	1593	mes "layer of fine dust.^000000";
	1594	next;
	1595	switch( select( "Peruse","Leave it alone" ) )
	1596	{
	1597	case 1:
	1598	mes "^8B6914Item Upgrade Introduction";
	1599	mes " ";
	1600	mes " ";
	1601	mes " ";
	1602	mes "1. Item Upgrade Definition";
	1603	mes " ";
	1604	mes "The key to success when";
	1605	mes "upgrading items comes from";
	1606	mes "only one place: Your ''Mind.''";
	1607	mes " ";
	1608	mes " ";
	1609	mes " ";
	1610	mes "2. Power of a Positive Attitude";
	1611	mes "Before trying to upgrade";
	1612	mes "an item, plan out how high";
	1613	mes "you want to upgrade and how";
	1614	mes "much you'll spend beforehand.";
	1615	mes "But like all ladies, Lady Luck";
	1616	mes "smiles when you fully splurge.^000000";
	1617	mes " ";
	1618	mes " ";
	1619	next;
	1620	mes "["+strcharinfo(0)+"]";
	1621	mes "Wait, wait...";
	1622	mes "This thing IS old.";
	1623	mes "I mean, it's obviously";
	1624	mes "written from a patriarchal";
	1625	mes "standpoint that promotes";
	1626	mes "bipartisan gender roles.";
	1627	next;
	1628	mes "["+strcharinfo(0)+"]";
	1629	mes "I'm...";
	1630	mes "I'm so offended.";
	1631	close;
	1632
	1633	case 2:
	1634	mes "["+strcharinfo(0)+"]";
	1635	mes "This scroll is far too";
	1636	mes "primitive. There's been";
	1637	mes "all sorts of technological";
	1638	mes "reading advances that I can't";
	1639	mes "live without... Like pages.";
	1640	close;
	1641	}
	1642	}
	1643
	1644	yuno_in04,118,116,4 script Paper 111,{
	1645
	1646	mes "^3355FFIt's a piece of";
	1647	mes "paper that looks";
	1648	mes "like a personal letter.^000000";
	1649	next;
	1650	switch( select("Read it.","Leave it alone.") )
	1651	{
	1652	case 1:
	1653	if(yuno_hist > 7)
	1654	{
	1655	mes "^8B6914P.S.";
	1656	mes "Please...";
	1657	mes "Come back to me.";
	1658	mes " ";
	1659	mes " ";
	1660	mes "Love,";
	1661	mes "Fayruz^000000";
	1662	close;
	1663	}
	1664	mes "^8B6914...";
	1665	mes "I can't forget your smile.";
	1666	mes "No matter what, even if you";
	1667	mes "hate me, I'll always have these";
	1668	mes "feelings just for you. You are";
	1669	mes "the one who is most special,";
	1670	mes "who means the most to my heart.^000000";
	1671	next;
	1672	mes "^8B6914I know we've had our";
	1673	mes "differences, but please";
	1674	mes "don't refuse my love. By";
	1675	mes "your hands, I hope that";
	1676	mes "you can forgive me for us.";
	1677	mes "- Love, Fayruz^000000";
	1678	next;
	1679	if(getpartnerid())
	1680	{
	1681	mes "["+strcharinfo(0)+"]";
	1682	mes "Ahhhhhh~";
	1683	mes "Love sure is nice!";
	1684	close;
	1685	}
	1686	mes "["+strcharinfo(0)+"]";
	1687	mes "What th--?!";
	1688	mes "Booooooooo!";
	1689	mes "Love stinks!";
	1690	close;
	1691
	1692	case 2:
	1693	mes "["+strcharinfo(0)+"]";
	1694	mes "I guess I better";
	1695	mes "not look at this.";
	1696	mes "I mean, I might";
	1697	mes "regret reading it.";
	1698	close;
	1699	}
	1700	}
	1701
	1702	juperos_01,123,92,4 script Stone Statue 844,{
	1703
	1704	if(yuno_hist)
	1705	{
	1706	mes "^3355FFIt's a stone statue";
	1707	mes "that looks exactly like";
	1708	mes "the one in the Juno Library.";
	1709	mes "However, it has sculptures";
	1710	mes "of books instead of real ones.^000000";
	1711	next;
	1712	mes "^3355FFIt's possible that the";
	1713	mes "statue in the Juno Library";
	1714	mes "was made after this one.";
	1715	mes "But who can be sure?^000000";
	1716	close;
	1717	}
	1718	mes "^3355FFIt's an old";
	1719	mes "statue sculpted";
	1720	mes "out of stone.^000000";
	1721	close;
	1722	}
	1723
	1724	juperos_01,99,71,4 script Bronze Statue#2 844,{
	1725
	1726	mes "^3355FFIt's an elaborate";
	1727	mes "bronze statue that";
	1728	mes "is twice the height of";
	1729	mes "a normal human being.^000000";
	1730	close;
	1731	}
	1732
	1733	juperos_01,79,92,4 script Sculpture 844,{
	1734
	1735	mes "^3355FFIt's a sculpture that";
	1736	mes "looks familiar to you.^000000";
	1737	close;
	1738	}
	1739
	1740	juperos_01,215,127,4 script Machine Statue 844,{
	1741
	1742	mes "^3355FFThis is the bust of a";
	1743	mes "humanoid machine with";
	1744	mes "a familiar Crest Piece";
	1745	mes "carved into the middle.^000000";
	1746	next;
	1747	mes "^3355FFThe statue's entire";
	1748	mes "form is mind boggling,";
	1749	mes "but you manage to note";
	1750	mes "that its outstretched";
	1751	mes "arm points westward.^000000";
	1752	close;
	1753	}
	1754
	1755	//============================================================
	1756	// Jupers Core access Story Event
	1757	//============================================================
	1758	//============================================================
	1759	// 1rd Floor -> 2nd Floor
	1760	//============================================================
	1761	juperos_01,100,91,0 script jupe_goto#1 -1,2,2,{
	1762	end;
	1763
	1764	OnTouch:
	1765	initnpctimer "jupe_goto#1",1;
	1766	mes "^777777["+ strcharinfo(0) +"]^000000";
	1767	mes "This light...";
	1768	mes "It feels like...";
	1769	mes "Its warmth is...";
	1770	mes "Wrapping all over me...";
	1771	next;
	1772	switch(select("Ah, it's so nice...:No! This is wrong!")) {
	1773	case 1:
	1774	mes "^777777["+ strcharinfo(0) +"]^000000";
	1775	mes "Ahhhh...";
	1776	mes "It feels like";
	1777	mes "I'm floating...";
	1778	specialeffect2 348; // EF_LIGHTSPHERE
	1779	close2;
	1780	stopnpctimer;
	1781	warp "juperos_02",128,278;
	1782	case 2:
	1783	mes "^777777["+ strcharinfo(0) +"]^000000";
	1784	mes "N-No! This is";
	1785	mes "wrong! Something";
	1786	mes "weird's happening!";
	1787	mes "I gotta get away!";
	1788	close2;
	1789	stopnpctimer;
	1790	warp "juperos_01",96,91;
	1791	}
	1792	end;
	1793
	1794	OnTimer10000:
	1795	stopnpctimer;
	1796	warp "juperos_02",128,278;
	1797	donpcevent "jupe_goto#2::OnEnable";
	1798	end;
	1799	}
	1800
	1801	juperos_01,100,91,0 script jupe_goto#2 -1,2,2,{
	1802	OnInit:
	1803	disablenpc "jupe_goto#2";
	1804	end;
	1805
	1806	OnEnable:
	1807	enablenpc "jupe_goto#2";
	1808	disablenpc "jupe_goto#1";
	1809	initnpctimer;
	1810	end;
	1811
	1812	OnTouch:
	1813	warp "juperos_02",128,278;
	1814	end;
	1815
	1816	OnTimer2000:
	1817	enablenpc "jupe_goto#1";
	1818	disablenpc "jupe_goto#2";
	1819	end;
	1820	}
	1821
	1822	//============================================================
	1823	// 2nd Floor
	1824	//============================================================
	1825
	1826	juperos_02,97,70,0 script 3F Gate Switch#jupe -1,{
	1827	OnInit:
	1828	initnpctimer;
	1829	end;
	1830
	1831	Onreset:
	1832	killmonster "juperos_02","3F Gate Switch#jupe::OnMyMobDead";
	1833	end;
	1834
	1835	OnEnable:
	1836	enablenpc "3F Gate Switch#jupe";
	1837	initnpctimer;
	1838	end;
	1839
	1840	OnTimer5000:
	1841	set .MyMobs,3;
	1842	monster "juperos_02",24,275,"1st Gate Switch",1674,1,"3F Gate Switch#jupe::OnMyMobDead";
	1843	monster "juperos_02",240,29,"2nd Gate Switch",1674,1,"3F Gate Switch#jupe::OnMyMobDead";
	1844	monster "juperos_02",282,183,"3rd Gate Switch",1674,1,"3F Gate Switch#jupe::OnMyMobDead";
	1845	stopnpctimer;
	1846	end;
	1847
	1848	OnMyMobDead:
	1849	set .MyMobs,.MyMobs-1;
	1850	if (.MyMobs == 2)
	1851	mapannounce "juperos_02","Who are you to come here?",bc_map,"0xFF0000";
	1852	else if (.MyMobs == 1)
	1853	mapannounce "juperos_02","Have you come seeking Juperos?! It no longer exists...",bc_map,"0xFF0000";
	1854	else if (.MyMobs == 0) {
	1855	mapannounce "juperos_02","Have you come to see me? Fine! Find me first!",bc_map,"0xFF0000";
	1856	specialeffect2 563; // 563
	1857	soundeffectall "earth_quake.wav",0;
	1858	disablenpc "3F Gate Switch#jupe";
	1859	donpcevent "Restricted Area#jupe::OnEnable";
	1860	}
	1861	end;
	1862	}
	1863
	1864
	1865	juperos_02,130,149,0 script Restricted Area#jupe 139,2,2,{
	1866	OnInit:
	1867	disablenpc "Restricted Area#jupe";
	1868	end;
	1869
	1870	OnEnable:
	1871	enablenpc "Restricted Area#jupe";
	1872	initnpctimer;
	1873	end;
	1874
	1875	OnTimer5000:
	1876	mapannounce "juperos_02","Vroom! Vroom!",bc_map,"0xE559A2";
	1877	end;
	1878
	1879	OnTimer7000:
	1880	mapannounce "juperos_02","Attention, visitors.",bc_map,"0xE559A2";
	1881	end;
	1882
	1883	OnTimer9000:
	1884	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";
	1885	end;
	1886
	1887	OnTimer9001:
	1888	OnTimer23000:
	1889	OnTimer46000:
	1890	OnTimer69000:
	1891	OnTimer92000:
	1892	OnTimer115000:
	1893	OnTimer161000:
	1894	OnTimer184000:
	1895	OnTimer207000:
	1896	OnTimer230000:
	1897	OnTimer253000:
	1898	OnTimer276000:
	1899	OnTimer299000:
	1900	OnTimer322000:
	1901	OnTimer345000:
	1902	OnTimer368000:
	1903	OnTimer391000:
	1904	OnTimer414000:
	1905	OnTimer460000:
	1906	OnTimer483000:
	1907	OnTimer506000:
	1908	OnTimer529000:
	1909	OnTimer552000:
	1910	specialeffect 561; //"Restricted Area#jupe" 561
	1911	end;
	1912
	1913	OnTimer556000:
	1914	mapannounce "juperos_02","Attention, visitors. The gate to the next zone will close shortly.",bc_map,"0xE559A2";
	1915	end;
	1916
	1917	OnTimer561000:
	1918	mapannounce "juperos_02","1 minute remaining until Gate Closure. ",bc_map,"0xE559A2";
	1919	end;
	1920
	1921	OnTimer598000:
	1922	specialeffect 561; //"Restricted Area#jupe" 561
	1923	end;
	1924
	1925	OnTimer600000:
	1926	mapannounce "juperos_02","The gate is being closed...",bc_map,"0xE559A2";
	1927	end;
	1928
	1929	OnTimer603000:
	1930	mapannounce "juperos_02"," Switches will reactivate shortly.",bc_map,"0xE559A2";
	1931	end;
	1932
	1933	OnTimer621000:
	1934	disablenpc "Restricted Area#jupe";
	1935	end;
	1936
	1937	OnTimer1200000:
	1938	donpcevent "3F Gate Switch#jupe::OnEnable";
	1939	stopnpctimer;
	1940	end;
	1941
	1942	OnTouch:
	1943	warp "jupe_gate",50,167;
	1944	end;
	1945	}
	1946
	1947	//============================================================
	1948	// Security Checkpoint 1-1
	1949	//============================================================
	1950	jupe_area1,88,224,0 script #hole#1-1 844,{
	1951	cutin "1",2;
	1952	if ($@JupreArea1InUse == 1) {
	1953	mes "^3355FFThis seems like";
	1954	mes "some kind of device";
	1955	mes "that will allow you to";
	1956	mes "pass to the other side.";
	1957	mes "There's a slot where you";
	1958	mes "probably need to insert";
	1959	mes "some kind of object...^000000";
	1960	close2;
	1961	cutin "1",255;
	1962	end;
	1963	}
	1964	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	1965	mes "^3355FFThis seems like";
	1966	mes "some kind of device";
	1967	mes "that will allow you to";
	1968	mes "pass to the other side.";
	1969	mes "There's a slot where you";
	1970	mes "probably need to insert";
	1971	mes "some kind of object...^000000";
	1972	next;
	1973	switch(select("Insert a Crest Piece.:Cancel.")) {
	1974	case 1:
	1975	if (countitem(7356) > 0) {
	1976	mes "^3355FFYou take out your";
	1977	mes "Crest Piece and place";
	1978	mes "it into the slot where it";
	1979	mes "happens to fit perfectly.^000000";
	1980	specialeffect 159; //"#hole#1-1" EF_TOPRANK
	1981	cutin "1-1",2;
	1982	next;
	1983	if ($@JupreArea1InUse == 1) {
	1984	mes "^3355FFNothing happens.";
	1985	mes "Perhaps an alarm or";
	1986	mes "some other safety measure";
	1987	mes "was activated to keep the";
	1988	mes "Crest Piece from activating";
	1989	mes "this transportation device.";
	1990	mes "You retrieve the Crest Piece.^000000";
	1991	close2;
	1992	cutin "1-1",255;
	1993	end;
	1994	}
	1995	else {
	1996	mes "^3355FFThe slot rotates and";
	1997	mes "the Crest Piece moves as";
	1998	mes "if it were turning a key. You";
	1999	mes "feel a weak tremor as a Warp";
	2000	mes "Portal to the other side is";
	2001	mes "activated. You then retrieve";
	2002	mes "your Crest Piece.^000000";
	2003	initnpctimer;
	2004	donpcevent "Warp#1-1::OnEnable";
	2005	enablenpc "Red Alarm#1-1";
	2006	disablenpc "#hole#1-1";
	2007	close2;
	2008	cutin "1-1",255;
	2009	end;
	2010	}
	2011	}
	2012	else {
	2013	mes "^3355FFUnfortunately, you're";
	2014	mes "not carrying anything";
	2015	mes "that might be able to fit";
	2016	mes "into the slot and activate";
	2017	mes "this mechanical device.^000000";
	2018	close2;
	2019	cutin "1",255;
	2020	end;
	2021	}
	2022	case 2:
	2023	mes "[" + strcharinfo(0) + "]";
	2024	mes "Hmmm...";
	2025	mes "Do I have anything";
	2026	mes "that might make this";
	2027	mes "weird machine work?";
	2028	close2;
	2029	cutin "1",255;
	2030	end;
	2031	}
	2032	close;
	2033	}
	2034	else {
	2035	mes "^3355FFThis seems like";
	2036	mes "some kind of device";
	2037	mes "that will allow you to";
	2038	mes "pass to the other side.";
	2039	mes "There's a slot where you";
	2040	mes "probably need to insert";
	2041	mes "some kind of object...^000000";
	2042	close2;
	2043	cutin "1",255;
	2044	end;
	2045	}
	2046
	2047	Onstop_timer:
	2048	stopnpctimer;
	2049	end;
	2050
	2051	OnTimer22500:
	2052	stopnpctimer;
	2053	enablenpc "#hole#1-1";
	2054	disablenpc "Red Alarm#1-1";
	2055	end;
	2056	}
	2057
	2058	jupe_area1,83,221,0 script Warp#1-1 139,2,2,{
	2059	OnInit:
	2060	disablenpc "Warp#1-1";
	2061	end;
	2062
	2063	OnEnable:
	2064	enablenpc "Warp#1-1";
	2065	specialeffect 561; //"Warp#1-1" 561
	2066	soundeffectall "jupe_warp.wav",0;
	2067	initnpctimer;
	2068	end;
	2069
	2070	OnTouch:
	2071	warp "jupe_area1",47,259;
	2072	end;
	2073
	2074	OnTimer22500:
	2075	stopnpctimer;
	2076	disablenpc "Warp#1-1";
	2077	end;
	2078	}
	2079
	2080	jupe_area1,47,259,0 script Red Alarm#1-1 -1,2,2,{
	2081	OnInit:
	2082	disablenpc "Red Alarm#1-1";
	2083	end;
	2084
	2085	OnTouch:
	2086	donpcevent "Red Alarm On#1-1::OnEnable";
	2087	disablenpc "Red Alarm#1-1";
	2088	donpcevent "#hole#1-1::Onstop_timer";
	2089	set $@JupreArea1InUse,1;
	2090	disablenpc "#hole#1-1";
	2091	end;
	2092	}
	2093
	2094	- script Red Alarm On#1-1 -1,{
	2095	OnInit:
	2096	disablenpc "Red Alarm On#1-1";
	2097	end;
	2098
	2099	OnEnable:
	2100	enablenpc "Red Alarm On#1-1";
	2101	initnpctimer;
	2102	end;
	2103
	2104	OnTimer1000:
	2105	mapannounce "jupe_area1","Those of you who have come here...",bc_map,"0xFF0000";
	2106	end;
	2107
	2108	OnTimer3000:
	2109	mapannounce "jupe_area1","I do not intend to stop you.",bc_map,"0xFF0000";
	2110	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2111	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2112	end;
	2113
	2114	OnTimer5000:
	2115	mapannounce "jupe_area1","But I assume you are prepared for a few obstacles...",bc_map,"0xFF0000";
	2116	donpcevent "Monster1#1-1::OnEnable";
	2117	end;
	2118
	2119	OnTimer7000:
	2120	mapannounce "jupe_area1","After all, you are venturing through a forbidden area!",bc_map,"0xFF0000";
	2121	end;
	2122
	2123	OnTimer8000:
	2124	disablenpc "Red Alarm On#1-1";
	2125	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2126	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2127	stopnpctimer;
	2128	end;
	2129	}
	2130
	2131	- script Monster1#1-1 -1,{
	2132	OnInit:
	2133	disablenpc "Monster1#1-1";
	2134	end;
	2135
	2136	OnDisable:
	2137	disablenpc "Monster1#1-1";
	2138	killmonster "jupe_area1","Monster1#1-1::OnMyMobDead";
	2139	end;
	2140
	2141	OnEnable:
	2142	enablenpc "Monster1#1-1";
	2143	initnpctimer;
	2144	set .MyMobs,8;
	2145	monster "jupe_area1",30,263,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead";
	2146	monster "jupe_area1",30,262,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead";
	2147	monster "jupe_area1",30,261,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead";
	2148	monster "jupe_area1",30,260,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead";
	2149	monster "jupe_area1",30,259,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead";
	2150	monster "jupe_area1",30,258,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead";
	2151	monster "jupe_area1",30,257,"Security Guard",1675,1,"Monster1#1-1::OnMyMobDead";
	2152	monster "jupe_area1",30,256,"Security Guard",1669,1,"Monster1#1-1::OnMyMobDead";
	2153	end;
	2154
	2155	OnTimer300000:
	2156	mapannounce "jupe_area1","Do you realize this is a hallucination?",bc_map,"0xFF0000";
	2157	set $@JupreArea1InUse,0;
	2158	end;
	2159
	2160	OnTimer300002:
	2161	enablenpc "#hole#1-1";
	2162	stopnpctimer;
	2163	donpcevent "Monster1#1-1::OnDisable";
	2164	end;
	2165
	2166	OnMyMobDead:
	2167	set .MyMobs,.MyMobs-1;
	2168	if (.MyMobs < 1) {
	2169	donpcevent "Monster2#1-1::OnEnable";
	2170	disablenpc "Monster1#1-1";
	2171	stopnpctimer;
	2172	}
	2173	end;
	2174	}
	2175
	2176	- script Monster2#1-1 -1,{
	2177	OnInit:
	2178	disablenpc "Monster2#1-1";
	2179	end;
	2180
	2181	OnDisable:
	2182	disablenpc "Monster2#1-1";
	2183	killmonster "jupe_area1","Monster2#1-1::OnMyMobDead";
	2184	end;
	2185
	2186	OnEnable:
	2187	enablenpc "Monster2#1-1";
	2188	initnpctimer;
	2189	end;
	2190
	2191	OnTimer2000:
	2192	mapannounce "jupe_area1","How about now?",bc_map,"0xFF0000";
	2193	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2194	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2195	end;
	2196
	2197	OnTimer4000:
	2198	mapannounce "jupe_area1","Let me see...",bc_map,"0xFF0000";
	2199	end;
	2200
	2201	OnTimer7000:
	2202	mapannounce "jupe_area1","Just how strong you are!",bc_map,"0xFF0000";
	2203	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2204	soundeffectall "jupe_warning.wav",0,"jupe_area1";
	2205	set .MyMobs,8;
	2206	monster "jupe_area1",30,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead";
	2207	monster "jupe_area1",31,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead";
	2208	monster "jupe_area1",32,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead";
	2209	monster "jupe_area1",33,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead";
	2210	monster "jupe_area1",34,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead";
	2211	monster "jupe_area1",35,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead";
	2212	monster "jupe_area1",36,238,"Security Guard",1675,1,"Monster2#1-1::OnMyMobDead";
	2213	monster "jupe_area1",37,238,"Security Guard",1669,1,"Monster2#1-1::OnMyMobDead";
	2214	end;
	2215
	2216	OnTimer300000:
	2217	mapannounce "jupe_area1","Bwahaha! You're only good at running away!",bc_map,"0xFF0000";
	2218	set $@JupreArea1InUse,0;
	2219	end;
	2220
	2221	OnTimer300002:
	2222	enablenpc "#hole#1-1";
	2223	stopnpctimer;
	2224	donpcevent "Monster2#1-1::OnDisable";
	2225	end;
	2226
	2227	OnMyMobDead:
	2228	set .MyMobs,.MyMobs-1;
	2229	if (.MyMobs < 1) {
	2230	mapannounce "jupe_area1","Zzzzt. Zzzzt..... ",bc_map,"0xFF0000";
	2231	disablenpc "Monster2#1-1";
	2232	enablenpc "#hole#1-1";
	2233	set $@JupreArea1InUse,0;
	2234	stopnpctimer;
	2235	}
	2236	end;
	2237	}
	2238
	2239	//============================================================
	2240	// Security Checkpoint 1-2
	2241	//============================================================
	2242	jupe_area1,25,238,0 script #hole#1-2 844,{
	2243	cutin "2",2;
	2244	if ($@JupreArea1InUse == 1) {
	2245	mes "^3355FFThis seems like";
	2246	mes "some kind of device";
	2247	mes "that will allow you to";
	2248	mes "pass to the other side.";
	2249	mes "There's a slot where you";
	2250	mes "probably need to insert";
	2251	mes "some kind of object...^000000";
	2252	close2;
	2253	cutin "2",255;
	2254	end;
	2255	}
	2256	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	2257	mes "^3355FFThis seems like";
	2258	mes "some kind of device";
	2259	mes "that will allow you to";
	2260	mes "pass to the other side.";
	2261	mes "There's a slot where you";
	2262	mes "probably need to insert";
	2263	mes "some kind of object...^000000";
	2264	next;
	2265	switch(select("Insert a Crest Piece.:Cancel.")) {
	2266	case 1:
	2267	if (countitem(7357) > 0) {
	2268	mes "^3355FFYou take out your";
	2269	mes "Crest Piece and place";
	2270	mes "it into the slot where it";
	2271	mes "happens to fit perfectly.^000000";
	2272	specialeffect 159; //"#hole#1-2" EF_TOPRANK
	2273	cutin "2-1",2;
	2274	next;
	2275	if ($@JupreArea1InUse == 1) {
	2276	mes "^3355FFNothing happens.";
	2277	mes "Perhaps an alarm or";
	2278	mes "some other safety measure";
	2279	mes "was activated to keep the";
	2280	mes "Crest Piece from activating";
	2281	mes "this transportation device.";
	2282	mes "You retrieve the Crest Piece.^000000";
	2283	close2;
	2284	cutin "2-1",255;
	2285	end;
	2286	}
	2287	else {
	2288	mes "^3355FFThe slot rotates and";
	2289	mes "the Crest Piece moves as";
	2290	mes "if it were turning a key. You";
	2291	mes "feel a weak tremor as a Warp";
	2292	mes "Portal to the other side is";
	2293	mes "activated. You then retrieve";
	2294	mes "your Crest Piece.^000000";
	2295	initnpctimer;
	2296	donpcevent "Warp#1-2::OnEnable";
	2297	enablenpc "Red Alarm#1-2";
	2298	disablenpc "#hole#1-2";
	2299	close2;
	2300	cutin "2-1",255;
	2301	end;
	2302	}
	2303	}
	2304	else {
	2305	mes "^3355FFUnfortunately, you're";
	2306	mes "not carrying anything";
	2307	mes "that might be able to fit";
	2308	mes "into the slot and activate";
	2309	mes "this mechanical device.^000000";
	2310	close2;
	2311	cutin "2",255;
	2312	end;
	2313	}
	2314	break;
	2315	case 2:
	2316	mes "[" + strcharinfo(0) + "]";
	2317	mes "Hmmm...";
	2318	mes "Do I have anything";
	2319	mes "that might make this";
	2320	mes "weird machine work?";
	2321	close2;
	2322	cutin "2",255;
	2323	end;
	2324	}
	2325	close;
	2326	}
	2327	else {
	2328	mes "^3355FFThis seems like";
	2329	mes "some kind of device";
	2330	mes "that will allow you to";
	2331	mes "pass to the other side.";
	2332	mes "There's a slot where you";
	2333	mes "probably need to insert";
	2334	mes "some kind of object...^000000";
	2335	close2;
	2336	cutin "2",255;
	2337	end;
	2338	}
	2339	end;
	2340
	2341	Onstop_timer:
	2342	stopnpctimer;
	2343	end;
	2344
	2345	OnTimer22500:
	2346	stopnpctimer;
	2347	enablenpc "#hole#1-2";
	2348	disablenpc "Red Alarm#1-2";
	2349	end;
	2350	}
	2351
	2352	jupe_area1,21,225,0 script Warp#1-2 139,2,2,{
	2353	OnInit:
	2354	disablenpc "Warp#1-2";
	2355	end;
	2356
	2357	OnEnable:
	2358	enablenpc "Warp#1-2";
	2359	specialeffect 561; //"Warp#1-2" 561
	2360	soundeffectall "jupe_warp.wav",0;
	2361	initnpctimer;
	2362	end;
	2363
	2364	OnTouch:
	2365	warp "jupe_area1",21,191;
	2366	end;
	2367
	2368	OnTimer22500:
	2369	disablenpc "Warp#1-2";
	2370	end;
	2371	}
	2372
	2373	jupe_area1,21,191,0 script Red Alarm#1-2 -1,2,2,{
	2374	OnInit:
	2375	disablenpc "Red Alarm#1-2";
	2376	end;
	2377
	2378	OnTouch:
	2379	set $@JupreArea1InUse,1;
	2380	donpcevent "Red Alarm On#1-2::OnEnable";
	2381	disablenpc "Red Alarm#1-2";
	2382	disablenpc "#hole#1-2";
	2383	end;
	2384	}
	2385
	2386	- script Red Alarm On#1-2 -1,{
	2387	OnInit:
	2388	disablenpc "Red Alarm On#1-2";
	2389	end;
	2390
	2391	OnEnable:
	2392	enablenpc "Red Alarm On#1-2";
	2393	initnpctimer;
	2394	end;
	2395
	2396	OnTimer1000:
	2397	mapannounce "jupe_area1","Come on, come on!",bc_map,"0xFF0000";
	2398	end;
	2399
	2400	OnTimer3000:
	2401	mapannounce "jupe_area1","Yes. Run... Right into my hands!",bc_map,"0xFF0000";
	2402	end;
	2403
	2404	OnTimer5000:
	2405	mapannounce "jupe_area1","Do you want to know who I am?",bc_map,"0xFF0000";
	2406	donpcevent "Monster1#1-2::OnEnable";
	2407	end;
	2408
	2409	OnTimer7000:
	2410	mapannounce "jupe_area1","You will know, once you defeat all of my minions!",bc_map,"0xFF0000";
	2411	end;
	2412
	2413	OnTimer8000:
	2414	disablenpc "Red Alarm On#1-2";
	2415	stopnpctimer;
	2416	end;
	2417	}
	2418
	2419	- script Monster1#1-2 -1,{
	2420	OnInit:
	2421	disablenpc "Monster1#1-2";
	2422	end;
	2423
	2424	OnDisable:
	2425	disablenpc "Monster1#1-2";
	2426	killmonster "jupe_area1","Monster1#1-2::OnMyMobDead";
	2427	end;
	2428
	2429	OnEnable:
	2430	initnpctimer;
	2431	enablenpc "Monster1#1-2";
	2432	set .MyMobs,8;
	2433	monster "jupe_area1",30,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead";
	2434	monster "jupe_area1",31,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead";
	2435	monster "jupe_area1",32,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead";
	2436	monster "jupe_area1",33,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead";
	2437	monster "jupe_area1",34,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead";
	2438	monster "jupe_area1",35,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead";
	2439	monster "jupe_area1",36,176,"High Guard",1669,1,"Monster1#1-2::OnMyMobDead";
	2440	monster "jupe_area1",37,176,"High Guard",1675,1,"Monster1#1-2::OnMyMobDead";
	2441	end;
	2442
	2443	OnTimer300000:
	2444	mapannounce "jupe_area1","I can't believe how cowardly you really are...",bc_map,"0xFF0000";
	2445	set $@JupreArea1InUse,0;
	2446	end;
	2447
	2448	OnTimer300002:
	2449	enablenpc "#hole#1-2";
	2450	stopnpctimer;
	2451	donpcevent "Monster1#1-2::OnDisable";
	2452	end;
	2453
	2454	OnMyMobDead:
	2455	set .MyMobs,.MyMobs-1;
	2456	if (.MyMobs < 1) {
	2457	donpcevent "Monster2#1-2::OnEnable";
	2458	disablenpc "Monster1#1-2";
	2459	stopnpctimer;
	2460	}
	2461	end;
	2462	}
	2463
	2464	- script Monster2#1-2 -1,{
	2465	OnInit:
	2466	disablenpc "Monster2#1-2";
	2467	end;
	2468
	2469	OnDisable:
	2470	disablenpc "Monster2#1-2";
	2471	killmonster "jupe_area1","Monster2#1-2::OnMyMobDead";
	2472	end;
	2473
	2474	OnEnable:
	2475	enablenpc "Monster2#1-2";
	2476	initnpctimer;
	2477	end;
	2478
	2479	OnTimer2000:
	2480	mapannounce "jupe_area1","I was the head of this underground laboratory.",bc_map,"0xFF0000";
	2481	end;
	2482
	2483	OnTimer4000:
	2484	mapannounce "jupe_area1","But that was a long time ago, back when I was merely a human.",bc_map,"0xFF0000";
	2485	end;
	2486
	2487	OnTimer6000:
	2488	mapannounce "jupe_area1","I was called Vesper Newton. Hahah, they called me a mad man back then.",bc_map,"0xFF0000";
	2489	set .MyMobs,13;
	2490	monster "jupe_area1",30,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2491	monster "jupe_area1",31,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead";
	2492	monster "jupe_area1",32,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2493	monster "jupe_area1",33,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead";
	2494	monster "jupe_area1",34,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2495	monster "jupe_area1",35,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead";
	2496	monster "jupe_area1",36,152,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2497	monster "jupe_area1",37,152,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead";
	2498	monster "jupe_area1",30,150,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2499	monster "jupe_area1",31,150,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead";
	2500	monster "jupe_area1",32,150,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2501	monster "jupe_area1",33,150,"Security Guard",1675,1,"Monster2#1-2::OnMyMobDead";
	2502	monster "jupe_area1",34,150,"Security Guard",1669,1,"Monster2#1-2::OnMyMobDead";
	2503	end;
	2504
	2505	OnTimer300000:
	2506	mapannounce "jupe_area1","...Not yet.",bc_map,"0xFF0000";
	2507	set $@JupreArea1InUse,0;
	2508	end;
	2509
	2510	OnTimer300002:
	2511	enablenpc "#hole#1-2";
	2512	stopnpctimer;
	2513	donpcevent "Monster2#1-2::OnDisable";
	2514	end;
	2515
	2516	OnMyMobDead:
	2517	set .MyMobs,.MyMobs-1;
	2518	if (.MyMobs < 1) {
	2519	mapannounce "jupe_area1","Not yet!",bc_map,"0xFF0000";
	2520	disablenpc "Monster2#1-2";
	2521	enablenpc "#hole#1-2";
	2522	set $@JupreArea1InUse,0;
	2523	stopnpctimer;
	2524	}
	2525	end;
	2526	}
	2527
	2528	//============================================================
	2529	// Security Checkpoint 1-3
	2530	//============================================================
	2531	jupe_area1,36,146,0 script #hole#1-3 844,{
	2532	cutin "3",2;
	2533	if ($@JupreArea1InUse == 1) {
	2534	mes "^3355FFThis seems like";
	2535	mes "some kind of device";
	2536	mes "that will allow you to";
	2537	mes "pass to the other side.";
	2538	mes "There's a slot where you";
	2539	mes "probably need to insert";
	2540	mes "some kind of object...^000000";
	2541	close2;
	2542	cutin "3",255;
	2543	end;
	2544	}
	2545	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	2546	mes "^3355FFThis seems like";
	2547	mes "some kind of device";
	2548	mes "that will allow you to";
	2549	mes "pass to the other side.";
	2550	mes "There's a slot where you";
	2551	mes "probably need to insert";
	2552	mes "some kind of object...^000000";
	2553	next;
	2554	switch(select("Insert a Crest Piece.:Cancel.")) {
	2555	case 1:
	2556	if (countitem(7358) > 0) {
	2557	mes "^3355FFYou take out your";
	2558	mes "Crest Piece and place";
	2559	mes "it into the slot where it";
	2560	mes "happens to fit perfectly.^000000";
	2561	specialeffect 159; //"#hole#1-3" EF_TOPRANK
	2562	cutin "3-1",2;
	2563	next;
	2564	if ($@JupreArea1InUse == 1) {
	2565	mes "^3355FFNothing happens.";
	2566	mes "Perhaps an alarm or";
	2567	mes "some other safety measure";
	2568	mes "was activated to keep the";
	2569	mes "Crest Piece from activating";
	2570	mes "this transportation device.";
	2571	mes "You retrieve the Crest Piece.^000000";
	2572	close2;
	2573	cutin "3-1",255;
	2574	end;
	2575	}
	2576	else {
	2577	mes "^3355FFThe slot rotates and";
	2578	mes "the Crest Piece moves as";
	2579	mes "if it were turning a key. You";
	2580	mes "feel a weak tremor as a Warp";
	2581	mes "Portal to the other side is";
	2582	mes "activated. You then retrieve";
	2583	mes "your Crest Piece.^000000";
	2584	initnpctimer;
	2585	donpcevent "Warp#1-3::OnEnable";
	2586	enablenpc "Red Alarm#1-3";
	2587	disablenpc "#hole#1-3";
	2588	close2;
	2589	cutin "3-1",255;
	2590	end;
	2591	}
	2592	}
	2593	else {
	2594	mes "^3355FFUnfortunately, you're";
	2595	mes "not carrying anything";
	2596	mes "that might be able to fit";
	2597	mes "into the slot and activate";
	2598	mes "this mechanical device.^000000";
	2599	close2;
	2600	cutin "3",255;
	2601	end;
	2602	}
	2603	case 2:
	2604	mes "[" + strcharinfo(0) + "]";
	2605	mes "Hmmm...";
	2606	mes "Do I have anything";
	2607	mes "that might make this";
	2608	mes "weird machine work?";
	2609	close2;
	2610	cutin "3",255;
	2611	end;
	2612	}
	2613	}
	2614	else {
	2615	mes "^3355FFThis seems like";
	2616	mes "some kind of device";
	2617	mes "that will allow you to";
	2618	mes "pass to the other side.";
	2619	mes "There's a slot where you";
	2620	mes "probably need to insert";
	2621	mes "some kind of object...^000000";
	2622	close2;
	2623	cutin "3",255;
	2624	end;
	2625	}
	2626	end;
	2627
	2628	Onstop_timer:
	2629	stopnpctimer;
	2630	end;
	2631
	2632	OnTimer22500:
	2633	stopnpctimer;
	2634	enablenpc "#hole#1-3";
	2635	disablenpc "Red Alarm#1-3";
	2636	end;
	2637	}
	2638
	2639	jupe_area1,33,137,0 script Warp#1-3 139,2,2,{
	2640	OnInit:
	2641	disablenpc "Warp#1-3";
	2642	end;
	2643
	2644	OnEnable:
	2645	enablenpc "Warp#1-3";
	2646	specialeffect 561; //"Warp#1-3" 561
	2647	soundeffectall "jupe_warp.wav",0;
	2648	initnpctimer;
	2649	end;
	2650
	2651	OnTouch:
	2652	warp "jupe_area1",33,105;
	2653	end;
	2654
	2655	OnTimer22500:
	2656	disablenpc "Warp#1-3";
	2657	end;
	2658	}
	2659
	2660	jupe_area1,33,105,0 script Red Alarm#1-3 -1,0,4,{
	2661	OnInit:
	2662	disablenpc "Red Alarm#1-3";
	2663	end;
	2664
	2665	OnTouch:
	2666	set $@JupreArea1InUse,1;
	2667	donpcevent "Red Alarm On#1-3::OnEnable";
	2668	disablenpc "Red Alarm#1-3";
	2669	disablenpc "#hole#1-3";
	2670	end;
	2671	}
	2672
	2673	- script Red Alarm On#1-3 -1,{
	2674	OnInit:
	2675	disablenpc "Red Alarm On#1-3";
	2676	end;
	2677
	2678	OnEnable:
	2679	enablenpc "Red Alarm On#1-3";
	2680	initnpctimer;
	2681	end;
	2682
	2683	OnTimer1000:
	2684	mapannounce "jupe_area1","These security systems...",bc_map,"0xFF0000";
	2685	end;
	2686
	2687	OnTimer3000:
	2688	mapannounce "jupe_area1","They're not really for protection.",bc_map,"0xFF0000";
	2689	end;
	2690
	2691	OnTimer5000:
	2692	mapannounce "jupe_area1","It's sort of just a hobby to pass the time...",bc_map,"0xFF0000";
	2693	donpcevent "Monster1#1-3::OnEnable";
	2694	end;
	2695
	2696	OnTimer7000:
	2697	mapannounce "jupe_area1","Being immortal, I have a lot of time on my hands...",bc_map,"0xFF0000";
	2698	end;
	2699
	2700	OnTimer8000:
	2701	disablenpc "Red Alarm On#1-3";
	2702	stopnpctimer;
	2703	end;
	2704	}
	2705
	2706	- script Monster1#1-3 -1,{
	2707	OnInit:
	2708	disablenpc "Monster1#1-3";
	2709	end;
	2710
	2711	OnDisable:
	2712	disablenpc "Monster1#1-3";
	2713	killmonster "jupe_area1","Monster1#1-3::OnMyMobDead";
	2714	end;
	2715
	2716	OnEnable:
	2717	initnpctimer;
	2718	enablenpc "Monster1#1-3";
	2719	set .MyMobs,8;
	2720	monster "jupe_area1",30,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead";
	2721	monster "jupe_area1",31,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead";
	2722	monster "jupe_area1",32,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead";
	2723	monster "jupe_area1",33,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead";
	2724	monster "jupe_area1",34,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead";
	2725	monster "jupe_area1",35,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead";
	2726	monster "jupe_area1",36,89,"Security Guard",1675,1,"Monster1#1-3::OnMyMobDead";
	2727	monster "jupe_area1",37,89,"Security Guard",1669,1,"Monster1#1-3::OnMyMobDead";
	2728	end;
	2729
	2730	OnTimer300000:
	2731	mapannounce "jupe_area1","Zzzzt...Zzzzt....",bc_map,"0xFF0000";
	2732	set $@JupreArea1InUse,0;
	2733	end;
	2734
	2735	OnTimer300002:
	2736	donpcevent "Monster1#1-3::OnDisable";
	2737	enablenpc "#hole#1-3";
	2738	end;
	2739
	2740	OnMyMobDead:
	2741	set .MyMobs,.MyMobs-1;
	2742	if (.MyMobs < 1) {
	2743	donpcevent "Monster2#1-3::OnEnable";
	2744	disablenpc "Monster1#1-3";
	2745	stopnpctimer;
	2746	}
	2747	end;
	2748	}
	2749
	2750	- script Monster2#1-3 -1,{
	2751	OnInit:
	2752	disablenpc "Monster2#1-3";
	2753	end;
	2754
	2755	OnDisable:
	2756	disablenpc "Monster2#1-3";
	2757	killmonster "jupe_area1","Monster2#1-3::OnMyMobDead";
	2758	end;
	2759
	2760	OnEnable:
	2761	initnpctimer;
	2762	enablenpc "Monster2#1-3";
	2763	end;
	2764
	2765	OnTimer2000:
	2766	mapannounce "jupe_area1","Why have you come?",bc_map,"0xFF0000";
	2767	end;
	2768
	2769	OnTimer5000:
	2770	mapannounce "jupe_area1","Were you hoping to find something wonderful? Something miraculous?",bc_map,"0xFF0000";
	2771	end;
	2772
	2773	OnTimer8000:
	2774	mapannounce "jupe_area1","You're wrong! Welcome to Hell!",bc_map,"0xFF0000";
	2775	set .MyMobs,15;
	2776	monster "jupe_area1",42,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2777	monster "jupe_area1",43,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2778	monster "jupe_area1",44,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2779	monster "jupe_area1",45,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2780	monster "jupe_area1",46,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2781	monster "jupe_area1",47,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2782	monster "jupe_area1",48,64,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2783	monster "jupe_area1",49,64,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2784	monster "jupe_area1",42,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2785	monster "jupe_area1",43,62,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2786	monster "jupe_area1",44,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2787	monster "jupe_area1",45,62,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2788	monster "jupe_area1",46,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2789	monster "jupe_area1",47,62,"Security Guard",1675,1,"Monster2#1-3::OnMyMobDead";
	2790	monster "jupe_area1",48,62,"Security Guard",1669,1,"Monster2#1-3::OnMyMobDead";
	2791	end;
	2792
	2793	OnTimer300000:
	2794	mapannounce "jupe_area1","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000";
	2795	set $@JupreArea1InUse,0;
	2796	end;
	2797
	2798	OnTimer300002:
	2799	enablenpc "#hole#1-3";
	2800	stopnpctimer;
	2801	donpcevent "Monster2#1-3::OnDisable";
	2802	end;
	2803
	2804	OnMyMobDead:
	2805	set .MyMobs,.MyMobs-1;
	2806	if (.MyMobs < 1) {
	2807	mapannounce "jupe_area1","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000";
	2808	disablenpc "Monster2#1-3";
	2809	enablenpc "#hole#1-3";
	2810	set $@JupreArea1InUse,0;
	2811	stopnpctimer;
	2812	}
	2813	end;
	2814	}
	2815
	2816	//============================================================
	2817	// Security Checkpoint 1-4
	2818	//============================================================
	2819	jupe_area1,50,49,0 script #hole#1-4 844,{
	2820	cutin "4",2;
	2821	if ($@JupreArea1InUse == 1) {
	2822	mes "^3355FFThis seems like";
	2823	mes "some kind of device";
	2824	mes "that will allow you to";
	2825	mes "pass to the other side.";
	2826	mes "There's a slot where you";
	2827	mes "probably need to insert";
	2828	mes "some kind of object...^000000";
	2829	close2;
	2830	cutin "4",255;
	2831	end;
	2832	}
	2833	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	2834	mes "^3355FFThis seems like";
	2835	mes "some kind of device";
	2836	mes "that will allow you to";
	2837	mes "pass to the other side.";
	2838	mes "There's a slot where you";
	2839	mes "probably need to insert";
	2840	mes "some kind of object...^000000";
	2841	next;
	2842	switch(select("Insert a Crest Piece.:Cancel.")) {
	2843	case 1:
	2844	if (countitem(7359) > 0) {
	2845	mes "^3355FFYou take out your";
	2846	mes "Crest Piece and place";
	2847	mes "it into the slot where it";
	2848	mes "happens to fit perfectly.^000000";
	2849	specialeffect 159; //"#hole#1-4" EF_TOPRANK
	2850	cutin "4-1",2;
	2851	next;
	2852	if ($@JupreArea1InUse == 1) {
	2853	mes "^3355FFNothing happens.";
	2854	mes "Perhaps an alarm or";
	2855	mes "some other safety measure";
	2856	mes "was activated to keep the";
	2857	mes "Crest Piece from activating";
	2858	mes "this transportation device.";
	2859	mes "You retrieve the Crest Piece.^000000";
	2860	close2;
	2861	cutin "4-1",255;
	2862	end;
	2863	}
	2864	else {
	2865	mes "^3355FFThe slot rotates and";
	2866	mes "the Crest Piece moves as";
	2867	mes "if it were turning a key. You";
	2868	mes "feel a weak tremor as a Warp";
	2869	mes "Portal to the other side is";
	2870	mes "activated. You then retrieve";
	2871	mes "your Crest Piece.^000000";
	2872	initnpctimer;
	2873	donpcevent "Warp#1-4::OnEnable";
	2874	donpcevent "Red Alarm#1-4::OnEnable";
	2875	disablenpc "#hole#1-4";
	2876	close2;
	2877	cutin "4-1",255;
	2878	end;
	2879	}
	2880	}
	2881	else {
	2882	mes "^3355FFUnfortunately, you're";
	2883	mes "not carrying anything";
	2884	mes "that might be able to fit";
	2885	mes "into the slot and activate";
	2886	mes "this mechanical device.^000000";
	2887	close2;
	2888	cutin "4",255;
	2889	end;
	2890	}
	2891	break;
	2892	case 2:
	2893	mes "[" + strcharinfo(0) + "]";
	2894	mes "Hmmm...";
	2895	mes "Do I have anything";
	2896	mes "that might make this";
	2897	mes "weird machine work?";
	2898	close2;
	2899	cutin "4",255;
	2900	end;
	2901	}
	2902	}
	2903	else {
	2904	mes "^3355FFThis seems like";
	2905	mes "some kind of device";
	2906	mes "that will allow you to";
	2907	mes "pass to the other side.";
	2908	mes "There's a slot where you";
	2909	mes "probably need to insert";
	2910	mes "some kind of object...^000000";
	2911	close2;
	2912	cutin "4",255;
	2913	end;
	2914	}
	2915	end;
	2916
	2917	Onstop_timer:
	2918	stopnpctimer;
	2919	end;
	2920
	2921	OnTimer5000:
	2922	stopnpctimer;
	2923	enablenpc "#hole#1-4";
	2924	disablenpc "Red Alarm#1-4";
	2925	end;
	2926	}
	2927
	2928	jupe_area1,57,53,0 script Warp#1-4 139,2,2,{
	2929	OnInit:
	2930	disablenpc "Warp#1-4";
	2931	end;
	2932
	2933	OnEnable:
	2934	enablenpc "Warp#1-4";
	2935	specialeffect 561; //"Warp#1-4" 561
	2936	soundeffectall "jupe_warp.wav",0;
	2937	initnpctimer;
	2938	end;
	2939
	2940	OnTouch:
	2941	warp "jupe_area1",83,157;
	2942	end;
	2943
	2944	OnTimer5000:
	2945	disablenpc "Warp#1-4";
	2946	end;
	2947	}
	2948
	2949	jupe_area1,83,157,0 script Red Alarm#1-4 -1,2,2,{
	2950	OnInit:
	2951	disablenpc "Red Alarm#1-4";
	2952	end;
	2953
	2954	OnEnable:
	2955	enablenpc "Red Alarm#1-4";
	2956	end;
	2957
	2958	OnTouch:
	2959	set $@JupreArea1InUse,1;
	2960	donpcevent "Red Alarm On#1-4::OnEnable";
	2961	disablenpc "Red Alarm#1-4";
	2962	disablenpc "#hole#1-4";
	2963	end;
	2964	}
	2965
	2966	- script Red Alarm On#1-4 -1,{
	2967	OnInit:
	2968	disablenpc "Red Alarm On#1-4";
	2969	end;
	2970
	2971	OnEnable:
	2972	enablenpc "Red Alarm On#1-4";
	2973	initnpctimer;
	2974	end;
	2975
	2976	OnTimer1000:
	2977	mapannounce "jupe_area1","I've been waiting for someone strong enough to compete with me.",bc_map,"0xFF0000";
	2978	end;
	2979
	2980	OnTimer3000:
	2981	mapannounce "jupe_area1","If you hear this, I wish you will be the one...",bc_map,"0xFF0000";
	2982	end;
	2983
	2984	OnTimer5000:
	2985	mapannounce "jupe_area1","Perhaps, a mere shadow of my former self...",bc_map,"0xFF0000";
	2986	donpcevent "Monster1#1-4::OnEnable";
	2987	end;
	2988
	2989	OnTimer7000:
	2990	mapannounce "jupe_area1","Is somewhere down here, wandering...",bc_map,"0xFF0000";
	2991	end;
	2992
	2993	OnTimer8000:
	2994	stopnpctimer;
	2995	disablenpc "Red Alarm On#1-4";
	2996	end;
	2997	}
	2998
	2999	- script Monster1#1-4 -1,{
	3000	OnInit:
	3001	disablenpc "Monster1#1-4";
	3002	end;
	3003
	3004	OnDisable:
	3005	disablenpc "Monster1#1-4";
	3006	killmonster "jupe_area1","Monster1#1-4::OnMyMobDead";
	3007	end;
	3008
	3009	OnEnable:
	3010	initnpctimer;
	3011	enablenpc "Monster1#1-4";
	3012	set .MyMobs,8;
	3013	monster "jupe_area1",92,154,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead";
	3014	monster "jupe_area1",96,154,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead";
	3015	monster "jupe_area1",100,154,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead";
	3016	monster "jupe_area1",104,154,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead";
	3017	monster "jupe_area1",92,161,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead";
	3018	monster "jupe_area1",96,161,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead";
	3019	monster "jupe_area1",100,161,"Security Guard",1669,1,"Monster1#1-4::OnMyMobDead";
	3020	monster "jupe_area1",104,161,"Security Guard",1675,1,"Monster1#1-4::OnMyMobDead";
	3021	end;
	3022
	3023	OnTimer300000:
	3024	mapannounce "jupe_area1","Zzzzt...Zzzzt....",bc_map,"0xFF0000";
	3025	set $@JupreArea1InUse,0;
	3026	end;
	3027
	3028	OnTimer300002:
	3029	stopnpctimer;
	3030	enablenpc "#hole#1-4";
	3031	donpcevent "Monster1#1-4::OnDisable";
	3032	end;
	3033
	3034	OnMyMobDead:
	3035	set .MyMobs,.MyMobs-1;
	3036	if (.MyMobs < 1) {
	3037	donpcevent "Monster2#1-4::OnEnable";
	3038	disablenpc "Monster1#1-4";
	3039	stopnpctimer;
	3040	}
	3041	end;
	3042	}
	3043
	3044	- script Monster2#1-4 -1,{
	3045	OnInit:
	3046	disablenpc "Monster2#1-4";
	3047	end;
	3048
	3049	OnDisable:
	3050	killmonster "jupe_area1","Monster2#1-4::OnMyMobDead";
	3051	disablenpc "Monster2#1-4";
	3052	end;
	3053
	3054	OnEnable:
	3055	enablenpc "Monster2#1-4";
	3056	initnpctimer;
	3057	end;
	3058
	3059	OnTimer2000:
	3060	mapannounce "jupe_area1","I can never rest in peace...",bc_map,"0xFF0000";
	3061	end;
	3062
	3063	OnTimer4000:
	3064	mapannounce "jupe_area1","I'll wait forever or until someone can put me out of my misery...",bc_map,"0xFF0000";
	3065	end;
	3066
	3067	OnTimer6000:
	3068	mapannounce "jupe_area1","I will be waiting for you!",bc_map,"0xFF0000";
	3069	set .MyMobs,10;
	3070	monster "jupe_area1",104,161,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead";
	3071	monster "jupe_area1",108,161,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead";
	3072	monster "jupe_area1",111,161,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead";
	3073	monster "jupe_area1",112,161,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead";
	3074	monster "jupe_area1",115,161,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead";
	3075	monster "jupe_area1",104,154,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead";
	3076	monster "jupe_area1",108,154,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead";
	3077	monster "jupe_area1",111,154,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead";
	3078	monster "jupe_area1",112,154,"Security Guard",1675,1,"Monster2#1-4::OnMyMobDead";
	3079	monster "jupe_area1",115,154,"Security Guard",1669,1,"Monster2#1-4::OnMyMobDead";
	3080	end;
	3081
	3082	OnTimer300000:
	3083	set $@JupreArea1InUse,0;
	3084	mapannounce "jupe_area1","It's funny... Isn't it?",bc_map,"0xFF0000";
	3085	end;
	3086
	3087	OnTimer300002:
	3088	enablenpc "#hole#1-4";
	3089	donpcevent "Monster2#1-4::OnDisable";
	3090	end;
	3091
	3092	OnMyMobDead:
	3093	set .MyMobs,.MyMobs-1;
	3094	if (.MyMobs < 1) {
	3095	mapannounce "jupe_area1","It's funny... Isn't it?",bc_map,"0xFF0000";
	3096	disablenpc "Monster2#1-4";
	3097	enablenpc "#hole#1-4";
	3098	set $@JupreArea1InUse,0;
	3099	stopnpctimer;
	3100	}
	3101	end;
	3102	}
	3103
	3104	//============================================================
	3105	// Move to Elevator
	3106	//============================================================
	3107	jupe_area1,112,162,0 script Lever#ufe 844,{
	3108	mes "^3355FFIt's a lever";
	3109	mes "whose function";
	3110	mes "is not known to you.^000000";
	3111	next;
	3112	switch(select("Pull.:Cancel.")) {
	3113	case 1:
	3114	if($@JupreArea1InUse == 1) close;
	3115	initnpctimer;
	3116	donpcevent "LeverWarp#ufe::OnEnable";
	3117	disablenpc "Lever#ufe";
	3118	close;
	3119	case 2:
	3120	mes "[" + strcharinfo(0) + "]";
	3121	mes "Pull this lever?";
	3122	mes "I don't even know";
	3123	mes "what will happen...";
	3124	close;
	3125	}
	3126	close;
	3127
	3128	OnTimer3000:
	3129	enablenpc "Lever#ufe";
	3130	stopnpctimer;
	3131	end;
	3132	}
	3133
	3134	jupe_area1,117,157,0 script LeverWarp#ufe 139,2,2,{
	3135	OnInit:
	3136	disablenpc "LeverWarp#ufe";
	3137	end;
	3138
	3139	OnEnable:
	3140	enablenpc "LeverWarp#ufe";
	3141	specialeffect 561; //"LeverWarp#ufe" 561
	3142	soundeffectall "jupe_warp.wav",0;
	3143	initnpctimer;
	3144	end;
	3145
	3146	OnTouch:
	3147	warp "jupe_gate",28,30;
	3148	end;
	3149
	3150	OnTimer3000:
	3151	stopnpctimer;
	3152	disablenpc "LeverWarp#ufe";
	3153	end;
	3154	}
	3155
	3156	//============================================================
	3157	// Security Checkpoint 2-1
	3158	//============================================================
	3159	jupe_area2,74,224,0 script #hole#2-1 844,{
	3160	cutin "1",2;
	3161	if ($@JupreArea2InUse == 1) {
	3162	mes "^3355FFThis seems like";
	3163	mes "some kind of device";
	3164	mes "that will allow you to";
	3165	mes "pass to the other side.";
	3166	mes "There's a slot where you";
	3167	mes "probably need to insert";
	3168	mes "some kind of object...^000000";
	3169	close2;
	3170	cutin "1",255;
	3171	end;
	3172	}
	3173	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	3174	mes "^3355FFThis seems like";
	3175	mes "some kind of device";
	3176	mes "that will allow you to";
	3177	mes "pass to the other side.";
	3178	mes "There's a slot where you";
	3179	mes "probably need to insert";
	3180	mes "some kind of object...^000000";
	3181	next;
	3182	switch(select("Insert a Crest Piece.:Cancel.")) {
	3183	case 1:
	3184	if (countitem(7356) > 0) {
	3185	mes "^3355FFYou take out your";
	3186	mes "Crest Piece and place";
	3187	mes "it into the slot where it";
	3188	mes "happens to fit perfectly.^000000";
	3189	specialeffect 159; //"#hole#2-1" EF_TOPRANK
	3190	cutin "1-1",2;
	3191	next;
	3192	if ($@JupreArea2InUse == 1) {
	3193	mes "^3355FFNothing happens.";
	3194	mes "Perhaps an alarm or";
	3195	mes "some other safety measure";
	3196	mes "was activated to keep the";
	3197	mes "Crest Piece from activating";
	3198	mes "this transportation device.";
	3199	mes "You retrieve the Crest Piece.^000000";
	3200	close2;
	3201	cutin "1-1",255;
	3202	end;
	3203	}
	3204	else {
	3205	mes "^3355FFThe slot rotates and";
	3206	mes "the Crest Piece moves as";
	3207	mes "if it were turning a key. You";
	3208	mes "feel a weak tremor as a Warp";
	3209	mes "Portal to the other side is";
	3210	mes "activated. You then retrieve";
	3211	mes "your Crest Piece.^000000";
	3212	initnpctimer;
	3213	donpcevent "Warp#2-1::OnEnable";
	3214	enablenpc "Red Alarm#2-1";
	3215	disablenpc "#hole#2-1";
	3216	close2;
	3217	cutin "1-1",255;
	3218	end;
	3219	}
	3220	}
	3221	else {
	3222	mes "^3355FFUnfortunately, you're";
	3223	mes "not carrying anything";
	3224	mes "that might be able to fit";
	3225	mes "into the slot and activate";
	3226	mes "this mechanical device.^000000";
	3227	close2;
	3228	cutin "1",255;
	3229	end;
	3230	}
	3231	case 2:
	3232	mes "[" + strcharinfo(0) + "]";
	3233	mes "Hmmm...";
	3234	mes "Do I have anything";
	3235	mes "that might make this";
	3236	mes "weird machine work?";
	3237	close2;
	3238	cutin "1",255;
	3239	end;
	3240	}
	3241	close;
	3242	}
	3243	else {
	3244	mes "^3355FFThis seems like";
	3245	mes "some kind of device";
	3246	mes "that will allow you to";
	3247	mes "pass to the other side.";
	3248	mes "There's a slot where you";
	3249	mes "probably need to insert";
	3250	mes "some kind of object...^000000";
	3251	close2;
	3252	cutin "1",255;
	3253	end;
	3254	}
	3255
	3256	Onstop_timer:
	3257	stopnpctimer;
	3258	end;
	3259
	3260	OnTimer22500:
	3261	stopnpctimer;
	3262	enablenpc "#hole#2-1";
	3263	disablenpc "Red Alarm#2-1";
	3264	end;
	3265	}
	3266
	3267	jupe_area2,80,221,0 script Warp#2-1 139,2,2,{
	3268	OnInit:
	3269	disablenpc "Warp#2-1";
	3270	end;
	3271
	3272	OnEnable:
	3273	enablenpc "Warp#2-1";
	3274	specialeffect 561; //"Warp#2-1" 561
	3275	soundeffectall "jupe_warp.wav",0;
	3276	initnpctimer;
	3277	end;
	3278
	3279	OnTouch:
	3280	warp "jupe_area2",116,259;
	3281	end;
	3282
	3283	OnTimer22500:
	3284	stopnpctimer;
	3285	disablenpc "Warp#2-1";
	3286	end;
	3287	}
	3288
	3289	jupe_area2,116,259,0 script Red Alarm#2-1 -1,2,2,{
	3290	OnInit:
	3291	disablenpc "Red Alarm#2-1";
	3292	end;
	3293
	3294	OnTouch:
	3295	donpcevent "Red Alarm On#2-1::OnEnable";
	3296	disablenpc "Red Alarm#2-1";
	3297	donpcevent "#hole#2-1::Onstop_timer";
	3298	set $@JupreArea2InUse,1;
	3299	disablenpc "#hole#2-1";
	3300	end;
	3301	}
	3302
	3303	- script Red Alarm On#2-1 -1,{
	3304	OnInit:
	3305	disablenpc "Red Alarm On#2-1";
	3306	end;
	3307
	3308	OnEnable:
	3309	enablenpc "Red Alarm On#2-1";
	3310	initnpctimer;
	3311	end;
	3312
	3313	OnTimer1000:
	3314	mapannounce "jupe_area2","Those of you who have come here...",bc_map,"0xFF0000";
	3315	end;
	3316
	3317	OnTimer3000:
	3318	mapannounce "jupe_area2","I do not intend to stop you.",bc_map,"0xFF0000";
	3319	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3320	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3321	end;
	3322
	3323	OnTimer5000:
	3324	mapannounce "jupe_area2","But I assume you are prepared for a few obstacles...",bc_map,"0xFF0000";
	3325	donpcevent "Monster1#2-1::OnEnable";
	3326	end;
	3327
	3328	OnTimer7000:
	3329	mapannounce "jupe_area2","After all, you are venturing through a forbidden area!",bc_map,"0xFF0000";
	3330	end;
	3331
	3332	OnTimer8000:
	3333	disablenpc "Red Alarm On#2-1";
	3334	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3335	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3336	stopnpctimer;
	3337	end;
	3338	}
	3339
	3340	- script Monster1#2-1 -1,{
	3341	OnInit:
	3342	disablenpc "Monster1#2-1";
	3343	end;
	3344
	3345	OnDisable:
	3346	disablenpc "Monster1#2-1";
	3347	killmonster "jupe_area2","Monster1#2-1::OnMyMobDead";
	3348	end;
	3349
	3350	OnEnable:
	3351	enablenpc "Monster1#2-1";
	3352	initnpctimer;
	3353	set .MyMobs,8;
	3354	monster "jupe_area2",126,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead";
	3355	monster "jupe_area2",127,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead";
	3356	monster "jupe_area2",128,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead";
	3357	monster "jupe_area2",129,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead";
	3358	monster "jupe_area2",130,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead";
	3359	monster "jupe_area2",131,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead";
	3360	monster "jupe_area2",132,252,"Security Guard",1669,1,"Monster1#2-1::OnMyMobDead";
	3361	monster "jupe_area2",133,252,"Security Guard",1675,1,"Monster1#2-1::OnMyMobDead";
	3362	end;
	3363
	3364	OnTimer300000:
	3365	mapannounce "jupe_area2","Do you realize this is a hallucination?",bc_map,"0xFF0000";
	3366	set $@JupreArea2InUse,0;
	3367	end;
	3368
	3369	OnTimer300002:
	3370	enablenpc "#hole#2-1";
	3371	stopnpctimer;
	3372	donpcevent "Monster1#2-1::OnDisable";
	3373	end;
	3374
	3375	OnMyMobDead:
	3376	set .MyMobs,.MyMobs-1;
	3377	if (.MyMobs < 1) {
	3378	donpcevent "Monster2#2-1::OnEnable";
	3379	disablenpc "Monster1#2-1";
	3380	stopnpctimer;
	3381	}
	3382	end;
	3383	}
	3384
	3385	- script Monster2#2-1 -1,{
	3386	OnInit:
	3387	disablenpc "Monster2#2-1";
	3388	end;
	3389
	3390	OnDisable:
	3391	disablenpc "Monster2#2-1";
	3392	killmonster "jupe_area2","Monster2#2-1::OnMyMobDead";
	3393	end;
	3394
	3395	OnEnable:
	3396	enablenpc "Monster2#2-1";
	3397	initnpctimer;
	3398	end;
	3399
	3400	OnTimer2000:
	3401	mapannounce "jupe_area2","How about now?",bc_map,"0xFF0000";
	3402	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3403	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3404	end;
	3405
	3406	OnTimer4000:
	3407	mapannounce "jupe_area2","Let me see...",bc_map,"0xFF0000";
	3408	end;
	3409
	3410	OnTimer7000:
	3411	mapannounce "jupe_area2","Just how strong you are!",bc_map,"0xFF0000";
	3412	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3413	soundeffectall "jupe_warning.wav",0,"jupe_area2";
	3414	set .MyMobs,8;
	3415	monster "jupe_area2",126,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead";
	3416	monster "jupe_area2",127,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead";
	3417	monster "jupe_area2",128,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead";
	3418	monster "jupe_area2",129,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead";
	3419	monster "jupe_area2",130,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead";
	3420	monster "jupe_area2",131,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead";
	3421	monster "jupe_area2",132,236,"Security Guard",1675,1,"Monster2#2-1::OnMyMobDead";
	3422	monster "jupe_area2",133,236,"Security Guard",1669,1,"Monster2#2-1::OnMyMobDead";
	3423	end;
	3424
	3425	OnTimer300000:
	3426	mapannounce "jupe_area2","Bwahaha! You're only good at running away!",bc_map,"0xFF0000";
	3427	set $@JupreArea2InUse,0;
	3428	end;
	3429
	3430	OnTimer300002:
	3431	enablenpc "#hole#2-1";
	3432	stopnpctimer;
	3433	donpcevent "Monster2#2-1::OnDisable";
	3434	end;
	3435
	3436	OnMyMobDead:
	3437	set .MyMobs,.MyMobs-1;
	3438	if (.MyMobs < 1) {
	3439	mapannounce "jupe_area2","Zzzzt. Zzzzt..... ",bc_map,"0xFF0000";
	3440	disablenpc "Monster2#2-1";
	3441	enablenpc "#hole#2-1";
	3442	set $@JupreArea2InUse,0;
	3443	stopnpctimer;
	3444	}
	3445	end;
	3446	}
	3447
	3448	//============================================================
	3449	// Security Checkpoint 2-2
	3450	//============================================================
	3451	jupe_area2,138,238,0 script #hole#2-2 844,{
	3452	cutin "2",2;
	3453	if ($@JupreArea2InUse == 1) {
	3454	mes "^3355FFThis seems like";
	3455	mes "some kind of device";
	3456	mes "that will allow you to";
	3457	mes "pass to the other side.";
	3458	mes "There's a slot where you";
	3459	mes "probably need to insert";
	3460	mes "some kind of object...^000000";
	3461	close2;
	3462	cutin "2",255;
	3463	end;
	3464	}
	3465	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	3466	mes "^3355FFThis seems like";
	3467	mes "some kind of device";
	3468	mes "that will allow you to";
	3469	mes "pass to the other side.";
	3470	mes "There's a slot where you";
	3471	mes "probably need to insert";
	3472	mes "some kind of object...^000000";
	3473	next;
	3474	switch(select("Insert a Crest Piece.:Cancel.")) {
	3475	case 1:
	3476	if (countitem(7357) > 0) {
	3477	mes "^3355FFYou take out your";
	3478	mes "Crest Piece and place";
	3479	mes "it into the slot where it";
	3480	mes "happens to fit perfectly.^000000";
	3481	specialeffect 159; //"#hole#2-2" EF_TOPRANK
	3482	cutin "2-1",2;
	3483	next;
	3484	if ($@JupreArea2InUse == 1) {
	3485	mes "^3355FFNothing happens.";
	3486	mes "Perhaps an alarm or";
	3487	mes "some other safety measure";
	3488	mes "was activated to keep the";
	3489	mes "Crest Piece from activating";
	3490	mes "this transportation device.";
	3491	mes "You retrieve the Crest Piece.^000000";
	3492	close2;
	3493	cutin "2-1",255;
	3494	end;
	3495	}
	3496	else {
	3497	mes "^3355FFThe slot rotates and";
	3498	mes "the Crest Piece moves as";
	3499	mes "if it were turning a key. You";
	3500	mes "feel a weak tremor as a Warp";
	3501	mes "Portal to the other side is";
	3502	mes "activated. You then retrieve";
	3503	mes "your Crest Piece.^000000";
	3504	initnpctimer;
	3505	donpcevent "Warp#2-2::OnEnable";
	3506	enablenpc "Red Alarm#2-2";
	3507	disablenpc "#hole#2-2";
	3508	close2;
	3509	cutin "2-1",255;
	3510	end;
	3511	}
	3512	}
	3513	else {
	3514	mes "^3355FFUnfortunately, you're";
	3515	mes "not carrying anything";
	3516	mes "that might be able to fit";
	3517	mes "into the slot and activate";
	3518	mes "this mechanical device.^000000";
	3519	close2;
	3520	cutin "2",255;
	3521	end;
	3522	}
	3523	break;
	3524	case 2:
	3525	mes "[" + strcharinfo(0) + "]";
	3526	mes "Hmmm...";
	3527	mes "Do I have anything";
	3528	mes "that might make this";
	3529	mes "weird machine work?";
	3530	close2;
	3531	cutin "2",255;
	3532	end;
	3533	}
	3534	close;
	3535	}
	3536	else {
	3537	mes "^3355FFThis seems like";
	3538	mes "some kind of device";
	3539	mes "that will allow you to";
	3540	mes "pass to the other side.";
	3541	mes "There's a slot where you";
	3542	mes "probably need to insert";
	3543	mes "some kind of object...^000000";
	3544	close2;
	3545	cutin "2",255;
	3546	end;
	3547	}
	3548	end;
	3549
	3550	Onstop_timer:
	3551	stopnpctimer;
	3552	end;
	3553
	3554	OnTimer22500:
	3555	stopnpctimer;
	3556	enablenpc "#hole#2-2";
	3557	disablenpc "Red Alarm#2-2";
	3558	end;
	3559	}
	3560
	3561	jupe_area2,142,225,0 script Warp#2-2 139,2,2,{
	3562	OnInit:
	3563	disablenpc "Warp#2-2";
	3564	end;
	3565
	3566	OnEnable:
	3567	enablenpc "Warp#2-2";
	3568	specialeffect 561; //"Warp#2-2" 561
	3569	soundeffectall "jupe_warp.wav",0;
	3570	initnpctimer;
	3571	end;
	3572
	3573	OnTouch:
	3574	warp "jupe_area2",142,191;
	3575	end;
	3576
	3577	OnTimer22500:
	3578	disablenpc "Warp#2-2";
	3579	end;
	3580	}
	3581
	3582	jupe_area2,142,191,0 script Red Alarm#2-2 -1,2,2,{
	3583	OnInit:
	3584	disablenpc "Red Alarm#2-2";
	3585	end;
	3586
	3587	OnTouch:
	3588	set $@JupreArea2InUse,1;
	3589	donpcevent "Red Alarm On#2-2::OnEnable";
	3590	disablenpc "Red Alarm#2-2";
	3591	disablenpc "#hole#2-2";
	3592	end;
	3593	}
	3594
	3595	- script Red Alarm On#2-2 -1,{
	3596	OnInit:
	3597	disablenpc "Red Alarm On#2-2";
	3598	end;
	3599
	3600	OnEnable:
	3601	enablenpc "Red Alarm On#2-2";
	3602	initnpctimer;
	3603	end;
	3604
	3605	OnTimer1000:
	3606	mapannounce "jupe_area2","Come on, come on!",bc_map,"0xFF0000";
	3607	end;
	3608
	3609	OnTimer3000:
	3610	mapannounce "jupe_area2","Yes. Run... Right into my hands!",bc_map,"0xFF0000";
	3611	end;
	3612
	3613	OnTimer5000:
	3614	mapannounce "jupe_area2","Do you want to know who I am?",bc_map,"0xFF0000";
	3615	donpcevent "Monster1#2-2::OnEnable";
	3616	end;
	3617
	3618	OnTimer7000:
	3619	mapannounce "jupe_area2","You will know, once you defeat all of my minions!",bc_map,"0xFF0000";
	3620	end;
	3621
	3622	OnTimer8000:
	3623	disablenpc "Red Alarm On#2-2";
	3624	stopnpctimer;
	3625	end;
	3626	}
	3627
	3628	- script Monster1#2-2 -1,{
	3629	OnInit:
	3630	disablenpc "Monster1#2-2";
	3631	end;
	3632
	3633	OnDisable:
	3634	disablenpc "Monster1#2-2";
	3635	killmonster "jupe_area2","Monster1#2-2::OnMyMobDead";
	3636	end;
	3637
	3638	OnEnable:
	3639	initnpctimer;
	3640	enablenpc "Monster1#2-2";
	3641	set .MyMobs,8;
	3642	monster "jupe_area2",126,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead";
	3643	monster "jupe_area2",127,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead";
	3644	monster "jupe_area2",128,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead";
	3645	monster "jupe_area2",129,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead";
	3646	monster "jupe_area2",130,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead";
	3647	monster "jupe_area2",131,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead";
	3648	monster "jupe_area2",132,176,"High Guard",1669,1,"Monster1#2-2::OnMyMobDead";
	3649	monster "jupe_area2",133,176,"High Guard",1675,1,"Monster1#2-2::OnMyMobDead";
	3650	end;
	3651
	3652	OnTimer300000:
	3653	mapannounce "jupe_area2","I can't believe how cowardly you really are...",bc_map,"0xFF0000";
	3654	set $@JupreArea2InUse,0;
	3655	end;
	3656
	3657	OnTimer300002:
	3658	enablenpc "#hole#2-2";
	3659	stopnpctimer;
	3660	donpcevent "Monster1#2-2::OnDisable";
	3661	end;
	3662
	3663	OnMyMobDead:
	3664	set .MyMobs,.MyMobs-1;
	3665	if (.MyMobs < 1) {
	3666	donpcevent "Monster2#2-2::OnEnable";
	3667	disablenpc "Monster1#2-2";
	3668	stopnpctimer;
	3669	}
	3670	end;
	3671	}
	3672
	3673	- script Monster2#2-2 -1,{
	3674	OnInit:
	3675	disablenpc "Monster2#2-2";
	3676	end;
	3677
	3678	OnDisable:
	3679	disablenpc "Monster2#2-2";
	3680	killmonster "jupe_area2","Monster2#2-2::OnMyMobDead";
	3681	end;
	3682
	3683	OnEnable:
	3684	enablenpc "Monster2#2-2";
	3685	initnpctimer;
	3686	end;
	3687
	3688	OnTimer2000:
	3689	mapannounce "jupe_area2","I was the head of this underground laboratory.",bc_map,"0xFF0000";
	3690	end;
	3691
	3692	OnTimer4000:
	3693	mapannounce "jupe_area2","But that was a long time ago, back when I was merely a human.",bc_map,"0xFF0000";
	3694	end;
	3695
	3696	OnTimer6000:
	3697	mapannounce "jupe_area2","I was called Vesper Newton. Hahah, they called me a mad man back then.",bc_map,"0xFF0000";
	3698	set .MyMobs,13;
	3699	monster "jupe_area2",126,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3700	monster "jupe_area2",127,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead";
	3701	monster "jupe_area2",128,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3702	monster "jupe_area2",129,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead";
	3703	monster "jupe_area2",130,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3704	monster "jupe_area2",131,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead";
	3705	monster "jupe_area2",132,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3706	monster "jupe_area2",133,156,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead";
	3707	monster "jupe_area2",133,156,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3708	monster "jupe_area2",127,152,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead";
	3709	monster "jupe_area2",129,152,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3710	monster "jupe_area2",130,152,"Security Guard",1669,1,"Monster2#2-2::OnMyMobDead";
	3711	monster "jupe_area2",132,152,"Security Guard",1675,1,"Monster2#2-2::OnMyMobDead";
	3712	end;
	3713
	3714	OnTimer300000:
	3715	mapannounce "jupe_area2","...Not yet.",bc_map,"0xFF0000";
	3716	set $@JupreArea2InUse,0;
	3717	end;
	3718
	3719	OnTimer300002:
	3720	enablenpc "#hole#2-2";
	3721	stopnpctimer;
	3722	donpcevent "Monster2#2-2::OnDisable";
	3723	end;
	3724
	3725	OnMyMobDead:
	3726	set .MyMobs,.MyMobs-1;
	3727	if (.MyMobs < 1) {
	3728	mapannounce "jupe_area2","Not yet!",bc_map,"0xFF0000";
	3729	disablenpc "Monster2#2-2";
	3730	enablenpc "#hole#2-2";
	3731	set $@JupreArea2InUse,0;
	3732	stopnpctimer;
	3733	}
	3734	end;
	3735	}
	3736
	3737	//============================================================
	3738	// Security Checkpoint 2-3
	3739	//============================================================
	3740	jupe_area2,127,146,0 script #hole#2-3 844,{
	3741	cutin "3",2;
	3742	if ($@JupreArea2InUse == 1) {
	3743	mes "^3355FFThis seems like";
	3744	mes "some kind of device";
	3745	mes "that will allow you to";
	3746	mes "pass to the other side.";
	3747	mes "There's a slot where you";
	3748	mes "probably need to insert";
	3749	mes "some kind of object...^000000";
	3750	close2;
	3751	cutin "3",255;
	3752	end;
	3753	}
	3754	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	3755	mes "^3355FFThis seems like";
	3756	mes "some kind of device";
	3757	mes "that will allow you to";
	3758	mes "pass to the other side.";
	3759	mes "There's a slot where you";
	3760	mes "probably need to insert";
	3761	mes "some kind of object...^000000";
	3762	next;
	3763	switch(select("Insert a Crest Piece.:Cancel.")) {
	3764	case 1:
	3765	if (countitem(7358) > 0) {
	3766	mes "^3355FFYou take out your";
	3767	mes "Crest Piece and place";
	3768	mes "it into the slot where it";
	3769	mes "happens to fit perfectly.^000000";
	3770	specialeffect 159; //"#hole#2-3" EF_TOPRANK
	3771	cutin "3-1",2;
	3772	next;
	3773	if ($@JupreArea2InUse == 1) {
	3774	mes "^3355FFNothing happens.";
	3775	mes "Perhaps an alarm or";
	3776	mes "some other safety measure";
	3777	mes "was activated to keep the";
	3778	mes "Crest Piece from activating";
	3779	mes "this transportation device.";
	3780	mes "You retrieve the Crest Piece.^000000";
	3781	close2;
	3782	cutin "3-1",255;
	3783	end;
	3784	}
	3785	else {
	3786	mes "^3355FFThe slot rotates and";
	3787	mes "the Crest Piece moves as";
	3788	mes "if it were turning a key. You";
	3789	mes "feel a weak tremor as a Warp";
	3790	mes "Portal to the other side is";
	3791	mes "activated. You then retrieve";
	3792	mes "your Crest Piece.^000000";
	3793	initnpctimer;
	3794	donpcevent "Warp#2-3::OnEnable";
	3795	enablenpc "Red Alarm#2-3";
	3796	disablenpc "#hole#2-3";
	3797	close2;
	3798	cutin "3-1",255;
	3799	end;
	3800	}
	3801	}
	3802	else {
	3803	mes "^3355FFUnfortunately, you're";
	3804	mes "not carrying anything";
	3805	mes "that might be able to fit";
	3806	mes "into the slot and activate";
	3807	mes "this mechanical device.^000000";
	3808	close2;
	3809	cutin "3",255;
	3810	end;
	3811	}
	3812	case 2:
	3813	mes "[" + strcharinfo(0) + "]";
	3814	mes "Hmmm...";
	3815	mes "Do I have anything";
	3816	mes "that might make this";
	3817	mes "weird machine work?";
	3818	close2;
	3819	cutin "3",255;
	3820	end;
	3821	}
	3822	}
	3823	else {
	3824	mes "^3355FFThis seems like";
	3825	mes "some kind of device";
	3826	mes "that will allow you to";
	3827	mes "pass to the other side.";
	3828	mes "There's a slot where you";
	3829	mes "probably need to insert";
	3830	mes "some kind of object...^000000";
	3831	close2;
	3832	cutin "3",255;
	3833	end;
	3834	}
	3835	end;
	3836
	3837	Onstop_timer:
	3838	stopnpctimer;
	3839	end;
	3840
	3841	OnTimer22500:
	3842	stopnpctimer;
	3843	enablenpc "#hole#2-3";
	3844	disablenpc "Red Alarm#2-3";
	3845	end;
	3846	}
	3847
	3848	jupe_area2,130,137,0 script Warp#2-3 139,2,2,{
	3849	OnInit:
	3850	disablenpc "Warp#2-3";
	3851	end;
	3852
	3853	OnEnable:
	3854	enablenpc "Warp#2-3";
	3855	specialeffect 561; //"Warp#2-3" 561
	3856	soundeffectall "jupe_warp.wav",0;
	3857	initnpctimer;
	3858	end;
	3859
	3860	OnTouch:
	3861	warp "jupe_area2",130,105;
	3862	end;
	3863
	3864	OnTimer22500:
	3865	disablenpc "Warp#2-3";
	3866	end;
	3867	}
	3868
	3869	jupe_area2,130,105,0 script Red Alarm#2-3 -1,0,4,{
	3870	OnInit:
	3871	disablenpc "Red Alarm#2-3";
	3872	end;
	3873
	3874	OnTouch:
	3875	set $@JupreArea2InUse,1;
	3876	donpcevent "Red Alarm On#2-3::OnEnable";
	3877	disablenpc "Red Alarm#2-3";
	3878	disablenpc "#hole#2-3";
	3879	end;
	3880	}
	3881
	3882	- script Red Alarm On#2-3 -1,{
	3883	OnInit:
	3884	disablenpc "Red Alarm On#2-3";
	3885	end;
	3886
	3887	OnEnable:
	3888	enablenpc "Red Alarm On#2-3";
	3889	initnpctimer;
	3890	end;
	3891
	3892	OnTimer1000:
	3893	mapannounce "jupe_area2","These security systems...",bc_map,"0xFF0000";
	3894	end;
	3895
	3896	OnTimer3000:
	3897	mapannounce "jupe_area2","They're not really for protection.",bc_map,"0xFF0000";
	3898	disablenpc "#hole#2-3";
	3899	end;
	3900
	3901	OnTimer5000:
	3902	mapannounce "jupe_area2","It's sort of just a hobby to pass the time...",bc_map,"0xFF0000";
	3903	donpcevent "Monster1#2-3::OnEnable";
	3904	end;
	3905
	3906	OnTimer7000:
	3907	mapannounce "jupe_area2","Being immortal, I have a lot of time on my hands...",bc_map,"0xFF0000";
	3908	end;
	3909
	3910	OnTimer8000:
	3911	disablenpc "Red Alarm On#2-3";
	3912	stopnpctimer;
	3913	end;
	3914	}
	3915
	3916	- script Monster1#2-3 -1,{
	3917	OnInit:
	3918	disablenpc "Monster1#2-3";
	3919	end;
	3920
	3921	OnDisable:
	3922	disablenpc "Monster1#2-3";
	3923	killmonster "jupe_area2","Monster1#2-3::OnMyMobDead";
	3924	end;
	3925
	3926	OnEnable:
	3927	initnpctimer;
	3928	enablenpc "Monster1#2-3";
	3929	set .MyMobs,8;
	3930	monster "jupe_area2",126,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead";
	3931	monster "jupe_area2",127,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead";
	3932	monster "jupe_area2",128,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead";
	3933	monster "jupe_area2",129,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead";
	3934	monster "jupe_area2",130,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead";
	3935	monster "jupe_area2",131,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead";
	3936	monster "jupe_area2",132,89,"Security Guard",1675,1,"Monster1#2-3::OnMyMobDead";
	3937	monster "jupe_area2",133,89,"Security Guard",1669,1,"Monster1#2-3::OnMyMobDead";
	3938	end;
	3939
	3940	OnTimer300000:
	3941	mapannounce "jupe_area2","Zzzzt...Zzzzt....",bc_map,"0xFF0000";
	3942	set $@JupreArea2InUse,0;
	3943	end;
	3944
	3945	OnTimer300002:
	3946	donpcevent "Monster1#2-3::OnDisable";
	3947	enablenpc "#hole#2-3";
	3948	end;
	3949
	3950	OnMyMobDead:
	3951	set .MyMobs,.MyMobs-1;
	3952	if (.MyMobs < 1) {
	3953	donpcevent "Monster2#2-3::OnEnable";
	3954	disablenpc "Monster1#2-3";
	3955	stopnpctimer;
	3956	}
	3957	end;
	3958	}
	3959
	3960	- script Monster2#2-3 -1,{
	3961	OnInit:
	3962	disablenpc "Monster2#2-3";
	3963	end;
	3964
	3965	OnDisable:
	3966	disablenpc "Monster2#2-3";
	3967	killmonster "jupe_area2","Monster2#2-3::OnMyMobDead";
	3968	end;
	3969
	3970	OnEnable:
	3971	initnpctimer;
	3972	enablenpc "Monster2#2-3";
	3973	end;
	3974
	3975	OnTimer2000:
	3976	mapannounce "jupe_area2","Why have you come?",bc_map,"0xFF0000";
	3977	end;
	3978
	3979	OnTimer5000:
	3980	mapannounce "jupe_area2","Were you hoping to find something wonderful? Something miraculous?",bc_map,"0xFF0000";
	3981	end;
	3982
	3983	OnTimer8000:
	3984	mapannounce "jupe_area2","You're wrong! Welcome to Hell!",bc_map,"0xFF0000";
	3985	set .MyMobs,16;
	3986	monster "jupe_area2",114,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3987	monster "jupe_area2",115,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	3988	monster "jupe_area2",116,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3989	monster "jupe_area2",117,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	3990	monster "jupe_area2",118,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3991	monster "jupe_area2",119,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	3992	monster "jupe_area2",120,64,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3993	monster "jupe_area2",121,64,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	3994	monster "jupe_area2",114,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3995	monster "jupe_area2",115,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	3996	monster "jupe_area2",116,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3997	monster "jupe_area2",117,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	3998	monster "jupe_area2",118,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	3999	monster "jupe_area2",119,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	4000	monster "jupe_area2",120,62,"Security Guard",1675,1,"Monster2#2-3::OnMyMobDead";
	4001	monster "jupe_area2",121,62,"Security Guard",1669,1,"Monster2#2-3::OnMyMobDead";
	4002	end;
	4003
	4004	OnTimer300000:
	4005	mapannounce "jupe_area2","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000";
	4006	set $@JupreArea2InUse,0;
	4007	end;
	4008
	4009	OnTimer300002:
	4010	enablenpc "#hole#2-3";
	4011	stopnpctimer;
	4012	donpcevent "Monster2#2-3::OnDisable";
	4013	end;
	4014
	4015	OnMyMobDead:
	4016	set .MyMobs,.MyMobs-1;
	4017	if (.MyMobs < 1) {
	4018	mapannounce "jupe_area2","Do you still have your courage? Come. Prove it.",bc_map,"0xFF0000";
	4019	disablenpc "Monster2#2-3";
	4020	enablenpc "#hole#2-3";
	4021	set $@JupreArea2InUse,0;
	4022	stopnpctimer;
	4023	}
	4024	end;
	4025	}
	4026
	4027	//============================================================
	4028	// Security Checkpoint 2-4
	4029	//============================================================
	4030	jupe_area2,113,49,0 script #hole#2-4 844,{
	4031	cutin "4",2;
	4032	if ($@JupreArea2InUse == 1) {
	4033	mes "^3355FFThis seems like";
	4034	mes "some kind of device";
	4035	mes "that will allow you to";
	4036	mes "pass to the other side.";
	4037	mes "There's a slot where you";
	4038	mes "probably need to insert";
	4039	mes "some kind of object...^000000";
	4040	close2;
	4041	cutin "4",255;
	4042	end;
	4043	}
	4044	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	4045	mes "^3355FFThis seems like";
	4046	mes "some kind of device";
	4047	mes "that will allow you to";
	4048	mes "pass to the other side.";
	4049	mes "There's a slot where you";
	4050	mes "probably need to insert";
	4051	mes "some kind of object...^000000";
	4052	next;
	4053	switch(select("Insert a Crest Piece.:Cancel.")) {
	4054	case 1:
	4055	if (countitem(7359) > 0) {
	4056	mes "^3355FFYou take out your";
	4057	mes "Crest Piece and place";
	4058	mes "it into the slot where it";
	4059	mes "happens to fit perfectly.^000000";
	4060	specialeffect 159; //"#hole#2-4" EF_TOPRANK
	4061	cutin "4-1",2;
	4062	next;
	4063	if ($@JupreArea2InUse == 1) {
	4064	mes "^3355FFNothing happens.";
	4065	mes "Perhaps an alarm or";
	4066	mes "some other safety measure";
	4067	mes "was activated to keep the";
	4068	mes "Crest Piece from activating";
	4069	mes "this transportation device.";
	4070	mes "You retrieve the Crest Piece.^000000";
	4071	close2;
	4072	cutin "4-1",255;
	4073	end;
	4074	}
	4075	else {
	4076	mes "^3355FFThe slot rotates and";
	4077	mes "the Crest Piece moves as";
	4078	mes "if it were turning a key. You";
	4079	mes "feel a weak tremor as a Warp";
	4080	mes "Portal to the other side is";
	4081	mes "activated. You then retrieve";
	4082	mes "your Crest Piece.^000000";
	4083	initnpctimer;
	4084	donpcevent "Warp#2-4::OnEnable";
	4085	donpcevent "Red Alarm#2-4::OnEnable";
	4086	disablenpc "#hole#2-4";
	4087	close2;
	4088	cutin "4-1",255;
	4089	end;
	4090	}
	4091	}
	4092	else {
	4093	mes "^3355FFUnfortunately, you're";
	4094	mes "not carrying anything";
	4095	mes "that might be able to fit";
	4096	mes "into the slot and activate";
	4097	mes "this mechanical device.^000000";
	4098	close2;
	4099	cutin "4",255;
	4100	end;
	4101	}
	4102	break;
	4103	case 2:
	4104	mes "[" + strcharinfo(0) + "]";
	4105	mes "Hmmm...";
	4106	mes "Do I have anything";
	4107	mes "that might make this";
	4108	mes "weird machine work?";
	4109	close2;
	4110	cutin "4",255;
	4111	end;
	4112	}
	4113	}
	4114	else {
	4115	mes "^3355FFThis seems like";
	4116	mes "some kind of device";
	4117	mes "that will allow you to";
	4118	mes "pass to the other side.";
	4119	mes "There's a slot where you";
	4120	mes "probably need to insert";
	4121	mes "some kind of object...^000000";
	4122	close2;
	4123	cutin "4",255;
	4124	end;
	4125	}
	4126	end;
	4127
	4128	Onstop_timer:
	4129	stopnpctimer;
	4130	end;
	4131
	4132	OnTimer5000:
	4133	stopnpctimer;
	4134	enablenpc "#hole#2-4";
	4135	disablenpc "Red Alarm#2-4";
	4136	end;
	4137	}
	4138
	4139	jupe_area2,106,53,0 script Warp#2-4 139,2,2,{
	4140	OnInit:
	4141	disablenpc "Warp#2-4";
	4142	end;
	4143
	4144	OnEnable:
	4145	enablenpc "Warp#2-4";
	4146	specialeffect 561; //"Warp#2-4" 561
	4147	soundeffectall "jupe_warp.wav",0;
	4148	initnpctimer;
	4149	end;
	4150
	4151	OnTouch:
	4152	warp "jupe_area2",80,157;
	4153	end;
	4154
	4155	OnTimer5000:
	4156	disablenpc "Warp#2-4";
	4157	end;
	4158	}
	4159
	4160	jupe_area2,80,157,0 script Red Alarm#2-4 -1,2,2,{
	4161	OnInit:
	4162	disablenpc "Red Alarm#2-4";
	4163	end;
	4164
	4165	OnEnable:
	4166	enablenpc "Red Alarm#2-4";
	4167	end;
	4168
	4169	OnTouch:
	4170	set $@JupreArea2InUse,1;
	4171	donpcevent "Red Alarm On#2-4::OnEnable";
	4172	disablenpc "Red Alarm#2-4";
	4173	disablenpc "#hole#2-4";
	4174	end;
	4175	}
	4176
	4177	- script Red Alarm On#2-4 -1,{
	4178	OnInit:
	4179	disablenpc "Red Alarm On#2-4";
	4180	end;
	4181
	4182	OnEnable:
	4183	enablenpc "Red Alarm On#2-4";
	4184	initnpctimer;
	4185	end;
	4186
	4187	OnTimer1000:
	4188	mapannounce "jupe_area2","I've been waiting for someone strong enough to compete with me.",bc_map,"0xFF0000";
	4189	end;
	4190
	4191	OnTimer3000:
	4192	mapannounce "jupe_area2","If you hear this, I wish you will be the one...",bc_map,"0xFF0000";
	4193	end;
	4194
	4195	OnTimer5000:
	4196	mapannounce "jupe_area2","Perhaps, a mere shadow of my former self...",bc_map,"0xFF0000";
	4197	donpcevent "Monster1#2-4::OnEnable";
	4198	end;
	4199
	4200	OnTimer7000:
	4201	mapannounce "jupe_area2","Is somewhere down here, wandering...",bc_map,"0xFF0000";
	4202	end;
	4203
	4204	OnTimer8000:
	4205	stopnpctimer;
	4206	disablenpc "Red Alarm On#2-4";
	4207	end;
	4208	}
	4209
	4210	- script Monster1#2-4 -1,{
	4211	OnInit:
	4212	disablenpc "Monster1#2-4";
	4213	end;
	4214
	4215	OnDisable:
	4216	disablenpc "Monster1#2-4";
	4217	killmonster "jupe_area2","Monster1#2-4::OnMyMobDead";
	4218	end;
	4219
	4220	OnEnable:
	4221	initnpctimer;
	4222	enablenpc "Monster1#2-4";
	4223	set .MyMobs,8;
	4224	monster "jupe_area2",75,161,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead";
	4225	monster "jupe_area2",72,161,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead";
	4226	monster "jupe_area2",71,161,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead";
	4227	monster "jupe_area2",68,161,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead";
	4228	monster "jupe_area2",75,154,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead";
	4229	monster "jupe_area2",72,154,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead";
	4230	monster "jupe_area2",71,154,"Security Guard",1675,1,"Monster1#2-4::OnMyMobDead";
	4231	monster "jupe_area2",68,154,"Security Guard",1669,1,"Monster1#2-4::OnMyMobDead";
	4232	end;
	4233
	4234	OnTimer300000:
	4235	mapannounce "jupe_area2","Zzzzt...Zzzzt....",bc_map,"0xFF0000";
	4236	set $@JupreArea2InUse,0;
	4237	end;
	4238
	4239	OnTimer300002:
	4240	stopnpctimer;
	4241	enablenpc "#hole#2-4";
	4242	donpcevent "Monster1#2-4::OnDisable";
	4243	end;
	4244
	4245	OnMyMobDead:
	4246	set .MyMobs,.MyMobs-1;
	4247	if (.MyMobs < 1) {
	4248	donpcevent "Monster2#2-4::OnEnable";
	4249	disablenpc "Monster1#2-4";
	4250	stopnpctimer;
	4251	}
	4252	end;
	4253	}
	4254
	4255	- script Monster2#2-4 -1,{
	4256	OnInit:
	4257	disablenpc "Monster2#2-4";
	4258	end;
	4259
	4260	OnDisable:
	4261	killmonster "jupe_area2","Monster2#2-4::OnMyMobDead";
	4262	disablenpc "Monster2#2-4";
	4263	end;
	4264
	4265	OnEnable:
	4266	enablenpc "Monster2#2-4";
	4267	initnpctimer;
	4268	end;
	4269
	4270	OnTimer2000:
	4271	mapannounce "jupe_area2","I can never rest in peace...",bc_map,"0xFF0000";
	4272	end;
	4273
	4274	OnTimer4000:
	4275	mapannounce "jupe_area2","I'll wait forever or until someone can put me out of my misery...",bc_map,"0xFF0000";
	4276	end;
	4277
	4278	OnTimer6000:
	4279	mapannounce "jupe_area2","I will be waiting for you!",bc_map,"0xFF0000";
	4280	set .MyMobs,12;
	4281	monster "jupe_area2",63,161,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead";
	4282	monster "jupe_area2",61,161,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead";
	4283	monster "jupe_area2",59,161,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead";
	4284	monster "jupe_area2",57,161,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead";
	4285	monster "jupe_area2",55,161,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead";
	4286	monster "jupe_area2",53,161,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead";
	4287	monster "jupe_area2",53,154,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead";
	4288	monster "jupe_area2",55,154,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead";
	4289	monster "jupe_area2",57,154,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead";
	4290	monster "jupe_area2",59,154,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead";
	4291	monster "jupe_area2",61,154,"Security Guard",1675,1,"Monster2#2-4::OnMyMobDead";
	4292	monster "jupe_area2",63,154,"Security Guard",1669,1,"Monster2#2-4::OnMyMobDead";
	4293	end;
	4294
	4295	OnTimer300000:
	4296	set $@JupreArea2InUse,0;
	4297	mapannounce "jupe_area2","It's funny... Isn't it?",bc_map,"0xFF0000";
	4298	end;
	4299
	4300	OnTimer300002:
	4301	enablenpc "#hole#2-4";
	4302	donpcevent "Monster2#2-4::OnDisable";
	4303	end;
	4304
	4305	OnMyMobDead:
	4306	set .MyMobs,.MyMobs-1;
	4307	if (.MyMobs < 1) {
	4308	mapannounce "jupe_area2","It's funny... Isn't it?",bc_map,"0xFF0000";
	4309	disablenpc "Monster2#2-4";
	4310	enablenpc "#hole#2-4";
	4311	set $@JupreArea2InUse,0;
	4312	stopnpctimer;
	4313	}
	4314	end;
	4315	}
	4316
	4317	//============================================================
	4318	// Move to Elevator
	4319	//============================================================
	4320	jupe_area2,51,162,0 script Lever#ufe2 844,{
	4321	mes "^3355FFIt's a lever";
	4322	mes "whose function";
	4323	mes "is not known to you.^000000";
	4324	next;
	4325	switch(select("Pull.:Cancel.")) {
	4326	case 1:
	4327	if($@JupreArea2InUse == 1) close;
	4328	initnpctimer;
	4329	donpcevent "LeverWarp#ufe2::OnEnable";
	4330	disablenpc "Lever#ufe2";
	4331	close;
	4332	case 2:
	4333	mes "[" + strcharinfo(0) + "]";
	4334	mes "Pull this lever?";
	4335	mes "I don't even know";
	4336	mes "what will happen...";
	4337	close;
	4338	}
	4339	close;
	4340
	4341	OnTimer3000:
	4342	enablenpc "Lever#ufe2";
	4343	stopnpctimer;
	4344	end;
	4345	}
	4346
	4347	jupe_area2,46,157,0 script LeverWarp#ufe2 139,2,2,{
	4348	OnInit:
	4349	disablenpc "LeverWarp#ufe2";
	4350	end;
	4351
	4352	OnEnable:
	4353	enablenpc "LeverWarp#ufe2";
	4354	specialeffect 561; //"LeverWarp#ufe2" 561
	4355	soundeffectall "jupe_warp.wav",0;
	4356	initnpctimer;
	4357	end;
	4358
	4359	OnTouch:
	4360	warp "jupe_gate",71,29;
	4361	end;
	4362
	4363	OnTimer3000:
	4364	stopnpctimer;
	4365	disablenpc "LeverWarp#ufe2";
	4366	end;
	4367	}
	4368
	4369	//============================================================
	4370	// Elevator Reception Room
	4371	//============================================================
	4372	jupe_ele_r,51,98,0 script Switch#ufe 844,{
	4373	if ($@JupeElevatorInUse == 1) {
	4374	mes "^3355FFIt's some sort of";
	4375	mes "lever that looks like";
	4376	mes "it was already pulled";
	4377	mes "by someone else.^000000";
	4378	close;
	4379	}
	4380	else {
	4381	cutin "5",2;
	4382	mes "^3355FFIt's some sort of";
	4383	mes "lever that's located";
	4384	mes "next to four empty slots.^000000";
	4385	next;
	4386	switch(select("Pull the lever.:Leave it alone.")) {
	4387	case 1:
	4388	mes "^3355FFSnap Snap^000000";
	4389	next;
	4390	mes "^3355FFYou pull the lever,";
	4391	mes "but nothing happened.";
	4392	mes "You probably need to";
	4393	mes "insert the correct objects";
	4394	mes "into the slots in order";
	4395	mes "for the lever to operate.^000000";
	4396	next;
	4397	if (countitem(7356) > 0 && countitem(7359) > 0 && countitem(7357) > 0 && countitem(7358) > 0) {
	4398	switch(select("Insert all of your Crest Pieces.")) {
	4399	case 1:
	4400	mes "^3300FFSnap!^000000";
	4401	mes "^3300FFStrangely enough,";
	4402	mes "all four of the Crest";
	4403	mes "Pieces fit perfectly into";
	4404	mes "the slots and begin to";
	4405	mes "emit a strange light.^000000";
	4406	cutin "5-1",2;
	4407	specialeffect 72; //"Switch#ufe" EF_SPHERE
	4408	delitem 7356,1; //Piece_Of_Crest1
	4409	delitem 7359,1; //Piece_Of_Crest4
	4410	delitem 7357,1; //Piece_Of_Crest2
	4411	delitem 7358,1; //Piece_Of_Crest3
	4412	next;
	4413	switch(select("Pull out the Crest Pieces.:Pull the lever.")) {
	4414	case 1:
	4415	cutin "5",2;
	4416	mes "^3355FFYou pull out all";
	4417	mes "the Crest Pieces";
	4418	mes "that you inserted";
	4419	mes "into the slots.^000000";
	4420	getitem 7356,1; //Piece_Of_Crest1
	4421	getitem 7359,1; //Piece_Of_Crest4
	4422	getitem 7357,1; //Piece_Of_Crest2
	4423	getitem 7358,1; //Piece_Of_Crest3
	4424	close2;
	4425	cutin "5",255;
	4426	end;
	4427	case 2:
	4428	if ($@JupeElevatorInUse == 1) {
	4429	mes "^3355FFIt's strange,";
	4430	mes "but this lever has";
	4431	mes "already been pulled.^000000";
	4432	close2;
	4433	cutin "5",255;
	4434	end;
	4435	}
	4436	else {
	4437	mes "^3355FFOnce you pull the lever,";
	4438	mes "the Crest Piece slots are";
	4439	mes "suddenly covered, making";
	4440	mes "them irretrievable, and the";
	4441	mes "ground begins to shake";
	4442	mes "violently. This isn't normal!^000000";
	4443	next;
	4444	set $@JupeElevatorInUse,1;
	4445	disablenpc "Switch#ufe";
	4446	enablenpc "Switch On#ufe";
	4447	initnpctimer;
	4448	specialeffect2 563; // 563
	4449	soundeffectall "earth_quake.wav",0;
	4450	close2;
	4451	cutin "5-1",255;
	4452	end;
	4453	}
	4454	}
	4455	}
	4456	}
	4457	else if (countitem(7356) > 0 \|\| countitem(7359) > 0 \|\| countitem(7357) > 0 \|\| countitem(7358) > 0) {
	4458	select("Insert Crest Pieces.");
	4459	mes "^3355FFRight now, you don't";
	4460	mes "have enough Crest Pieces";
	4461	mes "to place into all four of these";
	4462	mes "slots. You'll need to find and^FFFFFF ^3355FF bring them all to make this work.^000000";
	4463	close2;
	4464	cutin "5-1",255;
	4465	end;
	4466	}
	4467	else {
	4468	mes "^3355FFYou need to find";
	4469	mes "some kind of object";
	4470	mes "that you can fit into";
	4471	mes "each of these four slots...^000000";
	4472	close2;
	4473	cutin "5-1",255;
	4474	end;
	4475	}
	4476	case 2:
	4477	mes "^3355FFWho knows what";
	4478	mes "this lever may do?";
	4479	mes "You'll never know unless";
	4480	mes "you have the courage to try.^000000";
	4481	close2;
	4482	cutin "5",255;
	4483	end;
	4484	}
	4485	}
	4486	end;
	4487
	4488	OnTimer2000:
	4489	mapannounce "jupe_ele_r","My descendents...",bc_map,"0x66FF00";
	4490	end;
	4491
	4492	OnTimer3000:
	4493	mapannounce "jupe_ele_r","Do you want to know why this city was buried beneath the earth...?",bc_map,"0x66FF00";
	4494	end;
	4495
	4496	OnTimer7000:
	4497	mapannounce "jupe_ele_r","If so, follow my voice...",bc_map,"0x66FF00";
	4498	end;
	4499
	4500	OnTimer10000:
	4501	mapannounce "jupe_ele_r","I shall let you see for yourself what you desire to know...",bc_map,"0x66FF00";
	4502	end;
	4503
	4504	OnTimer17000:
	4505	mapannounce "jupe_ele_r","Overcome all the hallucinations.",bc_map,"0xCC6600";
	4506	end;
	4507
	4508	OnTimer20000:
	4509	mapannounce "jupe_ele_r","Open your eyes and see past all of the lies.",bc_map,"0xFF0000";
	4510	end;
	4511
	4512	OnTimer23000:
	4513	mapannounce "jupe_ele_r","I can only maintain this vision for you for 20 minutes.",bc_map,"0xFF0000";
	4514	donpcevent "Elevator Guard1#ufe::OnEnable";
	4515	end;
	4516
	4517	OnTimer27000:
	4518	mapannounce "jupe_ele_r","Look! And remember!",bc_map,"0xFF0000";
	4519	stopnpctimer;
	4520	end;
	4521	}
	4522
	4523	jupe_ele_r,51,98,0 script Switch On#ufe 844,{
	4524	mes "^3355FFIt seems like";
	4525	mes "someone else is";
	4526	mes "using this machine...^000000";
	4527	close;
	4528
	4529	OnInit:
	4530	disablenpc "Switch On#ufe";
	4531	end;
	4532	}
	4533
	4534	//============================================================
	4535	// Elevator Receptoin Guards
	4536	//============================================================
	4537	jupe_ele_r,10,50,0 script Elevator Guard1#ufe -1,{
	4538	OnInit:
	4539	disablenpc "Elevator Guard1#ufe";
	4540	end;
	4541
	4542	OnEnable:
	4543	set .MyMobs,9;
	4544	enablenpc "Elevator Guard1#ufe";
	4545	initnpctimer;
	4546	end;
	4547
	4548	OnTimer1000:
	4549	monster "jupe_ele_r",44,99,"Guard",1669,1,"Elevator Guard1#ufe::OnMyMobDead";
	4550	end;
	4551
	4552	OnTimer1200:
	4553	monster "jupe_ele_r",55,99,"Guard",1675,1,"Elevator Guard1#ufe::OnMyMobDead";
	4554	end;
	4555
	4556	OnTimer1400:
	4557	monster "jupe_ele_r",45,84,"Guard",1683,1,"Elevator Guard1#ufe::OnMyMobDead";
	4558	end;
	4559
	4560	OnTimer1600:
	4561	monster "jupe_ele_r",54,84,"Guard",1675,1,"Elevator Guard1#ufe::OnMyMobDead";
	4562	end;
	4563
	4564	OnTimer1800:
	4565	monster "jupe_ele_r",45,99,"Guard",1669,1,"Elevator Guard1#ufe::OnMyMobDead";
	4566	end;
	4567
	4568	OnTimer2000:
	4569	monster "jupe_ele_r",54,99,"Guard",1683,1,"Elevator Guard1#ufe::OnMyMobDead";
	4570	end;
	4571
	4572	OnTimer2200:
	4573	monster "jupe_ele_r",48,84,"Guard",1669,1,"Elevator Guard1#ufe::OnMyMobDead";
	4574	end;
	4575
	4576	OnTimer2400:
	4577	monster "jupe_ele_r",52,84,"Guard",1683,1,"Elevator Guard1#ufe::OnMyMobDead";
	4578	end;
	4579
	4580	OnTimer2600:
	4581	monster "jupe_ele_r",50,84,"Chief Guard",1684,1,"Elevator Guard1#ufe::OnMyMobDead";
	4582	end;
	4583
	4584	OnTimer120000:
	4585	mapannounce "jupe_ele_r","It is disappointing to see that you are too weak to even defeat a hallucination...",bc_map,"0x66FF00";
	4586	enablenpc "Switch#ufe";
	4587	disablenpc "Switch On#ufe";
	4588	donpcevent "Annihilation#ufe::OnEnable";
	4589	set $@JupeElevatorInUse,0;
	4590	end;
	4591
	4592	OnTimer120005:
	4593	killmonster "jupe_ele_r","Elevator Guard1#ufe::OnMyMobDead";
	4594	stopnpctimer;
	4595	end;
	4596
	4597	OnMyMobDead:
	4598	set .MyMobs,.MyMobs-1;
	4599	if (.MyMobs < 1) {
	4600	donpcevent "Elevator Safety#ufe::OnEnable";
	4601	stopnpctimer;
	4602	}
	4603	end;
	4604	}
	4605
	4606	jupe_ele_r,10,52,0 script Elevator Safety#ufe -1,{
	4607	OnInit:
	4608	disablenpc "Elevator Safety#ufe";
	4609	end;
	4610
	4611	OnEnable:
	4612	enablenpc "Elevator Safety#ufe";
	4613	initnpctimer;
	4614	end;
	4615
	4616	OnTimer5000:
	4617	mapannounce "jupe_ele_r","Those of you who have defeated the hallucination, step forward.",bc_map,"0x66FF00";
	4618	soundeffectall "earth_quake.wav",0;
	4619	end;
	4620
	4621	OnTimer8000:
	4622	donpcevent "Elevator On#ufe::OnEnable";
	4623	end;
	4624
	4625	OnTimer10000:
	4626	disablenpc "Elevator Safety#ufe";
	4627	stopnpctimer;
	4628	end;
	4629	}
	4630
	4631	jupe_ele_r,50,89,0 script Annihilation#ufe -1,35,50,{
	4632	OnInit:
	4633	disablenpc "Annihilation#ufe";
	4634	end;
	4635
	4636	OnEnable:
	4637	enablenpc "Annihilation#ufe";
	4638	initnpctimer;
	4639	end;
	4640
	4641	OnTouch:
	4642	percentheal -99,-100;
	4643	end;
	4644
	4645	OnTimer1000:
	4646	mapwarp "jupe_ele_r", "jupe_gate",49,138;
	4647	end;
	4648
	4649	OnTimer1600:
	4650	enablenpc "Elevator Escape#ufe";
	4651	end;
	4652
	4653	OnTimer3000:
	4654	disablenpc "Annihilation#ufe";
	4655	disablenpc "Elevator Escape#ufe";
	4656	end;
	4657	}
	4658
	4659	jupe_ele_r,50,89,0 script Elevator Escape#ufe -1,35,50,{
	4660	OnInit:
	4661	disablenpc "Elevator Escape#ufe";
	4662	end;
	4663
	4664	OnTouch:
	4665	mapwarp "jupe_ele_r", "jupe_gate",49,138;
	4666	end;
	4667	}
	4668
	4669	jupe_ele_r,10,54,0 script Elevator On#ufe -1,{
	4670	OnInit:
	4671	disablenpc "Elevator On#ufe";
	4672	end;
	4673
	4674	OnEnable:
	4675	enablenpc "Elevator On#ufe";
	4676	initnpctimer;
	4677	end;
	4678
	4679	OnTimer1000:
	4680	mapwarp "jupe_ele_r", "jupe_ele",42,47;
	4681	set $@JupeElevatorInUse2,0;
	4682	donpcevent "TimeOut#ufe::OnEnable";
	4683	donpcevent "Guard-1#ufe::OnEnable";
	4684	end;
	4685
	4686	OnTimer10000:
	4687	stopnpctimer;
	4688	disablenpc "Elevator On#ufe";
	4689	end;
	4690	}
	4691
	4692	//============================================================
	4693	// Elevator NPCs
	4694	//============================================================
	4695	jupe_ele,14,6,1 script TimeOut#ufe 844,{
	4696	OnEnable:
	4697	initnpctimer;
	4698	end;
	4699
	4700	OnDisable:
	4701	stopnpctimer;
	4702	end;
	4703
	4704	OnTimer59000:
	4705	if (getmapusers("jupe_ele") == 0) {
	4706	killmonsterall "jupe_ele";
	4707	donpcevent "Guard-1#ufe::OnDisable";
	4708	donpcevent "Guard-2#ufe::OnDisable";
	4709	donpcevent "Guard-3#ufe::OnDisable";
	4710	donpcevent "Guard-4#ufe::OnDisable";
	4711	stopnpctimer;
	4712	set $@JupeElevatorInUse2,0;
	4713	set $@JupeElevatorInUse,0;
	4714	disablenpc "Switch On#ufe";
	4715	enablenpc "Switch#ufe";
	4716	}
	4717	end;
	4718
	4719	OnTimer120000:
	4720	killmonsterall "jupe_ele";
	4721	donpcevent "Guard-1#ufe::OnDisable";
	4722	donpcevent "Guard-2#ufe::OnDisable";
	4723	donpcevent "Guard-3#ufe::OnDisable";
	4724	donpcevent "Guard-4#ufe::OnDisable";
	4725	mapannounce "jupe_ele","In the end, you can't even overcome your inner fear...",bc_map,"0xFF0000";
	4726	end;
	4727
	4728	OnTimer122000:
	4729	mapannounce "jupe_ele","You have never encountered your inner fears, have you?",bc_map,"0xFF0000";
	4730	end;
	4731
	4732	OnTimer125000:
	4733	mapannounce "jupe_ele","Did you expect this would be the end of the hallucination?",bc_map,"0xFF0000";
	4734	end;
	4735
	4736	OnTimer127000:
	4737	mapannounce "jupe_ele","What if the voice you're hearing is also a hallucination?",bc_map,"0xFF0000";
	4738	end;
	4739
	4740	OnTimer129000:
	4741	mapannounce "jupe_ele","What if you're just dreaming all of this?",bc_map,"0xFF0000";
	4742	end;
	4743
	4744	OnTimer131000:
	4745	mapannounce "jupe_ele","What if the existence of this city is a lie?",bc_map,"0xFF0000";
	4746	end;
	4747
	4748	OnTimer133000:
	4749	mapannounce "jupe_ele","Are you even real?",bc_map,"0xFF0000";
	4750	end;
	4751
	4752	OnTimer134000:
	4753	OnTimer135000:
	4754	mapwarp "jupe_ele", "jupe_gate",49,138;
	4755	end;
	4756
	4757	OnTimer142000:
	4758	disablenpc "GuardEnd#ufe";
	4759	disablenpc "4F Enter#ufe";
	4760	donpcevent "TimeOut#ufe::OnDisable";
	4761	set $@JupeElevatorInUse2,0;
	4762	set $@JupeElevatorInUse,0;
	4763	disablenpc "Switch On#ufe";
	4764	enablenpc "Switch#ufe";
	4765	stopnpctimer;
	4766	end;
	4767	}
	4768
	4769	jupe_ele,15,6,1 script Guard-1#ufe 844,{
	4770	OnEnable:
	4771	initnpctimer;
	4772	end;
	4773
	4774	OnDisable:
	4775	stopnpctimer;
	4776	end;
	4777
	4778	OnTimer2000:
	4779	mapannounce "jupe_ele","I admire your patience.",bc_map,"0xFF0000";
	4780	end;
	4781
	4782	OnTimer5000:
	4783	mapannounce "jupe_ele","Let's see if everything you have experienced",bc_map,"0xFF0000";
	4784	end;
	4785
	4786	OnTimer8000:
	4787	mapannounce "jupe_ele","were traps for intruders...",bc_map,"0xFF0000";
	4788	end;
	4789
	4790	OnTimer12000:
	4791	set .MyMobs,8;
	4792	monster "jupe_ele",48,44,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead";
	4793	monster "jupe_ele",45,42,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead";
	4794	monster "jupe_ele",38,42,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead";
	4795	monster "jupe_ele",35,44,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead";
	4796	monster "jupe_ele",35,51,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead";
	4797	monster "jupe_ele",38,53,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead";
	4798	monster "jupe_ele",45,53,"Guard",1675,1,"Guard-1#ufe::OnMyMobDead";
	4799	monster "jupe_ele",48,51,"Guard",1669,1,"Guard-1#ufe::OnMyMobDead";
	4800	set $@JupeElevatorInUse2,1;
	4801	end;
	4802
	4803	OnTimer30000:
	4804	if ($@JupeElevatorInUse2 == 1) {
	4805	donpcevent "Guard-2#ufe::OnEnable";
	4806	stopnpctimer;
	4807	}
	4808	end;
	4809
	4810	OnMyMobDead:
	4811	set .MyMobs,.MyMobs-1;
	4812	if (.MyMobs < 1) {
	4813	if ($@JupeElevatorInUse2 == 1) {
	4814	donpcevent "Guard-2#ufe::OnEnable";
	4815	stopnpctimer;
	4816	} else if ($@JupeElevatorInUse2 == 4 && getvariableofnpc(.MyMobs,"Guard-2#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-3#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-4#ufe") < 1) {
	4817	donpcevent "GuardEnd#ufe::OnEnable";
	4818	stopnpctimer;
	4819	}
	4820	}
	4821	end;
	4822	}
	4823
	4824	jupe_ele,16,6,1 script Guard-2#ufe 844,{
	4825	OnEnable:
	4826	initnpctimer;
	4827	end;
	4828
	4829	OnDisable:
	4830	stopnpctimer;
	4831	end;
	4832
	4833	OnTimer2000:
	4834	mapannounce "jupe_ele","This city was not",bc_map,"0xFF0000";
	4835	end;
	4836
	4837	OnTimer5000:
	4838	mapannounce "jupe_ele","as magnificient as you thought.",bc_map,"0xFF0000";
	4839	end;
	4840
	4841	OnTimer8000:
	4842	mapannounce "jupe_ele","This is a place where all the fears of humans flourish.",bc_map,"0xFF0000";
	4843	end;
	4844
	4845	OnTimer11000:
	4846	mapannounce "jupe_ele","Yes. Nobody leaves alive!",bc_map,"0xFF0000";
	4847	end;
	4848
	4849	OnTimer12000:
	4850	set .MyMobs,8;
	4851	monster "jupe_ele",48,44,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead";
	4852	monster "jupe_ele",45,42,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead";
	4853	monster "jupe_ele",38,42,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead";
	4854	monster "jupe_ele",35,44,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead";
	4855	monster "jupe_ele",35,51,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead";
	4856	monster "jupe_ele",38,53,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead";
	4857	monster "jupe_ele",45,53,"Guard",1683,1,"Guard-2#ufe::OnMyMobDead";
	4858	monster "jupe_ele",48,51,"Guard",1669,1,"Guard-2#ufe::OnMyMobDead";
	4859	set $@JupeElevatorInUse2,2;
	4860	end;
	4861
	4862	OnTimer30000:
	4863	if ($@JupeElevatorInUse2 == 2) {
	4864	donpcevent "Guard-3#ufe::OnEnable";
	4865	stopnpctimer;
	4866	}
	4867	end;
	4868
	4869	OnMyMobDead:
	4870	set .MyMobs,.MyMobs-1;
	4871	if (.MyMobs < 1) {
	4872	if ($@JupeElevatorInUse2 == 2) {
	4873	donpcevent "Guard-3#ufe::OnEnable";
	4874	stopnpctimer;
	4875	} else if ($@JupeElevatorInUse2 == 4 && getvariableofnpc(.MyMobs,"Guard-1#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-3#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-4#ufe") < 1) {
	4876	donpcevent "GuardEnd#ufe::OnEnable";
	4877	stopnpctimer;
	4878	}
	4879	}
	4880	end;
	4881	}
	4882
	4883	jupe_ele,17,6,1 script Guard-3#ufe 844,{
	4884	OnEnable:
	4885	initnpctimer;
	4886	end;
	4887
	4888	OnDisable:
	4889	stopnpctimer;
	4890	end;
	4891
	4892	OnTimer2000:
	4893	mapannounce "jupe_ele","What do you see?",bc_map,"0xFF0000";
	4894	end;
	4895
	4896	OnTimer5000:
	4897	mapannounce "jupe_ele","Are your eyes actually seeing something?",bc_map,"0xFF0000";
	4898	end;
	4899
	4900	OnTimer8000:
	4901	mapannounce "jupe_ele","Or do you just believe you are seeing?",bc_map,"0xFF0000";
	4902	end;
	4903
	4904	OnTimer12000:
	4905	set .MyMobs,8;
	4906	monster "jupe_ele",48,44,"Guard",1675,1,"Guard-3#ufe::OnMyMobDead";
	4907	monster "jupe_ele",45,42,"Guard",1669,1,"Guard-3#ufe::OnMyMobDead";
	4908	monster "jupe_ele",38,42,"Guard",1683,1,"Guard-3#ufe::OnMyMobDead";
	4909	monster "jupe_ele",35,44,"Guard",1675,1,"Guard-3#ufe::OnMyMobDead";
	4910	monster "jupe_ele",35,51,"Guard",1669,1,"Guard-3#ufe::OnMyMobDead";
	4911	monster "jupe_ele",38,53,"Guard",1683,1,"Guard-3#ufe::OnMyMobDead";
	4912	monster "jupe_ele",45,53,"Guard",1675,1,"Guard-3#ufe::OnMyMobDead";
	4913	monster "jupe_ele",48,51,"Guard",1669,1,"Guard-3#ufe::OnMyMobDead";
	4914	set $@JupeElevatorInUse2,3;
	4915	end;
	4916
	4917	OnTimer30000:
	4918	if ($@JupeElevatorInUse2 == 3) {
	4919	donpcevent "Guard-4#ufe::OnEnable";
	4920	stopnpctimer;
	4921	}
	4922	end;
	4923
	4924	OnMyMobDead:
	4925	set .MyMobs,.MyMobs-1;
	4926	if (.MyMobs < 1) {
	4927	if ($@JupeElevatorInUse2 == 3) {
	4928	donpcevent "Guard-4#ufe::OnEnable";
	4929	stopnpctimer;
	4930	}
	4931	else if ($@JupeElevatorInUse2 == 4 && getvariableofnpc(.MyMobs,"Guard-1#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-2#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-4#ufe") < 1) {
	4932	donpcevent "GuardEnd#ufe::OnEnable";
	4933	stopnpctimer;
	4934	}
	4935	}
	4936	end;
	4937	}
	4938
	4939	jupe_ele,18,6,1 script Guard-4#ufe 844,{
	4940	OnEnable:
	4941	initnpctimer;
	4942	end;
	4943
	4944	OnDisable:
	4945	stopnpctimer;
	4946	end;
	4947
	4948	OnTimer2000:
	4949	mapannounce "jupe_ele","Do not forget. That which limits you is nothing but yourself.",bc_map,"0xFF0000";
	4950	end;
	4951
	4952	OnTimer5000:
	4953	mapannounce "jupe_ele","Nothing is what you fear and you have nothing to fear...",bc_map,"0xFF0000";
	4954	end;
	4955
	4956	OnTimer8000:
	4957	set .MyMobs,8;
	4958	monster "jupe_ele",48,44,"Guard",1684,1,"Guard-4#ufe::OnMyMobDead";
	4959	monster "jupe_ele",45,42,"Guard",1669,1,"Guard-4#ufe::OnMyMobDead";
	4960	monster "jupe_ele",38,42,"Guard",1684,1,"Guard-4#ufe::OnMyMobDead";
	4961	monster "jupe_ele",35,44,"Guard",1669,1,"Guard-4#ufe::OnMyMobDead";
	4962	monster "jupe_ele",35,51,"Guard",1675,1,"Guard-4#ufe::OnMyMobDead";
	4963	monster "jupe_ele",38,53,"Guard",1669,1,"Guard-4#ufe::OnMyMobDead";
	4964	monster "jupe_ele",45,53,"Guard",1683,1,"Guard-4#ufe::OnMyMobDead";
	4965	monster "jupe_ele",48,51,"Guard",1675,1,"Guard-4#ufe::OnMyMobDead";
	4966	set $@JupeElevatorInUse2,4;
	4967	end;
	4968
	4969	OnMyMobDead:
	4970	set .MyMobs,.MyMobs-1;
	4971	if (.MyMobs < 1) {
	4972	if(getvariableofnpc(.MyMobs,"Guard-1#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-2#ufe") < 1 && getvariableofnpc(.MyMobs,"Guard-3#ufe") < 1)
	4973	{
	4974	donpcevent "GuardEnd#ufe::OnEnable";
	4975	stopnpctimer;
	4976	}
	4977	}
	4978	end;
	4979	}
	4980
	4981	jupe_ele,19,6,1 script GuardEnd#ufe 844,{
	4982	OnInit:
	4983	disablenpc "GuardEnd#ufe";
	4984	end;
	4985
	4986	OnEnable:
	4987	enablenpc "GuardEnd#ufe";
	4988	donpcevent "TimeOut#ufe::OnDisable";
	4989	initnpctimer;
	4990	end;
	4991
	4992	OnDisable:
	4993	disablenpc "GuardEnd#ufe";
	4994	stopnpctimer;
	4995	end;
	4996
	4997	OnTimer2000:
	4998	mapannounce "jupe_ele","I am not going to tell you anything.",bc_map,"0x66FF00";
	4999	end;
	5000
	5001	OnTimer5000:
	5002	mapannounce "jupe_ele","My city, my people are now but a memory.",bc_map,"0x66FF00";
	5003	end;
	5004
	5005	OnTimer8000:
	5006	mapannounce "jupe_ele","Everything was a mistake. We were not supposed to be here.",bc_map,"0x66FF00";
	5007	end;
	5008
	5009	OnTimer11000:
	5010	mapannounce "jupe_ele","Is this a place where humans are forbidden?",bc_map,"0x66FF00";
	5011	end;
	5012
	5013	OnTimer12000:
	5014	mapannounce "jupe_ele","You want to know, don't you? Go ahead... Go deeper.",bc_map,"0x66FF00";
	5015	enablenpc "4F Enter#ufe";
	5016	end;
	5017
	5018	OnTimer22000:
	5019	mapannounce "jupe_ele","It's not real anyway. All of it's safe, it can't hurt you...",bc_map,"0x66FF00";
	5020	soundeffectall "earth_quake.wav",0;
	5021	disablenpc "4F Enter#ufe";
	5022	end;
	5023
	5024	OnTimer24000:
	5025	mapwarp "jupe_ele","jupe_core",150,286;
	5026	end;
	5027
	5028	OnTimer25000:
	5029	mapwarp "jupe_ele","jupe_core",151,286;
	5030	end;
	5031
	5032	OnTimer26000:
	5033	set $@JupeElevatorInUse2,0;
	5034	set $@JupeElevatorInUse,0;
	5035	disablenpc "Switch On#ufe";
	5036	enablenpc "Switch#ufe";
	5037	donpcevent "GuardEnd#ufe::OnDisable";
	5038	}
	5039
	5040	jupe_ele,41,33,0 script 4F Enter#ufe 45,4,4,{
	5041	OnInit:
	5042	disablenpc "4F Enter#ufe";
	5043	end;
	5044
	5045	OnTouch:
	5046	warp "jupe_core",rand(149,151),286;
	5047	end;
	5048	}
	5049
	5050	//============================================================
	5051	// Warps
	5052	//============================================================
	5053	jupe_gate,50,173,0 script gate#start -1,2,3,{
	5054	end;
	5055
	5056	OnTouch:
	5057	initnpctimer "gate#start",1;
	5058	mes "^3355FFIt's a Warp Portal";
	5059	mes "that will teleport you";
	5060	mes "to the previous floor.^000000";
	5061	next;
	5062	switch(select("Use it.:Ignore it.")) {
	5063	case 1:
	5064	specialeffect2 348; // EF_LIGHTSPHERE
	5065	close2;
	5066	stopnpctimer;
	5067	warp "juperos_02",130,142;
	5068	case 2:
	5069	mes "[" + strcharinfo(0) + "]";
	5070	mes "Not now!";
	5071	mes "I can't leave yet!";
	5072	close2;
	5073	stopnpctimer;
	5074	warp "jupe_gate",50,168;
	5075	}
	5076	end;
	5077
	5078	OnTimer10000:
	5079	warp "juperos_02",128,278;
	5080	enablenpc "gate#start#2";
	5081	disablenpc "gate#start";
	5082	end;
	5083	}
	5084
	5085	jupe_gate,50,171,0 script gate#start#2 -1,2,2,{
	5086	OnInit:
	5087	disablenpc "gate#start#2";
	5088	end;
	5089
	5090	OnTouch:
	5091	warp "juperos_02",130,142;
	5092	end;
	5093
	5094	OnTimer2000:
	5095	enablenpc "gate#start";
	5096	disablenpc "gate#start#2";
	5097	end;
	5098	}
	5099
	5100	juperos_02,33,59,0 script jupe_goto2F 45,2,2,{
	5101	OnTouch:
	5102	switch(rand(1,4)) {
	5103	case 1: warp "juperos_01",120,72; end;
	5104	case 2: warp "juperos_01",120,112; end;
	5105	case 3: warp "juperos_01",79,112; end;
	5106	case 4: warp "juperos_01",79,72; end;
	5107	}
	5108	end;
	5109	}

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/quests/quests_juperos.txt @ 1

Download in other formats: