Initial release of Phantasmagorika Quests (Walkthrough conversion). (#2215)

Initial release of Phantasmagorika Quests containing

* Phantasmagorika Quests ep 15.1 and 15.2
* Central Lab instance
* The Last Room instance
* News monsters around verus (credits divine-pride.net)

Thanks to @rofasindo @Valorro @jenkijo @ecdarreola @Jeybla !
Special thanks to Divine Pride !

db/re/instance_db.txt

@@ -24,3 +24,5 @@
 17,Faceworm's Nest,3600,300,1@face,112,374
 18,Ghost Palace,3600,300,1@spa,42,196
 21,Fenrir and Sarah,3600,300,1@glast,367,304
+26,Central Laboratory,3600,300,1@lab,120,30
+27,Last room,3600,300,1@uns,142,30

db/re/item_db.txt

@@ -4885,6 +4885,8 @@
 6957,Lamb_Fleece,Lamb Fleece,3,10,,0,,,,,,,,,,,,,{},{},{}
 6958,Lamb_Horns,Lamb Horns,3,10,,0,,,,,,,,,,,,,{},{},{}
 6960,Key_Air_Fortress,Key Air Fortress,3,10,,10,,,,,,,,,,,,,{},{},{}
+6961,Huge_Metal_Scrap,Huge Metal Scrap,3,10,0,1000,,,,,,,,,,,,,{},{},{}
+6962,Old_Fuel,Old Fuel,3,10,0,100,,,,,,,,,,,,,{},{},{}
 //
 7001,Mould_Powder,Mould Powder,3,466,,10,,,,,,,,,,,,,{},{},{}
 7002,Ogre_Tooth,Ogre Tooth,3,658,,10,,,,,,,,,,,,,{},{},{}
@@ -6405,7 +6407,7 @@
 12260,Cool_Summer_Outfit,Cool Summer Outfit,2,0,,100,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_SUMMER,600000,0; },{},{}
 12261,Secret_Medicine,Leap of Fantasy,2,0,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ getexp2(2000000,1000000); },{},{}
 12262,Inspector_Certificate_,Authoritative Badge,2,0,,10,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_SPEEDUP0,540000,25; },{},{}
-12263,Comp_Battle_Manual,Field Manual,2,2,,10,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_EXPBOOST,1800000,50; },{},{}
+12263,Comp_Battle_Manual,Field Manual,2,2,,10,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_EXPBOOST,1800000,200; },{},{}
 12264,Comp_Bubble_Gum,Bubble Gum,2,2,,10,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_ITEMBOOST,1800000,200; },{},{}
 12265,Comp_Insurance,Life Insurrance,2,2,,10,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_LIFEINSURANCE,1800000,0; },{},{}
 12266,Sesame_Pastry_,Sesame Pastry,2,2,,70,,,,,0xFFFFFFFF,63,2,,,,,,{ sc_start SC_HITFOOD,180000,30; },{},{}
@@ -9836,7 +9838,7 @@
 18984,Old_Camo_RabbitHood,Old Camouflage Rabbit Hood,4,10,,100,,10,,1,0x0000800,56,2,256,,170,1,1142,{ bonus bAllStats,1; .@r = getrefine(); bonus bMaxHPrate,.@r/2; bonus bMaxSPrate,.@r/2; bonus bLongAtkRate,.@r; bonus bFlee2,.@r/3; bonus2 bSkillAtk,"RA_CLUSTERBOMB",15*.@r/2; bonus2 bSkillAtk,"RA_WUGSTRIKE",10*.@r/2; },{},{}
 18985,Falconer_Flute,Falconer Flute,4,0,,100,,,,0,0x0000800,63,2,1,,75,0,1143,{ set .@bblvl,max(getskilllv("HT_BLITZBEAT"),1); set .@luk,min(readparam(bLuk),120); bonus3 bAutoSpell,"HT_BLITZBEAT",.@i,((.@bblvl / 3) * 10) + (.@luk * 10) + (((.@bblvl / 5) * .@bblvl) * 2); },{},{}
 18987,RWC13_Jormungandr_Hat,RWC13 Jormungandr Hat,4,20,,2500,,7,,1,0xFFFFFFFF,63,2,256,,1,0,1149,{ bonus bAllStats,2; bonus bVariableCastrate,-5; bonus bDelayrate,-5; bonus2 bSubRace,RC_DemiHuman,10; bonus2 bSubRace,RC_Player,10; .@r = getrefine(); if(.@r>6){ bonus2 bAddItemHealRate,11596,20; bonus bAspd,1; } if(.@r>9){ bonus bVariableCastrate,-5; bonus bDelayrate,-5; } bonus2 bAddItemHealRate,11596,150; },{ sc_end SC_SpeedUp0; },{}
-18997,Riot_Chip,Reckless Chip,4,10,,300,,,,1,0xFFFFFFFF,63,2,256,,100,1,1201,{ bonus bHit,50; bonus bFlee,50; bonus bMaxSPrate,-50; },{},{}
+18997,Riot_Chip,Runaway Chip,4,10,,300,,,,1,0xFFFFFFFF,63,2,256,,100,1,1201,{ bonus bHit,50; bonus bFlee,50; bonus bMaxSPrate,-50; },{},{}
 19019,Elemental_Crown,Elemental Crown,4,0,,500,,10,,1,0xFFFFFFFF,63,2,256,,,1,1219,{ .@r = getrefine(); bonus bDex,(3 + (.@r/2)+ (readparam(bDex) > 130 ? .@r : 0)); bonus bLongAtkRate,4; },{},{}
 19020,Survive_Circlet,Survive Circlet,4,0,,500,,10,,0,0xFFFFFFFF,63,2,256,,,1,1220,{ .@r = getrefine(); bonus bInt,(3 + (.@r/2)+ (BaseLevel > 130 ? .@r : 0)); bonus bMatkRate,4; },{},{}
 19021,Gigant_Helm,Gigant Helm,4,0,,500,,10,,0,0xFFFFFFFF,63,2,256,,,1,1221,{ bonus bStr,3+((BaseLevel > 130) ? getrefine() : 0); bonus2 bAddClass,Class_All,4; },{},{}
@@ -11003,12 +11005,12 @@
 22679,Chest_Of_Death,Death Bin,18,10,,0,,,,0,0xFFFFFFFF,63,2,,,170,,,{ /*TODO*/ },{},{}
 22685,Solo_Christmas_Gift,Single Union Christmas Gift,2,0,,0,,,,,0xFFFFFFFF,63,2,,,0,,,{ getgroupitem(IG_Solo_Christmas_Gift); },{},{}
 22686,Solo_Cookie,Single Cookie,0,0,,50,,,,,0xFFFFFFFF,63,2,,,0,,,{ percentheal 5,5; },{},{}
-22687,Pieces_Of_Sentiment,Fragments Vicious Mind,3,10,,1,,,,0,0xFFFFFFFF,63,2,,,,,,{ /*TODO*/ },{},{}
-22691,Piece_Of_Record1,Record Fragment,3,10,,0,,,,,,,,,,,,,{},{},{}
-22692,Piece_Of_Record2,Record Fragment,3,10,,0,,,,,,,,,,,,,{},{},{}
-22693,Piece_Of_Record3,Record Fragment,3,10,,0,,,,,,,,,,,,,{},{},{}
-22694,Piece_Of_Record4,Record Fragment,3,10,,0,,,,,,,,,,,,,{},{},{}
-22695,Piece_Of_Record5,Record Fragment,3,10,,0,,,,,,,,,,,,,{},{},{}
+22687,Fragments_Vicious_Mind,Fragments Vicious Mind,3,10,,1,,,,0,0xFFFFFFFF,63,2,,,,,,{ /*TODO*/ },{},{}
+22691,Record_Fragment1,Record Fragment,0,,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ warp "un_bk_q",98,143; if (callfunc("F_time_limit_recorder") == 1) { recorder_quest_type = 1; } },{},{}
+22692,Record_Fragment2,Record Fragment,0,,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ warp "un_bk_q",45,276; if (callfunc("F_time_limit_recorder") == 1) { recorder_quest_type = 2; } },{},{}
+22693,Record_Fragment3,Record Fragment,0,,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ warp "un_bk_q",217,346; if (callfunc("F_time_limit_recorder") == 1) { recorder_quest_type = 3; } },{},{}
+22694,Record_Fragment4,Record Fragment,0,,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ warp "un_bk_q",273,235; if (callfunc("F_time_limit_recorder") == 1) { recorder_quest_type = 4; } },{},{}
+22695,Record_Fragment5,Record Fragment,0,,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ warp "un_bk_q",275,290; if (callfunc("F_time_limit_recorder") == 1) { recorder_quest_type = 5; } },{},{}
 22699,Test_Reagent,Test Reagent,3,10,,0,,,,,,,,,,,,,{},{},{}
 22700,Jumping_Support_Box,Jumping Support Box,18,10,,0,,,,0,0xFFFFFFFF,63,2,,,,,,{ /*TODO: getitem 12529,1; getitem 12323,200; getitem 12324,50; and 5 boxes that containing quivers + oridecons*/ },{},{}
 22702,STR_Soul_Potion,STR Reduction Potion,11,10,,0,,,,,0xFFFFFFFF,63,2,,,,,,{ callfunc "F_CashReduceStat",bStr,-1,22702; },{},{}

db/re/item_trade.txt

@@ -829,6 +829,8 @@
 6752,467,100	// Charleston_Parts
 6753,507,100	// Token_Of_Destruction
 6754,507,100	// Collected_Medicinal_Herbs
+6756,507,100	// Cohesive_Energy
+6757,507,100	// The_Memory_Recorder
 6766,499,100	// Ice_World_Ticket
 6767,499,100	// Summer_Fes_Coin
 6768,499,100	// Red_Beans_Of_Ice

db/re/mob_db.txt

@@ -2307,13 +2307,13 @@
 //3150,MG_AMDARAIS_H
 //3151,MG_CORRUPTION_ROOT_H
 //3152,G_MG_KHALITZBURG_H
-//3153,EXCAVATOR_ROBOT
-//3154,RECON_ROBOT
-//3155,REPAIR_ROBOT
-//3156,EXPLORATION_ROVER
-//3157,RUIN_BELIEVER1
-//3158,RUIN_BELIEVER2
-//3159,ILLEGAL_PROMOTION
+3153,EXCAVATOR_ROBOT,Excavator Robot,Excavator Robot,163,166860,0,15026,16915,1,4093,6007,138,53,102,104,72,57,98,57,10,12,1,0,60,0x0000085,250,1020,500,768,0,0,0,0,0,0,0,11597,251,984,101,6962,101,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3154,RECON_ROBOT,Recon Robot,Recon Robot,165,256000,0,15796,17738,1,2668,3863,128,60,112,60,72,57,120,77,10,12,2,0,80,0x0000085,170,1072,672,384,0,0,0,0,0,0,0,998,1001,756,1001,11597,151,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3155,REPAIR_ROBOT,Repair Robot,Repair Robot,155,154760,0,11748,47654,1,1893,2714,99,55,98,39,30,35,95,45,10,12,0,3,24,0x0000085,300,1500,500,660,0,0,0,0,0,0,0,998,5000,756,1501,999,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3156,EXPLORATION_ROVER,Exploration Rover,Exploration Rover,168,293640,0,18172,126234,1,2278,3283,105,41,100,63,35,99,106,61,10,12,2,7,80,0x0000085,165,1552,1152,336,0,0,0,0,0,0,0,998,5000,756,1,999,1,6961,1,0,0,0,0,0,0,0,0,0,0,0,0
+3157,RUIN_BELIEVER1,Ruin Grace Believer,Ruin Grace Believer,100,61350,0,4666,3874,1,982,1379,91,50,88,61,51,62,136,60,10,12,1,7,40,0x0000085,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3158,RUIN_BELIEVER2,Ruin Grace Believer,Ruin Grace Believer,100,61350,0,4666,139500,1,982,1379,91,50,88,61,51,62,136,60,10,12,1,7,40,0x0000085,200,2125,2112,0,0,0,0,0,0,0,0,6753,10000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3159,ILLEGAL_PROMOTION,Illegal Promotion,Illegal Promotion,100,10,0,0,0,1,101,102,1,50,1,1,1,1,1,1,10,12,0,0,40,0x0370020,200,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
 //3160,BOILED_RICE_DUANWU
 //3161,BOMB
 //3162,ELEPHANT
@@ -2401,16 +2401,16 @@
 3244,V_B_GERTIE,Shadow Chaser Gertie,Shadow Chaser Gertie,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,20,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
 3245,V_B_ALPHOCCIO,Minstrel Alphoccio,Minstrel Alphoccio,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,20,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
 3246,V_B_TRENTINI,Wanderer Trentini,Wanderer Trentini,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,20,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
-//3247,CENERE_G
-//3248,REPAIR_ROBOT_T
-//3249,EXPLORATION_ROVER_T
-//3250,SCR_MT_ROBOTS
-//3251,GC109
-//3252,DR815
-//3253,SYS_MSG
-//3254,T_W_O
-//3255,GHOUL_H
-//3256,ZOMBIE_H
+3247,CENERE_G,Cenere G,Green Cenere,150,140088,1,7635,7698,1,1897,2007,91,81,70,48,40,37,100,45,10,12,0,0,24,0x0000085,300,3009,720,360,0,0,0,0,0,0,0,6561,5000,7322,500,7001,1500,7320,1000,12815,500,0,,0,,0,0,0,0,27014,1
+3248,REPAIR_ROBOT_T,Repair Robot T,Repair Robot Turbo,158,186320,1,13208,14489,1,2431,2657,118,59,101,42,55,35,110,45,10,12,0,0,40,0x000008B,300,1515,500,660,0,0,0,0,0,0,0,7512,500,7507,250,998,2000,999,500,11597,1500,0,,0,,0,0,0,0,27015,1
+3249,EXPLORATION_ROVER_T,Exploration Rover T,Explorer Robot Turbo,171,318117,1,19826,41023,1,2945,3786,121,67,118,80,45,121,138,65,10,12,2,0,80,0x0000085,165,1552,1152,336,0,0,0,0,0,0,0,7512,500,7507,250,998,2000,999,500,11597,1500,0,,0,,0,0,0,0,27016,1
+3250,SCR_MT_ROBOTS,Scr Mt Robots,Can Robot,155,30,1,61,58,1,95,97,100,99,35,42,20,12,68,3,10,12,0,0,20,0x0070085,300,0,500,400,0,0,0,0,0,0,0,7512,1000,7507,1500,7319,2000,0,,0,,0,,0,,0,0,0,0,27017,1
+3251,GC109,Machine Component,Machine Component,149,217650,1,6598,5931,1,2678,3935,121,71,60,132,45,35,155,15,10,12,0,0,47,0x0000085,120,1000,500,600,0,0,0,0,0,0,0,7512,1000,7507,1500,7319,2000,0,,0,,0,,0,,0,0,0,0,27018,1
+3252,DR815,Machine Component,Machine Component,153,245670,1,7255,7011,1,3315,4076,143,45,88,98,88,21,116,22,10,12,1,0,27,0x0000085,135,1500,600,500,0,0,0,0,0,0,0,7512,1000,7507,1500,7319,2000,0,,0,,0,,0,,0,0,0,0,27019,1
+3253,SYS_MSG,Sys Msg,System message,160,100,1,0,0,1,1,2,276,99,0,0,0,188,0,0,10,12,0,0,20,0xC170081,2000,3000,600,550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3254,T_W_O,T_W_O,T_W_O,165,48000000,1,0,0,1,3955,4151,158,134,90,141,7,87,267,70,10,12,2,6,67,0x6280085,150,1250,500,350,0,6832,5000,617,5000,617,5000,22699,3000,1531,500,7319,2000,0,,0,,0,,0,,0,0,0,0,27020,1
+3255,GHOUL_H,Ghoul H,Smelly Ghoul,155,178652,1,10233,10598,1,2235,2451,99,55,98,55,61,22,133,2,10,12,0,3,24,0x0000085,200,0,500,660,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
+3256,ZOMBIE_H,Zombie H,Smelly Zombie,148,134615,1,6859,6903,1,1995,2445,91,42,76,53,54,21,125,3,10,12,0,0,60,0x0000085,220,0,960,480,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
 //3257,MALE_PORING
 //3258,FEMALE_PORING
 //3259,FANTASTIC_B_UNICORN

db/re/quest_db.txt

@@ -690,6 +690,16 @@
 4286,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Ninja training-test"
 4287,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Ninja training-test"
 
+// Episode 15.1 Bard's Story
+4295,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Wandering Bard"
+4296,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Take a Break"
+4297,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bard's Story: Some Corporation"
+4298,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bard's Story: The President"
+4299,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bard's Story: a Scholar in Juno"
+4300,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bard's Story: a Mad Scientist"
+4301,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bard's Story: Hugel"
+4302,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bard's Story: Odin Temple"
+
 //4303,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
 //4304,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
 //4305,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
@@ -869,6 +879,55 @@
 5226,7200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Saving energy crystal[Stand by]"
 5227,7200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Saving energy crystal[Stand by]"
 
+// Episode 15.1 Phantasmagorika
+5304,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Police Chief Kesler"
+5305,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Police Officer Salgran"
+5306,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Police Officer Gerev"
+5307,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Police Officer Seiden"
+5308,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Police Officer Piffs"
+5309,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Police Chief's Request"
+5310,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Salgran's Problem"
+5311,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Gerev's Problem"
+5312,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Seiden's Problem"
+5313,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Piffs's Problem"
+5314,0,3159,10,0,0,0,0,0,0,0,0,0,0,0,0,0,"Salgran's Request"
+5315,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Gerev's Request"
+5316,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Seiden's Request"
+5317,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Piffs's Request"
+5318,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Come Back Tomorrow"
+
+// Episode 15.2 Memory Record
+5341,79200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Restriction on the Journey"
+5342,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Help Her"
+5343,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Making a Head Count"
+5344,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Making a Head Count"
+5345,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Making a Head Count"
+5346,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Making a Head Count"
+5347,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Finishing a Head Count"
+5348,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Finishing a Head Count"
+5349,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Finishing a Head Count"
+5350,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Finishing a Head Count"
+5351,79200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Restriction on the Journey"
+5352,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Air Purifier"
+5353,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered to C-0"
+5354,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered to F-1"
+5355,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered to F-2"
+5356,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered to I-0"
+5357,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered to Z-0"
+5358,79200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Restriction on the Journey"
+5359,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Grape Harvest"
+5360,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Grape Delivery"
+5361,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Grape Delivery"
+5362,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Grape Delivery"
+5363,79200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Restriction on the Journey"
+5364,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Subdue Hysterical Patients"
+5365,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Urgent News"
+5366,79200,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Restriction on the Journey"
+5367,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Daily Necessities Transport"
+5368,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered Supplies"
+5369,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delivered the Message"
+5370,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Memory Record"
+
 6000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Job Change to Taekwon"
 6001,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Job Change to Taekwon"
 6002,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Job Change to Taekwon"
@@ -1446,16 +1505,49 @@
 7563,72000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Standby for Kafragaten Challenge 1"
 7564,72000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Standby for Kafragaten Challenge 2"
 
-//7619,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7621,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7622,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7623,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7624,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7625,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7626,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7627,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7628,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
-//7629,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
+// Episode 15.1 Verus City
+7606,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Phantasmagorika Excavator Recruitment"
+7607,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Eden Group Leader"
+7608,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Artnard Excavation Team 1"
+7609,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Artnard Excavation Team 2"
+7610,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Registered Excavator"
+7611,0,3154,10,0,0,0,0,0,0,0,0,0,0,0,0,0,"Passage Cleaning"
+7612,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Passage Cleaning - Down"
+7613,0,3155,15,3156,15,0,0,0,0,0,0,0,0,0,0,0,"Eliminating Risks"
+7614,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Eliminating Risks - Down"
+7615,0,0,0,0,0,0,0,3154,6749,2000,3155,6749,2000,3156,6749,2000,"Core Collection"
+7616,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Core Collection - Down"
+7617,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Turning In Excavation Report"
+7618,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Reporting the Results - Down"
+7619,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Assisting the Excavation Team"
+7620,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Young Blood?"
+7621,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Bottling the Energy"
+7622,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Good News!"
+7623,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Artnard's Summon"
+7624,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"In Search of a Delicacy"
+7625,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Count On Me"
+7626,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Delicacy for Him"
+7627,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Last Exploration"
+7628,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"New Power Source"
+7629,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Tomorrow for Tomorrow's Energy"
+
+// Episode 15.2 Atnad Excavator 2
+7641,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Access Permitted"
+7642,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Explore Research facilities"
+7643,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Mysterious Piece"
+7644,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Record Player"
+7645,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Piece of Memory Record"
+7646,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Play Memory Record"
+7647,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Report Memory Record"
+7648,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Memory Records of the Laboratories"
+7649,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Report Memory Record Content"
+7650,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Collect Memory Records of Research facilities"
+7651,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"One Memory a Day"
+7652,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Collect Memory Records of Laboratories"
+7653,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"One Memory a Day 2"
+7654,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Play Research facilities Memory Records"
+7655,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Play Laboratories Memory Records"
+7656,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Invitation of Rekenber"
 
 // Lasagna Quests
 7711,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Beginning"
@@ -2342,9 +2434,39 @@
 11347,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Acolyte_soft bone(LV.18)"
 11348,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Acolyte_Solid bone(LV.23)"
 
+// Episode 15.1 To Phantasmagorika!
+11363,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"To Phantasmagorika!"
+11364,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"To Phantasmagorika!"
+11365,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"To Phantasmagorika!"
+11366,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"To Phantasmagorika!"
+11367,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11368,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11369,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11370,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11371,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11372,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11373,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11374,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11375,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Looking for the Traces"
+11376,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Let the Specialists Handle It"
+11377,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Act of Kindness"
+
 //11366,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,""
 11378,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Trick or treat" // Halloween Event 2013
 
+// Episode 15.2 The Last Room Instance
+11379,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Final Room"
+11380,0,3254,1,0,0,0,0,0,0,0,0,0,0,0,0,0,"Final Room"
+11381,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11382,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11383,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11384,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11385,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11386,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11387,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11388,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+11389,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vestige"
+
 // Lasagna Quests
 11435,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vigilante Corp"
 11436,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Vigilante Corp"
@@ -2699,6 +2821,10 @@
 12344,0,3170,3,0,0,0,0,0,0,0,0,0,0,0,0,0,"Rebellion Job Change Quest"
 12345,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Rebellion Job Change Quest"
 
+// Episode 15.2: Central Laboratory
+12346,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Strange Ancient Science"
+12347,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Trace of Laboratory Access"
+
 12363,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"?????? ?? ??"
 
 13000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"RWC2011Card Gathering"
@@ -2878,6 +3004,19 @@
 13187,0,3125,50,0,0,0,0,0,0,0,0,0,0,0,0,0,"Deal with the Staff"
 13188,72000,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Deal with the Staff - Hold"
 
+// Episode 15.2 Krotzel's Request
+13195,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan"
+13196,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan"
+13197,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan"
+13198,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan : Krotzel's Request"
+13199,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Krotzel's Request - Complete"
+13200,0,3247,30,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan : Rookie's Request"
+13201,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Rookie's Request - Complete"
+13202,0,3248,30,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan : Photo Journalist's Request"
+13203,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Photo Journalist's Request - Complete"
+13204,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Monthly Brigan : Grylls' Request"
+13205,82800,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Grylls' Request - Complete"
+
 14118,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Wuhari's concern"
 14119,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Test of patience"
 14120,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"Test of patience 2"

npc/re/instances/CentralLaboratory.txt

@@ -0,0 +1,1384 @@
+//===== rAthena Script =======================================
+//= Central Laboratory
+//===== Description: =========================================
+//= [Walkthrough Conversion]
+//= Central Laboratory Instance
+//===== Changelogs: ==========================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+verus01,153,155,5	script	Temporary Dimension-mov	PORTAL,{
+	.@party_id = getcharid(1);
+	if (.@party_id == 0) {
+		mes "[Temporary Dimension-mover]";
+		mes "Do you not have a companion to join you? Organize your party even if traveling alone.";
+		close;
+	}
+	switch( checkquest(12347,PLAYTIME) ) {
+	case -1:
+		switch( instance_enter("Central Laboratory") ) {
+		case IE_NOMEMBER:
+		case IE_NOINSTANCE:
+		case IE_OTHER:
+			mes "[Temporary Dimension-mover]";
+			mes "The passage for dimensional moving has not been vitalized.";
+			close;
+		case IE_OK:
+			mapannounce "verus01", "" + strcharinfo(0) + " of the party, " + getpartyname(.@party_id) + ", is entering Central Laboratory.",bc_map,"0x00FF99";
+			setquest 12347;// Trace of Laboratory Access
+			end;
+		}
+	case 0:
+	case 1:
+		mes "[Temporary Dimension-mover]";
+		mes "There are remaining traces of the last event. Access denied.";
+		close;
+	case 2:
+		mes "^0000ffUse of Dimension-mover seems possible.^000000";
+		erasequest 12347;// Trace of Laboratory Access
+		close;
+	}
+}
+
+verus01,149,155,5	script	Civilization Explorer#p	4_LGTSCIENCE,{
+	mes "^ff0000Taming monsters will impede progress in this dungeon. Please take note of this.^000000";
+	next;
+	mes "[Civilization Explorer]";
+	if (isbegin_quest(12346) == 2) {
+		mes "What do you want to do this time?";
+		next;
+	}
+	else {
+		mes "There are a lot of interesting things about the ancient civilizations in this area.";
+		next;
+		mes "[Civilization Explorer]";
+		mes "Observing the soil strata it is estimated to be 500 to 600 years old!";
+		mes "But many of the excavated objects here already far surpass our current technology.";
+		next;
+		mes "[Civilization Explorer]";
+		mes "A lot of undefined terms are found in the recovered records as well.";
+		next;
+		select("What kind of unknown terms?");
+		mes "[Civilization Explorer]";
+		mes "^0000ffMother Computer^000000 or, ^0000ff LSI Chip^000000 Or, and what else. ^0000ffChicken^000000?";
+		next;
+		mes "[Civilization Explorer]";
+		mes "Mm that's right. There definitely was the word Chicken. I don't know what kind of combination of technology that may be...";
+		next;
+		mes "[Civilization Explorer]";
+		mes "It is referrenced in the records of people who seem to 'root' amongst the many traces of technology.";
+		next;
+		if (select( "It is not a topic I would be interested in.", "Interesting. Have there been any results?" ) == 1) {
+			mes "[Civilization Explorer]";
+			mes "Unfortunate.";
+			close;
+		}
+		mes "[Civilization Explorer]";
+		mes "My aim is to research the use of technology related to the relevant times. Even though what I have found out so far is insignificant.";
+		next;
+		mes "[Civilization Explorer]";
+		mes "If I had it my way I would use the dimension mover to see for myself but there's too much work. Besides I am not an adventurer...";
+		next;
+		mes "[Civilization Explorer]";
+		mes "By any chance, would you interested in traveling to the past?";
+		next;
+		mes "[Civilization Explorer]";
+		mes "Even better if you show me around if you find an interesting object.";
+		next;
+		if (select( "Not interested.", "Ok." ) == 1) {
+			mes "[Civilization Explorer]";
+			mes "Unfortunate.";
+			close;
+		}
+		mes "[Civilization Explorer]";
+		mes "You are an adventurer. Tell me what you decide to do.";
+		if (isbegin_quest(12346) == 0)
+			setquest 12346;// Strange Ancient Science
+		next;
+		completequest 12346;
+	}
+	.@party_id = getcharid(1);
+	if (.@party_id == 0) {
+		mes "[Civilization Explorer]";
+		mes "Please talk to me after composing a party of 1 or more, or after joining a party.";
+		close;
+	}
+	if (getpartyleader(.@party_id,2) != getcharid(0)) {
+		mes "[Civilization Explorer]";
+		mes "Ah. You aren't the party leader. Take me to your leader! Or perhaps take your leader to me.";
+		close;
+	}
+	switch( checkquest(12347,PLAYTIME) ) {
+	case -1:
+		if (select( "Produce a crack of time", "Cancel" ) == 1) {
+			mes "[Civilization Explorer]";
+			mes "When the crack of time opens take a breath and speak again.";
+			instance_create("Central Laboratory");
+		}
+		close;
+	case 0:
+	case 1:
+		mes "[Civilization Explorer]";
+		mes "Ah, oh no.";
+		mes "There are some remaining aftereffects of dimensional travel. We cannot travel again in this condition.";
+		close;
+	case 2:
+		mes "^0000ffAll the traces of entering the central laboratory have been erased. Speaking with the Civilization Explorer seems possible.^000000";
+		erasequest 12347;// Trace of Laboratory Access
+		close;
+	}
+}
+
+// Entrance
+1@lab,104,34,4	script	Probationary researcher	4_LGTSCIENCE,{
+	if ('switch_enabled == 1) {
+		mes "[Probationary researcher]";
+		mes "The entrance door is already open.";
+		close;
+	}
+	if (getpartyleader(getcharid(1),2) != getcharid(0)) {
+		mes "[Probationary researcher]";
+		mes "Please hold. I am speaking with the guide about whether or not you have been authorized.";
+		close;
+	}
+	mes "[Probationary researcher]";
+	mes "Are you participating as assistants to the experiments of research project 32001?";
+	next;
+	if (select( "Yes.", "No." ) == 2) {
+		mes "[Probationary researcher]";
+		mes "It seems you're in the wrong laboratory. Please exit and ask for help.";
+		close;
+	}
+	mes "[Probationary researcher]";
+	mes "We need about 5 seconds of time. Confirming access code.";
+	close2;
+	sleep 3000;
+	npctalk "Probationary researcher : The access code matches. I will open the door.";
+	sleep 6000;
+	npctalk "Probationary researcher : You may now enter. Please note that you cannot open the door from the other side.";
+	if ('switch_enabled == 0) {
+		'switch_enabled = 1;
+		enablenpc instance_npcname("#central_warp_1");
+		enablenpc instance_npcname("#central_warp_2");
+		enablenpc instance_npcname("#central_warp_3");
+		enablenpc instance_npcname("Main Switch#");
+		enablenpc instance_npcname("Senior researcher#pa082");
+		enablenpc instance_npcname("effect_switch");
+		for ( .@i = 1; .@i <= 8; ++.@i )
+			enablenpc instance_npcname( "Switch" + .@i + "#" );
+		'code = 5 * gettime(DT_DAYOFMONTH);
+	}
+	end;
+
+OnInstanceInit:
+	'map_name$ = instance_mapname("1@lab");
+	'code_found = 'code = 0;
+	for ( .@i = 1; .@i <= 8; .@i++ )
+		'switch_position[.@i] = 0;
+
+	// Entrance
+	disablenpc instance_npcname("#central_warp_1");
+	disablenpc instance_npcname("#central_warp_2");
+	disablenpc instance_npcname("#central_warp_3");
+
+	// Switchs
+	disablenpc instance_npcname("Main Switch#");
+	disablenpc instance_npcname("Senior researcher#pa082");
+	disablenpc instance_npcname("effect_switch");
+	for ( .@i = 1; .@i <= 8; ++.@i )
+		disablenpc instance_npcname( "Switch" + .@i + "#" );
+
+	// Experiments
+	disablenpc instance_npcname("#central_warp_4");
+	disablenpc instance_npcname("#central_warp_5");
+	disablenpc instance_npcname("DR Silvia#pa0829");
+	disablenpc instance_npcname("DR Federico#pa0829");
+	disablenpc instance_npcname("DR Artemia#pa0829");
+	disablenpc instance_npcname("DR Vincent#pa0829");
+	disablenpc instance_npcname("#wp01");
+	disablenpc instance_npcname("#wp02");
+	for ( .@i = 1; .@i <= 14; ++.@i )
+		hideonnpc instance_npcname("#gen_" + (.@i < 10 ? "0" : "") + .@i);
+	disablenpc instance_npcname("#central_warp_6");
+	end;
+}
+
+// Switchs
+1@lab,37,37,3	script	Switch1#	CLEAR_NPC,{
+	.@num = charat( strnpcinfo(1),6 );
+	setarray .@position$[0], "OFF", "ON";
+	mes "[Switch " + .@num + "]";
+	mes "The switch is currently in the " + .@position$[ 'switch_position[.@num] ] + " position. What will you do?";
+	next;
+	'switch_position[.@num] = !( select( "ON","OFF" ) - 1 );
+	close;
+}
+1@lab,39,37,3	duplicate(Switch1#)	Switch2#	CLEAR_NPC
+1@lab,41,37,3	duplicate(Switch1#)	Switch3#	CLEAR_NPC
+1@lab,43,37,3	duplicate(Switch1#)	Switch4#	CLEAR_NPC
+1@lab,46,37,3	duplicate(Switch1#)	Switch5#	CLEAR_NPC
+1@lab,48,37,3	duplicate(Switch1#)	Switch6#	CLEAR_NPC
+1@lab,50,37,3	duplicate(Switch1#)	Switch7#	CLEAR_NPC
+1@lab,52,37,3	duplicate(Switch1#)	Switch8#	CLEAR_NPC
+
+1@lab,34,37,3	script	Main Switch#	CLEAR_NPC,{
+	.@string$ = 'switch_position[1] + "" + 'switch_position[2] + "" + 'switch_position[3] + "" + 'switch_position[4] + "" +
+		'switch_position[5] + "" + 'switch_position[6] + "" + 'switch_position[7] + "" + 'switch_position[8];
+	.@current_code = strtol( .@string$,2 );
+	npctalk "Today's access code " + 'code + ", currently entered code " + .@current_code + ".";
+	sleep 6000;
+	if ('code_found > 0)
+		npctalk "The door is already open.";
+	else if (.@current_code != 'code)
+		npctalk "The code is incorrect. Please try again.";
+	else {
+		'code_found = 1;
+		npctalk "The code is correct. Opening door.";
+		enablenpc instance_npcname("#central_warp_4");
+		enablenpc instance_npcname("#central_warp_5");
+		enablenpc instance_npcname("DR Silvia#pa0829");
+		enablenpc instance_npcname("DR Federico#pa0829");
+		enablenpc instance_npcname("DR Artemia#pa0829");
+		enablenpc instance_npcname("DR Vincent#pa0829");
+		enablenpc instance_npcname("#wp01");
+		enablenpc instance_npcname("#wp02");
+		donpcevent instance_npcname("effect_switch") + "::OnStop";
+	}
+	end;
+}
+
+1@lab,45,32,3	script	Senior researcher#pa082	4_LGTSCIENCE,{
+	if ('code_found > 0) {
+		mes "[Senior Researcher]";
+		mes "The door is open so you may now enter. Please note that you cannot open the door from the other side.";
+		close;
+	}
+	mes "[Senior Researcher]";
+	mes "It seems you are here to participate in the particle acceleration experiment.";
+	next;
+	mes "[Senior Researcher]";
+	mes "Today's access code is ^0000ff" + 'code + "^000000.";
+	mes "The code needs to be entered as a binary number. Use the switches behind me to enter it.";
+	next;
+	mes "[Senior Researcher]";
+	mes "After entering the code press the main button near the entrance.";
+	for ( .@i = 1; .@i <= 8; ++.@i )
+		specialeffect EF_STEAL, AREA, instance_npcname("Switch" + .@i + "#");
+	close2;
+	donpcevent instance_npcname("effect_switch") + "::OnStart";
+	end;
+}
+
+1@lab,1,1,0	script	effect_switch	-1,{
+OnStart:
+OnTimer2000:
+	specialeffect 203,AREA, instance_npcname("Main Switch#");
+	for ( .@i = 1; .@i <= 8; ++.@i )
+		specialeffect (203+.@i),AREA, instance_npcname("Switch" + .@i + "#");
+	initnpctimer;
+	end;
+OnStop:
+	stopnpctimer;
+	end;
+}
+
+1@lab,81,84,7	script	DR Silvia#pa0829	4_F_SCIENCE,{
+	mes "[DR Silvia]";
+	mes "After the experiment I want to go home and enjoy an ice cold beer and some fried chicken.";
+	next;
+	mes "[DR Silvia]";
+	mes "I haven't been home for almost 2 years.";
+	next;
+	mes "^0000ffSilvia is looking at the particle accelerator device with a very exhausted look.^000000";
+	close;
+}
+
+1@lab,80,87,7	script	DR Federico#pa0829	4_LGTSCIENCE,{
+	mes "[DR Federico]";
+	mes "This device is more amazing the more I look at. There has never been a particle accelerator made in this scale.";
+	next;
+	mes "[DR Federico]";
+	mes "With this size I wonder if it's possible to create a small scale black hole...";
+	next;
+	mes "[DR Federico]";
+	mes "Ah, I was just talking. Such an event is closer to a disaster than an experiment haha.";
+	close;
+}
+
+1@lab,80,90,6	script	DR Artemia#pa0829	4_F_SCIENCE,{
+	mes "[DR Artemia]";
+	mes "Look, reality doesn't like it when you grab a piece of string and give it a tug.";
+	next;
+	mes "[DR Artemia]";
+	mes "A dimensional distortion can happen with such a powerful particle acceleration.";
+	next;
+	mes "[DR Artemia]";
+	mes "I have a bad feeling about this because... Nature finds a way.";
+	close;
+}
+
+1@lab,81,93,6	script	DR Vincent#pa0829	4_LGTSCIENCE,{
+	mes "[DR Vincent]";
+	mes "The machine is perfect. Nothing will go wrong!";
+	next;
+	mes "[DR Vincent]";
+	mes "Artemia worries too much. Anyway I'm going on a trip after the experiment.";
+	close;
+}
+
+1@lab,80,89,0	script	#wp01	HIDDEN_WARP_NPC,9,9,{
+	end;
+OnTouch:
+	donpcevent instance_npcname("#wp02") + "::OnStart";
+	disablenpc instance_npcname("#wp01");
+	end;
+}
+
+1@lab,80,89,0	script	#wp02	HIDDEN_WARP_NPC,{
+	end;
+
+function effect_gen {
+	.@effect = getarg(0);
+	.@count = getargcount();
+	for ( .@i = 1; .@i < .@count; .@i++ )
+		specialeffect .@effect, AREA, getd( "'gen_" + ( getarg(.@i) < 10 ? "0" : "" ) + getarg(.@i) + "$" );
+	return;
+}
+
+function effect_1_10_gen { effect_gen( getarg(0), 1,2,3,4,5,6,7,8,10 ); }
+
+OnStart:
+	'vincent$ = instance_npcname("DR Vincent#pa0829");
+	'federico$ = instance_npcname("DR Federico#pa0829");
+	'silvia$ = instance_npcname("DR Silvia#pa0829");
+	'artemia$ = instance_npcname("DR Artemia#pa0829");
+	'gen_01$ = instance_npcname("#gen_01");
+	'gen_02$ = instance_npcname("#gen_02");
+	'gen_03$ = instance_npcname("#gen_03");
+	'gen_04$ = instance_npcname("#gen_04");
+	'gen_05$ = instance_npcname("#gen_05");
+	'gen_06$ = instance_npcname("#gen_06");
+	'gen_07$ = instance_npcname("#gen_07");
+	'gen_08$ = instance_npcname("#gen_08");
+	'gen_09$ = instance_npcname("#gen_09");
+	'gen_10$ = instance_npcname("#gen_10");
+	'gen_11$ = instance_npcname("#gen_11");
+	'gen_12$ = instance_npcname("#gen_12");
+	'gen_13$ = instance_npcname("#gen_13");
+	'gen_14$ = instance_npcname("#gen_14");
+
+	npctalk "Federico : Let us get started. Hm... Are you ready Dr. Fresa?", 'federico$;
+	sleep 5000;
+	npctalk "Artemia : Probably making final confirmation checks. An experiment of this scope needs such caution.", 'artemia$;
+	sleep 6000;
+	npctalk "Silvia : Care is needed for operating a finished product for the first experiment.", 'silvia$;
+	sleep 4000;
+	npctalk "Vincent : Ah, I hope we can finish quickly so I can go eat chicken.", 'vincent$;
+	sleep 3000;
+	npctalk "Silvia : Ah! I like that too! Call me when you go.", 'silvia$;
+	sleep 6000;
+	mapannounce 'map_name$, "?????: Ah, ah, one two one two, mic test.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 2000;
+	npctalk "Federico : She's here.", 'federico$;
+	sleep 3000;
+	mapannounce 'map_name$, "?????: Chief director Lona Fresa of project particle accelerator.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	mapannounce 'map_name$, "Lona Fresa : Current time " + gettime(DT_MONTH) + " Month " + gettime(DT_DAYOFMONTH) + " Day 25 minutes after 10.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	mapannounce 'map_name$, "Lona Fresa : Testing the effects of particle acceleration on its surroundings in an open space.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	npctalk "Artemia : Aah... I really don't like this experiment.", 'artemia$;
+	sleep 3000;
+	mapannounce 'map_name$, "Lona Fresa : Starting the experiment. Chief researcher Dr. Federico, Artemia, Silvia, Vincent and assistant researchers.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	npctalk "Artemia : Let us start~", 'artemia$;
+	specialeffect EF_MAGICALATTHIT, AREA, 'gen_01$;
+	sleep 1800;
+	effect_gen( EF_MAGICALATTHIT, 1,3 );
+	sleep 700;
+	npctalk "Vincent : Starting rotation of generator.", 'vincent$;
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8 );
+	sleep 1500;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4 );
+	npctalk "Federico : Generator rotation fixed at 10000 RPM.", 'federico$;
+	sleep 1200;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6 );
+	sleep 1000;
+	npctalk "Silvia : Voltage is still within the tolerance band.", 'silvia$;
+	sleep 400;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2 );
+	sleep 1200;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7 );
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9 );
+	mapannounce 'map_name$, "Lona Fresa : This experiment is for the creation of new material that hasn't existed before.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,2,3,4,5,6,7,8,9 );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Lona Fresa : Recorders make sure to make detailed records of the catalyst bed's reaction when it is installed to the accelerator.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 500;
+	npctalk "Artemia : Contacting catalyst bed number 1.", 'artemia$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1100;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 850;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 850;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 700;
+	npctalk "Silvia : Generator voltage unstable. Still within tolerance band.", 'silvia$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	specialeffect EF_BLASTMINEBOMB, AREA, 'gen_01$;
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 430;
+	npctalk "Silvia : Detecting heat close to the tolerance band between the catalyst bed and the accelerator!", 'silvia$;
+	effect_gen( EF_BLASTMINEBOMB, 1,3 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8 );
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4 );
+	sleep 600;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	npctalk "Vincent : Accelerator is heating.", 'vincent$;
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6 );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7 );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7,9 );
+	npctalk "Vincent: 320c.", 'vincent$;
+	sleep 300;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 600;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7,9,5 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 930;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 780;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	npctalk "Vincent : 670c It's heating up too fast!", 'vincent$;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 450;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 330;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	npctalk "Vincent : Broke through 1000c!!!! Dr. Fresa! We have to momentarily stop the device!", 'vincent$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 530;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 650;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Lona Fresa : It is fine.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 733;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	npctalk "Silvia : It is not a simple problem. The temperature has far exceeded the predicted numbers!", 'silvia$;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 330;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Lona Fresa : This problem was predicted. Maintain current state.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 500;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 600;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 600;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	npctalk "Artemia :  But at least.. I will have chicken later.", 'artemia$;
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 850;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: Receiving changed circumstance through main server. Detecting dimensional distortion between particle accelerator and catalyst.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 710;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 330;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	npctalk "Artemia : Dr. Fresa! It's a dangerous situation of Mother Computer. Shut down the main power!", 'artemia$;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 360;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 530;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 930;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: Alert. New unidentified creature approaching from demi-plane.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 810;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	npctalk "Vincent : What is going on. Somebody turn off that computer!", 'vincent$;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 380;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 530;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: A new organism will be soon transmitted from the demi-plane.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 430;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 710;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 730;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 880;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 5 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 4 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 3 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 2 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 1 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 600;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: Unidentifiable creature discovered. Temporarily shutting down main power.", bc_map,0xFFFF00,FW_NORMAL,13;
+	callsub S_Spawn,1;
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 750;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	npctalk "Artemia : What... what is that?!", 'artemia$;	// text can stack if OnMyMobDead already called
+	sleep 3000;
+	npctalk "Silvia : It isn't reacting to us. Maybe it can't see us?", 'silvia$;
+	sleep 5000;
+	npctalk "Vincent : But it is hostile to the project assistants! What is that creature!?", 'vincent$;
+	sleep 5000;
+	npctalk "Vincent : I can't move my body! I think space is frozen!", 'vincent$;
+	end;
+
+OnMyMobDead1:
+	mapannounce 'map_name$, "MA-4885: Unidentified creature eliminated. Restarting device.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 2000;
+	npctalk "Artemia: MA-4885!! On who's order are you restarting! Stop!!", 'artemia$;
+	sleep 3000;
+	mapannounce 'map_name$, "MA-4885: Unrecognized command.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 6000;
+	npctalk "Artemia: Dr. Fresa!! We have to stop! This is too dangerous!", 'artemia$;
+	sleep 3000;
+	mapannounce 'map_name$, "Lona Fresa : ......", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 3000;
+	npctalk "Vincent: Fresa! We don't have time! Turn off the computer!!", 'vincent$;
+	sleep 3000;
+	mapannounce 'map_name$, "MA-4885: Restarting particle acceleration procedure.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 3000;
+	npctalk "Silvia : Fresa! Make a decision!", 'silvia$;
+	specialeffect EF_MAGICALATTHIT, AREA, 'gen_01$;
+	sleep 1800;
+	effect_gen( EF_MAGICALATTHIT, 1,3 );
+	mapannounce 'map_name$, "Lona Fresa : ......", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 1700;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8 );
+	sleep 1500;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4 );
+	sleep 1400;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6 );
+	sleep 1300;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2 );
+	mapannounce 'map_name$, "Lona Fresa : Current time 20 minutes past 11. Momentarily postpone experiment.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 1200;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7 );
+	sleep 1100;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9 );
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9,5 );
+	sleep 930;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: Access denied. Cannot understand command.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 810;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_BLASTMINEBOMB, AREA, 'gen_01$;
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Lona Fresa : Mother Comp MA-4885. I am your Chief director Dr. Fresa. Cease current progress.", bc_map,0xFF77,FW_NORMAL,12;
+	effect_gen( EF_BLASTMINEBOMB, 1,3 );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8 );
+	sleep 750;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 700;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 950;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: Access denied. Cannot understand command.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 380;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6 );
+	sleep 410;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2 );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 450;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 950;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7,9 );
+	npctalk "Federico : Damnit! Something else is coming!!", 'federico$;
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7,9,5 );
+	sleep 600;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: Alert. New unidentified creature approaching from demi-plane.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 500;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 730;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 430;
+	npctalk "Vincent : Oh... damnit. This is why you shouldn't install the newest CPU.", 'vincent$;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 930;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 400;
+	npctalk "Federico : Ah... my body...can't move. Damn", 'federico$;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 600;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: A new organism will be soon transmitted from the demi-plane.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 530;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 700;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 5 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 4 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 3 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 2 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: 1 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 600;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	mapannounce 'map_name$, "MA-4885: Unidentifiable creature discovered. Temporarily shutting down main power.", bc_map,0xFFFF00,FW_NORMAL,13;
+	callsub S_Spawn,2;
+	sleep 500;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 600;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 350;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 600;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 350;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	npctalk "Silvia: Same as the last time. It seems to have no interest in us.", 'silvia$;
+	sleep 6000;
+	npctalk "Vincent: Let's completely shut down the mother computer while the main power is temporarily off!", 'vincent$;
+	sleep 4000;
+	mapannounce 'map_name$, "MA-4885: Answering question. This space is currently stuck in a distorted phase.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 5000;
+	mapannounce 'map_name$, "MA-4885: Direct interaction between the demi-plane creature and this world's organisms will be possible after the phase has been balanced.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 5000;
+	mapannounce 'map_name$, "MA-4885: Conducting calculations to restore balance to distorted phase. Please wait a moment.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 5000;
+	npctalk "Artemia: What is that crazy clump of metal saying? It is saying we aren't in the same phase as those monster like things?", 'artemia$;
+	sleep 5000;
+	npctalk "Federico: Aah, I guess we should hope that Mother computer doesn't make the right calculations.", 'federico$;
+	end;
+
+OnMyMobDead2:
+	mapannounce 'map_name$, "MA-4885: Unidentified creature eliminated. Phase adjustment failed. Restarting relevant procedure.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 4000;
+	mapannounce 'map_name$, "Lona Fresa : Mother Computer MA-4885. Looks like you are trying to synchronize the other dimension and this world.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 7000;
+	mapannounce 'map_name$, "MA-4885: That is correct.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 5000;
+	npctalk "Artemia: Dr. Fresa!! This ridiculous event is completely unrelated to our original experiment!", 'artemia$;
+	sleep 7000;
+	mapannounce 'map_name$, "Lona Fresa : I have fully realized that.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 6000;
+	npctalk "Silvia: Can we not shut down main power completely?", 'silvia$;
+	sleep 6000;
+	mapannounce 'map_name$, "MA-4885: Restarting particle acceleration procedure.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 5000;
+	mapannounce 'map_name$, "Lona Fresa : " + gettime(DT_MONTH) + " Month " + gettime(DT_DAYOFMONTH) + " Day. Current time 38 minutes past 11 temporarily terminating particle accelerator project.", bc_map,0xFF77,FW_NORMAL,12;
+	specialeffect EF_MAGICALATTHIT, AREA, 'gen_01$;
+	sleep 1834;
+	effect_gen( EF_MAGICALATTHIT, 1,3 );
+	sleep 1734;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8 );
+	sleep 1550;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4 );
+	mapannounce 'map_name$, "Lona Fresa : Ending record with reasons of Mother Computer malfunction and overheating of accelerator.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 1400;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6 );
+	sleep 1300;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2 );
+	sleep 1200;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7 );
+	sleep 700;
+	npctalk "Silvia : Alright! Now Dr. Fresa just has to shut down the power.", 'silvia$;
+	sleep 400;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9 );
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9,5 );
+	sleep 950;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Lona Fresa : Cutting off power to Mother Computer MA-4885.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	specialeffect EF_MAGICALATTHIT, AREA, 'gen_01$;
+	sleep 300;
+	effect_gen( EF_MAGICALATTHIT, 2,3,4,5,6,7,8,9,10 );
+	sleep 700;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: Suspending operation of all equipment as per Administrator request.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: .....command... ----!!!  Zizip... ---!! -- following command ----- !! Zizip.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 750;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 750;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 750;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	npctalk "Artemia : Whew... is it over?", 'artemia$;
+	sleep 6000;
+	mapannounce 'map_name$, "Lona Fresa : Completed shut down of Mother computer MA-4885. Confirm equipment suspension", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	npctalk "Silvia: Looks like it's over.", 'silvia$;
+	sleep 4000;
+	npctalk "Federico: Plant initialization is the best.", 'federico$;
+	sleep 4000;
+	mapannounce 'map_name$, "Lona Fresa : Recording all experiment progress and terminating at current point.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	mapannounce 'map_name$, "Lona Fresa : The final experiment failure is unfortunate. But I will promise a more perfect experiment next time.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	mapannounce 'map_name$, "Lona Fresa : Good work everybody.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 5000;
+	npctalk "Artemia: It seems to be over.", 'artemia$;
+	sleep 5000;
+	npctalk "Federico: I thought it was Fresa's dogmatic experiment. But it was a problem with the mother comp.", 'federico$;
+	sleep 5000;
+	npctalk "Silvia: Let's just calm down. And get out of this dreadful laboratory.", 'silvia$;
+	sleep 5000;
+	npctalk "Vincent : By the way... I still can't move so what is going on?", 'vincent$;
+	sleep 5000;
+	specialeffect EF_MAGICALATTHIT, AREA, 'gen_01$;
+	specialeffect EF_LORD, AREA, 'gen_11$;
+	mapannounce 'map_name$, "MA-4885: CODE NAME - DESCENT", bc_map,0xFF0000,FW_NORMAL,16;
+	sleep 2000;
+	effect_gen( EF_MAGICALATTHIT, 1,3 );
+	specialeffect EF_LORD, AREA, 'gen_12$;
+	sleep 1700;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8 );
+	specialeffect EF_LORD, AREA, 'gen_13$;
+	sleep 1500;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4 );
+	sleep 400;
+	specialeffect EF_LORD, AREA, 'gen_14$;
+	sleep 1000;
+	npctalk "Federico : What? Wasn't this the initialization stage?", 'federico$;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6 );
+	sleep 630;
+	specialeffect EF_LORD, AREA, 'gen_11$;
+	sleep 800;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2 );
+	mapannounce 'map_name$, "MA-4885 : Starting final phase transformation.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1200;
+	specialeffect EF_LORD, AREA, 'gen_12$;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7 );
+	sleep 1200;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9 );
+	sleep 430;
+	specialeffect EF_LORD, AREA, 'gen_13$;
+	sleep 480;
+	npctalk "Silvia : It's all over.", 'silvia$;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9,5 );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_LORD, AREA, 'gen_14$;
+	sleep 700;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 930;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_LORD, AREA, 'gen_11$;
+	sleep 780;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: A new organism will be soon transmitted from the demi-plane.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 400;
+	specialeffect EF_LORD, AREA, 'gen_12$;
+	sleep 600;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_LORD, AREA, 'gen_13$;
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1130;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_LORD, AREA, 'gen_14$;
+	sleep 700;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 5 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 4 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	specialeffect EF_LORD, AREA, 'gen_11$;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 3 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 2 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	specialeffect EF_LORD, AREA, 'gen_12$;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: 1 seconds remaining", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: Temporarily shutting down main power for syntonization with transformed phase.", bc_map,0xFFFF00,FW_NORMAL,13;
+	callsub S_Spawn,3;
+	mapannounce 'map_name$, "MA-4885: Final phase transformation process.", bc_map,0xFFFF00,FW_NORMAL,13;
+	specialeffect EF_LORD, AREA, 'gen_13$;
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_LORD, AREA, 'gen_14$;
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	mapannounce 'map_name$, "MA-4885: This world will be summoned to the demi-plane after the phase interference phenomenon with creature fades.", bc_map,"0xFFFF00";
+	end;
+
+OnMyMobDead3:
+	mapannounce 'map_name$, "MA-4885: Phase synchronization completed before creature is eliminated. Starting dimensional travel.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 2500;
+	specialeffect EF_MAGICALATTHIT, AREA, 'gen_01$;
+	sleep 2000;
+	effect_gen( EF_MAGICALATTHIT, 1,3 );
+	sleep 1800;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8 );
+	sleep 1500;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4 );
+	sleep 1400;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6 );
+	sleep 1300;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2 );
+	sleep 1200;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7 );
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9 );
+	mapannounce 'map_name$, "MA-4885: Conducting calculations to restore balance to distorted phase. Please wait a moment.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 1000;
+	effect_gen( EF_MAGICALATTHIT, 1,3,8,4,6,2,7,9,5 );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 810;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	npctalk "Federico : Mother comp is conducting a tremendous experiment going beyond what we thought of.", 'federico$;
+	sleep 710;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 550;
+	npctalk "Vincent : Seems more magnanimous than we are. Fresa!!! Are you listening? Sound the alarm!", 'vincent$;
+	sleep 310;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 500;
+	npctalk "Vincent : We should at least evacuate the people in the other labs.", 'vincent$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 960;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 910;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 730;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Lona Fresa : But ... you.", bc_map,0xFF77,FW_NORMAL,12;
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1110;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 950;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 880;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 430;
+	npctalk "Silvia : Gee, I don't know what will happen but I am curious about shifting dimensions. Don't mind me!", 'silvia$;
+	sleep 360;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 880;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 950;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 510;
+	npctalk "Artemia : Dimension moving while experimenting on new material production. Got caught up in a different level of an experiment.", 'artemia$;
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 883;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1100;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Alarm System : Alert! Alert! Class 1 alert issued from the Particle Laboratory. All researchers evacuate to the bunker.", bc_map,0xFF0000,FW_NORMAL,13;
+	sleep 850;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 950;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "Alarm System : I repeat. Class 1 alert issued from the Particle Laboratory. All researchers evacuate to the bunker.", bc_map,0xFF0000,FW_NORMAL,13;
+	sleep 600;
+	npctalk "Federico : Is this how it feels to move dimensions. How strange...", 'federico$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1030;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 1000;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 380;
+	specialeffect EF_SUI_EXPLOSION,AREA,'federico$;
+	disablenpc 'federico$;
+	mapannounce 'map_name$, "MA-4885: Dimension move at 20% progress. There could be dimensional interference with certain creatures. Please be aware.", bc_map,0xFFFF00,FW_NORMAL,13;
+	npctalk "Vincent : I wonder if the others evacuated?", 'vincent$;
+	specialeffect EF_BLASTMINEBOMB, AREA, 'gen_01$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 500;
+	effect_gen( EF_BLASTMINEBOMB, 1,3 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 900;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 380;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8 );
+	sleep 550;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 350;
+	specialeffect EF_SUI_EXPLOSION,AREA,'vincent$;
+	disablenpc 'vincent$;
+	npctalk "Silvia : Ah...... I should be seeing this while having chicken and beer...", 'silvia$;
+	sleep 380;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4 );
+	sleep 700;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 730;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 860;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 350;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2 );
+	sleep 360;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	specialeffect EF_SUI_EXPLOSION,AREA,'silvia$;
+	disablenpc 'silvia$;
+	mapannounce 'map_name$, "MA-4885: Dimension move at 78% progress. Most of the dimension encroached by demi-plane.", bc_map,0xFFFF00,FW_NORMAL,13;
+	npctalk "Artemia : Ha... whose going to eat the chicken now?", 'artemia$;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7 );
+	sleep 830;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7,9 );
+	sleep 350;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 630;
+	effect_gen( EF_BLASTMINEBOMB, 1,3,8,4,6,2,7,9,5 );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 930;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 400;
+	specialeffect EF_SUI_EXPLOSION,AREA,'artemia$;
+	disablenpc 'artemia$;
+	specialeffect EF_LORD, AREA, 'gen_11$;
+	sleep 400;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 934;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	specialeffect EF_LORD, AREA, 'gen_12$;
+	sleep 500;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 630;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	specialeffect EF_LORD, AREA, 'gen_13$;
+	sleep 430;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	sleep 360;
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	specialeffect EF_LORD, AREA, 'gen_14$;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 460;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 430;
+	specialeffect EF_LORD, AREA, 'gen_11$;
+	sleep 400;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	sleep 800;
+	effect_1_10_gen( EF_BLASTMINEBOMB );
+	effect_1_10_gen( EF_MAGICALATTHIT );
+	mapannounce 'map_name$, "MA-4885: Dimension move 100% completed. Welcome to the demi-plane dimension.", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 600;
+	specialeffect EF_LORD, AREA, 'gen_12$;
+	sleep 1800;
+	specialeffect EF_LORD, AREA, 'gen_13$;
+	sleep 2000;
+	specialeffect EF_LORD, AREA, 'gen_14$;
+	mapannounce 'map_name$, "MA-4885: A gateway possible for contact with the demi-plane open at 3 o'clock of the laboratory.", bc_map,0xFFFF00,FW_NORMAL,13;
+	enablenpc instance_npcname("#central_warp_6");
+	sleep 5000;
+	mapannounce 'map_name$, "MA-4885: Cannot guarantee what kind of dimension will be met due to the instability of the gateway...", bc_map,0xFFFF00,FW_NORMAL,13;
+	sleep 5000;
+	mapannounce 'map_name$, "MA-4885: If there are any surviving organisms I wish you luck. I hope to see you again.", bc_map,0xFFFF00,FW_NORMAL,13;
+	end;
+
+S_Spawn:
+	.@round = getarg(0);
+	switch( .@round ) {
+	case 1:
+		setarray .@mob_id[0],
+			1087,	// Orc Hero
+			1147,	// Maya
+			1190,	// Orc Lord
+			1115,	// Eddga
+			1086,	// GTB
+			1038,	// Osiris
+			1159,	// Phreeoni
+			1389,	// Dracula
+			1046,	// Doppelganger
+			1046,	// Doppelganger
+			1059,	// Mistress
+			1150,	// Moonlight
+			1688,	// Lady Tanee
+			1039,	// Baphomet
+			1089,	// Toad
+			1092,	// Vagabond Wolf
+			1088,	// Vocal
+			1096,	// Angeling
+			1093,	// Eclipse
+			1120,	// Ghostring
+			1090;	// Mastering
+		break;
+	case 2:
+		setarray .@mob_id[0],
+			1980,	// Kublin
+			1157,	// Pharaoh
+			1112,	// Drake
+			1251,	// Stormy Knight
+			2068,	// Boitata
+			1373,	// Lord of Death
+			2156,	// Leak
+			1272,	// Dark Lord
+			1518,	// Bacsojin
+			1252,	// Garm
+			1779,	// Ktullanux
+			1708,	// Thanatos
+			1089,	// Toad
+			1092,	// Vagabond Wolf
+			1088,	// Vocal
+			1096,	// Angeling
+			1093,	// Eclipse
+			1120,	// Ghostring
+			1090;	// Mastering
+		break;
+	case 3:
+		setarray .@mob_id[0],
+			1623,	// RSX
+			1418,	// Evil Snake Lord
+			1312,	// Turtle Generals
+			1785,	// Atroce
+			1734,	// Kiel
+			1719,	// Detale
+			1768,	// Gloom Under Night
+			2087,	// Queen Scaraba
+			1751,	// Valkyrie Randgris
+			2253,	// Daehyon
+			2255,	// Kades
+			1832,	// Ifrit
+			1873,	// Beezlebub
+			1089,	// Toad
+			1092,	// Vagabond Wolf
+			1088,	// Vocal
+			1096,	// Angeling
+			1120,	// Ghostring
+			1090,	// Mastering
+			1093;	// Eclipse
+		break;
+	}
+	.@r = rand( getarraysize(.@mob_id) );
+	monster 'map_name$,90,88, "Unidentified creature",.@mob_id[.@r],1, instance_npcname("#wp02") + "::OnMyMobDead" + .@round;
+	return;
+}
+
+1@lab,91,80,5	script	#gen_01	CLEAR_NPC,{ end; }
+1@lab,96,81,5	duplicate(#gen_01)	#gen_02	CLEAR_NPC
+1@lab,99,85,5	duplicate(#gen_01)	#gen_03	CLEAR_NPC
+1@lab,99,91,5	duplicate(#gen_01)	#gen_04	CLEAR_NPC
+1@lab,96,95,5	duplicate(#gen_01)	#gen_05	CLEAR_NPC
+1@lab,91,97,5	duplicate(#gen_01)	#gen_06	CLEAR_NPC
+1@lab,85,96,5	duplicate(#gen_01)	#gen_07	CLEAR_NPC
+1@lab,82,91,5	duplicate(#gen_01)	#gen_08	CLEAR_NPC
+1@lab,82,86,5	duplicate(#gen_01)	#gen_09	CLEAR_NPC
+1@lab,85,81,5	duplicate(#gen_01)	#gen_10	CLEAR_NPC
+1@lab,90,97,5	duplicate(#gen_01)	#gen_11	CLEAR_NPC
+1@lab,82,89,5	duplicate(#gen_01)	#gen_12	CLEAR_NPC
+1@lab,91,80,5	duplicate(#gen_01)	#gen_13	CLEAR_NPC
+1@lab,99,88,5	duplicate(#gen_01)	#gen_14	CLEAR_NPC
+
+1@lab,102,28,0	warp2	#central_warp_1	2,2,1@lab,97,28
+1@lab,80,28,0	warp2	#central_warp_2	2,2,1@lab,75,28
+1@lab,58,28,0	warp2	#central_warp_3	2,2,1@lab,53,28
+1@lab,29,38,0	warp2	#central_warp_4	2,2,1@lab,29,43
+1@lab,48,82,0	warp2	#central_warp_5	2,2,1@lab,58,82
+1@lab,123,88,0	warp2	#central_warp_6	2,2,verus01,152,150

npc/re/instances/LastRoom.txt

@@ -0,0 +1,589 @@
+//===== rAthena Script =======================================
+//= The Last Room
+//===== Description: =========================================
+//= [Walkthrough Conversion]
+//= The Last Room Instance
+//===== Changelogs: ==========================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+un_myst,163,38,5	script	Mark	4_M_BLUEMAN,{
+	mes "[Mark]";
+	cutin "bu_mark1.bmp",0;
+
+	if (BaseLevel < 150) {
+		mes "It's dangerous here.";
+		mes "It would be better to come back next time when we are stronger.";
+		close3;
+	}
+	if (getcharid(1) < 1) {
+		mes "...It doesn't feel right here.";
+		mes "It may be dangerous alone so it might be better to form a party.";
+		close3;
+	}
+	mes "Unlike the other doors we saw this door has traces of it being blocked from this side.";
+	next;
+	mes "[Mark]";
+	mes "Is there something inside?";
+	next;
+	switch( checkquest(11379,PLAYTIME) ) {
+	case -1:
+		.@party_id = getcharid(1);
+		if (getpartyleader(.@party_id,2) == getcharid(0))
+			.@string$ = "Open door.";
+		.@s = select( .@string$, "Go in.", "Quit." );
+		if (.@s == 1) {
+			mes "[Mark]";
+			mes "I'm opening the door.";
+			mes "Go in when the door is completely open.";
+			instance_create("Last room");
+		}
+		else if (.@s == 2) {
+			mes "[Mark]";
+			switch( instance_enter("Last room") ) {
+			case IE_NOMEMBER:
+			case IE_NOINSTANCE:
+			case IE_OTHER:
+				mes "The door won't open right.";
+				break;
+			case IE_OK:
+				mapannounce "un_myst", strcharinfo(0) + " of the party, " + getpartyname(.@party_id) + ", is entering Last room.",bc_map,"0x00FF99";
+				setquest 11379;// Final Room
+				if (isbegin_quest(11380) == 0)
+					setquest 11380;// Final Room
+				break;
+			}
+		}
+		close3;
+	case 0:
+	case 1:
+		mes "[Mark]";
+		cutin "bu_mark1.bmp",0;
+		mes "...You look tired.";
+		mes "Since you went there you should take a day to rest.";
+		close3;
+	case 2:
+		mes "[Mark]";
+		cutin "bu_mark1.bmp",0;
+		mes "I can't believe you want to enter a place like this again...";
+		erasequest 11379;// Final Room
+		close3;
+	}
+}
+
+// 1st step
+1@uns,139,41,3	script	Mark#room1	4_M_BLUEMAN,{
+	mes "[Mark]";
+	mes "Something doesn't feel right. It is better that we move carefully.";
+	cutin "bu_mark4.bmp",0;
+	close3;
+}
+
+1@uns,145,32,5	script	Alp#room1	4_M_BLACKMAN,{
+	mes "[Alp]";
+	mes "There are suspicious traces everywhere.";
+	mes "Some kind of heavy machine seems to have passed...";
+	cutin "bu_alp1.bmp",2;
+	close3;
+}
+
+1@uns,145,37,3	script	Tamarin#room1	4_M_TAMARIN,{
+	mes "[Tamarin]";
+	mes "Verity, are you alright?";
+	mes "You do not look good...";
+	cutin "ep143_taang.bmp",2;
+	close3;
+}
+
+1@uns,143,38,5	script	Du#room1	4_M_REDMAN,{
+	mes "[Du]";
+	mes "I have a bad feeling about this...";
+	cutin "bu_du1.bmp",2;
+	close3;
+}
+
+1@uns,143,39,5	script	Maggi#room1	4_F_PINKWOMAN,{
+	mes "[Maggi]";
+	mes "Aahh....";
+	cutin "bu_maggi4.bmp",2;
+	close3;
+}
+
+1@uns,144,37,3	script	Verity#room1	4_F_BERRYTEA,{
+	if ('protocole < 2) {
+		mes "[Verity]";
+		mes "Umph...I suddenly have a feeling that's not good.";
+		cutin "EP15_2_brt_6.bmp",2;
+		if (getpartyleader(getcharid(1),2) != getcharid(0)) {
+			mes "I wish to talk with the leader.";
+			close3;
+		}
+		npctalk "Verity: Umph...I suddenly have a feeling that's not good.";
+		next;
+		mes "[Verity]";
+		mes "Something is splitting my head....Ugh....";
+		npctalk "Verity: Something is splitting my head....Ugh....";
+		next;
+		mes "[Verity]";
+		mes "....Ugh....";
+		npctalk "Verity: ....Ugh....";
+		next;
+		mes "[Du]";
+		mes "Sister! Are you alright?!";
+		cutin "bu_du5.bmp",2;
+		npctalk "Du: Sister! Are you alright?!", instance_npcname("Du#room1");
+		next;
+		mes "[Verity]";
+		mes "....Have to go back....";
+		cutin "EP15_2_brt_7.bmp",2;
+		npctalk "Verity: ....Have to go back....";
+		next;
+		mes "[Tamarin]";
+		mes "Verity, are you alright?";
+		mes "Can you walk?";
+		cutin "ep143_tahuk.bmp",2;
+		npctalk "Tamarin: Verity, are you alright? Can you walk?", instance_npcname("Tamarin#room1");
+		next;
+		mes "[Verity]";
+		mes "Ugh...";
+		cutin "EP15_2_brt_6.bmp",2;
+		npctalk "Verity: Ugh...";
+		next;
+		mes "[Du]";
+		mes "" + strcharinfo(0) + "! I think it is better that you go back.";
+		cutin "bu_du5.bmp",2;
+		npctalk "Du: " + strcharinfo(0) + "! I think it is better that you go back.", instance_npcname("Du#room1");
+		next;
+		mes "[Verity]";
+		mes "N...no. I will catch up soon so go on ahead.";
+		cutin "EP15_2_brt_4.bmp",2;
+		npctalk "Verity: N...no. I will catch up soon so go on ahead.";
+		next;
+		mes "[Tamarin]";
+		mes "Then I will stay with Verity until she recovers so you can go on ahead.";
+		cutin "ep143_tahuk.bmp",2;
+		npctalk "Tamarin: Then I will stay with Verity until she recovers so you can go on ahead.";
+		close2;
+		'protocole = 1;
+		cutin "",255;
+	}
+	end;
+}
+
+1@uns,140,45,0	script	#lrdoor2	HIDDEN_WARP_NPC,6,6,{
+	end;
+OnTouch:
+	if ('protocole == 0)
+		warp 'map_name$,142,30;
+	else if ('protocole == 1) {
+		'protocole = 2;
+		disablenpc instance_npcname("#lrdoor2");
+		disablenpc instance_npcname("Mark#room1");
+		disablenpc instance_npcname("Du#room1");
+		disablenpc instance_npcname("Tamarin#room1");
+		disablenpc instance_npcname("Verity#room1");
+		disablenpc instance_npcname("Maggi#room1");
+		disablenpc instance_npcname("Alp#room1");
+		mapannounce 'map_name$, "-----------------Creak---------------------",bc_map,"0xFF0000";
+		sleep 2000;
+		mapannounce 'map_name$, "-----Creak---Wrr--------------------------",bc_map,"0xFF0000";
+		sleep 2000;
+		mapannounce 'map_name$, "--------------Wirrrrrrr-----------------",bc_map,"0xFF0000";
+		sleep 2000;
+		mapannounce 'map_name$, "-----Zizip--------Zizizip------------------",bc_map,"0xFF0000";
+		sleep 2000;
+		mapannounce 'map_name$, "System message : Intruder detected.",bc_map,"0xFF0000";
+		sleep 2000;
+		mapannounce 'map_name$, "System message : Sealing off entrance and eliminating intruder according to designated protocols.",bc_map,"0xFF0000";
+		donpcevent instance_npcname("protocole1") + "::OnStart";
+	}
+	end;
+}
+
+1@uns,1,1,0	script	protocole1	-1,{
+	end;
+OnStart:
+	enablenpc instance_npcname("protocole1");
+	monster 'map_name$,47,49,"System message",3253,1, instance_npcname("protocole1") + "::OnMyMobDead2";
+	callsub S_Spawn;
+OnTimer300000:
+	mapannounce 'map_name$, "System message : Eliminating intruder.",bc_map,"0xFF0000";
+	callsub S_Spawn;
+S_Spawn:
+	initnpctimer;
+	.@npc_name$ = instance_npcname("protocole1");
+	// don't kill System message
+	killmonster 'map_name$, .@npc_name$ + "::OnMyMobDead";
+	areamonster 'map_name$,118,56,131,67, "Machine Component",3251,6, .@npc_name$ + "::OnMyMobDead";
+	areamonster 'map_name$, 62,82, 61,67, "Machine Component",3251,6, .@npc_name$ + "::OnMyMobDead";
+	areamonster 'map_name$, 46,89, 64,96, "Machine Component",3251,6, .@npc_name$ + "::OnMyMobDead";
+	areamonster 'map_name$,118,56,131,67, "Machine Component",3252,6, .@npc_name$ + "::OnMyMobDead";
+	areamonster 'map_name$, 62,82, 61,67, "Machine Component",3252,6, .@npc_name$ + "::OnMyMobDead";
+	areamonster 'map_name$, 46,89, 64,96, "Machine Component",3252,6, .@npc_name$ + "::OnMyMobDead";
+	end;
+OnMyMobDead:
+OnMyMobDead2:
+	.@count = mobcount( 'map_name$, instance_npcname("protocole1") + "::OnMyMobDead" ) + mobcount( 'map_name$, instance_npcname("protocole1") + "::OnMyMobDead2" );
+	if (.@count < 1) {
+		mapannounce 'map_name$, "System message : First protocol failed. Commencing next protocol.",bc_map,"0xFF0000";
+		stopnpctimer;
+		enablenpc instance_npcname("Tamarin#room2");
+		disablenpc instance_npcname("protocole1");
+	}
+	end;
+}
+
+1@uns,67,97,3	script	Tamarin#room2	4_M_TAMARIN,{
+	mes "[Tamarin]";
+	mes "Huff huff... Verity suddenly huff huff couldn't even stand straight before huff huff...";
+	cutin "ep143_tahuk.bmp",2;
+	if (getpartyleader(getcharid(1),2) != getcharid(0)) {
+		next;
+		mes "[Tamarin]";
+		mes "I don't think this is a problem we can solve by talking amongst ourselves.";
+		mes "Let's ask the leader's opinion first.";
+		close3;
+	}
+	npctalk "Tamarin: Huff huff... Verity suddenly huff huff couldn't even stand straight before huff huff...";
+	next;
+	mes "[Tamarin]";
+	mes "Ran off so fast huff...huff... to even catch up. Huff huff";
+	npctalk "Tamarin: Ran off so fast huff...huff... to even catch up. Huff huff";
+	next;
+	mapannounce 'map_name$, "System message : An unidentified object is moving fast from Zone 1 to Zone 2.",bc_map,"0xFF0000";
+	mes "[Tamarin]";
+	mes "Uh... Could Verity have gone that far?";
+	npctalk "Tamarin: Uh... Could Verity have gone that far?";
+	next;
+	mapannounce 'map_name$, "System message : Commencing emergency protocol.",bc_map,"0xFF0000";
+	mes "[Tamarin]";
+	mes "We need to find Verity quickly";
+	npctalk "Tamarin: We need to find Verity quickly";
+	next;
+	mes "[Tamarin]";
+	mes "There is only the route going up so go ahead.";
+	npctalk "Tamarin: There is only the route going up so go ahead.";
+	close2;
+	if ('protocole == 2) {
+		'protocole = 3;
+		enablenpc instance_npcname("#lrdoor4");
+		for ( .@i = 1; .@i < 16; ++.@i )
+			enablenpc instance_npcname( "#lrboom" + .@i );
+		enablenpc instance_npcname("Verity#room2");
+		enablenpc instance_npcname("Verity#room3");
+	}
+	cutin "",255;
+	end;
+}
+
+// 2nd step
+1@uns,100,121,0	warp2	#lrdoor4	3,3,1@uns,145,107
+
+1@uns,157,94,0	script	#lrboom1	4_CRACK,2,2,{
+	end;
+OnTouch:
+	.@npc_name$ = instance_npcname( strnpcinfo(0) );
+	areamonster 'map_name$,176,26,196,52, "Machine Component", (3251 + rand(2)), 3, .@npc_name$ + "::OnMyMobDead";
+	mapannounce 'map_name$, "System message : Intruder detected in Zone 2.",bc_map,"0xFF0000";
+	disablenpc .@npc_name$;
+	end;
+OnMyMobDead:
+	end;
+}
+1@uns,164,97,0	duplicate(#lrboom1)	#lrboom2	4_CRACK,2,2
+1@uns,166,92,0	duplicate(#lrboom1)	#lrboom3	4_CRACK,2,2
+1@uns,170,96,0	duplicate(#lrboom1)	#lrboom4	4_CRACK,2,2
+1@uns,175,93,0	duplicate(#lrboom1)	#lrboom5	4_CRACK,2,2
+1@uns,190,97,0	duplicate(#lrboom1)	#lrboom6	4_CRACK,2,2
+1@uns,194,94,0	duplicate(#lrboom1)	#lrboom7	4_CRACK,2,2
+1@uns,199,96,0	duplicate(#lrboom1)	#lrboom8	4_CRACK,2,2
+1@uns,206,93,0	duplicate(#lrboom1)	#lrboom9	4_CRACK,2,2
+1@uns,217,91,0	duplicate(#lrboom1)	#lrboom10	4_CRACK,2,2
+1@uns,224,79,0	duplicate(#lrboom1)	#lrboom11	4_CRACK,2,2
+1@uns,227,73,0	duplicate(#lrboom1)	#lrboom12	4_CRACK,2,2
+1@uns,227,69,0	duplicate(#lrboom1)	#lrboom13	4_CRACK,2,2
+1@uns,220,63,0	duplicate(#lrboom1)	#lrboom14	4_CRACK,2,2
+1@uns,201,60,0	duplicate(#lrboom1)	#lrboom15	4_CRACK,2,2
+
+1@uns,224,29,3	script	Verity#room2	4_F_BERRYTEA,{
+	mes "[Verity]";
+	mes "Ah...Where am I..";
+	mes "What happened?";
+	cutin "EP15_2_brt_6.bmp",2;
+	next;
+	mes "[Verity]";
+	mes "My head...is splitting.";
+	mes "A sound coming from this...door...";
+	next;
+	if (select( "Quit.", "Go inside." ) == 1) {
+		mes "[Verity]";
+		mes "Go back...we have to go back...";
+		cutin "EP15_2_brt_7.bmp",2;
+		close3;
+	}
+	mes "[Verity]";
+	mes "Quickly...we have to go back...";
+	cutin "EP15_2_brt_7.bmp",2;
+	close2;
+	warp 'map_name$,240,255;
+	cutin "",255;
+	end;
+}
+
+// Last step
+1@uns,242,253,3	script	Verity#room3	4_F_BERRYTEA,{
+	mes "[Verity]";
+	mes "Finally.. We came back...";
+	mes "Finally.....";
+	cutin "EP15_2_brt_7.bmp",2;
+	close2;
+	cutin "",255;
+	if ('protocole == 3) {
+		'protocole = 4;
+		disablenpc instance_npcname("Verity#room3");
+		donpcevent instance_npcname("protocole3") + "::OnStart";
+	}
+	end;
+}
+
+1@uns,1,1,0	script	protocole3	-1,{
+	end;
+OnStart:
+	enablenpc instance_npcname("protocole3");
+	initnpctimer;
+	mapannounce 'map_name$, "System message : Intruder detected in Mother Room.",bc_map,"0xFF0000";
+	monster 'map_name$,247,270,"T_W_O",3254,1, instance_npcname("protocole3") + "::OnMyMobDead";
+	end;
+OnTimer2000:
+	mapannounce 'map_name$, "System message : Commencing final protocol.",bc_map,"0xFF0000";
+	end;
+OnTimer4000:
+	mapannounce 'map_name$, "System message : Changing all systems from maintenance mode to combat mode.",bc_map,"0xFF0000";
+	end;
+OnTimer6000:
+	mapannounce 'map_name$, "System message : This is the final protocol to protect... all unrelated personnel please evacuate.",bc_map,"0xFF0000";
+	end;
+OnTimer9000:
+	mapannounce 'map_name$, "T_W_O : Have to go back..... This place isn't it....",bc_map,"0xFF0000";
+	end;
+OnTimer28000:
+	mapannounce 'map_name$, "System message : System damage occurred.",bc_map,"0xFF0000";
+	areamonster 'map_name$,222,250,267,281, "System message",3253,3, instance_npcname("protocole3") + "::OnMyMobDead2";
+	end;
+OnTimer30000:
+	mapannounce 'map_name$, "T_W_O : Who am I? Why am I here?.",bc_map,"0xFF0000";
+	end;
+OnTimer58000:
+	mapannounce 'map_name$, "System message : There may be critical damage within the Zone during system damage so please be careful.",bc_map,"0xFF0000";
+	end;
+OnTimer88000:
+	mapannounce 'map_name$, "System message : System damage occurred.",bc_map,"0xFF0000";
+	areamonster 'map_name$,222,250,267,281, "System message",3253,3, instance_npcname("protocole3") + "::OnMyMobDead2";
+	end;
+OnTimer98000:
+	mapannounce 'map_name$, "T_W_O : There is nothing left....",bc_map,"0xFF0000";
+	end;
+OnTimer108000:
+	mapannounce 'map_name$, "T_W_O : I... Nor them....",bc_map,"0xFF0000";
+	end;
+OnTimer148000:
+	mapannounce 'map_name$, "System message : System damage occurred.",bc_map,"0xFF0000";
+	areamonster 'map_name$,222,250,267,281, "System message",3253,3, instance_npcname("protocole3") + "::OnMyMobDead2";
+	end;
+OnTimer208000:
+	mapannounce 'map_name$, "System message : System damage occurred.",bc_map,"0xFF0000";
+	areamonster 'map_name$,222,250,267,281, "System message",3253,3, instance_npcname("protocole3") + "::OnMyMobDead2";
+	stopnpctimer;
+	end;
+OnMyMobDead:
+	stopnpctimer;
+	killmonster 'map_name$, instance_npcname("protocole3") + "::OnMyMobDead2";
+	mapannounce 'map_name$, "System message : All protocols failed. Locking down area excluding threat element.",bc_map,"0xFF0000";
+	enablenpc instance_npcname("Alp#room4");
+	enablenpc instance_npcname("Tamarin#room4");
+	enablenpc instance_npcname("Maggi#room4");
+	enablenpc instance_npcname("Du#room4");
+	enablenpc instance_npcname("Mark#room4");
+	enablenpc instance_npcname("Verity#room4");
+	disablenpc instance_npcname("protocole3");
+	end;
+OnMyMobDead2:
+	end;
+}
+	
+1@uns,236,258,1	script	Alp#room4	4_M_BLACKMAN,{
+	mes "[Alp]";
+	mes "It's too early to relax...";
+	cutin "bu_alp1.bmp",2;
+	close3;
+}
+
+1@uns,244,257,3	script	Tamarin#room4	4_M_TAMARIN,{
+	mes "[Tamarin]";
+	mes "Verity!!!";
+	mes "Pull yourself together!";
+	cutin "ep143_tahuk.bmp",2;
+	close3;
+}
+
+1@uns,245,254,3	script	Maggi#room4	4_F_PINKWOMAN,{
+	mes "[Maggi]";
+	mes "Verity, are you alright?";
+	cutin "bu_maggi4.bmp",2;
+	close3;
+}
+
+1@uns,244,254,3	script	Du#room4	4_M_REDMAN,{
+	mes "[Du]";
+	mes "Sister!";
+	mes "What happened?!";
+	mes "Are you alright?";
+	cutin "bu_du5.bmp",2;
+	close3;
+}
+
+1@uns,242,255,5	script	Mark#room4	4_M_BLUEMAN,{
+	mes "[Mark]";
+	mes "Everybody out of the way!";
+	mes "I will cast Heal!!!";
+	cutin "bu_mark4.bmp",0;
+	close3;
+}
+
+1@uns,242,253,3	script	Verity#room4	4_F_BERRYTEA,{
+	mes "[Du]";
+	mes "Sister!";
+	mes "What happened?!";
+	mes "Are you alright?";
+	cutin "bu_du5.bmp",2;
+	npctalk "Du: Sister! What happened?! Are you alright?", instance_npcname("Du#room4");
+	next;
+	mes "[Tamarin]";
+	mes "Verity!!!";
+	mes "Pull yourself together!";
+	cutin "ep143_tahuk.bmp",2;
+	npctalk "Tamarin: Verity!!! Pull yourself together!", instance_npcname("Tamarin#room4");
+	next;
+	mes "[Mark]";
+	mes "Everybody out of the way!";
+	mes "I will cast Heal!!!";
+	cutin "bu_mark4.bmp",0;
+	npctalk "Mark: Everybody out of the way! I will cast Heal!!!", instance_npcname("Mark#room4");
+	next;
+	mes "[Verity]";
+	mes "Uh..uhm...";
+	cutin "EP15_2_brt_4.bmp",2;
+	npctalk "Verity: Uh..uhm...";
+	next;
+	mes "[Verity]";
+	mes "Oh...";
+	mes "What is going on.";
+	mes "With serious faces.";
+	cutin "EP15_2_brt_5.bmp",2;
+	npctalk "Verity Oh... What is going on. With serious faces.";
+	next;
+	mes "[Du]";
+	mes "What do you think!";
+	mes "You don't remember?";
+	cutin "bu_du4.bmp",2;
+	npctalk "Du: What do you think! You don't remember?", instance_npcname("Du#room4");
+	next;
+	mes "[Verity]";
+	mes "Remember?";
+	cutin "EP15_2_brt_5.bmp",2;
+	npctalk "Verity: Remember?";
+	next;
+	mes "[Verity]";
+	mes "... Come to think of it where am I?";
+	cutin "EP15_2_brt_3.bmp",2;
+	npctalk "Verity: ... Come to think of it where am I?";
+	next;
+	mes "[Tamarin]";
+	mes "Verity you really don't remember anything?";
+	mes "Before...";
+	cutin "ep143_tahuk.bmp",2;
+	npctalk "Tamarin: Verity you really don't remember anything? Before...", instance_npcname("Tamarin#room4");
+	next;
+	mes "[Verity]";
+	mes "Uhm...";
+	mes "I think my head was splitting since I went underground...";
+	npctalk "Verity: I think my head was splitting since I went underground...";
+	cutin "EP15_2_brt_3.bmp",2;
+	next;
+	mes "[Verity]";
+	mes "I don't remember anything after that.";
+	npctalk "Verity: I don't remember anything after that.";
+	cutin "EP15_2_brt_5.bmp",2;
+	next;
+	mes "[Du]";
+	mes "Just now something tremendous...";
+	cutin "bu_du4.bmp",2;
+	npctalk "Du: Just now something tremendous...", instance_npcname("Du#room4");
+	next;
+	mes "[Alp]";
+	mes "Hey... I don't think this is a situation where we should be chatting right now.";
+	cutin "bu_alp3.bmp",2;
+	npctalk "Alp: Hey... I don't think this is a situation where we should be chatting right now.", instance_npcname("Alp#room4");
+	next;
+	mes "[Du]";
+	mes "You call this chatting?";
+	mes "It was tremendous before okay?";
+	cutin "bu_du4.bmp",2;
+	npctalk "Du: You call this chatting? It was tremendous before okay?", instance_npcname("Du#room4");
+	next;
+	mes "[Alp]";
+	mes "Do you hear this?";
+	mes "Something is coming...";
+	cutin "bu_alp1.bmp",2;
+	npctalk "Alp: Do you hear this? Something is coming...", instance_npcname("Alp#room4");
+	next;
+	mes "[Tamarin]";
+	mes "Now...now that I look the ground is..., shaking a little, right?";
+	cutin "ep143_tahuk.bmp",2;
+	npctalk "Tamarin: Now...now that I look the ground is..., shaking a little, right?", instance_npcname("Tamarin#room4");
+	next;
+	mes "[Du]";
+	mes "What...what's this?";
+	cutin "bu_du4.bmp",2;
+	npctalk "Du: What...what's this?", instance_npcname("Du#room4");
+	next;
+	mes "[Alp]";
+	mes "This is...dangerous.";
+	mes "This is not a level we can handle...";
+	cutin "bu_alp2.bmp",2;
+	npctalk "Alp: This is...dangerous. This is not a level we can handle...", instance_npcname("Alp#room4");
+	next;
+	mes "[Mark]";
+	mes "Qui...quickly outside!!!!!";
+	cutin "bu_mark4.bmp",0;
+	npctalk "Mark: Qui...quickly outside!!!!!", instance_npcname("Mark#room4");
+	close2;
+	warp "un_bunker",299,162;
+	cutin "",255;
+	end;
+
+OnInstanceInit:
+	'map_name$ = instance_mapname("1@uns");
+	'protocole = 0;
+
+	// 1st step
+	disablenpc instance_npcname("protocole1");
+	disablenpc instance_npcname("Tamarin#room2");
+	disablenpc instance_npcname("#lrdoor4");
+
+	// 2nd step
+	disablenpc instance_npcname("Verity#room2");
+	for ( .@i = 1; .@i < 16; ++.@i )
+		disablenpc instance_npcname( "#lrboom" + .@i );
+
+	// Last step
+	disablenpc instance_npcname("Verity#room3");
+	disablenpc instance_npcname("protocole3");
+	disablenpc instance_npcname("Alp#room4");
+	disablenpc instance_npcname("Tamarin#room4");
+	disablenpc instance_npcname("Maggi#room4");
+	disablenpc instance_npcname("Du#room4");
+	disablenpc instance_npcname("Mark#room4");
+	disablenpc instance_npcname("Verity#room4");
+	end;
+}

npc/re/mapflag/nobranch.txt

@@ -146,3 +146,7 @@ te_aldecas2	mapflag	nobranch
 te_aldecas3	mapflag	nobranch
 te_aldecas4	mapflag	nobranch
 te_aldecas5	mapflag	nobranch
+
+// Episode 15
+1@lab	mapflag	nobranch
+1@uns	mapflag	nobranch

npc/re/mapflag/noicewall.txt

@@ -79,3 +79,7 @@ te_aldecas2	mapflag	noicewall
 te_aldecas3	mapflag	noicewall
 te_aldecas4	mapflag	noicewall
 te_aldecas5	mapflag	noicewall
+
+// Episode 15
+1@lab	mapflag	noicewall
+1@uns	mapflag	noicewall

npc/re/mapflag/nomemo.txt

@@ -147,3 +147,9 @@ te_aldecas4	mapflag	nomemo
 te_aldecas5	mapflag	nomemo
 teg_dun01	mapflag	nomemo
 teg_dun02	mapflag	nomemo
+
+// Episode 15
+1@lab	mapflag	nomemo
+1@uns	mapflag	nomemo
+un_bk_q	mapflag	nomemo
+un_myst	mapflag	nomemo

npc/re/mapflag/noteleport.txt

@@ -183,3 +183,13 @@ te_aldecas2	mapflag	monster_noteleport
 te_aldecas3	mapflag	monster_noteleport
 te_aldecas4	mapflag	monster_noteleport
 te_aldecas5	mapflag	monster_noteleport
+
+// Episode 15
+1@lab	mapflag	noteleport
+1@uns	mapflag	noteleport
+un_bk_q	mapflag	noteleport
+un_myst	mapflag	noteleport
+verus04	mapflag	noteleport
+1@lab	mapflag	monster_noteleport
+1@uns	mapflag	monster_noteleport
+un_bk_q	mapflag	monster_noteleport

npc/re/mapflag/nowarp.txt

@@ -23,4 +23,10 @@ te_aldecas3	mapflag	nowarp
 te_aldecas4	mapflag	nowarp
 te_aldecas5	mapflag	nowarp
 
+// Episode 15
+1@lab	mapflag	nowarp
+1@uns	mapflag	nowarp
+un_bk_q	mapflag	nowarp
+un_myst	mapflag	nowarp
+
 job_gun	mapflag	nowarp

npc/re/mapflag/nowarpto.txt

@@ -111,4 +111,10 @@ te_aldecas3	mapflag	nowarpto
 te_aldecas4	mapflag	nowarpto
 te_aldecas5	mapflag	nowarpto
 
+// Episode 15
+1@lab	mapflag	nowarpto
+1@uns	mapflag	nowarpto
+un_bk_q	mapflag	nowarpto
+un_myst	mapflag	nowarpto
+
 job_gun	mapflag	nowarpto

npc/re/mapflag/partylock.txt

@@ -56,3 +56,7 @@
 
 // Horror Toy Factory
 1@xm_d	mapflag	partylock
+
+// Central Laboratory Memorial ====
+1@lab	mapflag	partylock
+1@uns	mapflag	partylock

npc/re/mobs/verus.txt

@@ -0,0 +1,34 @@
+//===== rAthena Script =======================================
+//= Verus Monster Spawn Script
+//===== Description: =========================================
+//= Spawns monsters around Verus.
+//===== Additional Comments: =================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+// ver_eju
+ver_eju,0,0,0,0	monster	Recon Robot	3154,80,0,0,0
+ver_eju,0,0,0,0	monster	Excavator Robot	3153,25,0,0,0
+// ver_tunn
+ver_tunn,0,0,0,0	monster	Recon Robot	3154,5,0,0,0
+// verus01
+verus01,0,0,0,0	monster	Green Cenere	3247,30,0,0,0
+verus01,0,0,0,0	monster	Explorer Robot Turbo	3249,10,0,0,0
+verus01,0,0,0,0	monster	Repair Robot Turbo	3248,10,0,0,0
+// verus02
+verus02,0,0,0,0	monster	Repair Robot Turbo	3248,90,0,0,0
+verus02,0,0,0,0	monster	Explorer Robot Turbo	3249,90,0,0,0
+// verus03
+verus03,0,0,0,0	monster	Illegal Promotion	3159,40,0,0,0
+verus03,0,0,0,0	monster	Explorer Robot	3156,80,0,0,0
+verus03,0,0,0,0	monster	Repair Robot	3155,45,0,0,0
+verus03,0,0,0,0	monster	Ruin Grace Believer	3158,10,0,0,0
+// un_bunker
+un_bunker,0,0,0,0	monster	Thief Bug	1051,6,0,0,0
+un_bunker,0,0,0,0	monster	Smelly Ghoul	3255,68,0,0,0
+un_bunker,0,0,0,0	monster	Smelly Zombie	3256,80,0,0,0
+un_bunker,0,0,0,0	monster	Machine Component	3250,28,0,0,0
+un_bunker,0,0,0,0	monster	DR815	3252,14,0,0,0
+un_bunker,0,0,0,0	monster	GC109	3251,10,0,0,0
+un_bunker,0,0,0,0	monster	Black Mushroom	1084,1,0,0,0
+un_bunker,0,0,0,0	monster	Chonchon	1011,2,0,0,0

npc/re/quests/eden/eden_common.txt

@@ -25,7 +25,7 @@
 
 // Common NPCs :: lv_tre
 //============================================================
-moc_para01,27,35,5	script	Secretary Lime Evenor	952,{
+moc_para01,27,35,5	script	Secretary Lime Evenor	4_F_EDEN_OFFICER,{
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 2000) {
 		mes "- Wait a minute !! -";
 		mes "- Currently you're carrying -";
@@ -274,6 +274,7 @@ izlude_c,131,148,4	duplicate(eto)	Eden Teleport Officer#30::eto_iz_c	729
 izlude_d,131,148,4	duplicate(eto)	Eden Teleport Officer#30::eto_iz_d	729
 umbala,105,158,3	duplicate(eto)	Eden Teleport Officer#31	729
 malaya,238,206,6	duplicate(eto)	Eden Teleport Officer#32	729
+verus04,116,243,0	duplicate(eto)	Eden Teleport Officer#33	729
 
 moc_para01,30,10,0	script	#eden_out	45,1,1,{
 OnTouch:
@@ -310,6 +311,7 @@ OnTouch:
 		case 30: warp "izlude",134,118; end;	// Old coordinates: (127,142)
 		case 31: warp "umbala",94,154; end;
 		case 32: warp "malaya",234,199; end;
+		case 33: warp "verus04",115,243; end;
 		default: warp "prontera",116,72; end;
 	}
 	end;

npc/re/quests/quests_15_1.txt

@@ -0,0 +1,9070 @@
+//===== rAthena Script =======================================
+//= Phantasmagorika Quests.
+//===== Description: =========================================
+//= [Walkthrough Conversion]
+//--- Quests list:
+//- Phantasmagorika Main Quests
+//- Wandering Bard Quest
+//- Police Quests
+//- New Power Source
+//- Krotzel's Request
+//- To Phantasmagorika!
+//- Looking for the Traces
+//- Vestige
+//===== Changelogs: ==========================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+prontera,121,77,3	script	Phantasmagorika Spokesperson	4_F_ZONDAGIRL,{
+	mes "[Spokesperson]";
+	mes "Good day.";
+	mes "Rekenber is recruiting adventurers for an excavation project that takes place in Phantasmagorika, the newly discovered ruins in Juperos.";
+	next;
+	mes "[Spokesperson]";
+	mes "If you're interested, just come as you are.";
+	mes "Everything you need for the excavation will be provided by Rekenber.";
+	next;
+	mes "[Spokesperson]";
+	mes "Join us for adventure at the newly discovered ruins in Juperos,";
+	mes "an ancient city whose scientific knowledge has fueled the development of modern civilization.";
+	next;
+	mes "[Spokesperson]";
+	mes "If you'd like to join, then form an excavation team and fill out your application.";
+	next;
+	switch( select( "Excavation team? Application?", "Phantasmagorika?", "Bye." ) ) {
+	case 1:
+		mes "[Spokesperson]";
+		mes "We're recruiting teams of excavators for the research of Phantasmagorika, the newly discovered ruins.";
+		mes "This project requires expertise in various fields, so we've decided to recruit";
+		mes "teams of excavators instead of individuals.";
+		next;
+		mes "[Spokesperson]";
+		mes "You can register for the excavation project,";
+		mes "and help us however you can.";
+		mes "Registered excavators receive special benefits and commodities";
+		next;
+		mes "[Spokesperson]";
+		mes "in exchange for information that they discover in the ruins. We'll use the information to research the ruins.";
+		mes "Even if you fail to find useful information, we'll reward you just for your participation.";
+		next;
+		mes "[Spokesperson]";
+		mes "If you want to join the project, please go submit your application to the Eden Group.";
+		close;
+	case 2:
+		mes "[Spokesperson]";
+		mes "An ancient site was just discovered in Juperos.";
+		mes "It was hidden at the end of a long tunnel.";
+		next;
+		mes "[Spokesperson]";
+		mes "Rekenber has named the site ^4d4dffPhantasmagorika^000000";
+		mes "and commenced an excavation.";
+		next;
+		mes "[Spokesperson]";
+		mes "We're hoping to find more advanced magic gears and a higher level of scientific knowledge than what was ever discovered in the Juperos region.";
+		close;
+	case 3:
+		mes "[Spokesperson]";
+		mes "Rekenber is looking for talented adventurers for the excavation of Phantasmagorika.";
+		mes "Feel free to join us anytime!";
+		mes "We need you!";
+		close;
+	}
+
+OnInit:
+	questinfo 7610, QTYPE_QUEST, 1;
+	setquestinfo_level 7610, 140,175;
+	end;
+}
+geffen,135,64,3	duplicate(Phantasmagorika Spokesperson)	Phantasmagorika Spokesperson#2	4_F_ZONDAGIRL
+
+moc_para01,31,14,0	script	#atnevt01	HIDDEN_WARP_NPC,2,2,{
+	end;
+OnTouch:
+	if (VER_MAIN == 0 && BaseLevel >= 140) {
+		cutin "laime_evenor01.bmp",2;
+		mes "[Secretary Lime Evenor]";
+		mes "Welcome back,";
+		mes "" + strcharinfo(0) + ". I don't know how we can survive without you.";
+		next;
+		mes "[Secretary Lime Evenor]";
+		mes "Have you heard?";
+		mes "An ancient site was just discovered in Juperos.";
+		mes "Rekenber is recruiting adventurers for the excavation of the place,";
+		next;
+		mes "[Secretary Lime Evenor]";
+		mes "and we've decided to join it.";
+		mes "The Captain wants to see you about that.";
+		next;
+		select("I didn't know you had a captain.");
+		cutin "laime_evenor02.bmp",2;
+		mes "[Secretary Lime Eveno]";
+		mes "What, did you think I was running this gig alone?";
+		mes "The Mistre--I mean, the Captain is rarely excited about anything, and this is one of those rare occasions. You should meet her.";
+		next;
+		cutin "laime_evenor01.bmp",2;
+		mes "[Secretary Lime Eveno]";
+		mes "Her office is to the far left on the second floor.";
+		VER_MAIN = 1;
+		setquest 7607;// Eden Group Leader
+		close2;
+		cutin "",255;
+	}
+	end;
+}
+
+moc_para01,38,175,5	script	Lime Eveno#evtat01	4_F_EDEN_OFFICER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	mes "[Secretary Lime Evenor]";
+	if (BaseLevel < 140) {
+		cutin "laime_evenor01.bmp",2;
+		mes "I also come up here sometimes to attend some business.";
+		mes "Actually the central room is mine.";
+		close3;
+	}
+	switch(VER_MAIN) {
+	case 0:
+		cutin "laime_evenor01.bmp",2;
+		mes "Welcome back,";
+		mes "" + strcharinfo(0) + ". I don't know how we can survive without you.";
+		next;
+		mes "[Secretary Lime Evenor]";
+		mes "Have you heard?";
+		mes "An ancient site was just discovered in Juperos.";
+		mes "Rekenber is recruiting adventurers for the excavation of the place,";
+		next;
+		mes "[Secretary Lime Evenor]";
+		mes "and we've decided to join it.";
+		mes "The Captain wants to see you about that.";
+		next;
+		select("I didn't know you had a captain.");
+		cutin "laime_evenor02.bmp",2;
+		mes "[Secretary Lime Eveno]";
+		mes "What, did you think I was running this gig alone?";
+		mes "The Mistre--I mean, the Captain is rarely excited about anything, and this is one of those rare occasions. You should meet her.";
+		next;
+		cutin "laime_evenor01.bmp",2;
+		mes "[Secretary Lime Eveno]";
+		mes "Her office is to the far left on the second floor.";
+		VER_MAIN = 1;
+		setquest 7607;// Eden Group Leader
+		close3;
+	case 1:
+	case 2:
+		cutin "laime_evenor03.bmp",2;
+		mes "The Captain is waiting for you.";
+		mes "Her office is to the far left from here.";
+		mes "I'll see you again later.";
+		close3;
+	case 3:
+		cutin "laime_evenor03.bmp",2;
+		mes "It seems everything went smoothly with the Captain.";
+		mes "Let's move to the central room, shall we?";
+		mes "We have a guest waiting";
+		mes "to talk us about something.";
+		close3;
+	case 4:
+		cutin "laime_evenor01.bmp",2;
+		mes "I'll be here rooting for you.";
+		mes "Don't worry about support.";
+		mes "I'll see that you get everything you need.";
+		close3;
+	default:
+		cutin "laime_evenor01.bmp",2;
+		mes "The excavation seems to be going well so far.";
+		mes "The item Dr. Atnard was interested in is also on Rekenber's radar; it should be appraised highly.";
+		next;
+		mes "[Secretary Lime Evenor]";
+		mes "Thank you for helping the doctors focus on their work.";
+		mes "Keep up the good work.";
+		close3;
+	}
+
+OnInit:
+	questinfo 7607, QTYPE_QUEST, 1;
+	setquestinfo_level 7607,140,175;
+	end;
+}
+
+moc_para01,174,165,3	script	Lime Evenor#atnd02	4_F_EDEN_OFFICER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	mes "[Lime]";
+	switch(VER_MAIN) {
+	case 0:
+		cutin "laime_evenor01.bmp",2;
+		mes "This room is for employees only.";
+		mes "If you need a place to rest, please use the next room.";
+		break;
+	case 1:
+	case 2:
+		cutin "laime_evenor01.bmp",2;
+		mes "The Captain is in the next room.";
+		mes "It's to the left.";
+		mes "Please talk to the Captain first.";
+		break;
+	case 3:
+		cutin "laime_evenor01.bmp",2;
+		mes "" + strcharinfo(0) + ". Please come this way.";
+		mes "Let me introduce you to";
+		mes "Archaeologist Aures of the Atnad Excavation Team.";
+		next;
+		mes "[Lime]";
+		mes "Dr. Aures, this is " + strcharinfo(0) + ", who will assist you in Phantasmagorika.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Nice to meet you. My name is Aures.";
+		mes "Every member of my team is old and feeble. We really can use some young blood like you.";
+		mes "Welcome to the team.";
+		next;
+		cutin "laime_evenor01.bmp",2;
+		mes "[Lime]";
+		mes "It seems everything went smoothly with the Captain.";
+		mes "Your job is simple:";
+		mes "just help Dr. Aures and his Atnad Excavation Team.";
+		next;
+		mes "[Lime]";
+		mes "I expect you'll spend most of your time running errands";
+		mes "and doing things that require physical stamina since all the members of the team are past their prime.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "That's right. All of us retired a long time ago.";
+		mes "This excavation will probably be the last excavation we do before we die.";
+		next;
+		mes "[Aures]";
+		mes "If Lime didn't help us, we would have changed our minds at the entrance to that place.";
+		next;
+		cutin "laime_evenor01.bmp",2;
+		mes "[Lime]";
+		mes "Please don't say that.";
+		mes "You're the most experienced archaeologists I've met.";
+		mes "By the way, how's Dr. Atnad?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Arnard? Don't get me started.";
+		mes "He's as stubborn as his daughter, if not more.";
+		mes "She liquidated her inheritance and left when she couldn't hear from her father.";
+		next;
+		mes "[Aures]";
+		mes "He didn't keep touch with his family for years. When he found out his house was sold,";
+		mes "he lashed out and went off the grid,";
+		mes "and he's still angry at her.";
+		next;
+		cutin "laime_evenor01.bmp",2;
+		mes "[Lime]";
+		mes "And we're stuck in the middle of their mind game.";
+		next;
+		switch( select( "Who are they?", "Cut to the chase, please." ) ) {
+		case 1:
+			cutin "verus_aures.bmp",0;
+			mes "[Aures]";
+			mes "Let me tell you. When Lime came to us,";
+			mes "we all wondered why a famous company like Eden Group would support a ragtag bunch of old men like us.";
+			mes "Then we found out they're father and daughter.";
+			next;
+			select("Father and daughter? Who?");
+			cutin "laime_evenor03.bmp",2;
+			mes "[Lime]";
+			mes "Oh, didn't the Captain tell you?";
+			mes "Her father is the leader of the Atnad Excavation Team.";
+			next;
+			mes "[Lime]";
+			mes "When I first suggested we should join the project,";
+			mes "she wanted to support the Arnard Excavation Team.";
+			mes "At first I was thinking more along the lines of merging the team.";
+			next;
+			mes "[Lime]";
+			mes "Rekenber takes care of the financial aspects of the project, while we handle the manpower.";
+			mes "Then I realized the leader of the team is the father of my boss's.";
+			next;
+			cutin "laime_evenor04.bmp",2;
+			mes "[Lime]";
+			mes "I want to support the team to the best of my ability,";
+			mes "but their rocky relationship is getting in the way.";
+			next;
+			cutin "verus_aures.bmp",0;
+			mes "[Aureth]";
+			mes "Ian, I mean the old Arnard, welcomed your proposal with open arms.";
+			mes "Then he hit the roof when he realized your captain was his daughter.";
+			next;
+			mes "[Aureth]";
+			mes "I don't understand the hangup.";
+			mes "I mean she's his daughter, for the goodness's sake.";
+			mes "I think you should mediate between the two.";
+			next;
+			cutin "laime_evenor01.bmp",2;
+			mes "[Lime]";
+			mes "I hope this collaboration will be a chance for them to reconcile with each other.";
+			mes "Well, we should move to the site now.";
+			break;
+		case 2:
+			cutin "laime_evenor03.bmp",2;
+			mes "[Lime]";
+			mes "Indeed. Before we go, let's talk about what we can expect at the site.";
+			break;
+		}
+		next;
+		cutin "laime_evenor03.bmp",2;
+		mes "[Lime]";
+		mes "Aures, Luke will come with you.";
+		mes "" + strcharinfo(0) + ", you can go to Phantasmagorika whenever you're ready.";
+		next;
+		mes "[Lime]";
+		mes "It's accessible through Juperos,";
+		mes "so move to Juno first, then get to the entrance to Juperos from there.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Rekenber has been promoting this project across the continent,";
+		mes "and has succeeded in bringing in more people than you can imagine.";
+		mes "Just look for a big crowd, and you won't miss the place. See you when you get there.";
+		next;
+		cutin "laime_evenor01.bmp",2;
+		mes "[Lime]";
+		mes "Everything should be easy enough for you,";
+		mes "though you'll have to register with Rekenber for the excavation.";
+		mes "You can register as an individual excavator, but I'd prefer if you do it as a member of the Arnard Excavation Team instead.";
+		next;
+		mes "[Lime]";
+		mes "Once your registration goes through, you can start working for the Arnard Excavation Team,";
+		mes "and everything else will take care of itself.";
+		mes "Thank you for doing this.";
+		erasequest 7608;// Artnard Excavation Team 1
+		setquest 7609;// Artnard Excavation Team 2
+		VER_MAIN = 4;
+		break;
+	case 4:
+		cutin "laime_evenor01.bmp",2;
+		mes "The excavation site is connected to Juperos,";
+		mes "so you should move to Juperos first.";
+		mes "The excavation project has been promoted widely, so you won't have a problem finding the representative.";
+		break;
+	default:
+		cutin "laime_evenor02.bmp", 2;
+		mes "How's the situation at the excavation site?";
+		mes "Sigh, why can't Ian just forgive his daughter?";
+		break;
+	}
+	close3;
+}
+
+moc_para01,172,164,5	script	Archaeologist Aureth#atnd02	4_M_OLDSCHOLAR,{
+	if (VER_MAIN < 4) {
+		cutin "laime_evenor01.bmp",2;
+		mes "[Lime]";
+		mes "I'm sorry, but he's our guest.";
+		mes "And this office is for Eden Group employees only.";
+		mes "The dormitory is the next room.";;
+	}
+	else if (VER_MAIN == 4) {
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "I'll see you again at the excavation site, yeah?";
+		mes "The Eden Group has hired an escort for me, so I'll be traveling with him.";
+		mes "See you at the site.";
+	}
+	else {
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Oh, you came.";
+		mes "I came here often.";
+		mes "I feel sorry for Luke, for he has to travel so often because of me.";
+		next;
+		mes "[Aures]";
+		mes "It's great to have a place where I can come anytime I want. It's been years since I had a place I could call home.";
+		mes "Hah hah hah!";
+		mes "I'll see you at the excavation site.";
+	}
+	close3;
+}
+
+moc_para01,178,167,3	script	Luke Lapez#atnd03	4_M_EDEN_GUARDER,{
+	mes "[Luke]";
+	if (VER_MAIN < 4) {
+		cutin "looke_rapez02.bmp",0;
+		mes "Hey, Lime.";
+		mes "We have a guest.";
+		mes "...";
+	}
+	else if (VER_MAIN == 4) {
+		cutin "looke_rapez02.bmp",0;
+		mes "...";
+		mes "I've got nothing to say to you.";
+	}
+	else {
+		cutin "looke_rapez03.bmp",0;
+		mes "Hmm...";
+	}
+	close3;
+}
+
+moc_para01,133,170,4	script	Commander Arquien#e152a1	4_F_EDEN_MASTER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- Cannot progress quest because you have too many items in your possession. -";
+		close;
+	}
+	switch(VER_MAIN) {
+	case 0:
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "[Commander Arquien]";
+		mes "Huh? I don't know who you are but don't come in here without asking.";
+		mes "I would like it if you left immediately.";
+		break;
+	case 1:
+	case 2:
+		if (VER_MAIN == 1) {
+			mes "[Commander Arquien]";
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "Oh, you're that famous " + strcharinfo(0) + "?";
+			mes "I should offer you some tea or something but I don't have any tea.";
+			mes "Sorry about that.";
+			next;
+			mes "[Commander Arquien]";
+			mes "I will introduce myself first. I am the founder of the Paradise Squad and its Commander Arquien Nile Atnad.";
+			mes "My name is complicated so you can just call me Nile.";
+			next;
+			switch( select( "What brings you to see me?", "Your middle name?" ) ) {
+			case 1:
+				cutin "Arquien_n_atnad03.bmp",2;
+				mes "[Nile]";
+				mes "Huh, right to the point?";
+				mes "I welcome it.";
+				mes "You know what is the biggest rumor going around town these days?";
+				break;
+			case 2:
+				mes "[Nile]";
+				mes "It's childhood name my mother gave me when I was young..";
+				mes "It feels better to hear than the name given to me by my damn father, okay?";
+				next;
+				mes "[Nile]";
+				mes "Instead of being entertained by other people's personal life, why don't you focus on something else?";
+				mes "They are talking about it a lot these days.";
+				break;
+			}
+			next;
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "[Nile]";
+			mes "Right. About the extended excavation of juperos.";
+			mes "They already excavated as much as they could..";
+			mes "Hasn't it been awhile since people have been turning it over claiming it as some kind of unknown mechanical civilization, a product of scientific power?";
+			next;
+			mes "[Nile]";
+			mes "So.. Why are they promoting and recruiting for the excavation now?";
+			mes "Didn't you see the recruitment notice posted on the squad office?";
+			next;
+			mes "[Nile]";
+			mes "First this is the information we have.";
+			mes "A new passage is discovered in the juperos area.";
+			mes "So we thought it was another area of juperos...";
+			next;
+			mes "[Nile]";
+			mes "Surprisingly the newly discovered area is connected to juperos but it is another site with a different form.";
+			mes "This excavation's goal is that newly discovered area.";
+			next;
+			cutin "Arquien_n_atnad04.bmp",2;
+			mes "[Nile]";
+			mes "What.. was.. the name. Ah.. I don't know.";
+			mes "It is commonly being referred to as the 'Fantasmagorica' plan.";
+			mes "Rekenber of Lighthalzen is the sponser of the excavation recruitment and support.";
+			next;
+			select("So?");
+			mes "[Nile]";
+			mes "Huh? Not that interesting?";
+			mes "Should I stop here?";
+			mes "I was prepared because Rahim recommended you.";
+			next;
+			if (select( "Please continue.", "Please stop." ) == 2) {
+				cutin "Arquien_n_atnad02.bmp",2;
+				mes "[Nile]";
+				mes "Well, I'm not interested in telling more to somebody who's not interested either.";
+				mes "You're not the only one registered with the Paradise Squad.";
+				next;
+				mes "[Nile]";
+				mes "I should ask Rahim to recommend me someone else.";
+				mes "I get it so go on along now.";
+				VER_MAIN = 2;
+				break;
+			}
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "[Nile]";
+			mes "Sure. We also wanted to participate in the Fantasmagorica.";
+		}
+		else {
+			cutin "Arquien_n_atnad02.bmp",2;
+			mes "[Nile]";
+			mes "... What, you're interested again now?";
+			next;
+			if (select("Yes","No.") == 2) {
+				cutin "Arquien_n_atnad01.bmp",2;
+				mes "[Nile]";
+				mes "As you wish.";
+				break;
+			}
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "[Nile]";
+			mes "Should I continue talking?";
+			mes "We also wanted to participate in the Fantasmagorica.";
+		}
+		mes "Of course under the name of Paradise Squad.";
+		next;
+		mes "[Nile]";
+		mes "Although we operated mostly as a broker between clients and implementers";
+		mes "we can't be stuck with Morroc forever.";
+		next;
+		mes "[Nile]";
+		mes "Rahim argued that we can advance further by using this as an opportunity.";
+		mes "Through this work we have during that time become acquainted and networked with many adventurers and strong warriors like you..";
+		next;
+		cutin "Arquien_n_atnad03.bmp",2;
+		mes "[Nile]";
+		mes "I'm saying we want to use your manpower. Aren't we pros at introducing human resources? Ahahahahaha~";
+		next;
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Truthfully the infamously haughty Rekenber requested us.";
+		mes "They are in need to a lot of manpower so they need us to broker.";
+		next;
+		mes "[Nile]";
+		mes "Not a bad proposition. Honestly it's a good opportunity.";
+		mes "We introduce people and get paid, you work and get paid.";
+		next;
+		select("Wanting to participate in Fantasmagorica?");
+		mes "[Nile]";
+		mes "It can be summarized as such.";
+		mes "Basically you're participating in the site excavation work but";
+		mes "you can help with a personal favor as well.";
+		next;
+		mes "[Nile]";
+		mes "If you participate in the excavation team can you confirm something for me?";
+		mes "You will hear more details from Rahim..";
+		next;
+		mes "[Nile]";
+		mes "I want one thing.";
+		mes "There are several excavation teams and organizations currently participating in the Fantasmagorica excavation.";
+		mes "I would like you to work in an excavation team Rahim introduces.";
+		next;
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "[Nile]";
+		mes "And, as your working with the excavation team ^4d4dffask about the Last Exploration.^000000";
+		mes "Rahim will give you the details.";
+		next;
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "It's the next room so you can get the details there.";
+		mes "Also, if you find out anything let me know. You don't need to tell anybody else.";
+		mes "Come right back here. Got it?";
+		completequest 7607;// Eden Group Leader
+		setquest 7608;// Artnard Excavation Team 1
+		VER_MAIN = 3;
+		break;
+	case 3:
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "[Nile]";
+		mes "Rahim is waiting in the next room.";
+		mes "He is the one who started this work first so get the details from him.";
+		break;
+	case 4:
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Hey, are you beginning in earnest now?";
+		mes "Then what are you doing here? Run off now!";
+		next;
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "[Nile]";
+		mes "Run off and look at that stuck-up doctor for me.";
+		mes "Ah....He's not starving and being weak is he? Huh?";
+		mes "Observe and tell me.";
+		next;
+		mes "[Nile]";
+		mes "Now-! Go now!";
+		break;
+	case 21:
+		cutin "Arquien_n_atnad03.bmp",2;
+		mes "[Nile]";
+		mes "Huh? What's going on?";
+		mes "If it's about reports, I am getting them through Looke.";
+		mes "I heard you are working pretty hard?";
+		next;
+		mes "[Nile]";
+		mes "Thanks to that your position with the Atnad excavator and Paradise Squad are getting better so it is great.";
+		mes "... It would better if it wasn't for my damn father.";
+		next;
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Anyway, why did you come?";
+		mes "Did you find out about the Last Exploration?";
+		next;
+		mes "[Nile]";
+		mes "He told you to being something back?";
+		mes "What, is that?";
+		next;
+		input .@string$;
+		while(.@string$ != "Record Player") {
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "[Nile]";
+			mes "I am not sure what you're talking about but..";
+			mes "He told you to bring it back?";
+			mes "Why would I?";
+			next;
+			mes "[Nile]";
+			mes "Tell me exactly what it is you have to take back.";
+			next;
+			input .@string$;
+		}
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "[Nile]";
+		mes "Hum...Record Player?";
+		mes "He actually remembers there was something like that in the house?";
+		next;
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "[Nile]";
+		mes "I don't know how this will affect your position but...";
+		mes "I don't think so?";
+		mes "Reject!";
+		VER_MAIN = 22;
+		break;
+	case 22:
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "[Nile]";
+		mes "......";
+		next;
+		mes "[Nile]";
+		mes "......";
+		mes "........";
+		next;
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "[Nile]";
+		mes "Darn it.";
+		mes "Okay. I got it.";
+		mes "I have the record player.";
+		mes "Give me Memory Records if you have them!";
+		next;
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Hm.. is this it?";
+		mes "Looks like it will fit.";
+		mes "You mean this came out of that place?";
+		mes "But this might be a bit tough.";
+		next;
+		mes "[Nile]";
+		mes "My stupid father didn't care about the things in the house because he was too busy outside.";
+		mes "Can't he didn't notice something like this.";
+		next;
+		mes "[Nile]";
+		mes "Humph. Unfortunately I think somebody took this Memory Record apart on purpose.";
+		mes "It won't run with just one piece.";
+		mes "I need at least five.";
+		next;
+		mes "[Nile]";
+		mes "Hm..";
+		mes "Okay. Then let's do this.";
+		mes "I will go to the excavation site with the record player.";
+		next;
+		mes "[Nile]";
+		mes "You collect the remaining Memory Records during that time.";
+		mes "Somebody probably did it on purpose so pieces will be scattered around.";
+		next;
+		mes "[Nile]";
+		mes "You understood, what I said?";
+		mes "Then let's see each other in Verus.";
+		erasequest 7644;// Record Player
+		setquest 7645;// Piece of Memory Record
+		VER_MAIN = 23;
+		break;
+	case 23:
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Collect ^4d4dff5 things like memory records^000000.";
+		mes "They will be hidden in places around Verus somewhere, so good luck.";
+		next;
+		mes "[Nile]";
+		mes "..You.. Me going to the excavation site..";
+		mes "Keep it a secret from my father..";
+		mes "..Hm..";
+		mes "Well, no special reason to keep it a secret.";
+		mes "Do as you wish.";
+		break;
+	default:
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		if (VER_MAIN < 21) {
+			mes "How is work on the excavation team?";
+			mes "..Rahim is doing well right?";
+			next;
+			cutin "Arquien_n_atnad02.bmp",2;
+			mes "[Nile]";
+			mes "... The old man. He's doing well? What? Is he? Maybe it's funny and childish to be like this at this point.";
+			mes "Darn! I don't know. Get out!";
+		}
+		else {
+			mes "I'm not going there myself because of curiosity.";
+			mes "I am a busy person myself.";
+		}
+		break;
+	}
+	close3;
+}
+
+ver_eju,114,40,4	script	Manager Michelle#atnd05	4_M_LGTGUARD,{
+	mes "[Manager Michelle]";
+	if (VER_MAIN < 4) {
+		mes "Wait. Which excavation team are you from?";
+		mes "...You're independent.";
+		mes "Did you register independently? Do you have a referral?";
+		next;
+		mes "[Manager Michelle]";
+		mes "I didn't think so.";
+		mes "I'm sorry, but you have to have a referral or belong to an excavation team.";
+		mes "All sorts of people came looking for a job at the excavation site.";
+		next;
+		mes "[Manager Michelle]";
+		mes "Oh, yes. The ^4d4dffEden Group^000000 is the easiest place to get a referral.";
+		mes "If you're qualified, then the Group will recommend you to us for the excavation project.";
+		next;
+		mes "[Manager Michelle]";
+		mes "Now, please step back for your safety.";
+		close;
+	}
+	if (VER_MAIN == 4) {
+		if (checkquest(7611,HUNTING) == -1) {
+			mes "Wait.";
+			mes "Are you a participant of the Phantasmagorika excavation project?";
+			next;
+			select("Yes.");
+			mes "[Manager Michelle]";
+			mes "Let me check the roster.";
+			mes "Your name is... " + strcharinfo(0) + ". Ah, there you are.";
+			mes "You're from the Eden Group, all right.";
+			next;
+			mes "[Manager Michelle]";
+			mes "The excavation site is at the other end of this tunnel.";
+			mes "Once you're in, you're required to formally register yourself at the Central Command Center.";
+			next;
+			mes "[Manager Michelle]";
+			mes "Oh, and do me a favor.";
+			mes "Monsters from Juperos Ruins have migrated into the tunnel,";
+			mes "and they're getting out of hand.";
+			next;
+			mes "[Manager Michelle]";
+			mes "Could you help us take care of them? Including the ones around here.";
+			mes "I'll write a letter of recommendation for you, so you can claim your rewards at the Central Command Center.";
+			setquest 7611;// Passage Cleaning
+			close;
+		}
+		mes "Just clear the tunnel of monsters,";
+		mes "and report to the Central Command Center.";
+		mes "Thank you for your help.";
+		close;
+	}
+	switch( checkquest(7612,PLAYTIME) ) {
+	case -1:
+		switch( checkquest(7611,HUNTING) ) {
+		case -1:
+			mes "Can you help me again?";
+			mes "You know, exterminate monsters in the tunnel and around this area.";
+			mes "This time, you can just report back to me instead of making a trip to the Central Command Center.";
+			mes "Thank you for your help.";
+			setquest 7611;// Passage Cleaning
+			close;
+		case 0:
+		case 1:
+			mes "Just get rid of some in the tunnel and around here.";
+			mes "I'm glad you like the job.";
+			next;
+			mes "[Manager Michelle]";
+			mes "When you're done, you can report back to me,";
+			mes "or go to Louis at the Central Command Center.";
+			mes "Thank you for your help.";
+			close;
+		case 2:
+			mes "Oh, good job wiping out monsters.";
+			mes "Our soldiers will be grateful for your help.";
+			mes "Please take this small token of appreciation.";
+			mes "I hope it'll be useful for you.";
+			erasequest 7611;// Passage Cleaning
+			setquest 7612;// Passage Cleaning - Down
+			getexp 1500000,1000000;
+			close;
+		}
+	case 0:
+	case 1:
+		mes "Thank you for clearing the tunnel of monsters.";
+		mes "I'll appreciate it if you can keep doing it.";
+		close;
+	case 2:
+		mes "Are you looking for a new job?";
+		mes "If you prefer physical labor,";
+		mes "you can always exterminate monsters for me.";
+		close;
+	}
+
+OnInit:
+	questinfo 7611,QTYPE_QUEST,1;
+	setquestinfo_req 7611,7612,0;
+	// questinfo 7612,QTYPE_QUEST,1;
+	// setquestinfo_req 7612,7611,2;// todo : display when HUNTING completed
+	end;
+}
+
+verus04,182,168,5	script	Receptionist Nara#atnd06	4_F_HUWOMAN,{
+	mes "[Nara]";
+	if (VER_MAIN < 4) {
+		mes "Hello.";
+		mes "Thank you for using the Phantasmagorika excavation reception desk.";
+		mes "Do you have a referral? Or are you a member of an excavation team?";
+		next;
+		mes "[Nara]";
+		mes "Oh, neither.";
+		mes "I'm sorry, but I can't let you register.";
+		mes "We do need excavators, but we have standards.";
+		next;
+		switch( select( "I want to register now.", "I'll come back later." ) ) {
+		case 1:
+			mes "[Nara]";
+			mes "Come back with an official excavation team, or bring a referral.";
+			close;
+		case 2:
+			mes "[Nara]";
+			mes "Hm...";
+			mes "I'm sorry, but my hands are tied.";
+			mes "This place is too dangerous for you at this moment.";
+			next;
+			mes "[Nara]";
+			mes "Please come back when you become more experienced.";
+			mes "You must be at least Level 140 to register with us.";
+			mes "This is necessary, or we'll just have a ragtag bunch of novices for the excavators.";
+			mes "Sorry.";
+			close;
+		}
+	}
+	if (VER_MAIN == 4) {
+		mes "Hello.";
+		mes "Thank you for using the Phantasmagorika excavation reception desk.";
+		mes "Do you have a referral? Or are you a member of an excavation team?";
+		next;
+		select("I'm from the Eden Group.");
+		mes "[Nara]";
+		mes "From the Eden Group, got it.";
+		mes "May I have your name? " + strcharinfo(0) + "...";
+		mes "Ah, there you are.";
+		next;
+		mes "[Nara]";
+		mes "You're a member of a separate excavation team.";
+		mes "Which excavation team do you belong?";
+		next;
+		input .@string$;
+		mes "[Nara]";
+		if (.@string$ != "Atnad") {
+			mes "..." + .@string$ + "...?";
+			mes "Are you sure that's correct?";
+			mes "Because I can't find that name on the list.";
+			next;
+			mes "[Nara]";
+			mes "Please check again.";
+			close;
+		}
+		mes "Atnad... Atnad...";
+		mes "Oh, I've found it.";
+		mes "With you " + strcharinfo(0) + ", the team barely passed the minimum member requirement.";
+		mes "Oh, we don't discriminate against small groups. Don't worry.";
+		next;
+		mes "[Nara]";
+		mes "While following the command of your excavation team leader,";
+		mes "you can also take on tasks available at the Central Command Center.";
+		next;
+		mes "[Nara]";
+		mes "We'll inform you in case of special events.";
+		mes "If you're wounded or exhausted, you can always use healers on standby at the Command Center.";
+		next;
+		mes "[Nara]";
+		mes "Rekenber provides you with everything you need while working at the excavation site.";
+		mes "In return, we expect you to focus on uncovering secrets buried within Phantasmagorika.";
+		mes "Good luck with your excavation.";
+		erasequest 7609;// Artnard Excavation Team 2
+		setquest 7610;// Registered Excavator
+		completequest 7610;// Registered Excavator
+		VER_MAIN = 5;
+		getexp 300000,300000;
+		close;
+	}
+	if (VER_MAIN == 5) {
+		mes "Now you have unlimited access to this area.";
+		mes "Feel free to let us know if you experience problems excavating or exploring.";
+		next;
+		mes "[Nara]";
+		mes "Your registration has been processed. If you need help or instructions, please talk to Commander Louis.";
+		mes "He'll also have some monster subjugation tasks available for you.";
+		next;
+		mes "[Nara]";
+		mes "Good luck!";
+		close;
+	}
+	mes "How are you today?";
+	mes "Keep up the good work.";
+	close;
+
+OnInit:
+	questinfo 7610, QTYPE_QUEST, 1;
+	setquestinfo_level 7610,140,175;
+	end;
+}
+
+verus04,179,165,5	script	Commander Louis#atnd07	4_M_LGTGUARD,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	mes "[Louis]";
+	if (VER_MAIN < 5) {
+		mes "Register yourself as an official excavator, or you'll be escorted off the premises.";
+		mes "You can register at the Reception Desk.";
+		close;
+	}
+	mes "You're in the Arnard Excavation Team.";
+	mes "How may I help you?";
+	next;
+	switch( select( "Report excavation results.", "About cleaning the tunnel.", "About monster subjugation.", "Nothing." ) ) {
+	case 1:
+		mes "[Louis]";
+		if (VER_MAIN == 12) {
+			mes "Ah, the excavation results of your team.";
+			mes "I can see your team has been focusing on the Core.";
+			next;
+			mes "[Louis]";
+			mes "The Chairman has taken a special interest in your team.";
+			mes "Keep up the good work, and you'll hear from him.";
+			next;
+			mes "[Louis]";
+			mes "Thank you for your hard work today.";
+			mes "See you tomorrow.";
+			next;
+			mes "[Louis]";
+			mes "Oh, wait.";
+			mes "Your team is on the radio.";
+			mes "Let me put you on the line.";
+			next;
+			mes "[Ian Atnad's Voice]";
+			mes "*Crackle* Hey... *Crackle* rookie...";
+			mes "*Crackle* What's wrong... with this...";
+			mes "*Crackle* I can't hear...";
+			mes "Rookie... *Crackle* Get your butt over here... *Crackle*";
+			mes "Hmpf! *Beep*";
+			next;
+			mes "[Louis]";
+			mes "I'm sorry, the signals aren't usually so bad.";
+			mes "I guess the doctor is looking for you.";
+			mes "You should go.";
+			delitem 6748,1;// Daily_Report_He_And_His_Team
+			erasequest 7617;// Turning In Excavation Report
+			setquest 7623;// Artnard's Summon
+			VER_MAIN = 13;
+			getexp 300000,300000;
+		}
+		else if (VER_MAIN == 13) {
+			mes "It was a brief investigation, yet your team has accomplished so much.";
+			next;
+			mes "[Louis]";
+			mes "While other scholars and excavators were only able to make superficial observations,";
+			mes "your team made some technical discoveries.";
+			next;
+			mes "[Louis]";
+			mes "I'll report this to the Chairman, and see that your team will receive special benefits.";
+			mes "I'll look forward to your next report.";
+		}
+		else if (VER_MAIN == 33) {
+			mes "Ah, the excavation results of your team.";
+			mes "I can see your team has been focusing on the Core.";
+			next;
+			mes "[Louis]";
+			mes "The Chairman has taken a special interest in your team.";
+			mes "Keep up the good work, and you'll hear from him.";
+			next;
+			mes "[Louis]";
+			mes "Thank you for your hard work today.";
+			mes "See you tomorrow.";
+			delitem 6748,1;// Daily_Report_He_And_His_Team
+			erasequest 7617;// Turning In Excavation Report
+			setquest 7618;// Reporting the Results - Down
+			getexp 300000,300000;
+			VER_MAIN = 34;
+		}
+		else if (VER_MAIN == 34) {
+			mes "The upper management is interested in";
+			mes "hearing more about your findings.";
+			mes "I hope you'll continue to surprise us.";
+		}
+		else {
+			mes "Are you here to report your daily results?";
+			mes "Please bring me a report with your leader's signature on it.";
+			next;
+			mes "[Louis]";
+			mes "It's always safe to leave a record.";
+			mes "Bring your report as soon as it's ready.";
+			mes "It always excites me to read your report.";
+		}
+		close;
+	case 2:
+		mes "[Louis]";
+		switch( checkquest(7612,PLAYTIME) ) {
+		case -1:
+			switch( checkquest(7611,HUNTING) ) {
+			case -1:
+				mes "Ah, you came at the right time.";
+				mes "Monsters are growing more numerous in the tunnel and the ruins.";
+				mes "The mercenaries have requested reinforcements.";
+				next;
+				if (select( "I'll go.", "Decline." ) == 2) {
+					mes "[Louis]";
+					mes "Of course, your priority is the excavation.";
+					mes "I'll look for someone else.";
+					close;
+				}
+				mes "[Louis]";
+				mes "Good.";
+				mes "Thank you in advance.";
+				mes "When you're done, you can report the results to Manager Michell in the eastern ruins.";
+				mes "Happy hunting.";
+				setquest 7611;// Passage Cleaning
+				close;
+			case 0:
+			case 1:
+				mes "Thank you.";
+				mes "Move through the tunnel and get rid of monsters in there.";
+				mes "When you're done, please report the results to Manager Michell in the eastern ruins.";
+				close;
+			case 2:
+				mes "Did you take care of monsters in the tunnel and the ruins?";
+				mes "Our mercenaries will be happy.";
+				mes "They've been demanding reinforcements for a while now. Hah hah!";
+				next;
+				mes "[Louis]";
+				mes "Thank you for your hard work.";
+				mes "Please go rest, so that you can get back on the excavation task.";
+				erasequest 7611;// Passage Cleaning
+				setquest 7612;// Passage Cleaning - Down
+				getexp 1500000,1000000;
+				close;
+			}
+		case 0:
+		case 1:
+			mes "Our mercenaries can take care of monsters in the tunnel and the ruins.";
+			mes "But thank you for your concern for the safety of the site.";
+			close;
+		case 2:
+			erasequest 7612;// Passage Cleaning - Down
+			mes "Are you concerned about monsters in the tunnel and the ruins?";
+			mes "If you're fully rested, then I can put you on the subjugation task.";
+			next;
+			mes "[Louis]";
+			mes "If you're planning to go outside, you might as well take the task, killing two birds with one stone.";
+			mes "And you can report the results to Manager Michell in the eastern ruins.";
+			close;
+		}
+	case 3:
+		mes "[Louis]";
+		switch( checkquest(7614,PLAYTIME) ) {
+		case -1:
+			switch( checkquest(7613,HUNTING) ) {
+			case -1:
+				mes "Ah, you came at the right time.";
+				mes "Threatening machines have appeared at the Plaza.";
+				mes "The workers have requested a combat unit.";
+				next;
+				if (select( "I'll go.", "Decline." ) == 2) {
+					mes "[Louis]";
+					mes "Of course, your priority is the excavation.";
+					mes "I'll look for someone else.";
+					close;
+				}
+				mes "[Louis]";
+				mes "Good.";
+				mes "Thank you in advance.";
+				mes "Please be careful!";
+				setquest 7613;// Eliminating Risks
+				close;
+			case 0:
+			case 1:
+				mes "Thank you.";
+				mes "The Plaza is where most of the excavation work is being done.";
+				mes "It'll be great if you can find something from machines you destroy.";
+				close;
+			case 2:
+				mes "Things seems to have settled.";
+				mes "The workers will resume their work soon.";
+				mes "They're not fighters, so they're usually passive in times like this.";
+				next;
+				mes "[Louis]";
+				mes "Thank you for your hard work.";
+				mes "Our workers will be grateful to you for keeping them safe.";
+				erasequest 7613;// Eliminating Risks
+				setquest 7614;// Eliminating Risks - Down
+				getexp 1500000,1000000;
+				close;
+			}
+		case 0:
+		case 1:
+			mes "I have other volunteers to take care of monsters at the Plaza, the main excavation point.";
+			mes "You should rest.";
+			close;
+		case 2:
+			erasequest 7614;// Eliminating Risks - Down
+			mes "Are you concerned about the machines at the main excavation point?";
+			mes "It's true that some of them are hypersensitive and aggressive,";
+			mes "and I agree they are threatening to our work.";
+			next;
+			mes "[Louis]";
+			mes "If you can take care of them, then I can officially put you on the task,";
+			mes "so you'll be rewarded accordingly. Rekenber never takes your service for granted.";
+			close;
+		}
+	case 4:
+		mes "[Louis]";
+		mes "Is that so?";
+		mes "Let me know if you notice anything peculiar.";
+		close;
+	}
+
+OnInit:
+	questinfo 7611,QTYPE_QUEST,1;
+	setquestinfo_req 7611,7612,0;
+	// questinfo 7612,QTYPE_QUEST,1;
+	// setquestinfo_req 7612,7611,2;// todo : display when HUNTING completed
+
+	questinfo 7613,QTYPE_QUEST,1;
+	setquestinfo_req 7613,7614,0;
+	// questinfo 7614,QTYPE_QUEST,1;
+	// setquestinfo_req 7614,7613,2;// todo : display when HUNTING completed
+	end;
+}
+
+verus04,176,161,5	script	Healer Miyo#atnd08	4_F_ACOLYTE,{
+	mes "[Miyo]";
+	mes "Please come in.";
+	mes "Where do you hurt?";
+	next;
+	.@s = select( "HP/SP full recovery 5,000 z", "HP/SP half recovery 2,000 z" );
+	if (VER_MAIN > 4)
+		setarray .@cost[1],4500,1800;
+	else
+		setarray .@cost[1],5000,2000;
+	Zeny = Zeny - .@cost[.@s];
+	percentheal (100 / .@s), (100 / .@s);
+	mes "[Miyo]";
+	mes "Oh, you're exhausted.";
+	mes "Let me restore " + ( .@s == 1 ? "your full" : "some of your" ) + " energy.";
+	mes "I'm offering a 10% discount to the official excavators.";
+	mes "Smile, and you'll feel better.";
+	close;
+}
+
+verus04,172,149,3	script	Commander Arquien#e152v0	4_F_EDEN_MASTER,{
+	mes "[Nile]";
+	if (VER_MAIN < 23) {
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "I just.. Don't want to let it be known I am there..";
+		mes "If you have business, let's meet officially in the Squad office.";
+		close3;
+	}
+	switch(VER_MAIN) {
+	case 23:
+		if (countitem(6757) < 5) {// The_Memory_Recorder
+			cutin "Arquien_n_atnad04.bmp",2;
+			mes "Do you not remember what I told you at the office?";
+			mes "I said if you want to play it, you need at least five.";
+			next;
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "[Nile]";
+			mes "The other pieces should be at the place you first found the 'Memory Record.'";
+			mes "So go there and thoroughly search the area.";
+		}
+		else {
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "Did you bring it?";
+			mes "Good. Put them together like this...";
+			mes "Put it here...";
+			next;
+			mes "[Nile]";
+			mes "Alright, all ready.";
+			mes "You push the play switch youself.";
+			delitem 6757,5;// The_Memory_Recorder
+			erasequest 7645;// Piece of Memory Record
+			setquest 7646;// Play Memory Record
+			VER_MAIN = 24;
+			emotion ET_SURPRISE, getnpcid(0,"Record player#e152a01");
+		}
+		break;
+	case 24:
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "It's the table right here.";
+		mes "I set it up so you can operate it.";
+		mes "You just have to play it.";
+		break;
+	case 25:
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "...The content is not a big deal.";
+		mes "Why.. is the name Atnad mentioned?";
+		mes "Does the old man know too?";
+		next;
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "No, no. He probably doesn't know.";
+		mes "Still feels like there is something to this.";
+		mes "..Ah thinking like this isn't my thing.";
+		next;
+		mes "[Nile]";
+		mes "You go and tell him about the content.";
+		mes "And this Memory Record.. Oh..?";
+		specialeffect EF_SPELLBREAKER,AREA,"Record player#e152a01";
+		next;
+		select("What just happened..");
+		mes "[Nile]";
+		mes "What is this..? Is it static?";
+		mes "The content won't be erased, right?";
+		mes "What do you call this type. Was it physical record.";
+		mes "I am not sure but the content itself should be fine.";
+		mes "It would be problematic if this much disappears.";
+		next;
+		mes "[Nile]";
+		mes "Recite the general idea to the old man, and ask him why the name Atnad is mentioned.";
+		erasequest 7646;// Play Memory Record
+		setquest 7647;// Report Memory Record
+		VER_MAIN = 26;
+		getexp 750000,500000;
+		break;
+	case 26:
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "You remember the gist right?";
+		mes "Just go and report it.";
+		mes "Tell him I will collect the items myself.";
+		mes "He will probably have no problem.";
+		mes "Since the old man is soooooo superior.";
+		break;
+	case 27:
+		if (countitem(6824) < 5) {// // Experimental_Dong_Memory_Record
+			cutin "Arquien_n_atnad04.bmp",2;
+			mes "Ha. That old man..";
+			mes "He will never come here himself, will he?";
+			mes "So this time it's the laboratories Memory Records?";
+			next;
+			cutin "Arquien_n_atnad03.bmp",2;
+			mes "[Nile]";
+			mes "I can press the record player switch for you.";
+			mes "Am I not generous?";
+			next;
+			mes "[Nile]";
+			mes "Bring back the Memory Records of the laboratories you want to play.";
+			mes "You know 5 have to be collected, right?";
+		}
+		else {
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "So it's these things.";
+			mes "Okay.";
+			mes "I don't feel that great but work is work.";
+			next;
+			mes "[Nile]";
+			mes "It's done.";
+			mes "You'll get what you want just by playing it.";
+			mes "Record the message properly and pass it along to the doctor. Got it?";
+			delitem 6824,5;// Experimental_Dong_Memory_Record
+			VER_MAIN = 28;
+		}
+		break;
+	case 28:
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "The record player is next to me.";
+		mes "Listen to it yourself, record the messages yourself.";
+		break;
+	case 29:
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "So that crunching noise, wasn't static but the sound of the connecting part cracking?";
+		mes "You can play it if you connect them into 5 again, the content will be preserved...";
+		mes "Anyway...";
+		next;
+		mes "[Nile]";
+		mes "..The content this time again is peculiar.";
+		mes "The experimental work, is it talking about the experiment that turned this place like this?";
+		mes "I mean the laboratories Memory Records.";
+		next;
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "[Nile]";
+		mes "It may perhaps play a big role in revealing the secrets of this area?";
+		mes "Although some of these findings are repeating the same content.";
+		next;
+		select("Show piece.");
+		cutin "Arquien_n_atnad02.bmp",2;
+		mes "[Nile]";
+		mes "Ho..this is interesting.";
+		mes "Was there an empty space in the middle of the record?";
+		mes "This part was breaking.";
+		mes "I feel a great evil design from this piece.";
+		mes "Make sure to handle this carefully.";
+		mes "You don't know what can happen.";
+		next;
+		cutin "Arquien_n_atnad03.bmp",2;
+		mes "[Nile]";
+		mes "Talking about these Memory Records.";
+		mes "It is interesting to listen to.";
+		mes "I'm going to participate so bring the Memory Records to me next time.";
+		next;
+		mes "[Nile]";
+		mes "You understand what I am saying?";
+		mes "Then, go to the old man and report this news.";
+		erasequest 7648;// Memory Records of the Laboratories
+		setquest 7649;// Report Memory Record Content
+		VER_MAIN = 30;
+		getexp 750000,500000;
+		next;
+		mes "^4d4dffYou can now receive daily quests for collecting Memory Records through Arquien Nile Atnad.^000000";
+		break;
+	default:
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "What's going on?";
+		next;
+		switch( select( "Research facilities Memory Records", "Laboratories Memory Records", "Converse", "I just stopped by." ) ) {
+		case 1:
+			mes "[Nile]";
+			switch( checkquest(7651,PLAYTIME) ) {
+			case -1:
+				if (isbegin_quest(7650) > 0) {
+					if (countitem(6757) < 5) {
+						mes "5 Research facilities Memory Records.";
+						mes "I'm looking forward to hear about my ancestors again.";
+						close3;
+					}
+					mes "You obtained all the Memory Records.";
+					mes "I wonder how many Memory Records are out there with this content?";
+					next;
+					mes "[Nile]";
+					mes "I guess we have no choice to gather as much information as possible?";
+					mes "Preparations for playing the record is finished.";
+					mes "Just have to play it now.";
+					delitem 6757,5;// The_Memory_Recorder
+					if (isbegin_quest(7654) == 0)
+						setquest 7654;// Play Research facilities Memory Records
+					close3;
+				}
+				mes "Are you here to collect Research facilities Memory Records?";
+				mes "Let's do what we have been doing.";
+				mes "Collecting 5 Research facilities Memory Records.";
+				next;
+				mes "[Nile]";
+				mes "In the meantime I will be preparing the record player to play it right away.";
+				mes "I wonder what the content will be this time.";
+				next;
+				if (select( "Accept.","Reject." ) == 2) {
+					mes "[Nile]";
+					mes "Well, what can I do.";
+					mes "You are probably busy too from everybody you have to answer to.";
+					mes "Then see you later.";
+					close3;
+				}
+				mes "[Nile]";
+				mes "I knew you'd say that.";
+				mes "You're curious about the content too, right?";
+				mes "I will be looking forward to it as well.";
+				setquest 7650;// Collect Memory Records of Research facilities
+				close3;
+			case 0:
+			case 1:
+				mes "As for collecting the Research Facilities Memory Records, we decided to do it only once a day, right?";
+				mes "Should we drive the old man into anxiety by working slowly and roughly?";
+				next;
+				mes "[Nile]";
+				mes "So, come back if the time I suggested is passed.";
+				mes "And you will be tired as well.";
+				mes "I am not the type to shove people around.";
+				close3;
+			case 2:
+				erasequest 7651;// One Memory a Day
+				mes "Hm.. Should we start to gather Memory Records again?";
+				mes "Let me know if you want to.";
+				mes "I will be tuning the record player in the meanwhile.";
+				close3;
+			}
+		case 2:
+			mes "[Nile]";
+			switch( checkquest(7653,PLAYTIME) ) {
+			case -1:
+				if (isbegin_quest(7652) > 0) {
+					if (countitem(6824) < 5) {
+						mes "5 laboratories area's Memory Records.";
+						mes "I wonder what that Dorothy lady will talk about this time.";
+						close3;
+					}
+					mes "I see you have obtained all the laboratories Memory Records.";
+					mes "I wonder how many Memory Records are out there with this content?";
+					next;
+					mes "[Nile]";
+					mes "I guess we have no choice to gather as much information as possible?";
+					mes "Preparations for playing the record is finished.";
+					mes "Just have to play it now.";
+					delitem 6824,5;// Experimental_Dong_Memory_Record
+					if (isbegin_quest(7655) == 0)
+						setquest 7655;// Play Laboratories Memory Records
+					close3;
+				}
+				mes "Are you here to collect Research facilities Memory Records?";
+				mes "Let's do what we have been doing.";
+				mes "I mean ^4d4dffcollecting 5 laboratories Memory Records in the underground facility of laboratories^000000.";
+				next;
+				mes "[Nile]";
+				mes "In the meantime I will be preparing the record player to play it right away.";
+				mes "I wonder what the content will be this time.";
+				next;
+				if (select( "Accept.", "Reject." ) == 2) {
+					mes "[Nile]";
+					mes "Well, what can I do.";
+					mes "You are probably busy too from everybody you have to answer to.";
+					mes "Then see you later.";
+					close3;
+				}
+				mes "[Nile]";
+				mes "I knew you'd say that.";
+				mes "You're curious about the content too, right?";
+				mes "I will be looking forward to it as well.";
+				setquest 7652;// Collect Memory Records of Laboratories
+				close3;
+			case 0:
+			case 1:
+				cutin "Arquien_n_atnad01.bmp",2;
+				mes "As for collecting the laboratories Memory Records, we decided to do it only once a day, right?";
+				mes "Should we drive the old man into anxiety by working slowly and roughly?";
+				next;
+				mes "[Nile]";
+				mes "So, come back if the time I suggested is passed.";
+				mes "And you will be tired as well.";
+				mes "I am not the type to shove people around.";
+				close3;
+			case 2:
+				erasequest 7653;// One Memory a Day 2
+				mes "Hm.. Should we start to gather Memory Records again?";
+				mes "Let me know if you want to.";
+				mes "I will be tuning the record player in the meanwhile.";
+				close3;
+			}
+		case 3:
+			mes "[Nile]";
+			if (VER_MAIN >= 37) {
+				cutin "Arquien_n_atnad02.bmp",2;
+				mes "The truth is I didn't really have hard feelings forward my father.";
+				mes "I just wanted to hear one apology...";
+				close3;
+			}
+			if (VER_MAIN == 36) {
+				mes "Wait, something is going on?";
+				mes "That tent there is where the excavation team is, right?";
+				mes "It seems someone is visiting?";
+				mes "Go along now!";
+				cutin "",255;
+				close;
+			}
+			mes "What do you want to say?";
+			next;
+			select("About the Last Exploration");
+			mes "[Nile]";
+			mes "Ah, that..?";
+			mes "Forget about that.";
+			mes "Now that I think about it I need to hear it from him directly.";
+			next;
+			mes "[Nile]";
+			mes "According to Aures he blindly clung onto juperos..";
+			mes "I think I might know why he did that now.";
+			next;
+			select("Perhaps for the contents in the Memory Records?");
+			mes "[Nile]";
+			mes "That's right.";
+			mes "The old man. My father probably vaguely knows as well.";
+			mes "He's looking for his roots.";
+			mes "Although it is my childhood memories, the grandfathers had a lot of secrets.";
+			next;
+			cutin "Arquien_n_atnad03.bmp",2;
+			mes "[Nile]";
+			mes "Even so... haha. Can I really be a descendant of this area of Verus?";
+			mes "It's probably just the same name. Hahaha...";
+			close3;
+		case 4:
+			mes "[Nile]";
+			cutin "Arquien_n_atnad01.bmp",2;
+			mes "Hey. I don't have that much time to spare okay?";
+			close3;
+		}
+	}
+}
+
+// Note : 2 players can use the npc at the same time
+verus04,170,150,3	script	Record player#e152a01	CLEAR_NPC,{
+	if (VER_MAIN == 24) {
+		mes "Playing audible information of the Memory Record.";
+		sleep2 1000;
+		npctalk "Whirr------ Zizip---";
+		sleep2 3000;
+		npctalk "Zizip-- Hey! What are you doing? Hey, are you listening?";
+		sleep2 3000;
+		npctalk "I'm listening. Zerter. .. Ah! You. Your voice got in this!";
+		sleep2 3000;
+		npctalk "What? You were recording? For what?";
+		sleep2 3000;
+		npctalk "For.. Zizizip--- Installing. Ah.. It's going to -zizizip.";
+		sleep2 3000;
+		npctalk "Hahahahaha that's what you are thinking? No one is like you Atnad. Aren't you --zizzip.";
+		sleep2 1000;
+		npctalk "..Atnad?";
+		sleep2 3000;
+		npctalk "Zizizip-- zizip..It's going to..criing---.. Bzz----";
+		sleep2 3000;
+		next;
+		VER_MAIN = 25;
+		mes "All audible information in the Memory Record has been played.";
+		close;
+	}
+	if (VER_MAIN == 28) {
+		mes "Playing audible information of the Memory Record.";
+		sleep2 1000;
+		npctalk "I am Dorothy Florence. I picked up a Memory Record in the Monitoring room today.";
+		sleep2 4000;
+		npctalk "It could be a black box recorded on the day of the experiment. I will play it!";
+		sleep2 4000;
+		npctalk "Zizip-- Ah.. static noise first... Ah. There it is.";
+		sleep2 4000;
+		npctalk "Goodluck..";
+		sleep2 4000;
+		npctalk "(Female Voice) Ha.. I regret never having dated.";
+		sleep2 4000;
+		npctalk "(Another Female Voice) Ah...... I should be seeing this while having chicken and beer.... zizizip--";
+		sleep2 4000;
+		npctalk "Huh? Is this all? But this voice. Ahhhhhh Artemia who checked her laundry!";
+		sleep2 4000;
+		npctalk "..Hum.. I see. That day. This is what happened.....";
+		sleep2 4000;
+		npctalk "Click";
+		sleep2 3000;
+		next;
+		mes "All audible information in the Memory Record has been played.";
+		getitem 22691,1;// Record_Fragment1
+		setquest 7653;// One Memory a Day 2
+		VER_MAIN = 29;
+		next;
+		mes "As you try to eject the Memory Record, the connecting part breaks with a cracking sound and returns to it's disassembled form.";
+		close;
+	}
+	.@quest_7654 = isbegin_quest(7654);// Play Research facilities Memory Records
+	.@quest_7655 = isbegin_quest(7655);// Play Laboratories Memory Records
+
+	if (.@quest_7654 > 0 || .@quest_7655 > 0) {
+		mes "Playing audible information of the Memory Record.";
+		sleep2 1000;
+		if (.@quest_7654 > 0) {
+			switch( rand(1,13) ) {// inaccurate (maybe more texts)
+			case 1:
+				npctalk "printf(Hello, World!)";
+				sleep2 4000;
+				npctalk "return 0";
+				sleep2 4000;
+				npctalk "Finished coding up to this point and shot 10 arrows.";
+				sleep2 4000;
+				npctalk "Ferdinando";
+				break;
+			case 2:
+				npctalk "Hello, Tatio";
+				sleep2 4000;
+				npctalk "I don't know how many years it has been.";
+				sleep2 4000;
+				npctalk "I guess I did a good thing by giving you eternal life.";
+				sleep2 4000;
+				npctalk "I guess you know the results of the outside exploration team? I am going to live outside.";
+				sleep2 4000;
+				npctalk "In this land where scientific civilization is a myth, I am going to live like primal man.";
+				sleep2 4000;
+				npctalk "Should I quit science and learn this thing called magic? Hahahahaha";
+				sleep2 4000;
+				npctalk "Smack! Stop saying stupid stuff!";
+				sleep2 4000;
+				npctalk "Ah.. Got hit again. My..zizizip.. hurts... zizizip";
+				break;
+			case 3:
+				npctalk "Hello, Tatio. Can you collect these and pick them up?";
+				sleep2 4000;
+				npctalk "I am playing around for you left alone in the city.";
+				sleep2 4000;
+				npctalk "Sorry for dumping all our hope and despair on you.";
+				sleep2 4000;
+				npctalk "How long do you have to stay in this grave of a city in solitude?";
+				sleep2 4000;
+				npctalk "I've decided to hide Memory Records for you.";
+				sleep2 4000;
+				npctalk "Of course I didn't even forget about the tiny parcels~!";
+				sleep2 4000;
+				npctalk "I was hoping to find the luxury to find and listen to these.";
+				sleep2 4000;
+				npctalk "...Your companion forever. Lasse Atnad.";
+				break;
+			case 4:
+				npctalk "Ah test test.. oh.. it works?";
+				sleep2 4000;
+				npctalk "Hello I am software engineer Sukurita.";
+				sleep2 4000;
+				npctalk "Today I am here to inform you of the points to note on Sukuta language used in the Sukuta engine.";
+				sleep2 4000;
+				npctalk "Skuta language can use both global and local variables..";
+				sleep2 4000;
+				npctalk "The global variable is like the devil and if you fall for the sweet allurement of";
+				sleep2 4000;
+				npctalk "the global variable you will suffer a heart palpitating and";
+				sleep2 4000;
+				npctalk "cold sweat inducing epilepsy over 1 byte of space or special syntax.";
+				sleep2 4000;
+				npctalk "Next time I will explain the alternative to Skuta language mhm mhm";
+				sleep2 4000;
+				npctalk "Sukurita language invented by I, Sukurita. Heeheeheehee";
+				break;
+			case 5:
+				npctalk "Click-zizip don't stop me Puhahaha I will leave this on record!";
+				sleep2 4000;
+				npctalk "Puhahahahahahahahaha";
+				sleep2 4000;
+				npctalk "I am not crazy, this is funny! It's because it's funny.";
+				sleep2 4000;
+				npctalk "This is a time to be laughing?";
+				sleep2 4000;
+				npctalk "Ah, of course not. It's not but hehehehe";
+				sleep2 4000;
+				npctalk "...Then should I cry? Huh? Hasn't this given you hope?";
+				sleep2 4000;
+				npctalk "Our hope!";
+				sleep2 4000;
+				npctalk "Clack-! Ah... this.. this smashing is Ze..Zerte.....";
+				sleep2 4000;
+				npctalk "Ugh. Blimey. You're a lot to handle.";
+				sleep2 4000;
+				npctalk "Huh? This was still recording?";
+				break;
+			case 6:
+				npctalk "Today is the last experiment and 4885th project of Verus city.";
+				sleep2 4000;
+				npctalk "Everybody wished to see the experiment succeed and went to the laboratories to observe.";
+				sleep2 4000;
+				npctalk "Except for me who is on shift in the Research facilities. Hahahaha";
+				sleep2 4000;
+				npctalk "Aha. Now I think Tatio is also not a member of the main project so is here with me in the Research facilities.";
+				sleep2 4000;
+				npctalk "It is lonely work.... Only if something good happened..";
+				sleep2 4000;
+				npctalk "Didn't something just flash? Hey!";
+				sleep2 4000;
+				npctalk "Booom! Zizizizip";
+				break;
+			case 7:
+				npctalk "Measurements for the survivors in the panic room are no longer being shown on the disaster system screen.";
+				sleep2 4000;
+				npctalk "What in the world happened?";
+				sleep2 4000;
+				npctalk "What is going on? Is it a system error?";
+				sleep2 4000;
+				npctalk "Tatio says Dr. Fresa is still alive.";
+				sleep2 4000;
+				npctalk "I pray that his heart is okay...";
+				break;
+			case 8:
+				npctalk "Hello, I am Lasse Atnad. I am on Research facility night duty again today.";
+				sleep2 4000;
+				npctalk "Huh? What is this? What are you doing now Atnad?";
+				sleep2 4000;
+				npctalk "Ey, can't you tell? I am voice recording!";
+				sleep2 4000;
+				npctalk "You're using an outdated recorder in this day and age? Record video. Video.";
+				sleep2 4000;
+				npctalk "That's my choice! Please don't disrupt me. Argh You attacked my weak spot Ahahaha";
+				sleep2 4000;
+				npctalk "...Zizip..click";
+				break;
+			case 9:
+				npctalk "Hey, Lasse. I am curious about something. Can you answer?";
+				sleep2 4000;
+				npctalk "What is it? What is it that you're pushing my recorder into my face?";
+				sleep2 4000;
+				npctalk "Since this is an interview. I am Zete, striving to reach the pinnacle of bioengineering..";
+				sleep2 4000;
+				npctalk "Enough with bragging. What are you curious about? What is it?";
+				sleep2 4000;
+				npctalk "It's just about Tatio, but he is mostly metameres. I heard that is Dr. Fresa's work, right?";
+				sleep2 4000;
+				npctalk "Yes. Dr. Fresa did research on mechanical substitution for the nervous system before coming to Verus city...";
+				sleep2 4000;
+				npctalk "Oh lala, then that couple came to meet because of that work?";
+				sleep2 4000;
+				npctalk "That's probably right? Tatio himself agreed to the human experiment without hesitation, so it was meant to be.";
+				sleep2 4000;
+				npctalk "Mhm.. So was it the fruit of an one-sided crush?";
+				sleep2 4000;
+				npctalk "Eh? What are you talking about? How did you conclude that? Others' personal life at that...";
+				sleep2 4000;
+				npctalk "Noo look. Fresa who distinguishes people into those useful for research, and to those useless..";
+				sleep2 4000;
+				npctalk "Then one day brings a husband so you know how surprised I was?!?!?!";
+				sleep2 4000;
+				npctalk "So, what you were interested in wasn't biotechnology but Dr. Fresa's love life. Ugh..";
+				sleep2 4000;
+				npctalk "Right! The Fresa! That stone of a woman has a lover..!! Can you believe it?";
+				sleep2 4000;
+				npctalk "I am sorry but. Isn't that enough?";
+				sleep2 4000;
+				npctalk "Heeek! Tatio, when. Did. You come hahahahaha !!! This. This isn't anything!";
+				sleep2 4000;
+				npctalk "Crash---! Click!";
+				break;
+			case 10:
+				npctalk "Explosion Day 32, voice record Lasse Atnad.";
+				sleep2 4000;
+				npctalk "The explosions inside the laboratories are not stopping.";
+				sleep2 4000;
+				npctalk "The condition of the researchers participating or observing the experiment is unknown";
+				sleep2 4000;
+				npctalk "except through the system vitals connected to the panic room.";
+				sleep2 4000;
+				npctalk "The plaza and research facilities have only been partially damaged by the explosion aftermath.";
+				sleep2 4000;
+				npctalk "However.. Some of the researchers and citizens have been killed by an unknown shock wave..";
+				sleep2 4000;
+				npctalk "We are currently assembling an exploration robot using the research facilities.";
+				sleep2 4000;
+				npctalk "Verus city main power source has stopped so minimal facilities are being powered by a secondary energy cube.";
+				sleep2 4000;
+				npctalk "Energy storms are still making accessing pass the laboratories partition impossible.";
+				sleep2 4000;
+				npctalk "The majority of the researchers are sick of being isolated in the city and are arguing for research on Time Sleep.";
+				sleep2 4000;
+				npctalk "..Within this grave we can't escape, we dream of going back in time.";
+				break;
+			case 11:
+				npctalk "Which side, I am on the side of being useful to research.";
+				sleep2 4000;
+				npctalk "That is the worth of my existence when it comes to her. This a fact I knew well.";
+				sleep2 4000;
+				npctalk "The reason I could not refuse, the reason I could not help but follow her as if I was lured by a mirage...";
+				sleep2 4000;
+				npctalk "Because she already was the owner of my heart...";
+				sleep2 4000;
+				npctalk "Rustle";
+				sleep2 4000;
+				npctalk "Hurk.. You. So it was true. It was a one way crush as ever.";
+				sleep2 4000;
+				npctalk "Huh? What are you looking at.. Urk isn't that Tatio's diary?";
+				sleep2 4000;
+				npctalk "Be quiet! Idiot! What if we get caught!";
+				sleep2 4000;
+				npctalk "What, you are reading this while recording it?!?!?!?!";
+				break;
+			case 12:
+				npctalk "Hello, Tatio.";
+				sleep2 4000;
+				npctalk "Most of the people are dead.";
+				sleep2 4000;
+				npctalk "I do not feel guilt even though I turned all those people into dust in order to survive.";
+				sleep2 4000;
+				npctalk "Above all I worry about you being left alone.";
+				sleep2 4000;
+				npctalk "So I have decided to stop despairing.";
+				sleep2 4000;
+				npctalk "It is tomorrow. The day all of us leave this place with you here...";
+				sleep2 4000;
+				npctalk "Until we can see each other again, good bye.";
+				break;
+			case 13:
+				npctalk "Hello. This is Silvia Loren.";
+				sleep2 4000;
+				npctalk "My hobby is chicken. I like beer~.";
+				sleep2 4000;
+				npctalk "Eh... Kind of went overboard by taking on a project today.";
+				sleep2 4000;
+				npctalk "Honestly it isn't a subject I was interested in.";
+				sleep2 4000;
+				npctalk "Vincent was participating in it.";
+				sleep2 4000;
+				npctalk "Ah.......";
+				sleep2 4000;
+				npctalk "No wait wait. I didn't mean to explain that. Oh now!! Cancel it!! - Zizipzizip";
+				break;
+			}
+			sleep2 3000;
+			next;
+			mes "All audible information in the Memory Record has been played.";
+			erasequest 7650;// Collect Memory Records of Research facilities
+			erasequest 7654;// Play Research facilities Memory Records
+			setquest 7651;// One Memory a Day
+			if (VERUS_DAILY_QUEST < 10) {// inaccurate
+				if (VER_MAIN != 32)
+					VERUS_DAILY_QUEST++;
+				if (VER_MAIN == 35 && VERUS_DAILY_QUEST == 10)
+					VER_MAIN = 36;
+				else if (VER_MAIN == 31 && VERUS_DAILY_QUEST > 4)
+					VER_MAIN = 32;
+			}
+		}
+		else {
+			switch( rand(1,14) ) {
+			case 1:
+				npctalk "This is Dorothy Florence. Dorothy who only knows how to do laundry.";
+				sleep2 4000;
+				npctalk "I want to save the remains of the people with the only things I have.";
+				sleep2 4000;
+				npctalk "This place has a lot of people. They are still alive.";
+				sleep2 4000;
+				npctalk "I hope to save as many stories of the people as I can.";
+				sleep2 4000;
+				npctalk "As I hope somebody will remember how we were instead.";
+				sleep2 4000;
+				npctalk "Okay.. then.. who should I interview first?";
+				break;
+			case 2:
+				npctalk "This is Dorothy Florence.";
+				sleep2 4000;
+				npctalk "Individual assignments have been established under Dr. Fresa's command.";
+				sleep2 4000;
+				npctalk "We have to survive here until the energy storm outside stops.";
+				sleep2 4000;
+				npctalk "We have decided to consult the former cafeteria owner Yangsang on the food problem.";
+				sleep2 4000;
+				npctalk "They say we can last about 40 days.";
+				sleep2 4000;
+				npctalk "This panic room is amazing.";
+				break;
+			case 3:
+				npctalk "This is Dorothy Florence.";
+				sleep2 4000;
+				npctalk "We had a small party today";
+				sleep2 4000;
+				npctalk "We had the first harvest of the plants being cultivated!";
+				sleep2 4000;
+				npctalk "According to the biotechnology managers harvest is possible at least once every 2 weeks";
+				sleep2 4000;
+				npctalk "due to a growth acceleration technology.";
+				sleep2 4000;
+				npctalk "I can taste fresh grapes again today.";
+				break;
+			case 4:
+				npctalk "This is Dorothy Florence. This is the 3rd night.";
+				sleep2 4000;
+				npctalk "People are looking to Dr. Fresa as the leader of this current situation and rendering yesterday's criticism meaningless.";
+				sleep2 4000;
+				npctalk "Biotechnology engineers, mechanical engineers, facility managers.. we have everybody we need.";
+				sleep2 4000;
+				npctalk "There are also lowly kitchen maids like myself as well.";
+				sleep2 4000;
+				npctalk "I was here just to deliver some laundry.";
+				sleep2 4000;
+				npctalk "How did I get caught up in something like this?";
+				break;
+			case 5:
+				npctalk "I am Dorothy Florence. I picked up a Memory Record in the Monitoring room today.";
+				sleep2 4000;
+				npctalk "It could be a black box recorded on the day of the experiment. I will play it!";
+				sleep2 4000;
+				npctalk "Zizip-- Ah.. static noise first... Ah. There it is.";
+				sleep2 4000;
+				npctalk "Goodluck..";
+				sleep2 4000;
+				npctalk "(Female Voice) Ha.. I regret never having dated.";
+				sleep2 4000;
+				npctalk "(Another Female Voice) Ah...... I should be seeing this while having chicken and beer.... zizizip--";
+				sleep2 4000;
+				npctalk "Huh? Is this all? But this voice. Ahhhhhh Artemia who checked her laundry!";
+				sleep2 4000;
+				npctalk "..Hum.. I see. That day. This is what happened.....";
+				sleep2 4000;
+				npctalk "Click";
+				break;
+			case 6:
+				npctalk "This is Dorothy Florence.";
+				sleep2 4000;
+				npctalk "The plants cultivated by the biologist have sprouted shoots one day.";
+				sleep2 4000;
+				npctalk "Should I be happy?";
+				sleep2 4000;
+				npctalk "It is something to be happy about but, there is still no contact with the outside world.";
+				sleep2 4000;
+				npctalk "A week has passed, and the only joy of the people in the panic room...";
+				sleep2 4000;
+				npctalk "Is watching the germination of the plants.";
+				break;
+			case 7:
+				npctalk "This is Dorothy Florence. It has been a month of panic room life.";
+				sleep2 4000;
+				npctalk "People were busy since the morning due to the Air cleaner being broken.";
+				sleep2 4000;
+				npctalk "I can only watch on since the only thing I know how to do is wash clothes.";
+				sleep2 4000;
+				npctalk "Fortunately the machine manias have already made a new air cleaner";
+				sleep2 4000;
+				npctalk "so there will be no problem breathing.";
+				sleep2 4000;
+				npctalk "What a relief, isn't it?";
+				break;
+			case 8:
+				npctalk "This is Dorothy. This is the last recording.";
+				sleep2 4000;
+				npctalk ".I don't want to die. Whimper..";
+				sleep2 4000;
+				npctalk "I don't want to be like them!!";
+				sleep2 4000;
+				npctalk "...I want to live...";
+				break;
+			case 9:
+				npctalk "This is Dorothy Florence. I am recording this";
+				sleep2 4000;
+				npctalk "because someone has to leave behind the memories of this terrible accident.";
+				sleep2 4000;
+				npctalk "The outside has been completely cut off from the explosion that occurred with the experiment.";
+				sleep2 4000;
+				npctalk "Most of the people have currently evacuated to the panic room.";
+				sleep2 4000;
+				npctalk "There is no contact with the outside world.";
+				sleep2 4000;
+				npctalk "Going out side will be difficult for the time being.";
+				break;
+			case 10:
+				npctalk "Hello, I am Ate. The assistant engineer of Verus city.";
+				sleep2 4000;
+				npctalk "Haha.. isn't this awkward?";
+				sleep2 4000;
+				npctalk "I.. fermented alcohol a while ago with the grapes in the bunker.";
+				sleep2 4000;
+				npctalk "Life in the bunker is becoming more impoverished the more we lose life on the surface.";
+				sleep2 4000;
+				npctalk "I didn't share that much but the guy next to me must be drunk because he keeps clinging on to me.";
+				sleep2 4000;
+				npctalk "Doesn't this guy have something better to do than to cling onto me.";
+				sleep2 4000;
+				npctalk "I'm kind of on the popular side. Haha.";
+				sleep2 4000;
+				npctalk "But, seeing that clingy guy reminded me of the kid somehow.";
+				sleep2 4000;
+				npctalk "Long black braided hair and face full of freckles...";
+				sleep2 4000;
+				npctalk "..Ate! Can you check this for a minute?";
+				sleep2 4000;
+				npctalk "Ah.. sorry. I have to go to work. I will do more when I have the chance.";
+				sleep2 4000;
+				npctalk "Eh, Ate's interview will be continued next time! This has been Dorothy!";
+				break;
+			case 11:
+				npctalk "This is Dorothy Florence. Day 50 of the explosion.";
+				sleep2 4000;
+				npctalk "After a long discussion, the research staff of Dr. Fresa seem to have decided to";
+				sleep2 4000;
+				npctalk "go through part of the partition where these is no energy storm.";
+				sleep2 4000;
+				npctalk "They are leaving by digging an underground tunnel.. !";
+				sleep2 4000;
+				npctalk "I thought we were trapped by the protective wall?";
+				break;
+			case 12:
+				npctalk "Hello! Ate! Do you have time?";
+				sleep2 4000;
+				npctalk "Hello, Dorothy. Is this that thing last time? Did I really have to continue?";
+				sleep2 4000;
+				npctalk "I did promise. No choice. Where was I?";
+				sleep2 4000;
+				npctalk "The kid with long black braided hair and face full of freckles!";
+				sleep2 4000;
+				npctalk "Ah, yes. That kid. He would follow me around annoyingly.";
+				sleep2 4000;
+				npctalk "A time when he was a even more of a kid. .. Haa..";
+				sleep2 4000;
+				npctalk "I was relieved to think I was finally rid of him in Verus city.";
+				sleep2 4000;
+				npctalk "Until I ran into him at the laboratories. Haha, isn't he quite the kid?";
+				sleep2 4000;
+				npctalk "Always honest in his feelings, unchanging....";
+				sleep2 4000;
+				npctalk "But the kid, never told me he liked me because his stubbornness.";
+				sleep2 4000;
+				npctalk "Even though it was written on his face.";
+				sleep2 4000;
+				npctalk "Chasing me around like a stalker. Humph... Hahaha";
+				sleep2 4000;
+				npctalk "But today I am missing you kid. .. Hoho.";
+				sleep2 4000;
+				npctalk ".....But that day you probably, hm.. that day....";
+				sleep2 4000;
+				npctalk ".................Dorothy . ..Let's stop.";
+				break;
+			case 13:
+				npctalk "This is Dorothy Florence. A month and a week has passed.";
+				sleep2 4000;
+				npctalk "There is bad news today.";
+				sleep2 4000;
+				npctalk "The people who went outside the multiplex protective wall to measure the atmosphere have not come back.";
+				sleep2 4000;
+				npctalk "Maybe.. They were swallowed up by the energy storm.";
+				sleep2 4000;
+				npctalk "I hope they find freedom again.";
+				break;
+			case 14:
+				npctalk "This is Dorothy Florence. Day 44 of the explosion.";
+				sleep2 4000;
+				npctalk "I hear a portion of the people within the protective wall have changed strangely.";
+				sleep2 4000;
+				npctalk "Apparently it is related to having gone outside.";
+				sleep2 4000;
+				npctalk "People are scrambling to check the wall.";
+				sleep2 4000;
+				npctalk "What is going to happen to us...?";
+				break;
+			case 15:
+				npctalk "--------Bang-----";
+				sleep2 4000;
+				npctalk "Urk..";
+				sleep2 4000;
+				npctalk "Sob sob...";
+				sleep2 4000;
+				npctalk "Why! Why did it happen like this!!!";
+				sleep2 4000;
+				npctalk "Sob sob..";
+				sleep2 4000;
+				npctalk "-------Baang-----";
+				sleep2 4000;
+				npctalk "--Zizip-Ah --doctor --before --zizizip-- he zizip- look zizip--for..";
+				sleep2 4000;
+				npctalk "--Zizizip--here.";
+				sleep2 4000;
+				npctalk "-Click-";
+				sleep2 4000;
+				npctalk "Hm. The doctor looks very tired as well.";
+				sleep2 4000;
+				npctalk "Ah! This was on? I'm going to get in trouble for leaving it on too long..";
+				sleep2 4000;
+				npctalk "Umph! Hm! This is Vanilla Luide. I am tired a lot these days for some reason.";
+				sleep2 4000;
+				npctalk "I guess looking at the situation it's not a shock to see everybody's state.";
+				sleep2 4000;
+				npctalk "Hoo...";
+				sleep2 4000;
+				npctalk "Bzz..";
+				break;
+			}
+			sleep2 3000;
+			next;
+			mes "All audible information in the Memory Record has been played.";
+			erasequest 7652;// Collect Memory Records of Laboratories
+			erasequest 7655;// Play Laboratories Memory Records
+			setquest 7653;// One Memory a Day 2
+			// memory record daily quests
+			if (countitem(22691) < 1 && countitem(22692) < 1 && countitem(22693) < 1 && countitem(22694) < 1 && countitem(22695) < 1)
+				getitem rand(22691,22695),1;// Record_Fragment
+		}
+		getexp 1500000,1000000;
+		next;
+		specialeffect EF_SPELLBREAKER;
+		mes "As you try to eject the Memory Record, the connecting part breaks with a cracking sound and returns to it's disassembled form.";
+		next;
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Darn. There's only one content but it annoyingly breaks every time it doesn't play.";
+		mes "I'm starting to think it's made like this on purpose.";
+		mes "Annoying to clean up..";
+		next;
+		mes "[Nile]";
+		mes "Why make things like this with all that science and talent and whatnot?";
+		mes "Not to mention there is the occasional overlap..";
+		mes "It feels like someone is coaxing us to find out about the past no matter what.";
+		next;
+		mes "[Nile]";
+		mes "Anyway I will record this content separately and deliver it to the old man.";
+		mes "Good work today.";
+		next;
+		mes "[Nile]";
+		if (VERUS_DAILY_QUEST < 10)
+			mes "Then come back tomorrow.";
+		else {
+			mes "Wait, something is going on?";
+			mes "That tent there is where the excavation team is, right?";
+			mes "It seems someone is visiting?";
+			mes "Go along now!";
+		}
+		close3;
+	}
+	if (VER_MAIN < 30) {
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "[Nile]";
+		mes "Can you, not touch things without asking?";
+		close3;
+	}
+	mes "There are no more Memory Records to play.";
+	close;
+}
+
+verus04,141,193,5	script	Archaeologist Aureth#atnd09	4_M_OLDSCHOLAR,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	switch(VER_MAIN) {
+	case 0:
+	case 1:
+	case 2:
+	case 3:
+		mes "The old archaeologist has his back toward you, working on something.";
+		mes "You shouldn't disturb him.";
+		close;
+	case 4:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Ah, welcome.";
+		mes "I've been waiting for you.";
+		mes "First things first: you should go register with the Central Command Center.";
+		next;
+		mes "[Aureth]";
+		mes "Your name is already on the list. Just go check in with the center.";
+		mes "Or you won't have full access to this area.";
+		next;
+		mes "[Aureth]";
+		mes "Come back when you're done. I'll introduce you to the other members.";
+		mes "Go on.";
+		close3;
+	case 5:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Ah, you're back.";
+		mes "Say hello to our leader, Ian Atnad.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "...Rookie.";
+		mes "I don't have time for rookies. Send them back!";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "You're doing it again.";
+		mes "We're old now. We need help!";
+		mes "Stop being so stubborn.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "...Hey, rookie.";
+		mes "Did my daughter send you to spy on me?";
+		mes "Tell me!";
+		next;
+		if (select( "I came to help.", "I don't know what you're talking about." ) == 2) {
+			cutin "verus_ian02.bmp",2;
+			mes "[Ian Atnad]";
+			mes "Hm? Don't you know who my daughter is?";
+			mes "Well, we should leave it that way.";
+		}
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "That means you know who my daughter is.";
+		mes "Do you really think you can work with me?";
+		mes "Knowing who I am?";
+		next;
+		mes "[Ian Atnad]";
+		mes "Well, fine.";
+		mes "Let's get to work.";
+		mes "I want to know if you can follow my orders.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Ian, you're helpless.";
+		mes "Well, welcome to the team, young adventurer.";
+		mes "Some of the things we're planning are physically challenging, not to mention dangerous.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Enough. Rookie, come over here.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "I'm sorry.";
+		mes "You'd better go.";
+		mes "Don't let him get on your nerves.";
+		VER_MAIN = 6;
+		close3;
+	case 6:
+	case 7:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Thank you for your patience with Ian.";
+		mes "He wasn't always like that.";
+		mes "He's doing it on purpose.";
+		close3;
+	case 8:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "If you're done with him, I can use your help.";
+		mes "We have one more member in the team.";
+		next;
+		mes "[Aureth]";
+		mes "He went to the Plaza to investigate the remains.";
+		mes "He's a young fellow named ^4d4dffLloyd^000000.";
+		mes "I sent Luke with him to keep him safe,";
+		next;
+		mes "[Aureth]";
+		mes "but I want to know how much progress Lloyd has made with his investigation.";
+		mes "Could you go check up on him?";
+		mes "Thank you.";
+		erasequest 7619;// Assisting the Excavation Team
+		setquest 7620;// Young Blood?
+		VER_MAIN = 9;
+		close3;
+	case 9:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Lloyd must be somewhere in the Verus Central Plaza.";
+		mes "Look for Luke. He should be near Lloyd.";
+		next;
+		mes "[Aureth]";
+		mes "He's the only young member aside from you.";
+		mes "The rest of the members of our team are as old as me, and couldn't make the trip.";
+		next;
+		mes "[Aureth]";
+		mes "Please take good care of";
+		mes "Lloyd.";
+		close3;
+	case 10:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "How's Lloyd doing?";
+		mes "Ah, so you're helping him.";
+		next;
+		mes "[Aureth]";
+		mes "Thank you";
+		mes "for your hard work.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "They're here to work for us.";
+		mes "Stop thanking them.";
+		mes "They're spoiled as it is.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Sigh, would you stop?";
+		mes "*Shaking his head*";
+		close3;
+	case 11:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Ah, you're back.";
+		mes "How's Lloyd doing?";
+		mes "He wants to camp there.";
+		mes "Wouldn't it be too dangerous? I guess Luke can keep him safe.";
+		next;
+		mes "[Aureth]";
+		mes "Please come this way.";
+		mes "I wrote a report while waiting for you.";
+		mes "I want you to take it to Commander Louis at the Central Command Center.";
+		next;
+		mes "[Aureth]";
+		mes "This may be a simple errand,";
+		mes "but it gives you an opportunity to get acquainted with the Commander.";
+		next;
+		mes "[Aureth]";
+		mes "We're old, so we don't care about fame. You're different.";
+		mes "Winning favor with Rekenber";
+		mes "can go a long way.";
+		erasequest 7622;// Good News!
+		setquest 7617;// Turning In Excavation Report
+		VER_MAIN = 12;
+		getitem 6748,1;// Daily_Report_He_And_His_Team
+		close3;
+	case 12:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Please take that report to Commander Louis.";
+		mes "Writing a report every day is a chore, but an important chore nonetheless.";
+		next;
+		mes "[Aureth]";
+		mes "I've noticed Louis has been watching us. I hope that's a good sign.";
+		close3;
+	case 13:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Did you deliver the report?";
+		mes "Good.";
+		mes "You can take a break now.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "No, you can't!";
+		mes "You've got work to do!";
+		mes "Come over here, now!";
+		close3;
+	case 14:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "I don't understand him sometimes.";
+		mes "I feel sorry for you.";
+		mes "I wish I could help.";
+		next;
+		mes "[Aureth]";
+		mes "Maybe the other youngsters can give you better advice.";
+		mes "^4d4dffWhy don't you consult Lloyd or Luke?^000000";
+		next;
+		mes "[Aureth]";
+		mes "Sigh, he's as stubborn as a mule.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "I heard that.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Then stop it";
+		mes "and stop harassing them.";
+		mes "The Eden Group won't be happy if it knows about this.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "The Eden Group? *Snort* Who cares?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "You're helpless.";
+		mes "I'm really, really sorry about him.";
+		mes "You really should talk to those two.";
+		close3;
+	case 15:
+	case 16:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "So you've found some clues, eh?";
+		mes "Hm, even I'm excited.";
+		close3;
+	case 32:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "You came back at the right time.";
+		mes "I've made some progress with my research with the Power Control Devices you brought.";
+		next;
+		mes "[Aureth]";
+		mes "I just finished writing a report about it";
+		mes "along with the energy source that Lloyd is studying.";
+		next;
+		mes "[Aureth]";
+		mes "Here's the report.";
+		mes "Please ^4d4dffbring it to Louis";
+		mes "at the Command Center^000000.";
+		setquest 7617;// Turning In Excavation Report
+		getitem 6748,1;// Daily_Report_He_And_His_Team
+		VER_MAIN = 33;
+		close3;
+	case 33:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Please take that report to Commander Louis.";
+		mes "Writing a report every day is a chore, but an important chore nonetheless.";
+		next;
+		mes "[Aureth]";
+		mes "I've noticed Louis has been watching us. I hope that's a good sign.";
+		close3;
+	case 34:
+		if (checkquest(7618,PLAYTIME) == 2) {
+			erasequest 7618;// Reporting the Results - Down
+			VER_MAIN = 35;
+			mes "[Aureth]";
+			mes "It's time we write another report.";
+			mes "I'll do it after I'm done studying Power Control Devices.";
+			close3;
+		}
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Did you deliver the report?";
+		mes "It may be a simple errand,";
+		mes "but it gives you an opportunity to get acquainted with the Commander.";
+		next;
+		mes "[Aureth]";
+		mes "We're old, so we don't care about fame. You're different.";
+		mes "Winning favor with Rekenber can go a long way.";
+		next;
+		mes "[Aureth]";
+		mes "So let's have you submit reports from now on.";
+		close3;
+	default:
+		cutin "verus_aures.bmp",0;
+		mes "[Aureth]";
+		mes "Ian is working on Power Control Devices.";
+		mes "Lloyd is working on the power supply for the devices.";
+		next;
+		mes "[Aureth]";
+		mes "Well, that leaves me with the menial task of organizing documents.";
+		mes "Could you help those two?";
+		next;
+		mes "[Aureth]";
+		mes "The quicker we gather research materials, the quicker we can report.";
+		close3;
+	}
+
+OnInit:
+	questinfo 7615,QTYPE_QUEST,1;// inaccurate
+	end;
+}
+
+verus04,144,193,3	script	Ian Atnad#ep152	4_M_IAN,{
+	if (checkweight(1301,1) == 0) {
+		mes "- Cannot progress quest because you have too many items in your possession. -";
+		close;
+	}
+	mes "[Ian Atnad]";
+	switch(VER_MAIN) {
+	case 0:
+	case 1:
+	case 2:
+	case 3:
+	case 4:
+		cutin "verus_ian01.bmp",2;
+		mes "...that's distracting.";
+		close3;
+	case 5:
+		cutin "verus_ian01.bmp",2;
+		mes "What have you been loafing around for?";
+		mes "Who the hell is this?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Ian, why are you like this?";
+		mes "This young adventurer was dispatched here from the paradise squad.";
+		mes "He is here to help us.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "..Hm... Rookie.";
+		mes "I do not need such favors, send them back!";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "I see he is acting like this again..";
+		mes "Do you think a bunch of old men can do this task easily?";
+		mes "Stop being so stubborn for a change.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "..Hey, Rookie.";
+		mes "Are you here to monitor me on my daughter's orders?";
+		mes "Is that it?";
+		next;
+		if (select( "Just here to help.", "That is news to me." ) == 2) {
+			cutin "verus_ian02.bmp",2;
+			mes "[Ian Atnad]";
+			mes "Hum? You did not hear about my daughter?";
+			mes "Then I don't need to bring up such idle talk.";
+		}
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "...so you know about my relationship with my daughter?";
+		mes "So are you trying to stay silent and just do your work?";
+		mes "You are trying not to involve yourself?";
+		next;
+		mes "[Ian Atnad]";
+		mes "Good.";
+		mes "Then I will order you to do something you really need right away.";
+		mes "Let's see how well you can follow my instructions.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "This fellow.. He is like this to the end.";
+		mes "Anyway, since we are here, I am at your service as well.";
+		mes "I'm afraid the work we want to do is a bit dangerous.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Stop talking nonsense and come here, Rookie.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Sorry for this.";
+		mes "Let's us go first.";
+		mes "I have your back.";
+		VER_MAIN = 6;
+		close3;
+	case 6:
+		cutin "verus_ian01.bmp",2;
+		mes "So, you said you will help us with our work?";
+		mes "Then let's see how well you do.";
+		mes "There is a plaza if you leave this area and go further inside.";
+		next;
+		mes "[Ian Atnad]";
+		mes "There will be machines from a highly advanced civilization.";
+		mes "There is an essential device to make the machines run.";
+		next;
+		mes "[Ian Atnad]";
+		mes "For now, there is something temporarily called the ^4d4dffOperation Control Device^000000 because it is still under investigation.";
+		mes "Investigate the machine and collect 20 of the Operation Control Devices.";
+		next;
+		mes "[Ian Atnad]";
+		mes "I will see how well you work.";
+		setquest 7615;// Core Collection
+		VER_MAIN = 7;
+		close3;
+	case 7:
+		if (countitem(6749) < 20) {// Operation_Control_Device
+			cutin "verus_ian01.bmp",2;
+			mes "20 Power Control Devices.";
+			mes "Should be no problem for one who is recommended by that supposedly great person, should it?";
+			mes "Hm.";
+			close3;
+		}
+		cutin "verus_ian02.bmp",2;
+		mes ".. Hm..";
+		mes "Don't get smug because of this!";
+		mes "We will use that for research.";
+		mes "Hand over everything you have.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Haha.. This guy is stiff as always.";
+		mes "Is it that hard to say one word of thanks for a job well done?";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Away with you!";
+		mes "Why do you keep interfering.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "It is one of the few joys this old man has, so what can you do.";
+		mes "I will thank you instead.";
+		mes "Anyway, thanks for your trouble.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "You will probably focus on this kind of work in the future.";
+		mes "We wanted to study these operation devices butwe didn't know how terrifying those machines were.";
+		next;
+		mes "[Aures]";
+		mes "I will write the report soon so I will ask for you help then as well.";
+		delitem 6749, countitem(6749);// Operation_Control_Device
+		erasequest 7615;// Core Collection
+		setquest 7619;// Assisting the Excavation Team
+		getexp 750000,500000;
+		VER_MAIN = 8;
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "You two are getting along well.";
+		mes "Go away!";
+		close3;
+	case 8:
+		cutin "verus_ian01.bmp",2;
+		mes "...I still don't trust you.";
+		mes "There's a thing called a contract so I'd like it you just quietly keep working.";
+		next;
+		mes "[Ian Atnad]";
+		mes "You're expecting a word of thanks to come out of me...";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Hey. Leave that stubborn fellow and come here for a minute!";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "...... huh.. what are you doing? Go!";
+		close3;
+	case 9:
+	case 10:
+	case 11:
+	case 12:
+		cutin "verus_ian01.bmp",2;
+		mes "....you..";
+		mes "Why don't you go find something to work on instead of playing around?";
+		next;
+		mes "[Ian Atnad]";
+		mes "I am saying this once more,";
+		mes "I don't think you are here just to help us.";
+		mes "I am sure Arquien is up to something.";
+		next;
+		mes "[Ian Atnad]";
+		mes ".....hm.";
+		mes "Quickly come back to me after you are done with what you are doing.";
+		close3;
+	case 13:
+		cutin "verus_ian01.bmp",2;
+		mes "Are you coming back from sending the report?";
+		mes "Good timing.";
+		mes "Bring me something to snack on.";
+		next;
+		mes "[Ian Atnad]";
+		mes "Not the rations supplies here.. what is that?";
+		mes "Find some delicacy to stimulate my appetite since it's hot and stuffy.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Hey buddy. What kind of delicacy are you looking for here?";
+		mes "Just take what Louis brought.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Ah, you stay out of this.";
+		mes "This is for the rookie to handle by themself.";
+		mes "Find me a ^4d4dffdelicacy that is simple to eat yet juicy and refreshing and has a neat finish^000000!";
+		next;
+		mes "[Ian Atnad]";
+		mes "If you find what I want then I will listen to one wish of yours.";
+		mes "Are you not here in hopes of getting something?";
+		next;
+		cutin "",255;
+		mes "In order to ask Ian Atnad about the ^4d4dffLast Exploration^000000";
+		mes "it seems a ^4d4dffdelicacy that is simple to eat yet juicy and refreshing and has a neat finish^000000 has to be found.";
+		erasequest 7623;// Artnard's Summon
+		setquest 7624;// In Search of a Delicacy
+		VER_MAIN = 14;
+		close;
+	case 14:
+	case 15:
+		cutin "verus_ian03.bmp",2;
+		mes "Are you going to make me repeat myself?";
+		mes "Find me a ^4d4dffdelicacy that is simple to eat yet juicy and refreshing and has a neat finish^000000";
+		mes "and I will grant you what you want.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "If it's hard for you find it with that dimwitted head of yours then try to ask others at least!";
+		mes "Something that will suit my taste.";
+		close3;
+	case 16:
+		cutin "verus_ian01.bmp",2;
+		if (countitem(11519) < 1) {// Beef_Toast
+			mes "..Hm.";
+			mes "Giving up?";
+			mes "Are you really?";
+			mes "I didn't see you as someone who would give up so easily..?";
+			next;
+			mes "[Ian Atnad]";
+			mes "If what I requested is that difficult I will take it back.";
+			mes "However, you must leave this excavation team.";
+			next;
+			cutin "",255;
+			mes "I must find the lost Beef Toast somewhere.";
+			close;
+		}
+		mes "Hm.. is this it?";
+		mes "......Can I indeed eat this conveniently during work without separate silverware.";
+		mes "..Smells of freshly cooked meat.";
+		next;
+		mes "Ian wipes his hands and slowly starts to eat the Beef Toast.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Um...";
+		mes ".....!";
+		mes "This... this flavor!";
+		mes "Packed with the juiciness of finely ground beef!";
+		mes "I can taste the flavor of direct fire..!";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Exotic fruit and vegetables reel in the subtle greasiness of the oil!";
+		mes "...!";
+		next;
+		select("Try the leaves that are wrapped around the outside.");
+		cutin "verus_ian04.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Indeed.. this can be consumed as well.";
+		mes "Rich juiciness and fresh salad.. sweet fruit..";
+		mes "A fresh finishing flavor to wrap all of it up..!";
+		next;
+		mes "[Ian Atnad]";
+		mes "...Kid..";
+		mes "Not bad.";
+		mes "You have satisfied all the conditions I have laid out.";
+		next;
+		mes "[Ian Atnad]";
+		mes "I have no choice.";
+		mes "Alright. I predicted there was something you wanted.";
+		mes "A promise is a promise. What do you want from me?";
+		next;
+		select("To know about the Last Exploration");
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "... so that was it.";
+		mes "I see....";
+		mes "To talk about that..give me some time to think.";
+		mes "....";
+		next;
+		mes "[Ian Atnad]";
+		mes "I need time to organize it as well.";
+		mes ".......";
+		mes "Come back later.";
+		mes "Please.";
+		delitem 11519,1;// Beef_Toast
+		erasequest 7626;// Delicacy for Him
+		setquest 7627;// Last Exploration
+		VER_MAIN = 17;
+		close3;
+	case 17:
+	case 18:
+	case 19:
+		cutin "verus_ian01.bmp",2;
+		mes "Have you arrived?";
+		mes "Have you adjusted to the excavation site?";
+		mes "So what is it this time.";
+		next;
+		switch( select( "About the excavation project", "Converse", "Cancel" ) ) {
+		case 1:
+			callsub S_Daily, 0;
+			close3;
+		case 2:
+			cutin "verus_ian04.bmp",2;
+			mes "[Ian Atnad]";
+			if (VER_MAIN == 17) {
+				mes "It's good that you're here.";
+				mes "The access permit for the Laboratories and Research facilities dropped apparently.";
+				mes "So we plan to expand the investigation area..";
+				next;
+				select("What about the Last Exploration!");
+				cutin "verus_ian01.bmp",2;
+				mes "[Ian Atnad]";
+				mes "..the Last Exploration, it wasn't much.";
+				mes "The exploration site was Juperos.";
+				mes "There were various goals but..";
+				next;
+				mes "[Ian Atnad]";
+				mes "I know well that it was a major turning point for my life.";
+				mes "I feel like there is fog in my head.";
+				mes "And I think I will find another turning point here.";
+				next;
+				mes "[Ian Atnad]";
+				mes "It is just a feeling though.";
+				mes "I don't think the place I've been looking for and this place are related.";
+				next;
+				mes "[Ian Atnad]";
+				mes "So won't you help me for the time being?";
+				mes "....";
+				next;
+				select("I have no choice.");
+				mes "[Ian Atnad]";
+				mes "Yes, this is the last task.";
+				mes "Arquien has to know, too.";
+				mes "We will start soon so come back when you're ready.";
+				VER_MAIN = 18;
+				close3;
+			}
+			if (VER_MAIN == 18) {
+				cutin "verus_ian01.bmp",2;
+				mes "The position of our excavation team has improved quite a bit due to your actions.";
+				mes "Thanks to you we received permission to explore closed areas.";
+				next;
+				mes "[Ian Atnad]";
+				mes "So we are trying to expand the investigating area.";
+				mes "But it seems there was a reason it was shut down.";
+				next;
+				mes "[Ian Atnad]";
+				mes "It seems there are a lot of machines in that area that react sensitively to organisms.";
+				mes "Furthermore there was a veil of peculiar energy..";
+				next;
+				mes "[Ian Atnad]";
+				mes "Check out the Research facilities area first.";
+				mes "Let me know if there is anything peculiar.";
+				completequest 7627;// Last Exploration
+				setquest 7641;// Access Permitted
+				setquest 7642;// Explore Research facilities
+				VER_MAIN = 19;
+				close3;
+			}
+			cutin "verus_ian01.bmp",2;
+			mes "They say the Research facilities area is connected to the road going up from the right side of the plaza.";
+			mes "Well, if you get up there the corporate bastards will be there restricting access.";
+			next;
+			mes "[Ian Atnad]";
+			mes "If you find something worth risking danger for come back right away and tell me!";
+			close3;
+		case 3:
+			cutin "verus_ian01.bmp",2;
+			mes "[Ian Atnad]";
+			mes "Let's look around as well instead of just working.";
+			mes "These kind of opportunities are rare.";
+			close3;
+		}
+	case 20:
+		cutin "verus_ian01.bmp",2;
+		mes "You're finally here.";
+		mes "So, did you get any results?";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Hm...? Wh..what. What is that in your hand?!";
+		mes "How...can this be.";
+		mes "I didn't imagine I would see this here...?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Huh? What is it?";
+		mes "It looks like your eyes are going to pop out.";
+		mes "Let me share in the surprise.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "This..this is.";
+		mes "Is a Memory Record.. Didn't you talk about this to me once?";
+		next;
+		mes "[Ian Atnad]";
+		mes "My great-grandparents had something that looked like this...";
+		mes "It is a type of recording medium that records voices and sounds.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Ooh... Is it magic?";
+		mes "I know a bit of picture magic that can preserve images seen by the eye..";
+		mes "Is it something similar?";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "No. This is not an application of magic.";
+		mes "This is purely a product of science. I've seen my great-grandparents use this to listen to songs or record voices.";
+		next;
+		mes "[Ian Atnad]";
+		mes "In my youth I thought it was merely a toy-like invention of my great-grandparents....";
+		mes "Now I wonder why they did not announce that technology.";
+		next;
+		mes "[Ian Atnad]";
+		mes "It is a memory when I was very young but it looks just like this.";
+		mes "..can we know the contents of the Memory Record with that.";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "I need that! I see!";
+		mes "That..";
+		mes "...Ah....";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Hey, there. Are you okay?";
+		mes "Isn't the device that can decipher it in your house?";
+		next;
+		mes "[Aures]";
+		mes "You.. ah...";
+		mes "I see. Ahahahahaha..";
+		mes "This guy. You don't know where your house is?";
+		mes "Ahahahahaha!";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes ".... Didn't you say Arquien disposed of the house..?";
+		mes "We can easily figure it out if only we had the record player.";
+		next;
+		select("..What? Why are you looking at me?");
+		mes "[Ian Atnad]";
+		mes "You're that child's informant!";
+		mes "So go there and bring back the ^4d4dffrecord player^000000.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "I see. The one who can easily talk to her right now is you.";
+		mes "If it's okay we would like to ask you to do so.";
+		erasequest 7643;// Mysterious Piece
+		setquest 7644;// Record Player
+		VER_MAIN = 21;
+		close3;
+	case 21:
+		cutin "verus_ian01.bmp",2;
+		mes "Find that child Arquien, and bring back the record player.";
+		mes "She must give me at least that much.";
+		close3;
+	case 22:
+	case 23:
+	case 24:
+	case 25:
+		cutin "verus_ian03.bmp",2;
+		mes "I cannot tell what that child is up to.";
+		mes "If she has a problem with me tell her to come and say it to me directly!";
+		next;
+		mes "[Ian Atnad]";
+		mes "...Why in the world is she not going to give it!";
+		mes "Then are you going to go and listen to it every time?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Well, that's not bad either.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Yeah, not bad.";
+		mes "Not!";
+		mes "Anyway.. Since it turned out like this you make sure to bring it. Okay?";
+		close3;
+	case 26:
+		cutin "verus_ian01.bmp",2;
+		mes "Did you see some results this time?";
+		next;
+		select("Tell him the contents of the Memory Record.");
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "...Any chance you misheard it?";
+		mes "Why is Atnad mentioned there?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "You never know.";
+		mes "Since you had the record thing in your house, could it be you are a descendant of this city?";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "I am... a descendant of this city..Verus?";
+		mes "Then why has this place been uncovered now?";
+		mes "Shouldn't we have known of this place much sooner?";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "No no. It was strange.";
+		mes "That's why Juperos.. That's why Juperos wasn't unfamiliar to me so I latched on.";
+		next;
+		mes "[Ian Atnad]";
+		mes "If my ancestors are of this city.. why did they keep it a secret?";
+		next;
+		select("That we don't know.");
+		mes "[Ian Atnad]";
+		mes "Yes.. yes. Of course we do not know.";
+		mes "It seems we will have to find more of those Memory Records to know more.";
+		next;
+		mes "[Ian Atnad]";
+		mes "I am sorry, but.. you went to the Research facilities, right?";
+		mes "Do you know of the enormous underground facility discovered near the laboratories?";
+		next;
+		mes "[Ian Atnad]";
+		mes "First time hearing of it?";
+		mes ".. It seems things like Memory Records are being found in that underground facility as well.";
+		next;
+		mes "[Ian Atnad]";
+		mes "Let's take the initiative before the others start to get interested.";
+		mes "The others can't decipher the messages anyway.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "And, if we gather enough Memory Records.....";
+		mes "Go to Arquien and find out the... ugh... contents.";
+		mes "Do you understand?";
+		erasequest 7647;// Report Memory Record
+		setquest 7648;// Memory Records of the Laboratories
+		VER_MAIN = 27;
+		close3;
+	case 27:
+		cutin "verus_ian01.bmp",2;
+		mes "You will find the restricted area if you go to the connected path North-west of the plaza area.";
+		mes "We have an excavation permit so you can enter.";
+		next;
+		mes "[Ian Atnad]";
+		mes "But I hear there are strange robots that are acting aggressively so be careful.";
+		next;
+		mes "[Ian Atnad]";
+		mes "Come back after you find the entry path to the underground facility there.";
+		mes "Remember ^4d4dffcollecting Memory Records from the laboratories is the goal^000000.";
+		next;
+		mes "[Ian Atnad]";
+		mes "At least five? We need five to decipher it right?";
+		mes "Collect them and go to Arquien.";
+		close3;
+	case 28:
+	case 29:
+		cutin "verus_ian03.bmp",2;
+		mes "This time too!";
+		mes "Why.. why is that child acting like this!";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "What? She wants to participate in this project too?";
+		mes "She will regularly decipher the Memory Records and send the results..?";
+		next;
+		mes "[Ian Atnad]";
+		mes "...Why is she doing this. And so suddenly..?";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "It seems she's become aware of something as well.";
+		mes "Is this not a good thing?";
+		mes "Father and daughter can get along and figure out their ancestors' past.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "...Is it?. Is there no other way?";
+		mes "Anyway, you go and see the results.";
+		mes "You have to check if Arquien is doing it correctly.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "We need somebody to collect the Memory Records as well?";
+		mes "Ahahahahaha";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Well, that's not untrue...";
+		mes "Anyway go along.";
+		close3;
+	case 36:
+		cutin "verus_ian01.bmp",2;
+		mes "Have you arrived?";
+		mes "In fact I have been waiting.";
+		next;
+		select("Is there something wrong?");
+		mes "[Ian Atnad]";
+		mes "Something wrong? Something is wrong.";
+		mes "Something is very wrong.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Rekenber Chief secretary]";
+		mes "Hello?";
+		mes "I am the Chief Secretary of Rekenber's Secretariat, W.H.";
+		mes "I have been waiting.";
+		next;
+		select("Chairman Rekenber's secretary?");
+		mes "[Rekenber Chief secretary]";
+		mes "That is right.";
+		mes "I serve Chairman Rekenber.";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "So, what's the mighty Chairman's secretary doing in a place like this?";
+		mes "I thought there were reports on the excavation being separately sent?";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Rekenber Chief secretary]";
+		mes "The chairman wants to meet all of you.";
+		mes "Come and visit the headquarters in Rihrtarzen anytime.";
+		next;
+		mes "[Rekenber Chief secretary]";
+		mes "It would be better if you could visit as soon as possible..";
+		mes "We request the Memory Record content be left undisclosed for the time being.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Why is that?";
+		mes "Why should we do that?";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Rekenber Chief secretary]";
+		mes "Hm.. I think I know what you are going to say but...";
+		mes "Let's just say the time is not right yet.";
+		next;
+		mes "[Rekenber Chief secretary]";
+		mes "We invited you to discuss the details of that issue as well.";
+		mes "So it would better to visit soon, would it not?";
+		mes "We will be waiting.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "What..is.. going on here..";
+		mes "Hey Ian, did you get on the wrong side of the corporation?";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "I don't know!";
+		mes "We should go anyway since they told us to.";
+		mes "Hey you.";
+		next;
+		select("Me?");
+		mes "[Ian Atnad]";
+		mes "Yes. You.";
+		mes "They say you have to accompany us.";
+		mes "Let's meet at the Rekenber Corporation Headquarters.";
+		mes "It's better to take care of things like this at once.";
+		VER_MAIN = 37;
+		close3;
+	case 37:
+	case 38:
+	case 39:
+		cutin "verus_ian01.bmp",2;
+		mes "What are you doing? Hurry up.";
+		mes "^4d4dffRekenber Headquarters is in Lighthalzen^000000.";
+		mes "You go on ahead. Let's meet there.";
+		close3;
+	default:
+		cutin "verus_ian01.bmp",2;
+		if (VER_MAIN < 36) {
+			mes "I will leave deciphering the Memory Records up to you and Arquien for the time being.";
+			mes "Since you say you won't ask about the Last Exploration any more..";
+			.@string$ = "About the Memory Records";
+			.@daily_variable = 1;
+		}
+		else {
+			mes "You can never know what will happen.";
+			mes "I guess I should be happy with exclusive rights to the Memory Records.";
+		}
+		mes "What is it today?";
+		next;
+		if (select( "About the excavation project", .@string$ ) == 1)
+			callsub S_Daily, .@daily_variable;
+		else {
+			mes "[Ian Atnad]";
+			if (VER_MAIN >= 31) {
+				cutin "verus_ian01.bmp",2;
+				mes "If I think about it this kind of structure isn't bad either.";
+				mes "The content recorded in the Memory Records is what is important.";
+				next;
+				mes "[Ian Atnad]";
+				mes "Since I am getting results without moving a finger..";
+				mes "......Good.. I will think positively. Yeah.";
+				close3;
+			}
+			cutin "verus_ian01.bmp",2;
+			mes "I cannot figure out what Arquien is thinking.";
+			mes "It would be so much better for me to bring back the Record player.";
+			next;
+			cutin "verus_ian02.bmp",2;
+			mes "[Ian Atnad]";
+			mes "What? She wants to participate in this project too?";
+			mes "She will regularly decipher the Memory Records and send the results..?";
+			next;
+			mes "[Ian Atnad]";
+			mes "It's odd she's like this now when she used to hate even dreaming of working.";
+			next;
+			cutin "verus_aures.bmp",0;
+			mes "[Aures]";
+			mes "It seems she's become aware of something as well.";
+			mes "Is this not a good thing?";
+			mes "Father and daughter can get along and figure out their ancestors' past.";
+			next;
+			cutin "verus_ian01.bmp",2;
+			mes "[Ian Atnad]";
+			mes "...Is that so? Is there no other way?";
+			mes "Anyway, it seems we need your help.";
+			mes "You have to check if Arquien is doing it correctly.";
+			next;
+			cutin "verus_aures.bmp",0;
+			mes "[Aures]";
+			mes "We need somebody to collect the Memory Records as well?";
+			mes "Ahahahahaha";
+			next;
+			cutin "verus_ian01.bmp",2;
+			mes "[Ian Atnad]";
+			mes "Well, that's not untrue...";
+			mes "^4d4dffWork with Arquien for the time being.^000000";
+			completequest 7649;// Report Memory Record Content
+			VER_MAIN = 31;
+		}
+		close3;
+	}
+
+S_Daily:
+	mes "[Ian Atnad]";
+	mes "The excavation project?";
+	mes ".. do you mean the Power Control Device?";
+	next;
+	mes "[Ian Atnad]";
+	switch( checkquest(7616,PLAYTIME) ) {// Core Collection - Down
+	case -1:
+		if (isbegin_quest(7615) == 0) {// Core Collection
+			cutin "verus_ian01.bmp",2;
+			mes "Are you talking about today's work?";
+			mes "It may be obvious but it is to look for Power Control Devices.";
+			mes "...";
+			mes "..You don't have to do it if you don't want to.";
+			next;
+			if (select( "I will look for Power Control Devices.", "It is too hard." ) == 1) {
+				mes "[Ian Atnad]";
+				mes "You? You definitely said you will find them yourself?";
+				mes "I have no reason to reject this offer.";
+				mes "Since you said you will do it yourself.";
+				next;
+				mes "[Ian Atnad]";
+				mes "Collect 20 Power Control Devices this time as well.";
+				mes "If we can unravel the secret of Power Control Devices...";
+				mes "We should be able to fix the broken ones and use them ourselves, right?";
+				mes "It will be fun.";
+				next;
+				mes "[Ian Atnad]";
+				mes "... And.. I feel like I've seen it.. feels like I will know it.";
+				mes "Like I will remember. If I research and research until it is stuck in my brain I am sure something will come of it.";
+				setquest 7615;// Core Collection
+				return;
+			}
+			mes "[Ian Atnad]";
+			mes "If you aren't here to work then go away.";
+			mes "You're distracting me.";
+			return;
+		}
+		if (countitem(6749) < 20) {// Operation_Control_Device
+			mes "It's always the same.";
+			mes "It's ^4d4dff20 Power Control Devices^000000.";
+			mes "Since we're already here, I want to do this right so try not to mess up.";
+			return;
+		}
+		mes "You got it right again.";
+		mes "....";
+		mes "What are you looking at?";
+		mes "Drop what you brought and leave.";
+		next;
+		mes "[Ian Atnad]";
+		mes "......This time I will use it well without breaking it.";
+		mes "Let's slowly get into restoration as well.";
+		delitem 6749, countitem(6749);// Operation_Control_Device
+		erasequest 7615;// Core Collection
+		setquest 7616;// Core Collection - Down
+		getexp 1500000,1000000;
+		if (getarg(0) && VERUS_DAILY_QUEST < 10) {// inaccurate
+			if (VER_MAIN != 32)
+				VERUS_DAILY_QUEST++;
+			if (VER_MAIN == 35 && VERUS_DAILY_QUEST == 10)
+				VER_MAIN = 36;
+			else if (VER_MAIN == 31 && VERUS_DAILY_QUEST >= 4)
+				VER_MAIN = 32;
+		}
+		return;
+	case 0:
+	case 1:
+		mes "We are researching it now.";
+		mes "It's possible we will render it useless from the experiments.";
+		mes "Anyway I am busy now so leave me alone.";
+		return;
+	case 2:
+		erasequest 7616;// Core Collection - Down
+		mes "The Power Control Devices we recovered in the past are all broken.";
+		mes "They couldn't withstand all the experiments.";
+		mes "Just like the ones now.";
+		next;
+		cutin "verus_ian04.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Arquien is like that too.";
+		mes "......Because she couldn't withstand it... ..";
+		mes "...Hoo..";
+		return;
+	}
+
+OnInit:
+	questinfo 7615,QTYPE_QUEST,1;// inaccurate
+	setquestinfo_req 7615,7616,0;
+	end;
+}
+
+verus03,167,257,5	script	Access Controller Damhw#atnd	4_M_LGTGUARD,{
+	.@visible_name$ = strnpcinfo(1);
+	if (.@visible_name$ == "Access Controller Damhw")
+		.@npc_name$ = "Damhwa";
+	else if (.@visible_name$ == "Access Controller Geuma")
+		.@npc_name$ = "Geuman";
+	else
+		.@npc_name$ = "Gyuhwa";
+
+	mes "[" + .@npc_name$ + "]";
+	if (VER_MAIN < 19) {
+		mes "I am sorry, only permitted excavation team members are permitted access.";
+		mes "If you work hard with your current excavation team the permit will come.";
+		close;
+	}
+	if (isbegin_quest(7641) == 2) {
+		mes "How is the research and investigation going?";
+		mes "The machines in the restricted area are quite dangerous so please be careful.";
+		close;
+	}
+	mes "This place can only be accessed by permitted members.";
+	mes "Where are you coming from?";
+	next;
+	if (select("I am coming from the atnad excavation", "Why am I prohibited?") == 1) {
+		mes "[" + .@npc_name$ + "]";
+		mes "Ah. You are a member of the Atnad excavation team.";
+		mes "Yes I have confirmed you on the list.";
+		mes "Atnad excavators are permitted access.";
+		next;
+		select("Why is access prohibited?");
+	}
+	mes "[" + .@npc_name$ + "]";
+	mes "Verus City is divided into four large sections.";
+	mes "Did you know?";
+	next;
+	mes "[" + .@npc_name$ + "]";
+	mes "The area currently open are the town and plaza.";
+	mes "While the reason is unknown this place has been closed off and prohibited.";
+	next;
+	mes "[" + .@npc_name$ + "]";
+	mes "During independent corporate investigations before excavator recruitment,";
+	mes "we found that there was a large explosion here and to check the safety of the area,";
+	mes "an inspection period was needed.";
+	next;
+	mes "[" + .@npc_name$ + "]";
+	mes "This is place currently not seen as a great risk other than the dangerous terrain and possibility of";
+	mes "being attacked by machines like the plaza, so access is limited only to the excavation team.";
+	next;
+	mes "[" + .@npc_name$ + "]";
+	mes "Please note that the permit also includes the zone connected in the West.";
+	next;
+	mes "[" + .@npc_name$ + "]";
+	mes "Anyway, since you are permitted you may enter freely from now on.";
+	mes "Then I expect there to be good results!";
+	completequest 7641;// Access Permitted (note : player can enter in verus01 without this quest)
+	close;
+}
+verus03,172,257,3	duplicate(Access Controller Damhw#atnd)	Access Controller Gyuhw#atnd	4_M_LGTGUARD
+verus03,52,250,5	duplicate(Access Controller Damhw#atnd)	Access Controller Geuma#atnd	4_M_LGTGUARD
+
+verus03,52,254,0	script	verus03_to_verus01	WARPNPC,1,1,{
+	if (VER_MAIN < 19) {
+		mes "[Access Controller]";
+		mes "I am sorry but only permitted members can enter from this point.";
+		close;
+	}
+	warp "verus01",243,62;
+	end;
+}
+
+verus03,169,259,0	script	verus03_to_verus02	WARPNPC,1,1,{
+	if (VER_MAIN < 19) {
+		mes "[Access Controller]";
+		mes "I am sorry but only permitted members can enter from this point.";
+		close;
+	}
+	warp "verus02",72,19;
+	end;
+}
+
+
+verus02,60,30,1	script	Strewn paper#e152a01	4_ENERGY_BLUE,{
+	if (checkweight(1301,1) == 0) {
+		mes "- Cannot progress quest because you have too many items in your possession. -";
+		close;
+	}
+	if (VER_MAIN == 20) {
+		mes "Decided to deliver the 'Memory Record' found in the heap to Dr. Ian Atnad.";
+		mes "Right now a piece of paper hard to read is left.";
+		close;
+	}
+	if (isbegin_quest(7645) == 0 && isbegin_quest(7650) == 0 && VER_MAIN != 19) {
+		mes "Nothing special is found.";
+		close;
+	}
+	if (countitem(6757) > 4) {
+		mes "Enough Memory Records are collected.";
+		mes "No more need to go through the heap of garbage.";
+		close;
+	}
+	if (VER_MAIN == 19) {
+		mes "All sorts of documents and office supplies are piled up in a heap.";
+		mes "Most of the writing is damaged and hard to read.";
+	}
+	else
+		mes "Something may come out by a search.";
+	next;
+	if (select("Check adequately.", "Quit.") == 2) {
+		mes "Decided to investigate something else.";
+		close;
+	}
+	progressbar "00ff00",3;
+	hideonnpc strnpcinfo(0);
+	getitem 6757,1;// The_Memory_Recorder
+	if (VER_MAIN == 19) {
+		mes "You find a object never seen before as you go through the clutter of documents and office supplies.";
+		mes "^4d4dffThis needs to be checked if it has enough research value to be brought back to Dr. Ian Atnad.^000000";
+		erasequest 7642;// Explore Research facilities
+		setquest 7643;// Mysterious Piece
+		VER_MAIN = 20;
+	}
+	else {
+		mes "Found a Memory Record between the piles of documents.";
+		mes "Seems like someone hid it there on purpose.";
+	}
+	initnpctimer;
+	close;
+
+OnTimer60000:
+	hideoffnpc strnpcinfo(0);
+	end;
+}
+verus02,178,32,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a02	4_ENERGY_BLUE
+verus02,102,135,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a03	4_ENERGY_BLUE
+verus02,42,37,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a04	4_ENERGY_BLUE
+verus02,155,64,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a05	4_ENERGY_BLUE
+verus02,80,129,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a06	4_ENERGY_BLUE
+verus02,29,129,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a07	4_ENERGY_BLUE
+verus02,125,85,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a08	4_ENERGY_BLUE
+verus02,51,237,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a09	4_ENERGY_BLUE
+verus02,160,150,3	duplicate(Strewn paper#e152a01)	Strewn paper#e152a10	4_ENERGY_BLUE
+
+verus01,123,181,3	script	Verity#Warper	4_F_BERRYTEA,{
+	mes "[Verity]";
+	mes "Hello.";
+	mes "Are you here for the underground bunker investigation?";
+	cutin "EP15_2_brt_2.bmp", 2;
+	next;
+	switch( select( "Yes", "No.", "Use gravity safety device" ) ) {
+	case 1:
+		mes "[Verity]";
+		mes "It seems very dangerous below so please be careful.";
+		cutin "EP15_2_brt_1.bmp",2;
+		next;
+		mes "[Verity]";
+		mes "If you consider the appearance of monsters not seen in other areas, something is...";
+		cutin "EP15_2_brt_3.bmp",2;
+		close2;
+		warp "un_bunker",98,91;
+		end;
+	case 2:
+		break;
+	case 3:
+		mes "[Verity]";
+		mes "You can easily reach the entrance of the last room by using the gravity safety device.";
+		cutin "EP15_2_brt_1.bmp",2;
+		next;
+		if (select( "Use.", "Quit." ) == 1) {
+			mes "[Verity]";
+			if (countitem(6828) < 1) {
+				mes "I see you do not have the gravity safety device with you.";
+				close2;
+				cutin "",255;
+				end;
+			}
+			delitem 6828,1;// Gravity_Safety_Device
+			close2;
+			warp "un_myst",142,38;
+			@weird_piece = 0;
+			end;
+		}
+		break;
+	}
+	mes "[Verity]";
+	mes "Is that so?";
+	mes "Hm...";
+	cutin "EP15_2_brt_1.bmp",2;
+	close3;
+}
+
+un_bunker,382,335,3	script	Box#e152p00	4_ENERGY_BLUE,{
+	if (checkweight(1301,1) == 0) {
+		mes "- Cannot progress quest because you have too many items in your possession. -";
+		close;
+	}
+	if (VER_MAIN == 27 || isbegin_quest(7652) > 0) {// Collect Memory Records of Laboratories
+		if (countitem(6824) < 5) {
+			mes "Enough Memory Records are collected.";
+			mes "No need to keep on crawling and searching.";
+			close;
+		}
+		if (VER_MAIN == 27)
+			mes "Something shiny is seen under the desk.";
+		else
+			mes "Something may come out by a search.";
+		next;
+		if (select( "Check below.", "Quit." ) == 1) {
+			progressbar "00ff00",3;
+			mes "Found a Memory Record under the desk.";
+			hideonnpc strnpcinfo(0);
+			getitem 6824,1;// Experimental_Dong_Memory_Record
+		}
+		close;
+	}
+	mes "Nothing special is found.";
+	close;
+}
+un_bunker,87,167,3	duplicate(Box#e152p00)	Under desk#e152p01	4_ENERGY_BLUE
+un_bunker,316,243,3	duplicate(Box#e152p00)	Under desk#e152p02	4_ENERGY_BLUE
+un_bunker,103,175,3	duplicate(Box#e152p00)	Under desk#e152p03	4_ENERGY_BLUE
+un_bunker,50,292,3	duplicate(Box#e152p00)	Machine Remains#e152p04	4_ENERGY_BLUE
+un_bunker,57,314,3	duplicate(Box#e152p00)	Machine Remains#e152p05	4_ENERGY_BLUE
+un_bunker,128,314,3	duplicate(Box#e152p00)	Machine Remains#e152p06	4_ENERGY_BLUE
+un_bunker,143,308,3	duplicate(Box#e152p00)	Machine Remains#e152p07	4_ENERGY_BLUE
+un_bunker,147,287,3	duplicate(Box#e152p00)	Machine Remains#e152p08	4_ENERGY_BLUE
+un_bunker,245,360,3	duplicate(Box#e152p00)	Thicket#e152p09	4_ENERGY_BLUE
+un_bunker,286,348,3	duplicate(Box#e152p00)	Thicket#e152p10	4_ENERGY_BLUE
+un_bunker,331,375,3	duplicate(Box#e152p00)	Thicket#e152p11	4_ENERGY_BLUE
+un_bunker,288,263,3	duplicate(Box#e152p00)	Document pile#e152p14	4_ENERGY_BLUE
+un_bunker,280,243,3	duplicate(Box#e152p00)	Document pile#e152p15	4_ENERGY_BLUE
+un_bunker,287,304,3	duplicate(Box#e152p00)	Organized food tray#e15	4_ENERGY_BLUE
+un_bunker,321,305,3	duplicate(Box#e152p00)	Organized food tray#e152	4_ENERGY_BLUE
+
+un_bunker,103,95,4	script	Mysterious Device#EP15.?_1	2_BOARD2,{
+	end;
+}
+un_bunker,102,161,4	duplicate(Mysterious Device#EP15.?_1)	Mysterious Device#EP15.?_2	2_BOARD2
+un_bunker,51,272,4	duplicate(Mysterious Device#EP15.?_1)	Mysterious Device#EP15.?_3	2_BOARD2
+un_bunker,295,234,4	duplicate(Mysterious Device#EP15.?_1)	Mysterious Device#EP15.?_4	2_BOARD2
+un_bunker,279,297,4	duplicate(Mysterious Device#EP15.?_1)	Mysterious Device#EP15.?_5	2_BOARD2
+
+//- Wandering Bard Quest
+verus03,129,21,5	script	Wandering Bard#ep15	1_M_BARD,{
+function checkstatusquest;
+
+	mes "[Wandering Bard]";
+	if (isbegin_quest(4295) == 2) {// Wandering Bard
+		mes "I've told you";
+		mes "everything I wanted to tell you.";
+		mes "I hope we'll meet again someplace else.";
+		next;
+		mes "[Wandering Bard]";
+		mes "Until then,";
+		mes "stay safe.";
+		mes "I'm leaving for someplace else";
+		mes "in search of new stories to tell.";
+		mes "You'll be on your way, I'll be on my.";
+		close;
+	}
+
+	switch( checkquest(4296,PLAYTIME) ) {
+	case -1:
+		break;
+	case 0:
+	case 1:
+		mes "I don't have a story to tell you at this moment.";
+		mes "I'm trying to rest my mind.";
+		mes "Why don't you go";
+		mes "rest for a while?";
+		close;
+	case 2:
+		erasequest 4296;
+		break;
+	}
+
+	setarray .@quest_id[0],
+		4297,	// Bard's Story: Some Corporation
+		4298,	// Bard's Story: The President
+		4299,	// Bard's Story: a Scholar in Juno
+		4300,	// Bard's Story: a Mad Scientist
+		4301,	// Bard's Story: Hugel
+		4302;	// Bard's Story: Odin Temple
+	.@size_quest_id = getarraysize(.@quest_id);
+
+	for ( .@i = 0; .@i < .@size_quest_id; .@i++ ) {
+		switch( isbegin_quest(.@quest_id[.@i]) ) {
+		case 0:
+			.@quest_undone[.@size_undone] = .@quest_id[.@i];
+			.@size_undone++;
+			continue;
+		case 1:
+			break;
+		case 2:
+			.@total += 2;
+			continue;
+		}
+		break;
+	}
+
+	if (.@i < .@size_quest_id) {
+		mes "Adventurer,";
+		mes "what story";
+		mes "did you bring me?";
+		next;
+		if (checkstatusquest(.@quest_id[.@i]) == 0) {
+			mes "^ff0000You have not yet met the requirements to complete the quest.^000000";
+			next;
+			if (select( "Return the quest.", "End conversation." ) == 2) {
+				mes "[Wandering Bard]";
+				mes "Please be safe.";
+				close;
+			}
+			mes "[Wandering Bard]";
+			mes "Maybe you're not ready";
+			mes "for that task just yet.";
+			next;
+			mes "[Wandering Bard]";
+			mes "Come back later,";
+			mes "and I'll have a new story ready for you.";
+			mes "Bye for now.";
+			erasequest .@quest_id[.@i];
+			wandering_bard_quest++;
+			if (wandering_bard_quest >= 2) {
+				setquest 4296;// Take a Break
+				wandering_bard_quest = 0;
+			}
+			close;
+		}
+		mes "- Tell your story. -";
+		next;
+		mes "[Wandering Bard]";
+		switch( .@quest_id[.@i] ) {
+		case 4297:
+			mes "Maybe there's";
+			mes "more to it than that,";
+			mes "but we wouldn't know";
+			mes "because it's too late.";
+			next;
+			mes "[Wandering Bard]";
+			mes "Your story dampens my mood,";
+			mes "and I wasn't in a good mood to begin with.";
+			mes "Well, at least I'm glad to see you back in one piece.";
+			break;
+		case 4298:
+			mes "Schwarzwald seems to be";
+			mes "split into";
+			mes "various political factions.";
+			mes "Political intrigues don't mean much";
+			mes "to wandering artists like me.";
+			next;
+			mes "[Wandering Bard]";
+			mes "I'm proud of you, though:";
+			mes "you've become acquainted with the president";
+			mes "and carried out a secret mission for him.";
+			mes "And I'm also glad to see you back in one piece.";
+			break;
+		case 4299:
+			mes "Scholars are such a strange kind.";
+			mes "I can't fathom what joy they'd feel";
+			mes "in studying such a thing.";
+			next;
+			mes "[Wandering Bard]";
+			mes "Of course, to some people";
+			mes "my search for new stories";
+			mes "sounds meaningless.";
+			mes "I don't care, so long as I have";
+			mes "curious adventurers like you with whom to pass the time.";
+			next;
+			mes "[Wandering Bard]";
+			mes "Welcome back.";
+			mes "I really enjoyed this story of yours.";
+			break;
+		case 4300:
+			mes "Only the gods know";
+			mes "who's right";
+			mes "and who's wrong.";
+			mes "I believe that applies to those scientists as well.";
+			next;
+			mes "[Wandering Bard]";
+			mes "If you ask me,";
+			mes "I can't say which side is right or wrong.";
+			mes "Can you?";
+			next;
+			mes "[Wandering Bard]";
+			mes "Welcome back.";
+			mes "I really enjoyed this story of yours.";
+			break;
+		case 4301:
+			mes "The advancement of technology doesn't always mean";
+			mes "the destruction of the old.";
+			mes "Technology cannot advance by itself.";
+			mes "Neither can medical science";
+			mes "and life research.";
+			next;
+			mes "[Wandering Bard]";
+			mes "Um,";
+			mes "at least that's what I've heard.";
+			mes "...Just forget I said that.";
+			next;
+			mes "[Wandering Bard]";
+			mes "The general populace";
+			mes "only likes to hear about happy endings,";
+			mes "so let's focus on";
+			mes "the positive aspects of the story,";
+			next;
+			mes "[Wandering Bard]";
+			mes "Welcome back.";
+			mes "instead of";
+			mes "the dark,";
+			mes "depressing ones.";
+			break;
+		case 4302:
+			mes "I'm not sure if the same thing";
+			mes "won't happen";
+			mes "in this excavation site";
+			mes "because even I can sense a dangerous shadow looming over it.";
+			next;
+			mes "[Wandering Bard]";
+			mes "And about the last person you've met,";
+			mes "um...";
+			next;
+			mes "[Wandering Bard]";
+			mes "Never mind. I shouldn't even have said that.";
+			next;
+			mes "[Wandering Bard]";
+			mes "We can only watch";
+			mes "the factions conspire against each other";
+			mes "and hope for";
+			mes "the best.";
+			mes "As a bard, my duty is simply to spread the word to the public.";
+			next;
+			mes "[Wandering Bard]";
+			mes "I'm glad to see you back in one piece.";
+			mes "And thank you";
+			mes "for such a valuable story.";
+			break;
+		}
+		next;
+		mes "[Wandering Bard]";
+		if (.@total == 10) {
+			mes "Sigh, I hate to say this,";
+			mes "but this will have to be the last time";
+			mes "we share stories with each other.";
+			mes "Thank you for telling me all those interesting tales.";
+			next;
+			mes "[Wandering Bard]";
+			mes "Please take this.";
+			mes "I hope";
+			mes "it'll be useful for you.";
+			mes "I hope we'll meet again someplace else.";
+			completequest .@quest_id[.@i];
+			setquest 4295;// Wandering Bard
+			completequest 4295;
+			getitem 12263,5;// Comp_Battle_Manual
+			wandering_bard_quest = 0;
+			next;
+			mes "[Wandering Bard]";
+			mes "I have to leave";
+			mes "in search of new stories.";
+			mes "You'll be on your way, I'll be on my.";
+			mes "Be safe.";
+			close;
+		}
+		completequest .@quest_id[.@i];
+		setquest 4296;// Take a Break
+		wandering_bard_quest = 0;
+		mes "Please give me some time.";
+		mes "I want to make a new song";
+		mes "based on the story you've just told me.";
+		next;
+		mes "[Wandering Bard]";
+		mes "You should rest and regroup in the meantime.";
+		close;
+	}
+	.@r = rand(.@size_undone);
+	setquest .@quest_undone[.@r];
+	mes "Listen to my story.";
+	next;
+	mes "[Wandering Bard]";
+	switch( .@quest_undone[.@r] ) {
+	case 4297:
+		mes "In the Republic of Schwarzwald,";
+		mes "where science prevails over magic,";
+		mes "a giant corporation of men";
+		next;
+		mes "[Wandering Bard]";
+		mes "is rumored to conduct research";
+		mes "whose purpose is noble and questionable at the same time.";
+		mes "Do you know";
+		mes "what's going on behind the closed doors of the corporation?";
+		next;
+		mes "[Wandering Bard]";
+		mes "You should";
+		mes "look further into what that corporation is doing.";
+		mes "Please be careful.";
+		close;
+	case 4298:
+		mes "Do you know the president of";
+		mes "the Republic of Schwarzwald?";
+		mes "Usually, commoners like you and me";
+		mes "could never dream of meeting such a prominent figure,";
+		next;
+		mes "[Wandering Bard]";
+		mes "but rumor has it you can";
+		mes "if you can find his contact in Lighthalzen.";
+		mes "Not only can you meet the president,";
+		mes "but you can unlock some new adventure.";
+		next;
+		mes "[Wandering Bard]";
+		mes "Look for his contact,";
+		mes "and everything else will take care of itself.";
+		mes "Who knows?";
+		mes "The adventure of your life might await you.";
+		close;
+	case 4299:
+		mes "I wonder where all these researchers";
+		mes "have come from.";
+		mes "They must be";
+		mes "from all over the globe,";
+		mes "seeking the thrills of discovering the unknown.";
+		next;
+		mes "[Wandering Bard]";
+		mes "I think the most daring kind of people are";
+		mes "scholars and researchers,";
+		mes "like those at the Juno Library...";
+		next;
+		mes "[Wandering Bard]";
+		mes "Oh, speaking of the Juno Library,";
+		mes "I know there's a scholar";
+		mes "who does the same kind of research,";
+		mes "you know,";
+		mes "looking at odd-looking things all day.";
+		next;
+		mes "[Wandering Bard]";
+		mes "You should";
+		mes "talk to that scholar.";
+		mes "He may open your eyes to a whole new world.";
+		close;
+	case 4300:
+		mes "Are these people";
+		mes "helping each other?";
+		next;
+		mes "[Wandering Bard]";
+		mes "Rumor has it there's a mad scientist";
+		mes "in Juno, and a group of people are";
+		mes "trying to thwart his dangerous research.";
+		next;
+		mes "[Wandering Bard]";
+		mes "I'd say the statement is biased.";
+		mes "Maybe the scientist is sound,";
+		mes "and those people are dangerous.";
+		mes "Who knows? I would steer clear of both of them, though, if I were you.";
+		close;
+	case 4301:
+		mes "Scholars. Where do they draw the line at their research?";
+		mes "Drifters like you and me";
+		mes "have no care for the world, and I'm glad for that.";
+		next;
+		mes "[Wandering Bard]";
+		mes "In Hugel, there's a scholar";
+		mes "who's rumored to be obsessed with a dangerous experiment.";
+		mes "I want you to go find out";
+		mes "what it is he's after:";
+		mes "happiness or hollow ambition.";
+		close;
+	case 4302:
+		mes "I've seen the same scenery";
+		mes "a long time ago,";
+		mes "when Odin Temple";
+		mes "was first discovered.";
+		next;
+		mes "[Wandering Bard]";
+		mes "Oh, that reminds me";
+		mes "of the story about";
+		mes "the two--no, three people related to Odin Temple.";
+		next;
+		mes "[Wandering Bard]";
+		mes "I wonder if Hugel still has the signboard";
+		mes "to recruit excavators.";
+		mes "Would you go check it out?";
+		mes "I want to hear the story behind those excavators when you get back.";
+		close;
+	}
+
+function checkstatusquest {
+	switch( getarg(0) ) {
+	case 4297:
+		if (lhz_curse >= 31)// Cursed Spirit Quest
+			return true;
+		break;
+	case 4298:
+		if (lhz_boss >= 43)// President Quest
+			return true;
+		break;
+	case 4299:
+		if (yuno_hist >= 10)// Juperos Ruins History Quest
+			return true;
+		break;
+	case 4300:
+		if (metto_q >= 9)// Metto Quest
+			return true;
+		break;
+	case 4301:
+		if (hg_bio >= 9)// Biological Weapon Quest
+			return true;
+		break;
+	case 4302:
+		if (hg_odin >= 60)// Odin Temple Excavation Quest
+			return true;
+		break;
+	}
+	return false;
+}
+}
+
+//- Police Quests
+verus04,133,212,4	script	Police Chief Kesler#EP15_1	2_M_SWORDMASTER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	.@playtime_5318 = checkquest(5318,PLAYTIME);
+	.@quest_5309 = isbegin_quest(5309);
+	mes "[Police Chief Kesler]";
+	if (VER_MAIN < 5 || .@playtime_5318 == 2) {
+		emotion ET_DELIGHT;
+		mes "Nice to meet you. I'm Kesler, chief of the Phantasmagorika Police.";
+	}
+	else {
+		emotion ET_PROFUSELY_SWEAT;
+		mes "Welcome to the Phantasmagorika Police.";
+	}
+	if (.@playtime_5318 == 2)
+		erasequest 5318;
+	next;
+	if (countitem(6753) > 0)// Token_Of_Destruction
+		.@string$ = "I brought Doom Tokens.";
+	else
+		.@string$ = "What should I beware while in Phantasmagorika";
+	switch( select( "The Phantasmagorika Police?", "Is there anything I can do to help?", .@string$, "Nothing." ) ) {
+	case 1:
+		emotion ET_SCRATCH;
+		mes "[Police Chief Kesler]";
+		mes "Oh, do you want to know about us at the ^4E9867Phantasmagorika Police^000000? Why, thank you. Not many people are interested in what we do.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "You may wonder why such a fresh site needs a policing unit. Well, there's a valid reason.";
+		next;
+		select("What's that?");
+		mes "[Police Chief Kesler]";
+		mes "Have you heard of the ^F8081EDoom Prayers^000000?";
+		next;
+		emotion ET_FRET;
+		mes "[Police Chief Kesler]";
+		mes "They're a cult group propagating the end of the world. They vandalize in the name of their god.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "It's only recent that they appeared in Phantasmagorika, but they've done so much damage already that scholars and mercenaries have organized this policing unit.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "The ^F8081EDoom Prayers^000000 are mainly sighted around the ^82ABE9Verus Central Plaza^000000. If you encounter them, feel free to teach them a lesson or two.";
+		next;
+		emotion ET_SMILE;
+		mes "[Police Chief Kesler]";
+		mes "Hah hah, we're short-staffed.";
+		close;
+	case 2:
+		mes "[Police Chief Kesler]";
+		if (BaseLevel < 140) {
+			mes "I understand your enthusiasm, but you should focus on your training for now.";
+			next;
+			emotion ET_SORRY;
+			mes "[Police Chief Kesler]";
+			mes "Phantasmagorika is more dangerous than you think.";
+			close;
+		}
+		if (.@playtime_5318 == 0 || .@playtime_5318 == 1) {
+			mes "Thank you for offering to help, but we can manage on our own.";
+			close;
+		}
+		if (.@quest_5309 != 1) {
+			if (.@quest_5309 == 0) {
+				emotion ET_HUK;
+				mes "I'm sorry, what did you say?";
+				next;
+				select("Is there anything I can do to help?");
+			}
+			mes "[Police Chief Kesler]";
+			mes "Wow, you're the first person to ever offer help. We're spread thin, dealing with the Doom Prayers and everything else at the same time.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "I haven't had time to hear about the work-related difficulties trat the members of my unit may be experiencing.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Could you make a tour around Phantasmagorika and talk to the police officers?";
+			next;
+			if (select( "Sure.", "Maybe later." ) == 2) {
+				emotion ET_CRY;
+				mes "[Police Chief Kesler]";
+				mes "Oh, I thought you wanted to help.";
+				close;
+			}
+			if (.@quest_5309 == 2)
+				erasequest 5309;
+			setquest 5309;
+			mes "[Police Chief Kesler]";
+			mes "Thank you.";
+			close;
+		}
+		if (isbegin_quest(5310) == 0 || isbegin_quest(5311) == 0 || isbegin_quest(5312) == 0 || isbegin_quest(5313) == 0) {
+			emotion ET_QUESTION;
+			mes "You haven't met with all the members.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Please come back when you have.";
+			close;
+		}
+		mes "You've met with all my members. Thank you.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "I'm glad none of them--Salgran, Gerev, Seiden, and Piffs--are having problems.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "Please take this small token of my appreciation.";
+		next;
+		completequest 5309;
+		for ( .@quest_id = 5310; .@quest_id <= 5313; .@quest_id++ )
+			erasequest .@quest_id;
+		for ( .@quest_id = 5314; .@quest_id <= 5317; .@quest_id++ ) {
+			if (isbegin_quest(.@quest_id) == 2) {
+				erasequest .@quest_id;
+				.@success++;
+			}
+		}
+		setquest 5318;// Come Back Tomorrow
+		getexp 200000 + (200000 * .@success),0;
+		mes "[Police Chief Kesler]";
+		mes "If you are not busy tomorrow, could you come back and help me again?";
+		close;
+	case 3:
+		if (isbegin_quest(5304) == 2) {
+			mes "[Police Chief Kesler]";
+			mes "Oh, didn't you bring some Doom Tokens a while ago?";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "I guess you haven't left? You must like being here. So do I. Hah hah hah!";
+			while(1) {
+				next;
+				switch( select( "What can I get in exchange for Doom", "Give Doom Tokens.", "Nothing." ) ) {
+				case 1:
+					mes "[Police Chief Kesler]";
+					mes "I remember telling you this when you first brought Doom Tokens, but all right, I don't mind telling you again.";
+					next;
+					mes "[Police Chief Kesler]";
+					mes "Doom Tokens are exchangeable with Packing Envelope that is often found in the excavation site.";
+					next;
+					mes "[Police Chief Kesler]";
+					mes "Scholars have found out the envelop activates various effects when opened.";
+					next;
+					mes "[Police Chief Kesler]";
+					mes "The duration of the effects is short, but it's still better than nothing.";
+					continue;
+				case 2:
+					.@amount = countitem(6753);// Token_Of_Destruction
+					delitem 6753, .@amount;
+					getitem 22611, .@amount;// Packed_Envelope
+					mes "[Police Chief Kesler]";
+					mes "You've brought " + .@amount + " Doom Tokens. I can give you " + .@amount + " Packing Envelopes.";
+					next;
+					mes "[Police Chief Kesler]";
+					mes "Thank you, and keep up the good work.";
+					close;
+				case 3:
+					emotion ET_SCRATCH;
+					mes "[Police Chief Kesler]";
+					mes "Um, didn't you say you had Doom Tokens?";
+					close;
+				}
+			}
+		}
+		if (countitem(6753) > 0) {// Token_Of_Destruction
+			emotion ET_HUK;
+			mes "[Police Chief Kesler]";
+			mes "Oh, the Doom Prayers carry this ^F8081EDoom Token^000000.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Where did you find this?";
+			next;
+			select("Tell him where you found it.");
+			emotion ET_THANKS;
+			mes "[Police Chief Kesler]";
+			mes "Thank you so much for helping us to maintain public peace.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "You deserve a reward, but I can't think of anything good.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Hm...";
+			next;
+			emotion ET_SURPRISE;
+			mes "[Police Chief Kesler]";
+			mes "Oh, I've got an idea! Bring me ^F8081EDoom Tokens^000000, and I'll exchange them with ^4E9867Packing Envelope^000000.";
+			next;
+			select("Packing Envelope?");
+			mes "[Police Chief Kesler]";
+			mes "It's an envelope often discovered in the excavation site.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Scholars have found out the envelope activates various effects when opened.";
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Would you like to exchange your Doom Tokens with Packing Envelope now? Or you can do it later.";
+			next;
+			if (select( "Exchange now.", "Do it later." ) == 2) {
+				mes "[Police Chief Kesler]";
+				mes "Sure, no problem. It's not like Doom Tokens have an expiration date.";
+			}
+			else {
+				.@amount = countitem(6753);// Token_Of_Destruction
+				delitem 6753, .@amount;
+				getitem 22611, .@amount;// Packed_Envelope
+				mes "[Police Chief Kesler]";
+				mes "In exchange for your " + .@amount + " Doom Tokens, I've given you " + .@amount + " Packing Envelopes.";
+			}
+			setquest 5304;// Police Chief Kesler
+			completequest 5304;
+			next;
+			mes "[Police Chief Kesler]";
+			mes "Thank you for your continue support in the subjugation of the Doom Prayers.";
+			close;
+		}
+		emotion ET_HUK;
+		mes "[Police Chief Kesler]";
+		mes "Oh, is this your first time in Phantasmagorika?";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "This site was only recently discovered, and therefore fairly safe. I can't think of anything you should be worried about...";
+		next;
+		emotion ET_HUK;
+		mes "[Police Chief Kesler]";
+		mes "Oh, strike that--there's one thing.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "This ^82ABE9Verus Excavation Site^000000 is safe, but if you're planning to move to the ^82ABE9Verus Central Plaza^000000, then make sure you're prepared for the worst.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "By the way the excavation of this site just has begun, and everything in it must be kept in place until the excavation is over.";
+		next;
+		emotion ET_FRET;
+		mes "[Police Chief Kesler]";
+		mes "But those Doom Payers are making it impossible. Bah! %$#@#$#@";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "I'm going bald, worrying over them so much. I didn't have much hair to begin with.";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "...";
+		next;
+		mes "[Police Chief Kesler]";
+		mes "Um, didn't mean to rant about my hair.";
+		next;
+		emotion ET_OK;
+		mes "[Police Chief Kesler]";
+		mes "Just be careful not to break anything that has been discovered in this site.";
+		close;
+	case 4:
+		emotion ET_STARE_ABOUT;
+		mes "[Police Chief Kesler]";
+		mes "This is the first thing I tell every new visitor: if you see the ^F8081EDoom Prayers^000000, don't hesitate to report to the nearest police station.";
+		close;
+	}
+}
+
+verus03,36,113,4	script	Police Officer Salgran#EP15	2_M_THIEFMASTER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	.@quest_5305 = isbegin_quest(5305);// Police Officer Salgran
+	.@quest_5309 = isbegin_quest(5309);// Police Chief's Request
+	.@quest_5310 = isbegin_quest(5310);// Salgran's Problem
+	.@quest_5314 = isbegin_quest(5314);// Salgran's Request
+	.@quest_5315 = isbegin_quest(5315);// Gerev's Request
+	.@quest_5316 = isbegin_quest(5316);// Seiden's Request
+	.@quest_5317 = isbegin_quest(5317);// Piffs's Request
+	.@playtime_5318 = checkquest(5318,PLAYTIME);
+
+	if (.@quest_5309 != 1) {
+		specialeffect EF_SLEEPATTACK;
+		mes "[Police Officer Salgran]";
+		mes "Zzz... Zzz...";
+		next;
+		emotion ET_PROFUSELY_SWEAT;
+		mes "[Police Officer Salgran]";
+		mes "Ch-Chief, I'm sorry!";
+		next;
+		mes "He's talking in his sleep.";
+		close;
+	}
+	if (.@quest_5315 == 1 || .@quest_5316 == 1 || .@quest_5317 == 1) {
+		mes "[Police Officer Salgran]";
+		mes "You're working a different sector at this moment. Come back when you're done there.";
+		close;
+	}
+	if (.@quest_5310 == 0 && .@playtime_5318 < 2) {
+		switch(.@quest_5314) {
+		case 0:
+			if (.@quest_5305 == 0) {
+				specialeffect EF_SLEEPATTACK;
+				select("Excuse me.");
+				emotion ET_HUK;
+				mes "[Police Officer Salgran]";
+				mes "Ch-Chief Kesler! I-I wasn't dozing off!";
+				next;
+				emotion ET_THINK;
+				mes "[Police Officer Salgran]";
+				mes "...";
+				next;
+				mes "[Police Officer Salgran]";
+				mes "Whew, you're not the Chief. Who are you?";
+				next;
+				mes "[" + strcharinfo(0) + "]";
+				mes "Your chief in the middle of Phantasmagorika sent me.";
+				next;
+				emotion ET_SEXY;
+				mes "[Police Officer Salgran]";
+				mes "Thank goodness, he didn't come himself. He must be busy, eh? Welcome. Could you help me out with something?";
+				next;
+				if (select( "Help.", "Maybe next time." ) == 2) {
+					emotion ET_OHNO;
+					if (isbegin_quest(5305) == 0) {
+						setquest 5305;// Police Officer Salgran
+						completequest 5305;// Police Officer Salgran
+					}
+					setquest 5310;// Salgran's Problem
+					mes "[Police Officer Salgran]";
+					mes "You must be busy. All right, then tell the Chief that everything's good in my sector.";
+					close;
+				}
+				mes "[Police Officer Salgran]";
+				mes "Thanks! I've been saddled with some tiresome duties, and I could use your help.";
+				next;
+				mes "[Police Officer Salgran]";
+				mes "You know the Doom Prayers are in our midst, don't you?";
+				next;
+				mes "[Police Officer Salgran]";
+				mes "They've been leaving illegal promotional leaflets all over the place, and whatever paper they used, it sticks to the ground like gum.";
+				next;
+				mes "[Police Officer Salgran]";
+				mes "I need to get rid of the leaflets before they permanently glue themselves.";
+				next;
+				mes "[Police Officer Salgran]";
+				mes "Could you get rid of them if you see them in the site? They're giving me a headache.";
+				next;
+				if (select( "OK", "Maybe next time." ) == 2) {
+					// inaccurate
+					emotion ET_OHNO;
+					if (isbegin_quest(5305) == 0) {
+						setquest 5305;// Police Officer Salgran
+						completequest 5305;// Police Officer Salgran
+					}
+					setquest 5310;// Salgran's Problem
+					mes "[Police Officer Salgran]";
+					mes "You must be busy. All right, then tell the Chief that everything's good in my sector.";
+					close;
+				}
+				setquest 5314;
+				mes "[Police Officer Salgran]";
+				mes "Thank you. Come back when you get rid of 10 Illegal Leaflets.";
+				close;
+			}
+			emotion ET_WRAP;
+			mes "[Police Officer Salgran]";
+			mes "Welcome back. Did the Chief send you again?";
+			next;
+			emotion ET_QUESTION;
+			mes "[Police Officer Salgran]";
+			mes "Great, can you help me again to get rid of those illegal leaflets?";
+			next;
+			if (select( "Help.", "Maybe next time." ) == 1) {
+				setquest 5314;
+				mes "[Police Officer Salgran]";
+				mes "Thank you. Come back when you get rid of 10 Illegal Leaflets.";
+				close;
+			}
+			setquest 5310;// Salgran's Problem
+			mes "[Police Officer Salgran]";
+			mes "You must be busy. All right, then tell the Chief that everything's good in my sector.";
+			close;
+		case 1:
+			mes "[Police Officer Salgran]";
+			mes "Wow, I thought you left a minute ago, and you're already back. Did you get rid of the Illegal Leaflets?";
+			next;
+			switch( select( "I did.", "Where can I find them?", "Can I not do this?", "Never mind." ) ) {
+			case 1:
+				mes "[Police Officer Salgran]";
+				if (checkquest(5314,HUNTING) == 2) {
+					mes "Oh, good job! The Chief never forgets a favor. He might reward you more handsomely depending on his mood.";
+					completequest 5314;
+					setquest 5310;
+					close;
+				}
+				emotion ET_OHNO;
+				mes "Hmpf, of course no one can be so quick. I asked you to get rid of at least 10 Illegal Leaflets.";
+				close;
+			case 2:
+				emotion ET_HUK;
+				mes "[Police Officer Salgran]";
+				mes "They're everywhere in Phantasmagorika. You can't not see them.";
+				next;
+				emotion ET_SCRATCH;
+				mes "[Police Officer Salgran]";
+				mes "Do you have some sort of vision problem? There's no way you can miss them.";
+				close;
+			case 3:
+				erasequest 5314;
+				if (isbegin_quest(5305) == 0) {
+					setquest 5305;
+					completequest 5305;
+				}
+				setquest 5310;
+				mes "[Police Officer Salgran]";
+				mes "I want to say no, but I can't force you. Just go tell the Chief that everything's good in my sector.";
+				close;
+			case 4:
+				emotion ET_SCRATCH;
+				mes "[Police Officer Salgran]";
+				mes "You're silly.";
+				close;
+			}
+		case 2:
+			break;
+		}
+	}
+	mes "[Police Officer Salgran]";
+	mes "Haven't you reported to the Captain yet? I told you everything's fine in my sector.";
+	close;
+}
+
+
+verus03,116,36,6	script	Police Officer Gerev#EP15_1D	4_M_ALCHE_A,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	.@quest_5306 = isbegin_quest(5306);// Police Officer Gerev
+	.@quest_5309 = isbegin_quest(5309);// Police Chief's Request
+	.@quest_5311 = isbegin_quest(5311);// Gerev's Problem
+	.@quest_5314 = isbegin_quest(5314);// Salgran's Request
+	.@quest_5315 = isbegin_quest(5315);// Gerev's Request
+	.@quest_5316 = isbegin_quest(5316);// Seiden's Request
+	.@quest_5317 = isbegin_quest(5317);// Piffs's Request
+	.@playtime_5318 = checkquest(5318,PLAYTIME);
+
+	mes "[Police Officer Gerev]";
+	if (.@quest_5309 != 1) {
+		emotion ET_OTL;
+		mes "Ugh, I can feel the stress building up inside... Argh, this place is giving me an ulcer!";
+		next;
+		mes "He's pulling his hair in agony.";
+		close;
+	}
+	if (.@quest_5314 == 1 || .@quest_5316 == 1 || .@quest_5317 == 1) {
+		emotion ET_PROFUSELY_SWEAT;
+		mes "Ugh, I'm having stomach cramps. Come back when you're done with your current assignment.";
+		close;
+	}
+	if (.@quest_5311 == 0 && .@playtime_5318 < 2) {
+		switch(.@quest_5315) {
+		case 0:
+			if (.@quest_5306 == 0) {
+				emotion ET_CONFUSE;
+				mes "Argh, where's my pen? I had it when I left the station. Did those robots steal it from me?";
+				next;
+				mes "[" + strcharinfo(0) + "]";
+				mes "Check behind your ear.";
+				next;
+				emotion ET_HUK;
+				mes "[Police Officer Gerev]";
+				mes "Err? I don't remember putting it there.";
+				next;
+				emotion ET_QUESTION;
+				mes "[Police Officer Gerev]";
+				mes "Oops, sorry. How may I help you?";
+				next;
+				mes "[" + strcharinfo(0) + "]";
+				mes "Your chief in the middle of Phantasmagorika sent me.";
+				next;
+				emotion ET_FRET;
+				mes "[Police Officer Gerev]";
+				mes "Ah, Chief Kesler sent you. If I didn't know him, I'd have thought he was too busy to come see me. I bet I'm busier than him, though.";
+				next;
+				if (select( "I can help.", "Sorry I can't be of help." ) == 2) {
+					if (isbegin_quest(5306) == 0) {
+						setquest 5306;
+						completequest 5306;
+					}
+					setquest 5311;// Gerev's Problem
+					mes "[Police Officer Gerev]";
+					mes "You're willing to help the Chief, but not me. Why not because I'm not a chief?";
+					next;
+					emotion ET_STARE;
+					mes "[Police Officer Gerev]";
+					mes "*Snort* Just go tell Chief Kesler everything's quiet in my sector.";
+					close;
+				}
+				emotion ET_BIGTHROB;
+				mes "[Police Officer Gerev]";
+				mes "Are you sure? Because I really hate to be disappointed.";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "As you know, the Doom Prayers are among us. Grr, just thinking about them makes me grind me teeth.";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "Yesterday I walked over one of their traps and sprained my ankle,";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "on top of everything else that's happened to me.";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "Sigh, could you disarm their traps?";
+				next;
+				if (select( "Sure thing.", "Maybe next time." ) == 2) {
+					emotion ET_FRET;
+					if (isbegin_quest(5306) == 0) {
+						setquest 5306;
+						completequest 5306;
+					}
+					setquest 5311;
+					mes "[Police Officer Gerev]";
+					mes "*Snort* I knew it. Just go tell Chief Kesler everything's quiet in my sector.";
+					close;
+				}
+				setquest 5315;
+				mes "[Police Officer Gerev]";
+				mes "Thank you. Please disarm 10 traps installed in Phantasmagorika.";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "I appreciate it if you can get rid of those in my vicinity first.";
+				close;
+			}
+			mes "Hello again. Did the Chief send you?";
+			next;
+			mes "[Police Officer Gerev]";
+			mes "If you're not busy, could you disarm the Doom Prayers' traps scattered across Phantasmagorika?";
+			next;
+			if (select( "Sure.", "Maybe next time." ) == 1) {
+				setquest 5315;
+				trap_doom_prayers = 0;
+				mes "[Police Officer Gerev]";
+				mes "Thank you. Please disarm 10 traps installed in Phantasmagorika.";
+				close;
+			}
+			emotion ET_SCRATCH;
+			setquest 5311;
+			mes "[Police Officer Gerev]";
+			mes "You're just as busy, eh? No worries. I have other adventurers helping me. Please tell Chief Kesler everything's good in my sector.";
+			close;
+		case 1:
+			emotion ET_HUK;
+			mes "Wow, did you already disarm all the traps?";
+			next;
+			switch( select( "I did!", "Where are the traps?", "I have a more pressing matter at hand.", "Never mind." ) ) {
+			case 1:
+				if (trap_doom_prayers >= 10) {
+					completequest 5315;// Gerev's Request
+					setquest 5311;// Gerev's Problem
+					trap_doom_prayers = 0;
+					mes "[Police Officer Gerev]";
+					mes "Thank you. I feel much better, knowing there are fewer traps around me. Please tell Chief Kesler that everything's well in my sector.";
+					close;
+				}
+				emotion ET_OTL;
+				mes "[Police Officer Gerev]";
+				mes "I'm already on the verge of a breakdown. You don't have to push.";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "You haven't finished disarming 10 traps. I can see one in front of me. Why don't you start with that?";
+				close;
+			case 2:
+				emotion ET_STARE;
+				mes "[Police Officer Gerev]";
+				mes "Oh no, haven't you seen any trap at all?";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "Look for ??? written on the ground. That's the Doom Prayers' signature.";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "I can see one right in front of me. Ugh, my stomach...";
+				next;
+				mes "[Police Officer Gerev]";
+				mes "I must be stressed out again. I feel my stomach tightening...";
+				close;
+			case 3:// can redo
+				erasequest 5315;// Gerev's Request
+				trap_doom_prayers = 0;
+				if (isbegin_quest(5306) == 0) {
+					setquest 5306;
+					completequest 5306;
+				}
+				close;
+			case 4:
+				emotion ET_OTL;
+				mes "[Police Officer Gerev]";
+				mes "...W-what? Ugh... M-my stomach...";
+				close;
+			}
+		case 2:
+			break;
+		}
+	}
+	emotion ET_DELIGHT;
+	mes "I feel much better now. Please tell Chief Kesler that everything's good in my sector.";
+	close;
+}
+
+verus03,81,241,6	script	Police Officer Seiden#EP15_1	4_M_ORIENT02,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	.@quest_5307 = isbegin_quest(5307);// Police Officer Seiden
+	.@quest_5309 = isbegin_quest(5309);// Police Chief's Request
+	.@quest_5312 = isbegin_quest(5312);// Seiden's Problem
+	.@quest_5314 = isbegin_quest(5314);// Salgran's Request
+	.@quest_5315 = isbegin_quest(5315);// Gerev's Request
+	.@quest_5316 = isbegin_quest(5316);// Seiden's Request
+	.@quest_5317 = isbegin_quest(5317);// Piffs's Request
+	.@playtime_5318 = checkquest(5318,PLAYTIME);
+
+	emotion ET_KIK;
+	mes "[Police Officer Seiden]";
+	if (.@quest_5309 != 1) {
+		mes "*Chuckle* I know who you are, but I don't want to talk to you.";
+		next;
+		mes "He's creepy.";
+		close;
+	}
+	if (.@quest_5314 == 1 || .@quest_5315 == 1 || .@quest_5317 == 1) {
+		mes "*Chuckle* Try one thing at a time, or Phantasmagorika's curse will be upon you.";
+		close;
+	}
+	if (.@quest_5312 == 0 && .@playtime_5318 < 2) {
+		switch(.@quest_5316) {
+		case 0:
+			if (.@quest_5307 == 0) {
+				mes "*Chuckle* The Chief sent you. I know because I've been waiting.";
+				next;
+				emotion ET_SURPRISE, playerattached();
+				mes "[" + strcharinfo(0) + "]";
+				mes "?!";
+				next;
+				mes "[Police Officer Seiden]";
+				mes "Don't ask me how--I have my sources. Let's cut to the chase.";
+				next;
+				mes "[Police Officer Seiden]";
+				mes "I could use your help, if you're willing and not busy.";
+				next;
+				if (select( "Sure.", "Not now." ) == 2) {
+					emotion ET_SCRATCH;
+					if (isbegin_quest(5307) == 0) {
+						setquest 5307;
+						completequest 5307;
+					}
+					setquest 5312;// Seiden's Problem
+					mes "[Police Officer Seiden]";
+					mes "I don't understand. My friend swore this never failed on people, hm... Oh well, tell Chief Kesler everything's good on my end.";
+					close;
+				}
+				emotion ET_KIK;
+				mes "[Police Officer Seiden]";
+				mes "*Chuckle* I knew it. Ah, just forget I said that.";
+				next;
+				mes "[Police Officer Seiden]";
+				mes "I'm having a bit of difficulty doing my job.";
+				next;
+				mes "[Police Officer Seiden]";
+				mes "The Doom Prayers throw stones at us, and I'm worried they might hurt innocent people.";
+				next;
+				mes "[Police Officer Seiden]";
+				mes "Could you pick up the stones you see in Phantasmagorika? 10 stones should suffice for now. Keep doing that and we'll get to all of them one day.";
+				next;
+				if (select( "I'll be back.", "Maybe next time." ) == 2) {
+					emotion ET_SCRATCH;
+					if (isbegin_quest(5307) == 0) {
+						setquest 5307;
+						completequest 5307;
+					}
+					setquest 5312;// Seiden's Problem
+					mes "[Police Officer Seiden]";
+					mes "I don't understand. My friend swore this never failed on people, hm... Oh well, tell Chief Kesler everything's good on my end.";
+					close;
+				}
+				emotion ET_KIK;
+				setquest 5316;
+				count_stone_seiden = 0;
+				mes "[Police Officer Seiden]";
+				mes "*Chuckles* Pebbles don't count. Please bring 10 stones big enough to fit your hand.";
+				close;
+			}
+			mes "*Chuckle* I thought it's about time.";
+			next;
+			mes "[Police Officer Seiden]";
+			mes "*Chuckle* Please clear Phantasmagorika of stones, just like the last time.";
+			next;
+			if (select( "Sure.", "Maybe next time." ) == 1) {
+				setquest 5316;
+				count_stone_seiden = 0;
+				mes "[Police Officer Seiden]";
+				mes "Pebbles don't count. Please bring 10 stones big enough to fit your hand.";
+				close;
+			}
+			setquest 5312;
+			mes "[Police Officer Seiden]";
+			mes "You're still busy, huh? No worries. Just tell Chief Kesler that everything's quiet in my sector.";
+			close;
+		case 1:
+			mes "*Chuckle* Did you pick up all the stones?";
+			next;
+			switch( select( "I did.", "Where are they?", "I don't have time for them.", "Never mind." ) ) {
+			case 1:
+				emotion ET_KIK;
+				mes "[Police Officer Seiden]";
+				if (count_stone_seiden < 10) {
+					if (countitem(7049) < 10)
+						mes "*Chuckle* Where are they? Pick them up, or the spirits of the victims will haunt you forever.";
+					else
+						mes "*Chuckle* Look around--there are stones everywhere. Where did you find this stone, then?";
+					close;
+				}
+				if (countitem(7049) < 10) {
+					mes "*Chuckle* Where are the stones? Please bring them to me.";
+					close;
+				}
+				delitem 7049,10;// Stone
+				count_stone_seiden = 0;
+				completequest 5316;
+				if (isbegin_quest(5307) == 0) {
+					setquest 5307;
+					completequest 5307;
+				}
+				setquest 5312;
+				mes "[Police Officer Seiden]";
+				mes "*Chuckle* Thank you. The spirits of the victims are appeased for now.";
+				close;
+			case 2:
+				emotion ET_KIK;
+				mes "[Police Officer Seiden]";
+				mes "*Chuckle* Stones are everywhere.";
+				next;
+				mes "[Police Officer Seiden]";
+				mes "Search the ground. *Chuckle* Do I really have to tell you that?";
+				close;
+			case 3:
+				emotion ET_KIK;
+				erasequest 5316;
+				count_stone_seiden = 0;
+				if (isbegin_quest(5307) == 0) {
+					setquest 5307;
+					completequest 5307;
+				}
+				setquest 5312;
+				mes "[Police Officer Seiden]";
+				mes "*Chuckle* Please leave your stones somewhere away from traffic. Beware the spirits of the victims!";
+				close;
+			case 4:
+				emotion ET_KIK;
+				mes "[Police Officer Seiden]";
+				mes "*Chuckle* Got it. Keep up the good work.";
+				close;
+			}
+		case 2:
+			break;
+		}
+	}
+	mes "*Chuckle* Be careful not to incur anyone's wrath.";
+	close;
+}
+
+verus03,127,36,4	script	???#EP15_1D_01	4_CRACK,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	.@quest_5315 = isbegin_quest(5315);// Gerev's Request
+	.@quest_5316 = isbegin_quest(5316);// Seiden's Request
+	if (.@quest_5315 == 1 || .@quest_5316 == 1) {
+		if (.@quest_5315 == 1) {
+			if (trap_doom_prayers >= 10) {
+				mes "You disarmed all the traps you had to.";
+				close;
+			}
+			emotion ET_SURPRISE;
+			mes "The ??? on the ground looks suspicious. What do you want to do?";
+			next;
+			if (select( "Examine.", "Leave it." ) == 2) {
+				mes "You've decided not to touch the suspicious object.";
+				close;
+			}
+			progressbar "00ff00",2;
+			if (rand(2))
+				mes "You've decided it's nothing.";
+			else {
+				mes "You disarmed all the traps of the Doom Prayers.";
+				trap_doom_prayers++;
+			}
+		}
+		else {
+			if (count_stone_seiden > 9) {
+				mes "You picked up 10 large stones. Take them to the police officer.";
+				close;
+			}
+			mes "You found a stone half-buried in the ground. Do you want to pick it up?";
+			next;
+			if (select( "Pick it up.", "Leave it." ) == 2) {
+				mes "You've decided to leave the pebble.";
+				close;
+			}
+			if (rand(2))
+				mes "This pebble is too small to inflict serious damage when thrown.";
+			else {
+				mes "You picked up a dangerously large stone.";
+				getitem 7049,1;
+				count_stone_seiden++;
+			}
+		}
+		initnpctimer;
+		disablenpc strnpcinfo(0);
+		close;
+	}
+	end;
+
+OnTimer30000:
+	stopnpctimer;
+	enablenpc strnpcinfo(0);
+	end;
+}
+verus03,119,17,4	duplicate(???#EP15_1D_01)	???#EP15_1D_02	4_CRACK
+verus03,163,33,4	duplicate(???#EP15_1D_01)	???#EP15_1D_03	4_CRACK
+verus03,207,47,4	duplicate(???#EP15_1D_01)	???#EP15_1D_04	4_CRACK
+verus03,225,245,4	duplicate(???#EP15_1D_01)	???#EP15_1D_05	4_CRACK
+verus03,169,181,4	duplicate(???#EP15_1D_01)	???#EP15_1D_06	4_CRACK
+verus03,122,139,4	duplicate(???#EP15_1D_01)	???#EP15_1D_07	4_CRACK
+verus03,80,230,4	duplicate(???#EP15_1D_01)	???#EP15_1D_08	4_CRACK
+verus03,42,105,4	duplicate(???#EP15_1D_01)	???#EP15_1D_09	4_CRACK
+verus03,99,235,4	duplicate(???#EP15_1D_01)	???#EP15_1D_10	4_CRACK
+verus03,81,207,4	duplicate(???#EP15_1D_01)	???#EP15_1D_11	4_CRACK
+verus03,226,243,4	duplicate(???#EP15_1D_01)	???#EP15_1D_12	4_CRACK
+verus03,148,144,4	duplicate(???#EP15_1D_01)	???#EP15_1D_13	4_CRACK
+verus03,74,44,4	duplicate(???#EP15_1D_01)	???#EP15_1D_14	4_CRACK
+verus03,20,54,4	duplicate(???#EP15_1D_01)	???#EP15_1D_15	4_CRACK
+verus03,74,212,4	duplicate(???#EP15_1D_01)	???#EP15_1D_16	4_CRACK
+verus03,42,47,4	duplicate(???#EP15_1D_01)	???#EP15_1D_17	4_CRACK
+verus03,80,195,4	duplicate(???#EP15_1D_01)	???#EP15_1D_18	4_CRACK
+verus03,134,72,4	duplicate(???#EP15_1D_01)	???#EP15_1D_19	4_CRACK
+verus03,45,45,4	duplicate(???#EP15_1D_01)	???#EP15_1D_20	4_CRACK
+verus03,115,235,4	duplicate(???#EP15_1D_01)	???#EP15_1D_21	4_CRACK
+verus03,76,194,4	duplicate(???#EP15_1D_01)	???#EP15_1D_22	4_CRACK
+verus03,166,32,4	duplicate(???#EP15_1D_01)	???#EP15_1D_23	4_CRACK
+verus03,121,42,4	duplicate(???#EP15_1D_01)	???#EP15_1D_24	4_CRACK
+verus03,141,36,4	duplicate(???#EP15_1D_01)	???#EP15_1D_25	4_CRACK
+
+verus04,202,258,4	script	Police Officer Piffs#EP15_1	4_M_SAGE_C,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	.@quest_5308 = isbegin_quest(5308);// Police Officer Piffs
+	.@quest_5309 = isbegin_quest(5309);// Police Chief's Request
+	.@quest_5313 = isbegin_quest(5313);// Piffs's Problem
+	.@quest_5314 = isbegin_quest(5314);// Salgran's Request
+	.@quest_5315 = isbegin_quest(5315);// Gerev's Request
+	.@quest_5316 = isbegin_quest(5316);// Seiden's Request
+	.@quest_5317 = isbegin_quest(5317);// Piffs's Request
+	.@playtime_5318 = checkquest(5318,PLAYTIME);
+
+	mes "[Police Officer Piffs]";
+	if (.@quest_5309 != 1) {
+		emotion ET_HUNGRY;
+		mes "*Yum Yum*";
+		mes "Um, this meat is delicious!";
+		next;
+		mes "He's chewing on meat.";
+		close;
+	}
+	if (.@quest_5314 == 1 || .@quest_5315 == 1 || .@quest_5316 == 1) {
+		emotion ET_BEST;
+		mes "Geez, are you working multiple sectors at the same time? You're superhuman.";
+		close;
+	}
+	if (.@quest_5313 == 0 && .@playtime_5318 < 2) {
+		switch(.@quest_5317) {
+		case 0:
+			if (.@quest_5308 == 0) {
+				emotion ET_HUNGRY;
+				mes "*Yum Yum* Delish!";
+				next;
+				mes "[" + strcharinfo(0) + "]";
+				mes "Excuse me.";
+				next;
+				emotion ET_HUK;
+				mes "[Police Officer Piffs]";
+				mes "Oops.";
+				mes "My apologies; I shouldn't have been snacking in public.";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "Hello. My name is Piffs, and I'm a Sage. I came to study Phantasmagorika.";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "Did the Chief send you? This is great.";
+				next;
+				emotion ET_QUESTION;
+				mes "[Police Officer Piffs]";
+				mes "I'm running short on some supplies, but I can't leave my post unattended. Can you help me?";
+				next;
+				if (select("Sure thing.", "Not now.") == 2) {
+					if (isbegin_quest(5308) == 0) {
+						setquest 5308;// Police Officer Piffs
+						completequest 5308;
+					}
+					setquest 5313;// Piffs's Problem
+					mes "[Police Officer Piffs]";
+					mes "I understand. If you change your mind, though, come back to me.";
+					close;
+				}
+				mes "[Police Officer Piffs]";
+				mes "Hah hah hah, thank you.";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "This area is fairly safe, but my colleagues stationed at the Plaza are prone to injury caused by the Doom Prayers.";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "I need to gather herbs for them, but like I said I can't leave my post unattended.";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "I know where some good herbs grow in this place. Could you gather them for me?";
+			}
+			else {
+				mes "Hah hah! Hello again. Did the Chief send you?";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "If you're not busy, I'd like to ask you to gather some more herbs. Is that okay?";
+			}
+			next;
+			if (select( "Sure.", "Maybe next time." ) == 1) {
+				setquest 5317;// Piffs's Request
+				mes "[Police Officer Piffs]";
+				mes "Thank you. Look around thickets, and you'll see some herbs. I won't need more than 10.";
+				close;
+			}
+			if (isbegin_quest(5308) == 0) {
+				setquest 5308;// Police Officer Piffs
+				completequest 5308;
+			}
+			setquest 5313;// Piffs's Problem
+			mes "[Police Officer Piffs]";
+			mes "I understand. If you change your mind, though, come back to me.";
+			close;
+		case 1:
+			emotion ET_QUESTION;
+			mes "Welcome back. Did you find all the herbs?";
+			next;
+			switch( select( "There you go.", "Where can I find them?", "I have a more pressing matter at hand.", "Never mind." ) ) {
+			case 1:
+				mes "[Police Officer Piffs]";
+				if (countitem(6754) > 9) {
+					delitem 6754,10;// Collected_Medicinal_Herbs
+					completequest 5317;
+					setquest 5313;
+					if (isbegin_quest(5308) == 0) {
+						setquest 5308;
+						completequest 5308;
+					}
+					mes "Thank you for helping me stock up on herbs.";
+					next;
+					mes "[Police Officer Piffs]";
+					mes "This herb smells good. I think it'll make good garnish for meat... *Ahem* I'm not saying I want to eat it.";
+				}
+				else {
+					mes "Where are the herbs you said you gathered?";
+					next;
+					mes "[Police Officer Piffs]";
+					mes "No, I don't eat herbs. I just want to keep them in stock for my colleagues.";
+				}
+				close;
+			case 2:
+				mes "[Police Officer Piffs]";
+				mes "Where can you find herbs?";
+				next;
+				mes "[Police Officer Piffs]";
+				mes "Look around thickets, and you'll see some herbs.";
+				close;
+			case 3:
+				changequest 5317,5313;
+				if (isbegin_quest(5308) == 0) {
+					setquest 5308;
+					completequest 5308;
+				}
+				if (countitem(6754))
+					delitem 6754, countitem(6754);// Collected_Medicinal_Herbs
+				mes "[Police Officer Piffs]";
+				mes "You can leave now. I'll send word to the Chief.";
+				close;
+			case 4:
+				mes "[Police Officer Piffs]";
+				mes "Don't forget I need 10 herbs.";
+				close;
+			}
+		case 2:
+			break;
+		}
+	}
+	emotion ET_BEST;
+	mes "Don't you worry. I'll keep this area safe.";
+	close;
+}
+
+verus04,187,219,4	script	Thicket#EP15_1D_01	4_CREEPER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to continue. -";
+		close;
+	}
+	if (isbegin_quest(5317) == 1) {// Piffs's Request
+		if (countitem(6754) > 9) {
+			mes "This kind of thicket grows everywhere in Phantasmagorika.";
+			close;
+		}
+		mes "This thicket looks like it's hiding some herbs. What do you want to do?";
+		next;
+		if (select( "Gather the herb.", "Leave it." ) == 2) {
+			mes "You've decided to forget about it.";
+			close;
+		}
+		if (rand(2)) {
+			progressbar "00ff00",2;
+			mes "No herbs were found in the thicket.";
+		}
+		else {
+			getitem 6754,1;// Collected_Medicinal_Herbs
+			mes "Gathered the herb.";
+		}
+		disablenpc strnpcinfo(0);
+		initnpctimer;
+		close;
+	}
+	end;
+
+OnTimer60000:
+	enablenpc strnpcinfo(0);
+	stopnpctimer;
+	end;
+}
+verus04,167,206,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_02	4_CREEPER
+verus04,198,198,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_03	4_CREEPER
+verus04,143,205,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_04	4_CREEPER
+verus04,125,265,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_05	4_CREEPER
+verus04,92,203,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_06	4_CREEPER
+verus04,97,204,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_07	4_CREEPER
+verus04,85,189,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_08	4_CREEPER
+verus04,64,191,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_09	4_CREEPER
+verus04,55,185,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_10	4_CREEPER
+verus04,42,185,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_11	4_CREEPER
+verus04,29,189,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_12	4_CREEPER
+verus04,40,223,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_13	4_CREEPER
+verus04,32,240,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_14	4_CREEPER
+verus04,27,243,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_15	4_CREEPER
+verus04,34,248,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_16	4_CREEPER
+verus04,52,251,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_17	4_CREEPER
+verus04,72,247,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_18	4_CREEPER
+verus04,75,243,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_19	4_CREEPER
+verus04,81,252,4	duplicate(Thicket#EP15_1D_01)	Thicket#EP15_1D_20	4_CREEPER
+
+//- New Power Source
+verus03,107,177,3	script	Luke Lapez#atnd09	4_M_EDEN_GUARDER,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	mes "[Luke]";
+	if (VER_MAIN < 14) {
+		cutin "looke_rapez04.bmp",0;
+		mes "Don't worry about him.";
+		mes "He knows what he's doing.";
+		close3;
+	}
+	if (VER_MAIN == 14) {
+		cutin "looke_rapez02.bmp",0;
+		mes "...?";
+		mes "Interesting.";
+		mes "He wants something ready to eat, juicy, refreshing, and clean-tasting?";
+		next;
+		cutin "looke_rapez03.bmp",0;
+		mes "[Luke]";
+		mes "Well, I've got an idea. Bring me some ingredients, and I'll cook something for you.";
+		mes "I'm pretty sure it'll fit the bill.";
+		next;
+		mes "[Luke]";
+		mes "The problem is";
+		mes "the ingredients are difficult to find.";
+		mes "I've learned this recipe while traveling across dimensions.";
+		next;
+		cutin "looke_rapez04.bmp",0;
+		mes "[Luke]";
+		mes "Well, it'll be you who has to find the ingredients:";
+		mes "2 Meats, 1 Mora Mandarin, and 1 Banana. Can you get them?";
+		next;
+		cutin "looke_rapez02.bmp",0;
+		mes "[Luke]";
+		mes "Some of the fruits grow near the ^4d4dffMisty Forest Labyrinth^000000.";
+		mes "You'll have to look hard for them.";
+		erasequest 7624;// In Search of a Delicacy
+		setquest 7625;// Count On Me
+		VER_MAIN = 15;
+		close3;
+	}
+	if (VER_MAIN == 15) {
+		if (countitem(517) < 2 || countitem(11520) < 1 || countitem(513) < 1) {
+			cutin "looke_rapez04.bmp",0;
+			mes "Did you forget the ingredients?";
+			mes "2 Meats, 1 Mora Mandarin, and 1 Banana.";
+			next;
+			mes "[Luke]";
+			mes "Some of the fruits grow near the ^4d4dffMisty Forest Labyrinth^000000.";
+			mes "...";
+			close3;
+		}
+		cutin "looke_rapez02.bmp",0;
+		mes "This should suffice.";
+		mes "I haven't cooked it in a while, but the recipe is in my head.";
+		next;
+		mes "[Luke]";
+		mes "Done.";
+		mes "This food should fit all the conditions you told me.";
+		next;
+		cutin "",255;
+		mes "Luke gave you Mora's specialty food, Beef Toast.";
+		mes "It perfectly fits everything Ian said he wanted.";
+		delitem 517,2;	// Meat
+		delitem 11520,1;// Mora_Mandarin
+		delitem 513,1;	// Banana
+		getitem 11519,1;// Beef_Toast
+		erasequest 7625;// Count On Me
+		setquest 7626;// Delicacy for Him
+		VER_MAIN = 16;
+		close;
+	}
+	if (VER_MAIN == 16) {
+		cutin "looke_rapez01.bmp",0;
+		mes "*Chuckle*";
+		mes "If you need more, it'll be easier to buy it from the Mora Village.";
+		mes "Do whatever it takes to win favor with that old man.";
+		next;
+		mes "[Luke]";
+		mes "Or you won't find the answer the Captain wanted.";
+		mes "Good luck.";
+		close3;
+	}
+	cutin "looke_rapez03.bmp",0;
+	mes "This place is boring, just like everywhere else.";
+	mes "Aren't there stronger monsters?";
+	next;
+	cutin "",255;
+	mes "[Lloyd]";
+	mes "Don't say that.";
+	mes "You'll jinx us.";
+	mes "I'm a brave Cat, but my claws can't even scratch those.";
+	next;
+	cutin "looke_rapez01.bmp",0;
+	mes "[Luke]";
+	mes "Alright, alright.";
+	mes "But don't worry.";
+	mes "I'm not stupid.";
+	mes "I'll never put my charges in danger.";
+	close3;
+}
+
+verus03,103,177,5	script	Machinist Lloyd#atnd09	4_M_BOSSCAT,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	mes "[Lloyd]";
+	if (VER_MAIN < 9) {
+		mes "You're";
+		mes "looking down your nose at me because I'm a Cat.";
+		mes "Tsk, tsk.";
+		mes "You Humans are so superficial.";
+		next;
+		mes "[Lloyd]";
+		mes "Just keep your distance and mind your own business.";
+		mes "You and I will be fine so long as you don't steal my hard work.";
+		close;
+	}
+	if (VER_MAIN == 9) {
+		mes "You're looking down your nose at me because I'm a Cat.";
+		next;
+		select("Are you Lloyd?");
+		mes "[Lloyd]";
+		mes "Yeah. What's up?";
+		mes "Huh? Aureth sent you?";
+		mes "To check up on my progress?";
+		next;
+		mes "[Lloyd]";
+		mes "Oh, I'm in trouble.";
+		mes "I must live up to his expectations,";
+		mes "but my research has been stagnant.";
+		next;
+		mes "[Lloyd]";
+		mes "Hey, could you help";
+		mes "me with something?";
+		next;
+		switch( select( "Sure.", "What is a Cat doing here?", "No." ) ) {
+		case 1:
+			break;
+		case 2:
+			mes "[Lloyd]";
+			mes "Unlike many from Malangdo Island, I've always been interested in new technologies and cultures.";
+			mes "I worked at companies, and I've learned alchemy.";
+			next;
+			mes "[Lloyd]";
+			mes "I came to Verus City when I heard the news of its discovery. I was told that I must be in an excavation team to be in the city.";
+			next;
+			mes "[Lloyd]";
+			mes "Aureth helped me to get in.";
+			mes "I'm also a member of the Arnard Excavation Team.";
+			next;
+			break;
+		case 3:
+			cutin "looke_rapez04.bmp",0;
+			mes "[Luke]";
+			mes "Sorry to interrupt,";
+			mes "but you're from the Eden Group to help the excavation team.";
+			next;
+			mes "[Luke]";
+			mes "Your job is to help Lloyd.";
+			mes "You can't say no.";
+			next;
+			cutin "",255;
+			mes "[Lloyd]";
+			mes "He's right!";
+			mes "You're obligated to help me with my research!";
+			next;
+			break;
+		}
+		mes "[Lloyd]";
+		mes "Let's cut to the chase.";
+		mes "Hey, Human help.";
+		mes "Get 10 empty glass bottles,";
+		mes "and collect condensed energy found around the remnants of robots.";
+		next;
+		mes "[Lloyd]";
+		mes "This place is littered with broken robots and machines.";
+		mes "Clouds of physical energy are discovered near them.";
+		next;
+		mes "[Lloyd]";
+		mes "Just bring empty bottles close to the energy, and it'll enter the bottles.";
+		mes "Bring me 10 bottles.";
+		next;
+		mes "[Lloyd]";
+		mes "I'll be waiting.";
+		erasequest 7620;// Young Blood?
+		setquest 7621;// Bottling the Energy
+		VER_MAIN = 10;
+		close;
+	}
+	if (VER_MAIN == 10) {
+		if (countitem(6756) < 10) {// Cohesive_Energy
+			mes "This place is littered with broken robots and machines.";
+			mes "Clouds of physical energy are discovered near them.";
+			next;
+			mes "[Lloyd]";
+			mes "Just bring empty bottles close to the energy, and it'll enter the bottles.";
+			mes "Bring me 10 bottles.";
+			next;
+			mes "[Lloyd]";
+			mes "You must be dumber than you look if you have to ask twice.";
+			close;
+		}
+		mes "Oh, this is enough.";
+		mes "You're good.";
+		mes "My estimation of you went up a notch.";
+		next;
+		mes "[Lloyd]";
+		mes "You've made my job easier.";
+		mes "Finally, I can be useful to Aureth.";
+		mes "If I find the cause of the condensation of energy and its possible applications, maybe";
+		next;
+		mes "[Lloyd]";
+		mes "Ian and I can reactivate the robots in this place.";
+		mes "That's what we've wanted all along.";
+		next;
+		mes "[Lloyd]";
+		mes "Tell Aureth I'm making progress.";
+		mes "Good job, Human.";
+		mes "I'll look forward to using your service again.";
+		delitem 6756,10;// Cohesive_Energy
+		erasequest 7621;// Bottling the Energy
+		setquest 7622;// Good News!
+		VER_MAIN = 11;
+		close;
+	}
+	if (VER_MAIN > 10 && VER_MAIN < 17) {
+		mes "Soon I'll need your service on a daily basis.";
+		mes "Don't fret and take one for the team.";
+		close;
+	}
+	switch( checkquest(7629,PLAYTIME) ) {
+	case -1:
+		if (isbegin_quest(7628) == 0) {
+			mes "You know the drill: collect condensed energy.";
+			mes "You'll do that for me, won't you?";
+			next;
+			if (select( "Sure.","Decline." ) == 2) {
+				mes "[Lloyd]";
+				mes "Why, do you have something else to do?";
+				mes "All right then,";
+				mes "I'll ask Luke to take me around.";
+				next;
+				cutin "looke_rapez01.bmp",0;
+				mes "[Luke]";
+				mes "I thought you'd never ask!";
+				mes "I've been itching for some action.";
+				close3;
+			}
+			mes "[Lloyd]";
+			mes "All you have to do is collect energy that naturally gathers around the remnants of robots and machines.";
+			mes "I need 10 bottles every day.";
+			setquest 7628;// New Power Source
+			close;
+		}
+		if (countitem(6756) < 10) {
+			mes "All you have to do is collect energy that naturally gathers around the remnants of robots and machines.";
+			mes "I need 10 bottles every day.";
+			close;
+		}
+		mes "I think I like you!";
+		mes "Not as much as Aureth and Luke, though.";
+		mes "All right, I'll make good use of this energy.";
+		next;
+		mes "[Lloyd]";
+		mes "Come back tomorrow.";
+		mes "Well, you might as well come back every day at this time.";
+		mes "You can't say no.";
+		mes "I need you.";
+		delitem 6756,10;// Cohesive_Energy
+		changequest 7628,7629;// Tomorrow for Tomorrow's Energy
+		getexp 150000,1000000;
+		close;
+	case 0:
+	case 1:
+		mes "I'm analyzing the collected energy.";
+		mes "...";
+		next;
+		mes "[Lloyd]";
+		mes "Are you dense?";
+		mes "That means I want to be left alone!";
+		close;
+	case 2:
+		erasequest 7629;
+		mes "Hm, maybe I need to find a special storage method.";
+		mes "The energy dissipates so easily.";
+		next;
+		mes "[Lloyd]";
+		mes "I'll need more bottles of the energy.";
+		mes "How are you?";
+		mes "Are you ready to take one for the team?";
+		close;
+	}
+}
+verus03,127,145,0	script	Machine Remnant#atnd01	4_ENERGY_RED,{
+	if (checkweight(1301,1) == 0) {
+		mes "- You are carrying too many items to proceed with the quest. -";
+		close;
+	}
+	if (isbegin_quest(7628) == 0 && VER_MAIN != 10) {
+		mes "You don't have to collect more energy at this moment.";
+		close;
+	}
+	if (countitem(6756) > 9)// Cohesive_Energy
+		mes "You have enough ^4d4dffCondensed Energy^000000.";
+	else if (countitem(713) < 1)
+		mes "^4d4dffEmpty Bottle^000000 is required to collect Condensed Energy.";
+	else {
+		mes "A thick cloud of energy is visible between the broken pieces of metal.";
+		mes "Bring an empty bottle close to the waving edges of the cloud to collect the energy.";
+		next;
+		progressbar "00ff00",3;
+		delitem 713,1;// Empty Bottle
+		getitem 6756,1;// Cohesive_Energy
+		mes "Collected Condensed Energy!";
+		initnpctimer;
+		hideonnpc strnpcinfo(0);
+	}
+	close;
+
+OnTimer30000:
+	stopnpctimer;
+	hideoffnpc strnpcinfo(0);
+	end;
+}
+verus03,84,152,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd02	4_ENERGY_RED
+verus03,104,181,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd03	4_ENERGY_RED
+verus03,204,202,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd04	4_ENERGY_RED
+verus03,219,199,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd05	4_ENERGY_RED
+verus03,260,194,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd06	4_ENERGY_RED
+verus03,198,181,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd07	4_ENERGY_RED
+verus03,207,115,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd08	4_ENERGY_RED
+verus03,54,78,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd09	4_ENERGY_RED
+verus03,24,74,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd10	4_ENERGY_RED
+verus03,41,121,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd11	4_ENERGY_RED
+verus03,62,120,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd12	4_ENERGY_RED
+verus03,44,195,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd13	4_ENERGY_RED
+verus03,124,61,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd14	4_ENERGY_RED
+verus03,168,229,3	duplicate(Machine Remnant#atnd01)	Machine Remnant#atnd15	4_ENERGY_RED
+
+
+//- Krotzel's Request
+verus02,79,31,4	script	Krotzel#1	4_F_HUWOMAN,{
+	if (VER_MAIN < 19)
+		end;
+	mes "[Krotzel]";
+	switch(VER_REPORTER) {
+	case 0:
+		mes "I am Monthly Brigan's senior reporter Krotzel! As this place is revealed to the many, many Adventurers are gathering here.";
+		next;
+		mes "[Krotzel]";
+		mes "Not a lot of information has been relayed to general Adventurers. So we are interviewing Adventurers ourselves! Doing the legwork and gathering information.";
+		next;
+		mes "[Krotzel]";
+		mes "Please give us good information if you have it. If it is a good piece of info we can give you a small reward.";
+		next;
+		mes "[Krotzel]";
+		mes "Who are we? We are Monthly Brigan's Adventure team 2...";
+		next;
+		mes "[Krotzel]";
+		mes "...?";
+		next;
+		mes "[Krotzel]";
+		mes "Where did everybody go? Ha these pains in the butt! Adventure team 2 consists of two senior reporters, one veteran and one Probationary reporter for a total of four.";
+		next;
+		mes "[Krotzel]";
+		mes "I am in charge of interviews and arranging stories and my colleague is photographs. Veteran senior acts as a guide. As a magazine specializing in Adventure we go to cover dangerous places a lot.";
+		next;
+		mes "[Krotzel]";
+		mes "While I am not completely lacking combat experience my forte is reporting! But where did everybody really go? One might think we're on a picnic!";
+		VER_REPORTER = 1;
+		close;
+	case 1:
+		mes "I am most worried about the Probationary member. He is still new so won't know anything. It is highly possible he followed the veteran senior. If it is okay, can you find him?";
+		next;
+		if (select( "Look for Probationary reporter", "Too busy" ) == 1) {
+			mes "[Krotzel]";
+			mes "Thank you so much. If he followed the veteran senior he might have gone to the ruined area. I saw his limpid eyes looking at the senior.";
+			next;
+			mes "[Krotzel]";
+			mes "I will look around in this area. You don't have to bring him. Even though it's the Probationary period he should know how to work by himself! Just let me know where he is when you find him.";
+			close2;
+			setquest 13195;// Monthly Brigan
+			VER_REPORTER = 2;
+			end;
+		}
+		close;
+	case 2:
+		mes "If she followed the veteran senior she might have gone to the ruined area. If you find her please let me know where she is.";
+		close;
+	case 3:
+		mes "As I thought. I am glad he is at least safe. If it's okay can you find my colleague Sunny Kim as well?";
+		next;
+		mes "[Krotzel]";
+		mes "We got along well since joining and eventually made a team together so I cannot help but be worried.";
+		next;
+		mes "[Krotzel]";
+		mes "She started singing about the architecture style as soon as she came here so she will be around this area.";
+		close2;
+		setquest 13196;// Monthly Brigan
+		VER_REPORTER = 4;
+		end;
+	case 4:
+		mes "We got along well since joining and eventually made a team together so I cannot help but be worried.";
+		next;
+		mes "[Krotzel]";
+		mes "He started to sing about the architecture style as soon as he came here so he will be around this area. I beg you.";
+		close;
+	case 5:
+		mes "I don't think it can be helped that people will worry. The last veteran reporter, Grizzly Grylls! Designated survival reporter!";
+		next;
+		mes "[Krotzel]";
+		mes "The nickname stuck because he survived anywhere but honestly he has no talent in combat. He is just lucky.";
+		next;
+		mes "[Krotzel]";
+		mes "Although I think he will be safe... can you find out where about he is? He probably ran to the ruins there...";
+		close2;
+		setquest 13197;// Monthly Brigan
+		VER_REPORTER = 6;
+		end;
+	case 6:
+		mes "Find me Grizzly Grylls, veteran reporter who can survive anywhere. I think he may be in the ruins to the east...";
+		next;
+		mes "[Krotzel]";
+		mes "Come to think of it he's similar to a guild master I interviewed a while back. The fact that he jumps into danger and comes back no matter what... Easier to avoid danger in the first place!";
+		close;
+	case 7:
+		mes "Good! So everybody is safe. Everybody will create a news item on their own, right?";
+		next;
+		mes "[Krotzel]";
+		mes "If they don't return tomorrow I should look for them.";
+		close2;
+		setquest 13199;// Krotzel's Request - Complete
+		getexp 1500000,1000000;
+		VER_REPORTER = 8;
+		end;
+	default:
+		break;
+	}
+	switch( checkquest(13199,PLAYTIME) ) {
+	case -1:
+	case 2:
+		if (isbegin_quest(13198) == 0) {// Monthly Brigan : Krotzel's Request
+			mes "You're the adventurer I met last time! Our team members still haven't returned so I am worried. If it's okay, can you check if they are safe?";
+			next;
+			switch( select( "Look for team members", "Right now is not a good time", "Converse" ) ) {
+			case 1:
+				mes "[Krotzel]";
+				mes "They all have a professional mindset so if they haven't finished working just see if they are safe.";
+				if (isbegin_quest(13198) > 0)
+					erasequest 13199;// Krotzel's Request - Complete
+				setquest 13195;// Monthly Brigan
+				setquest 13196;// Monthly Brigan
+				setquest 13197;// Monthly Brigan
+				setquest 13198;// Monthly Brigan : Krotzel's Request
+				close;
+			case 2:
+				mes "[Krotzel]";
+				mes "I will wait for you.";
+				close;
+			case 3:
+				mes "[Krotzel]";
+				mes "What is monthly Brigan? You know. Booty that can be obtained from monsters. It is not a jewel but it can provide quite an income. It is like sweet rain to an Adventurer.";
+				next;
+				mes "[Krotzel]";
+				mes "The boss' goal is that. Not the jackpot for an Adventurer but let's make a magazine that can provide sweet info! That's kind of the purpose apparently.";
+				close;
+			}
+		}
+		if (isbegin_quest(13195) > 0 || isbegin_quest(13196) > 0 || isbegin_quest(13197) > 0) {
+			mes "I should check if everybody is safe. Please find and see if all three are working hard.";
+			close;
+		}
+		mes "Well we are all safe today. Because we are Adventure team 2! Thank you for helping!";
+		close2;
+		erasequest 13198;// Monthly Brigan : Krotzel's Request
+		setquest 13199;// Krotzel's Request - Complete
+		getexp 1000000,500000;
+		end;
+	case 0:
+	case 1:
+		mes "It seems they are still working. I'm worried but I should be focusing on my work! We are the monthly Brigan Adventure team 2!";
+		close;
+	}
+}
+
+verus02,134,169,4	script	Photo Journalist#1	4_F_GON,{
+	if (VER_REPORTER < 4 || VER_REPORTER == 6 || VER_REPORTER == 7) {
+		mes "[Sunny Kim]";
+		mes "Monthly Brigan's senior photo journalist...Ahah! Monsters keep coming! It's dangerous!";
+		close;
+	}
+	if (VER_REPORTER == 4) {
+		mes "[Sunny Kim]";
+		mes "Krotzel? Ah you mean my partner. I still have to capture the cool architecture style and monsters. Tell her I am fine.";
+		close2;
+		erasequest 13196;// Monthly Brigan
+		VER_REPORTER = 5;
+		end;
+	}
+	if (VER_REPORTER == 5) {
+		mes "[Sunny Kim]";
+		mes "I thought I worked a lot on the ground but I am impressed! I will capture all of it in my palm!";
+		close;
+	}
+	switch( select( "Ask if safe", "Is there anything to help with?", "Converse" ) ) {
+	case 1:
+		mes "[Sunny Kim]";
+		if (isbegin_quest(13196) == 0) {
+			mes "How is this incredible architecture underground? The more I know the more curious I am.";
+			close;
+		}
+		mes "Of course! I have struggled a lot at the bottom! I am still taking photos. Tell her I will go when I am ready.";
+		close2;
+		erasequest 13196;
+		end;
+	case 2:
+		mes "[Sunny Kim]";
+		switch( checkquest(13203,PLAYTIME) ) {
+		case -1:
+		case 2:
+			switch( checkquest(13202,HUNTING) ) {
+			case -1:
+				mes "Do you have any thoughts on helping me as a righteous Adventurer?";
+				next;
+				if (select( "Help Photo Journalist Sunny Kim", "Decline" ) == 1) {
+					mes "[Sunny Kim]";
+					mes "Photographing cool structures, dynamic monsters and an Adventurer! I am taking photos with two themes but you can help me with one!";
+					next;
+					mes "[Sunny Kim]";
+					mes "Take care of the surrounding monsters for me. I will capture it in photos! Then I can photograph the area in peace!";
+					if (isbegin_quest(13203))
+						erasequest 13203;// Photo Journalist's Request - Complete
+					setquest 13202;// Monthly Brigan : Photo Journalist's Request
+				}
+				close;
+			case 0:
+			case 1:
+				mes "So you have to stand there and take care of the monsters! With dynamic and large movements if possible! Photographs need a proper concept.";
+				close;
+			case 2:
+				mes "Thanks to you, I think a great piece of work will be produced! I will go back to taking building photos.";
+				erasequest 13202;// Monthly Brigan : Photo Journalist's Request
+				setquest 13203;// Photo Journalist's Request - Complete
+				getexp 1000000,500000;
+				close;
+			}
+		case 0:
+		case 1:
+			mes "I took a lot of photos but I need time to confirm them. Some of them may be out of focus or I may need better photos, so next time.";
+			close;
+		}
+	case 3:
+		mes "[Sunny Kim]";
+		mes "I can't always take great photos. Photography is about instants. But you can save the moment for a long time. That is the beauty of photography!";
+		close;
+	}
+}
+
+verus01,41,103,4	script	Exhausted Journalist#1	52,{
+	if (VER_REPORTER < 6) {
+		mes "[Grylls]";
+		mes "Haha are you an Adventurer? I am Grizzly Grylls! A reporter who likes adventure.";
+		close;
+	}
+	if (VER_REPORTER == 6) {
+		mes "[Grylls]";
+		mes "Krotzel is concerned? Don't joke. I am veteran reporter Grizzly Grylls! I am enjoying an adventure! Tell her to not worry.";
+		close2;
+		erasequest 13197;// Monthly Brigan
+		VER_REPORTER = 7;
+		end;
+	}
+	if (VER_REPORTER == 7) {
+		mes "[Grylls]";
+		mes "Now I am confused whether I am a reporter or an adventurer. I even got the nickname survival king for being able to survive anywhere!";
+		close;
+	}
+	switch( select( "Ask if safe", "Is there anything to help with?", "Converse" ) ) {
+	case 1:
+		mes "[Grylls]";
+		if (isbegin_quest(13197) == 0) {
+			mes "Other than this place being more dangerous than I thought! I am hungry from diligently running away. I wish there was something to eat.";
+			close;
+		}
+		mes "I am enjoying an adventure! Tell her to not worry. I am a little hungry though...";
+		close2;
+		erasequest 13197;// Monthly Brigan
+		end;
+	case 2:
+		mes "[Grylls]";
+		switch( checkquest(13205,PLAYTIME) ) {
+		case -1:
+		case 2:
+			if (isbegin_quest(13204) == 0) {
+				mes "This isn't a big deal but do you have some time?";
+				next;
+				if (select( "Help survival reporter Grylls", "Decline" ) == 1) {
+					mes "[Grylls]";
+					mes "I haven't been able to eat at all from all the running away. All day! I noticed these bugs that eat metal.";
+					next;
+					mes "[Grylls]";
+					mes "I need to taste these bugs. I think it will be a good news story as well! The survival king's roasted metal bugs! That's the headline!";
+					setquest 13204;// Monthly Brigan : Grylls' Request
+				}
+				close;
+			}
+			if (countitem(11597) < 30) {
+				mes "A bug that gnaws away metal. I wonder how it tastes. I am so curious! This is why I can't quit being a reporter.";
+				close;
+			}
+			mes "I will cook now! I am salivating at the thought of the flavor!";
+			delitem 11597,30;// Metalbug
+			erasequest 13204;// Monthly Brigan : Grylls' Request
+			if (isbegin_quest(13205) > 0)
+				erasequest 13205;
+			setquest 13205;// Grylls' Request - Complete
+			getexp 1000000,500000;
+			close;
+		case 0:
+		case 1:
+			mes "I am a little busy cooking these bugs. You want a bite as well?";
+			close;
+		}
+	case 3:
+		mes "[Grylls]";
+		mes "Amazing that there are bugs that gnaw at metal! But they must be a good source of precious protein and high in nutrition!";
+		close;
+	}
+}
+
+verus01,172,146,4	script	Lame Journalist#1	4_M_HUBOY,{
+	if (VER_REPORTER < 2 || VER_REPORTER > 3 && VER_REPORTER < 8) {
+		mes "[Rookie Reporter]";
+		mes "Hello! I am Rookie reporter Trapp! Of Monthly Brigan's Adventure Team 2! I will cover the stories even through danger!";
+		close;
+	}
+	if (VER_REPORTER == 2) {
+		mes "[Rookie Reporter]";
+		mes "Hello! I am Trapp! The newest member of Monthly Brigan's Adventure team 2! My senior is worried? I will cover this story and return!";
+		close2;
+		erasequest 13195;// Monthly Brigan
+		VER_REPORTER = 3;
+		end;
+	}
+	if (VER_REPORTER == 3) {
+		mes "[Rookie Reporter]";
+		mes "Please tell her to not worry so much! I am a reporter too now! However if you have the time I would like you to help me with something. I mean later.";
+		close;
+	}
+	switch( select( "Ask if safe", "Is there anything to help with?", "Converse" ) ) {
+	case 1:
+		mes "[Rookie Reporter]";
+		if (isbegin_quest(13195) == 0) {
+			mes "Grylls is nicknamed survival king! Because he survives even in the most extreme areas! I want to become a cool reporter like that.";
+			close;
+		}
+		mes "She is really concerned about me! Tell her as soon as Grylls' work is done I will follow!";
+		close2;
+		erasequest 13195;// Monthly Brigan
+		end;
+	case 2:
+		mes "[Rookie Reporter]";
+		switch( checkquest(13201,PLAYTIME) ) {
+		case -1:
+		case 2:
+			switch( checkquest(13200,HUNTING) ) {
+			case -1:
+				mes "I mustered some courage and followed him but it was dangerous. If it's okay can you help me?";
+				next;
+				if (select( "Help Rookie reporter Trapp", "Decline" ) == 1) {
+					mes "[Rookie Reporter]";
+					mes "Please eradicate the monsters for me! I am trying my best but I am still not used to this. I beg of you.";
+					if (isbegin_quest(13201))
+						erasequest 13201;
+					setquest 13200;
+				}
+				close;
+			case 0:
+			case 1:
+				mes "Because of the nickname survival king, I thought Grizzly was good in combat but he is really just good at surviving. As soon as monsters showed up he disappeared like the wind.";
+				close;
+			case 2:
+				mes "Did you eradicate that much already? I am not done yet but thank you!";
+				erasequest 13200;// Monthly Brigan : Rookie's Request
+				setquest 13201;// Rookie's Request - Complete
+				getexp 1000000,500000;
+				close;
+			}
+		case 0:
+		case 1:
+			mes "I am fighting hard to become a specialized survival reporter! Even though...not now but please come back later, if that's okay with you!";
+			close;
+		}
+	case 3:
+		mes "[Rookie Reporter]";
+		mes "Realizing the world's truth and justice is the mission of the reporter! We have to protect those two despite any hardship and environment!";
+		close;
+	}
+}
+
+ver_eju,116,43,5	script	Rekenber Mercenary#atd01	4_GEFFEN_09,{
+	switch( rand(0,2) ) {
+		case 0: npctalk "They don't stop coming."; end;
+		case 1: npctalk "Please be careful."; end;
+		case 2: npctalk "..."; end;
+	}
+}
+
+ver_eju,125,40,1	script	Rekenber Mercenary#atd02	4_GEFFEN_03,{
+	switch( rand(0,2) ) {
+		case 0: npctalk "Where are reinforcements?"; end;
+		case 1: npctalk "Ugh, I really need a break."; end;
+		case 2: npctalk "Grr, these abominations!"; end;
+	}
+}
+
+ver_eju,117,35,7	script	Rekenber Mercenary#atd03	4_GEFFEN_08,{
+	switch( rand(0,2) ) {
+		case 0: npctalk "This is boring."; end;
+		case 1: npctalk "If you're an excavator, move through the tunnel."; end;
+		case 2: npctalk "You'd better watch out."; end;
+	}
+}
+
+ver_eju,15,151,3	script	Rekenber Guard#atd04	4_M_LGTGUARD,{
+	mes "[Rekenber Guard]";
+	mes "Are you heading for Phantasmagorika?";
+	mes "It may be difficult to find. Let me give you some directions.";
+	next;
+	mes "[Rekenber Guard]";
+	mes "Follow the road all the way up, and then head southwest.";
+	mes "Let me mark the location on your mini-map.";
+	viewpoint 1,113,36,0,0x4DFF00;
+	next;
+	mes "[Rekenber Guard]";
+	mes "This place is fraught with formidable monsters, just like the other parts of the old Juperos.";
+	mes "Be safe in your travels.";
+	close;
+}
+
+juperos_01,48,243,5	script	Rekenber Guard#atd05	4_M_LGTGUARD,{
+	mes "[Rekenber Guard]";
+	mes "Are you heading for Phantasmagorika?";
+	mes "It may be difficult to find. Let me give you some directions.";
+	next;
+	mes "[Rekenber Guard]";
+	mes "Go straight east, then follow the road south. You'll see a giant status at a corner.";
+	mes "Let me mark the location on your mini-map.";
+	viewpoint 1,242,87,0,0x4DFF00;
+	next;
+	mes "[Rekenber Guard]";
+	mes "Who knew there's a hidden place behind a statue? It was pure luck that we found it.";
+	mes "The road to the place is dangerous. Please have safe travel.";
+	close;
+}
+
+juperos_01,242,91,3	script	Rekenber Guard#atd06	4_M_LGTGUARD,{
+	mes "[Rekenber Guard]";
+	mes "Are you a participant of the Phantasmagorika project?";
+	mes "This is the entrance to the newly discovered ruins in the east.";
+	next;
+	mes "[Rekenber Guard]";
+	mes "There's a guide on the other side of the entrance to guide you to the excavation site.";
+	mes "Please get in before some monsters pounce on you.";
+	next;
+	mes "[Rekenber Guard]";
+	mes "Oh, the other side of the entrance is teeming with aggressive robots.";
+	mes "You'd better brace yourself.";
+	close;
+
+OnInit:
+	questinfo 7610, QTYPE_QUEST, 1;
+	setquestinfo_level 7610, 140,175;
+	end;
+}
+
+yuno_fild07,211,179,5	script	Excavator Guide#atd07	4_M_LGTGUARD,{
+	mes "[Excavator Guide]";
+	mes "Are you a participant of the Phantasmagorika project?";
+	mes "As you know, you're at the entrance to Juperos.";
+	next;
+	mes "[Excavator Guide]";
+	mes "I'm here to guide you to the excavation site connected to the inside of Juperos.";
+	next;
+	mes "[Excavator Guide]";
+	mes "There are more guides spread across the inside,";
+	mes "so you can find them easily in case you get lost.";
+	next;
+	mes "[Excavator Guide]";
+	mes "Thank you for your contribution to the development of mankind. Good luck.";
+	close;
+
+OnInit:
+	questinfo 7610, QTYPE_QUEST, 1;
+	setquestinfo_level 7610, 140,175;
+	end;
+}
+
+verus03,55,245,3	script	Rekenber scholar#e152a0	2_M_MOLGENSTEIN,{
+	mes "[Rekenber scholar]";
+	mes "Hm.. This machine seems to be have been used for tracking something.";
+	mes "What do you think?";
+	next;
+	mes "[Rekenber Technician]";
+	mes "I think so as well.";
+	mes "This screen probably indicates the position or condition of what it is tracking or detecting.";
+	next;
+	mes "[Rekenber scholar]";
+	mes "Was it showing the situation of this closed area, perhaps?";
+	mes "It is presumed that it was impossible to directly enter based on the interior situation a while ago.";
+	next;
+	mes "[Rekenber Technician]";
+	mes "Probably so.";
+	mes "We can assume there was a large explosion just by observation with our eyes..";
+	mes "Then the reason for the people outside to install something like this ....";
+	next;
+	mes "[Rekenber scholar]";
+	mes "Yes. It is to find out the interior situation.";
+	mes "Maybe.. there was a big accident so it might be for searching for survivors..";
+	next;
+	mes "[Rekenber Technician]";
+	mes "Indeed. You are probably right.";
+	mes "And our role is to find out the secrets of what happened here.";
+	close;
+
+}
+verus03,55,243,3	duplicate(Rekenber scholar#e152a0)	Rekenber technician#e152a1	4_M_REPAIR
+
+verus03,59,250,7	script	Coral Excavation team C#e152	2_M_SAGE_B,{
+	mes "[Cecil]";
+	mes "Hey, Kobell. If we want to be chosen as an outstanding excavation team...!";
+	next;
+	mes "[Kobell]";
+	mes "To be..?";
+	next;
+	mes "[Cecil]";
+	mes "Is to figure out the identity of these unknown mechanical devices!";
+	next;
+	mes "[Kobell]";
+	mes "Whaat? How did this happen?";
+	mes "We didn't even major in engineering!";
+	next;
+	mes "[Cecil]";
+	mes "This place if full of machines! We can receive recognition like the Atnad excavators if we analyze them!";
+	next;
+	mes "[Kobell]";
+	mes "Aha! Indeed so.";
+	mes "But I think the Atnad excavators are around here...?";
+	next;
+	mes "[Cecil]";
+	mes "Hah! Our research goals cannot be discovered. This is a secret between you and I!";
+	next;
+	mes "[Kobell]";
+	mes "Let's do that~";
+	close;
+}
+verus03,61,250,7	duplicate(Coral Excavation team C#e152)	Coral Excavation team C#e152_	4_M_ALCHE_C
+
+verus04,1,1,0	script	#verus04_invade	HIDDEN_WARP_NPC,{
+	end;
+OnInit:
+	initnpctimer;
+	end;
+OnTimer1000:
+	mapannounce "verus04", "Police Officer Piffs: The Doom Prayers have stricken!", bc_map;
+    monster "verus04",0,0,"Ruin Grace Believer",3158,20, "#verus04_invade::OnMobDead";
+	end;
+OnTimer3000:
+	mapannounce "verus04", "Police Chief Kesler: Attention all police officers, stop the Doom Prayers before they destroy the excavation site!", bc_map;
+	end;
+OnTimer30000:
+	mapannounce "verus04", "Doom Prayers Executive: Destroy and bring the end of the world! Destroy and be saved!", bc_map;
+	end;
+OnTimer60000:
+	mapannounce "verus04", "Police Officer Piffs: Argh, Doom Prayers! Where do they keep coming from?!", bc_map;
+	end;
+OnTimer120000:
+	mapannounce "verus04", "Police Chief Kesler: Everyone, do not retreat! Don't let them destroy the excavation site!", bc_map;
+	end;
+OnTimer180000:
+	mapannounce "verus04", "Police Chief Kesler: Those Doom Prayers underestimate us.", bc_map;
+	end;
+OnTimer240000:
+	mapannounce "verus04", "Police Chief Kesler: Adventurers, the Doom Prayers have been driven out of Phantasmagorika. They're no longer a threat to your safety.", bc_map;
+	killmonster "verus04", "#verus04_invade::OnMobDead";
+	end;
+OnTimer3600000:
+	initnpctimer;
+	end;
+OnMobDead:
+	end;
+}
+
+verus04,194,165,5	script	Rekenber Guard#ver01	4_M_LGTGUARD,{
+	mes "[Rekenber Guard]";
+	mes "Are you a member of the Excavation Group?";
+	mes "Our chairman has personally ordered us to see to your safety so that you can focus on your excavation work.";
+	close;
+}
+verus04,203,171,3	script	Rekenber Guard#ver02	4_M_LGTGUARD,{
+	mes "[Rekenber Guard]";
+	mes "We're here to support your excavation of Verus City.";
+	mes "Let us know if you experience any problems.";
+	close;
+}
+verus04,171,267,3	script	Rekenber Guard#ver03	4_M_LGTGUARD2,{
+	mes "[Rekenber Guard]";
+	if (rand(2))// inaccurate
+		mes "I hate using portable johns, but my bladder can't seem to hold very much. What about you?";
+	else
+		mes "Ack! Shoo! Don't come close! I'm saving myself for my future bride!";
+	close;
+}
+verus04,218,217,5	script	Geologist#ver04	4_M_HUGRANFA,{
+	mes "[Geologist]";
+	mes "Hm, the building was crushed by the stone wall.";
+	mes "The rest is almost pulverized to dust.";
+	next;
+	mes "[Assistant]";
+	mes "Yes, Professor.";
+	next;
+	mes "[Geologist]";
+	mes "The terrain on which the village stands was formed in a different period, compared to this stone wall. At least that's my initial assessment.";
+	next;
+	mes "[Assistant]";
+	mes "Yes, Professor.";
+	next;
+	mes "[Geologist]";
+	mes "The underground village doesn't seem to be artificial, though I can't imagine how it can be formed naturally. What do you think?";
+	next;
+	mes "[Assistant]";
+	mes "Yes, Professor.";
+	next;
+	mes "[Geologist]";
+	mes "...Are you even listening to me?";
+	next;
+	mes "[Assistant]";
+	mes "Yes, Professor.";
+	next;
+	mes "[Geologist]";
+	mes "Sigh.";
+	mes "Let's go have lunch.";
+	next;
+	mes "[Assistant]";
+	mes "Yes, Professor!";
+	close;
+}
+verus04,217,216,5	duplicate(Geologist#ver04)	Student#ver05	4_M_HUMAN_01
+
+verus04,50,193,3	script	Scholar#ver06	4_M_HUMERCHANT,{
+	mes "[Scholar]";
+	mes "Schwarzwald may be the most scientifically advanced among the three states of Midgard, but it still doesn't hold a candle to this place.";
+	next;
+	mes "[Scholar]";
+	mes "The same goes for Juperos. If the scientific knowledge of this place passed down to Schwarzwald, it could have been much more powerful.";
+	next;
+	mes "[Scholar]";
+	mes "Of course, that's based on my theory that the residents of this place were also Schwarzwaldians.";
+	close;
+}
+verus04,127,243,3	script	Pierrot#ver07	4_M_PIERROT,{
+	mes "[Pierrot]";
+	mes "I feel like I'm going insane, stuck in this confined space.";
+	mes "Hey, how about I read your fortune for the day with my juggling balls?";
+	next;
+	if (select( "Sure.", "No, thanks." ) == 2)
+		close;
+	mes "[Pierrot]";
+	mes "Good, choose a color you like.";
+	mes "The color you choose will tell me your fortune.";
+	next;
+	.@s = select( "Red", "Blue", "Yellow", "Green" );
+	mes "[Pierrot]";
+	mes "Dum, dum, dum! Your fortune for the day!";
+	mes "Let's me get the fortune paper inside the ball...";
+	next;
+	mes "[Pierrot]";
+	mes "Today is...";
+	next;
+	mes "[Pierrot]";
+	switch(.@s) {
+	case 1:
+		mes "The same boring day, like yesterday and the day before.";
+		mes "Only positive thinking will get you out of this funk. Smile and be nice to others, and maybe Lady Luck will brighten your day.";
+		break;
+	case 2:
+		mes "Ack, you shouldn't have gotten out of bed. Wherever you go, trouble follows.";
+		mes "I strongly recommend you stay at the Shelter for the day. Sleep off bad luck.";
+		break;
+	case 3:
+		mes "Not a bad day, but you'll have to work to enjoy some good luck.";
+		mes "Go to the Excavation Site and dig up some dirt. You may find some treasure.";
+		break;
+	case 4:
+		mes "The luckiest day of your life! Wherever you go, you'll find wealth and friends.";
+		mes "Maybe you'll find some historic artifacts buried in this place. That'll be awesome, huh?";
+		break;
+	}
+	next;
+	mes "[Pierrot]";
+	mes "Do you like my reading? Or do you hate it?";
+	mes "Your future is pliable--you can shape it however you want.";
+	mes "Don't get too excited or depressed. Just stay focused on your goal.";
+	next;
+	mes "[Pierrot]";
+	mes "All right, come back if you want another reading.";
+	close;
+}
+
+verus04,180,209,3	script	Excavator#tre01	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "The owner of this house must have been an important figure in Verus City.";
+	mes "Piles of official documents are discovered in this room.";
+	next;
+	mes "[Excavator]";
+	mes "Most of the documents contain petty civil complaints, like water problems and neighbor disputes.";
+	mes "All the documents, however, contain the initials, OX. I don't know if they're of a name or an abbreviation of some sort.";
+	close;
+}
+verus04,202,181,3	script	#tre02	CLEAR_NPC,{
+	mes "- The building entrance shows distinctive wear and tear, indicating abuse by a steady stream of traffic. YHT and DO NOT YELL are written on the door. -";
+	close;
+}
+// tre03 ?
+verus04,121,188,3	script	Excavator#tre04	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "This building is fully furnished, yet there is no sign of habitation.";
+	mes "Maybe the owner lived somewhere else, like in a summer house or something.";
+	close;
+}
+verus04,119,177,3	script	#tre05	CLEAR_NPC,{
+	mes "- ZERT... is written on the door. The rest of the writing looks like it was scratched off with a stone.-";
+	close;
+}
+verus04,85,145,3	script	#tre06	CLEAR_NPC,{
+	mes "- +1 is written on the door. What could it mean? -";
+	close;
+}
+verus04,83,131,3	script	Excavator#tre07	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "The owner of this house must have been a dancer. Her wardrobe is full of glittery stage clothes.";
+	mes "Judging by their size, she must have been very tall for a woman. I wonder how she looked like.";
+	close;
+}
+verus04,71,118,3	script	#tre08	CLEAR_NPC,{
+	mes "- KDY is written on the door. Sooty streaks that spread outward from the inside to the entrance indicate frequent explosions. -";
+	close;
+}
+verus04,71,131,3	script	#tre09	CLEAR_NPC,{
+	mes "- KJH is written on the door. The entrance wall is dotted with tiny squares of paper containing time and numbers. -";
+	close;
+}
+verus04,71,145,3	script	#tre10	CLEAR_NPC,{
+	mes "- PKY is written on the door. Empty liquor bottles are littered around the house. -";
+	close;
+}
+verus04,39,123,3	script	#tre11	CLEAR_NPC,{
+	mes "- DGDG'S BOARD is written on the door. What does that mean? -";
+	close;
+}
+verus04,17,145,3	script	#tre12	CLEAR_NPC,{
+	mes "- THE SUNS is written on the door. -";
+	close;
+}
+verus04,16,166,5	script	Excavator#tre13	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "*Cough Cough* The owner of this house was a hoarder.";
+	mes "Lots of books. Lots of cat furballs. Lots of Assassin pictures. *Cough Cough*";
+	close;
+}
+verus04,118,159,5	script	Excavator#tre14	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "This house is full of red mushrooms. Are they edible? Why are they only found inside this house? Was the owner farming them?";
+	close;
+}
+verus04,123,143,3	script	#tre15	CLEAR_NPC,{
+	mes "- MARES is written on the door, along with various drawings that seem to symbolize pirates. -";
+	close;
+}
+verus04,72,168,3	script	#tre16	CLEAR_NPC,{
+	mes "- LMH is written on the door, along with a flurry of hearts drawn on an edge. -";
+	close;
+}
+verus04,91,168,3	script	#tre17	CLEAR_NPC,{
+	mes "- MISA is written on the door. Various toy weapons are littered around the building. -";
+	close;
+}
+verus04,50,197,3	script	Excavator#tre18	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "...";
+	next;
+	mes "[Excavator]";
+	mes "Various pictures are found in this house, all of them featuring the owner with different men.";
+	mes "I find that curious.";
+	close;
+}
+verus04,34,197,3	script	#tre19	CLEAR_NPC,{
+	mes "- ELTOHC is written on the door. In the center of the door is a W drawn in a circle. It could have been the owner's favorite letter. -";
+	close;
+}
+verus04,17,245,3	script	#tre20	CLEAR_NPC,{
+	mes "- LEONA'S BIRD HEAVEN is written on the door. Unsurprisingly, bird feathers are littered around the house. -";
+	close;
+}
+verus04,13,262,3	script	#tre21	CLEAR_NPC,{
+	mes "- KURAT is written on the door. The building wall is littered with hand-drawn skulls. -";
+	close;
+}
+verus04,28,262,3	script	#tre22	CLEAR_NPC,{
+	mes "- KSY is written on the door. A poster with The Performance of the Century! boldly printed across it is hung on the entrance wall. -";
+	close;
+}
+verus04,54,256,3	script	#tre23	CLEAR_NPC,{
+	mes "- BIBIC & MORZIP'S LOVE HOUSE is written on the door. A couple must have lived in this house. -";
+	close;
+}
+verus04,31,236,3	script	Excavator#tre24	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "The owner of this house must have been a collector of some sort. There are many pictures of women in strange-looking dresses.";
+	next;
+	mes "[Excavator]";
+	mes "Did you see the SKM drawn on the door? That reminds me of the other house with hearts drawn on its door.";
+	mes "I hope it's not one of those childish customs. You know, to mark someone as theirs.";
+	close;
+}
+verus04,62,230,3	script	#tre25	CLEAR_NPC,{
+	mes "- HDY is written on the door. -";
+	close;
+}
+verus04,80,230,3	script	#tre26	CLEAR_NPC,{
+	mes "- BRAN is written on the door. Rows of empty bottles are standing on a side of the house. -";
+	close;
+}
+verus04,79,265,3	script	#tre27	CLEAR_NPC,{
+	mes "- KYH is written on the door. This building is in better condition than the rest in the neighborhood.-";
+	close;
+}
+verus04,96,267,3	script	#tre28	CLEAR_NPC,{
+	mes "- YAOB is written on the door, along with drawings of round, furry animals. -";
+	close;
+}
+verus04,133,267,3	script	Excavator#tre29	4_M_HUMAN_01,{
+	mes "[Excavator]";
+	mes "This house is suspected to belong to a couple named SSUL and SINYC.";
+	mes "The house is filled with incredible things. Everything in it is just gorgeous.";
+	close;
+}
+verus04,152,267,3	script	#tre30	CLEAR_NPC,{
+	mes "- LMS is written on the door, along with Composition Specialist on an edge. -";
+	close;
+}
+verus04,168,267,3	script	#tre31	CLEAR_NPC,{
+	mes "- KJK is written on the door. -";
+	close;
+}
+verus04,190,265,3	script	#tre32	CLEAR_NPC,{
+	mes "- LJH is written on the door. The building wall is covered with numerous grocery store stickers. -";
+	close;
+}
+verus04,172,234,3	script	#tre33	CLEAR_NPC,{
+	mes "- YG is written on the door. A large picture of a smiling baby is visible through a window. -";
+	close;
+}
+verus04,204,235,3	script	#tre34	CLEAR_NPC,{
+	mes "- CHJ is written on the door. -";
+	close;
+}
+
+verus04,91,252,5	script	Archaeologist#tevt01	4_M_6THPRIN1,10,10,{
+	mes "[Archaeologist]";
+	mes "Sometimes, we gather around to talk.";
+	mes "Sharing information is a part of the job.";
+	close;
+
+OnTouch_:
+	if (.ontalk == 0) {
+		.ontalk = 1;
+		initnpctimer;
+	}
+	end;
+OnTimer2000:
+	npctalk "I suspect this Verus City serves a special purpose.", "Archaeologist#tevt01";
+	end;
+OnTimer7000:
+	npctalk "How did you know this place is called Verus?", "New Excavator#tevt03";
+	end;
+OnTimer12000:
+	npctalk "Oh, the name was found written on various milestones and walls at the Plaza.", "Civilization Researcher";
+	end;
+OnTimer17000:
+	npctalk "Verus City, Verus Town, Verus Plaza...", "Civilization Researcher";
+	end;
+OnTimer22000:
+	npctalk "There are two districts that remain unaccessible.", "Civilization Researcher";
+	end;
+OnTimer27000:
+	npctalk "Oh, those two that require permission. You know a lot.", "New Excavator#tevt03";
+	end;
+OnTimer32000:
+	npctalk "I've just figured that out from on a map I've found in a house in the Town.", "Historian#tevt02";
+	end;
+OnTimer37000:
+	npctalk "This place consists of four districts, and only the Town and the Plaza are explorable at this point.", "Archaeologist#tevt01";
+	end;
+OnTimer42000:
+	npctalk "We'd better work harder, or our exploration might become limited to this very area.", "Archaeologist#tevt01";
+	end;
+OnTimer47000:;
+	npctalk "If it really was a planned city, then what was the plan?", "New Excavator#tevt03";
+	end;
+OnTimer52000:
+	npctalk "Einbech is built purely for mining purposes. This city probably served a special purpose like that.", "Scientist#tevt05";
+	end;
+OnTimer57000:
+	npctalk "It must have something to do with technological research and experimentation.", "Scientist#tevt05";
+	end;
+OnTimer62000:
+	npctalk "I've deduced it from journals and diaries found in the Town.", "Historian#tevt02";
+	end;
+OnTimer67000:
+	npctalk "Most of these journals and diaries belonged to scholars and scientists.", "Historian#tevt02";
+	end;
+OnTimer72000:
+	npctalk "The point is this ancient civilization had some really advanced science.", "Civilization Researcher";
+	end;
+OnTimer77000:
+	npctalk "It may not be ancient at all. It could be something unfathomable.", "Civilization Researcher";
+	end;
+OnTimer82000:
+	npctalk "We're here to solve the mystery for a better future for mankind!", "New Excavator#tevt03";
+	end;
+OnTimer87000:
+	npctalk "*Snort* In the end Rekenber takes all.", "Scientist#tevt05";
+	end;
+OnTimer92000:
+	npctalk "But the core discoveries and the excavation efforts are shared by all the organizations involved.", "New Excavator#tevt03";
+	end;
+OnTimer97000:
+	npctalk "What we can do is just do what we can do best in the moment.", "Civilization Researcher";
+	end;
+OnTimer102000:
+	npctalk "But I can't help but think Rekenber has a hidden agenda. I'm not trying to be unappreciative, but...", "Historian#tevt02";
+	end;
+OnTimer107000:
+	npctalk "Let's focus on the present for now.", "Historian#tevt02";
+	end;
+OnTimer112000:
+	npctalk "Why don't we share all the information we find except for our individual research subjects?", "Archaeologist#tevt01";
+	end;
+OnTimer117000:
+	npctalk "I agree.", "Civilization Researcher";
+	end;
+OnTimer122000:
+	npctalk "All right.", "Scientist#tevt05";
+	end;
+OnTimer127000:
+	npctalk "Um, do you know what's for lunch today?", "Scientist#tevt05";
+	end;
+OnTimer130000:
+	npctalk "Um...", "Archaeologist#tevt01";
+	end;
+OnTimer135000:
+	npctalk "Some frozen food. I'm just going to eat the bread I saved yesterday.", "Civilization Researcher";
+	end;
+OnTimer140000:
+	npctalk "Sigh, Rekenber can be stingy if it wants to.", "Historian#tevt02";
+	end;
+OnTimer145000:
+	npctalk "Why? What's wrong with frozen food?", "New Excavator#tevt03";
+	end;
+OnTimer150000:
+	npctalk "Here, try mine.", "Historian#tevt02";
+	end;
+OnTimer155000:
+	npctalk "You can take mine, too.", "Archaeologist#tevt01";
+	end;
+OnTimer160000:
+	npctalk "Or mine.", "Scientist#tevt05";
+	end;
+OnTimer163000:
+	npctalk "...", "New Excavator#tevt03";
+	end;
+OnTimer168000:
+	npctalk "Um, aren't you guys hungry?", "New Excavator#tevt03";
+	end;
+OnTimer178000:
+	npctalk "Is it possible it's frozen because it tastes bad otherwise?", "New Excavator#tevt03";
+	.ontalk = 0;
+	stopnpctimer;
+	end;
+}
+
+verus04,89,251,5	script	Historian#tevt02	4_TOWER_07,{
+	mes "[Historian]";
+	mes "What's the hardest thing about my job?";
+	mes "When I'm forced to eat a terrible lunch provided by my sponsor.";
+	next;
+	mes "[Historian]";
+	mes "In fact, it's been that way since I arrived in Verus City.";
+	mes "Today was not an exception.";
+	close;
+}
+
+verus04,91,248,7	script	New Excavator#tevt03	4_TOWER_04,{
+	mes "[New Excavator]";
+	mes "I have a lot to learn, and I'm a fast learner.";
+	mes "For now, I'm doing mostly physical tasks.";
+	next;
+	mes "[New Excavator]";
+	mes "I'm given free food, a place to sleep, and money. What else can I ask for?";
+	close;
+}
+
+verus04,94,251,3	script	Civilization Researcher	4_TOWER_16,{
+	mes "[Civilization Researcher]";
+	mes "I thought this was a part of Juperos.";
+	mes "I'm now reconsidering that theory.";
+	next;
+	mes "[Civilization Researcher]";
+	mes "Verus is similar to Juperos, yet different.";
+	mes "Everything about it is more refined and sophisticated somehow.";
+	close;
+}
+
+verus04,94,248,1	script	Scientist#tevt05	4_M_SAGE_C,{
+	mes "[Scientist]";
+	mes "This city's level of mechanical engineering is astonishing.";
+	mes "There's no trace of magic.";
+	next;
+	mes "[Scientist]";
+	mes "But I'm concerned:";
+	mes "rapid development and sudden introduction of advanced technology could do more harm than good.";
+	close;
+}
+
+verus04,116,220,0	script	#ep15_1elb	PORTAL,{
+	mes "- Caution -";
+	mes "- For your safety, -";
+	mes "- avoid running -";
+	mes "- or jumping -";
+	mes "- while inside. -";
+	close;
+}
+
+verus04,153,193,8	script	Merchant#ep15_1el10	4_F_CAPEGIRL,{
+	mes "[Merchant]";
+	mes "Ho ho ho!";
+	mes "I came first, so I took the best spot!";
+	close;
+}
+
+verus04,155,197,5	script	Adventurer ?#ep15_1el11	4_M_LGTPOOR,{
+	mes "[Adventurer ?]";
+	mes "*Stomach rumbles*";
+	mes "Aww, I'm hungry...";
+	next;
+	mes "[Adventurer]";
+	mes "But I have no money to buy food...";
+	close;
+}
+
+verus04,150,193,3	script	Adventurer#ep15_1el12	4_M_DIEMAN,{
+	mes "[Jean Baljean]";
+	mes "Ugh, I was struck 19 times for a piece of bread.";
+	close;
+}
+
+verus04,102,246,3	script	Adventurer#ep15_1el13	4_M_RACHMAN2,{
+	mes "[Adventurer]";
+	mes "Mushrooms growing out of rocks.";
+	mes "How resilient!";
+	close;
+}
+
+verus04,16,157,3	script	Adventurer#ep15_1el14	4_M_MIDDLE1,{
+	mes "[Adventurer]";
+	mes "Argh!";
+	mes "So many paths are blocked!";
+	close;
+}
+
+// missing #ep15_1el15 - 18
+verus04,104,120,3	script	Cow#ep15_1el19	4_BULL,{
+	mes "[Cow]";
+	mes "*Moo*";
+	close;
+}
+
+verus04,111,215,5	script	Adventurer#ep15_1el20	4_F_SHABBY,{
+	mes "[Adventurer]";
+	mes "Heh. *Drool*";
+	mes "This place is incredible!";
+	close;
+}
+
+verus04,111,211,3	script	Adventurer#ep15_1el21	4_F_KHGIRL,{
+	mes "[Adventurer]";
+	mes "This site is amazing.";
+	mes "No wonder why Rekenber called dibs on it.";
+	close;
+}
+
+verus04,113,235,5	script	Adventurer#ep15_1el22	4_M_PECOKNIGHT,{
+	mes "[Adventurer]";
+	mes "I want to find something awesome!";
+	close;
+}
+
+verus04,124,220,8	script	Adventurer#ep15_1el23	4_M_HUMERCHANT,{
+	mes "[Adventurer]";
+	mes "The coming era will be yours.";
+	close;
+}
+
+verus04,135,213,4	script	Sign#EP15_1DCenter	4_BOARD3,{
+	mes "[Warning]";
+	mes "Attention visitors of Phantasmagorika,";
+	next;
+	mes "[Warning]";
+	mes "a cult group called the Doom Prayers has been frequently sighted in this area.";
+	next;
+	mes "[Warning]";
+	mes "If you're a victim or a witness to the group's harassment, please report to the Phantasmagorika Police.";
+	mes "- Phantasmagorika Police Chief -";
+	close;
+}
+verus04,204,260,4	duplicate(Sign#EP15_1DCenter)	Sign#EP15_1DNorth	4_BOARD3
+verus03,83,241,4	duplicate(Sign#EP15_1DCenter)	Sign#EP15_1DSouth	4_BOARD3
+verus03,38,114,4	duplicate(Sign#EP15_1DCenter)	Sign#EP15_1DEast	4_BOARD3
+verus03,116,39,4	duplicate(Sign#EP15_1DCenter)	Sign#EP15_1DWest	4_BOARD3
+
+
+verus04,96,195,5	script	Adventurer Cat#ep15_1el_1	4_CAT_REST,{
+	mes "[Adventurer Cat]";
+	mes "I must investi... ga... te...";
+	mes "Zzz... Zzz...";
+	close;
+}
+verus04,96,194,5	script	Adventurer Cat#ep15_1el_2	4_CAT_REST,{
+	mes "[Adventurer Cat]";
+	mes "*Purr*";
+	mes "*Meow*";
+	close;
+}
+verus04,96,193,5	script	Adventurer Cat#ep15_1el_3	4_CAT_REST,{
+	mes "[Adventurer Cat]";
+	mes "For some reason, I can't stand up.";
+	mes "*Meow*";
+	close;
+}
+verus04,96,192,5	script	Adventurer Cat#ep15_1el_4	4_CAT_REST,{
+	mes "[Adventurer Cat]";
+	mes "I've got a good spot.";
+	mes "*Purr*";
+	close;
+}
+
+yuno_fild07,218,154,3	script	Adventurer#ep15_1el01	4_M_ARUNA_NFM1,{
+	mes "[Adventurer]";
+	mes "Ah!";
+	mes "I want to see!";
+	mes "Why can't I go in?!";
+	close;
+}
+yuno_fild07,218,159,5	script	Adventurer#ep15_1el02	4_M_KHBOY,{
+	mes "[Adventurer]";
+	mes "All right!";
+	mes "This time, I'm going to write a report on a field trip to Phantasmagorika.";
+	next;
+	mes "[Adventurer]";
+	mes "Professor Jones will be so impressed he'll give me A+. *Chuckle*";
+	close;
+}
+yuno_fild07,221,157,3	script	Adventurer#ep15_1el03	4_M_CHN8GUEK,{
+	mes "[Adventurer]";
+	mes "Toh!";
+	mes "Sound mind, sound body!";
+	close;
+}
+yuno_fild07,221,155,8	script	Adventurer#ep15_1el04	4_M_ALCHE_B,{
+	mes "[Adventurer]";
+	mes "I'd better pack enough potions for the trip to Phantasmagorika.";
+	close;
+}
+yuno_fild07,217,155,5	script	Adventurer#ep15_1el05	4_F_ROGUE,{
+	mes "[Adventurer]";
+	mes "I'm impressed by Rekenber's support.";
+	mes "Um...";
+	close;
+}
+yuno_fild07,225,166,3	script	Merchant#ep15_1el06	4_CAT_DOWN,{
+	mes "[Merchant]";
+	mes "Ooooh!";
+	mes "I've found a perfect spot for my business!";
+	close;
+}
+yuno_fild07,225,144,1	script	Adventurer#ep15_1el07	1_M_ORIENT01,{
+	mes "[Adventurer]";
+	mes "Elevator? The scientific advancement of Schwarzwald is astonishing!";
+	close;
+}
+yuno_fild07,217,149,3	script	Adventurer#ep15_1el08	4_F_JOB_BLACKSMITH,{
+	mes "[Adventurer]";
+	mes "An ancient civilization. Doesn't that sound incredible?";
+	mes "I feel like I can hear ancient machines moving with loud clanking noises.";
+	next;
+	mes "[Adventurer]";
+	mes "*Dreamy eyes*";
+	mes "*Gaping mouth*";
+	close;
+}
+yuno_fild07,224,152,3	script	Adventurer#ep15_1el09	4_M_SITDOWN,{
+	mes "[Adventurer]";
+	mes "Geez, this place is already crammed!";
+	mes "Just looking at these people makes me tired.";
+	close;
+}
+
+lhz_in01,277,234,3	script	Rekenber Guard#e152i01	4_M_LGTGUARD,{
+	mes "[Rekenber Guard]";
+	if (VER_MAIN < 37) {
+		mes "I am sorry but you cannot enter further without approval.";
+		close;
+	}
+	mes "You are a member of the Atnad excavation team.";
+	mes "I will guide you inside.";
+	close2;
+	warp "lhz_in01",275,241;
+	end;
+}
+
+lhz_in01,275,251,3	script	Luke Lapez#ep152i01	4_M_EDEN_GUARDER,{
+	cutin "looke_rapez04.bmp", 0;
+	mes "[Luke]";
+	mes "Sh. I'm just here as escort.";
+	close2;
+	cutin "",255;
+	npctalk "So much for the damn escort...", "Luke Lapez#ep152i01";
+	sleep 400;
+	emotion ET_FRET, getnpcid(0, "Commander Arquien#ep152");
+	sleep 200;
+	emotion ET_THINK, getnpcid(0, "Luke Lapez#ep152i01");
+	end;
+}
+
+lhz_in01,270,257,4	script	Rekenber Chairman#e152i	4_M_REKENBER,{
+	if (VER_MAIN < 37)
+		end;
+	if (VER_MAIN == 37) {
+		cutin "ep15_rekenber01.bmp",0;
+		mes "[Rekenber Chairman]";
+		mes "I am the chairman of Rekenber.";
+		mes "I invited you to come.";
+		next;
+		mes "[Rekenber Chairman]";
+		mes "I have heard a lot and am familiar with the activities of the Atnad excavation team.";
+		mes "A lot of big results are being achieved as a corporation.";
+		mes "Thanks to you.";
+		next;
+		mes "[Rekenber Chairman]";
+		mes "The reason I have invited you....";
+		mes "You may already know as team leader Dr. Atnad.";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Could it be......";
+		next;
+		cutin "ep15_rekenber01.bmp",0;
+		mes "[Rekenber Chairman]";
+		mes "It is what you are predicting.";
+		mes "It's about the Memory Records contents you have been working so hard to collect.";
+		next;
+		mes "[Rekenber Chairman]";
+		mes "We plan to dispose of the content known through the Memory Records and the word of the Memory Records themselves as if it never happened.";
+		mes "I hope you will cooperate with this.";
+		next;
+		select("What did you say?");
+		mes "[Rekenber Chairman]";
+		mes "If this information is leaked outside, the corporation is willing to treat your excavation team with courtesy.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Treatment? Courtesy?";
+		mes "What are you trying to sell!";
+		next;
+		mes "[Ian Atnad]";
+		mes "What is the reason people can't know about the past of the city buried underground!";
+		mes "Who are you to act like this!";
+		next;
+		mes "[Ian Atnad]";
+		mes "We are people who look to truth and fact through the past.";
+		mes "Are you trying to block your eyes and ears now?";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Chief secretary]";
+		mes "Instead we will give you sole rights to everything related to the Memory Records.";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "What are you talking about now?";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Chief secretary]";
+		mes "We do not mean cease your work.";
+		mes "We are not saying discard all the information you have found.";
+		mes "However, what we want is...";
+		next;
+		mes "[Chief secretary]";
+		mes "I want to bury the story between myself, and you.";
+		mes "Do you not remember?";
+		mes "We are probably acquainted.";
+		mes "Although I did make some preparations.";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "... Now that I think you do look familiar..";
+		mes "Juperos!";
+		mes "Yes, I saw you at juperos.";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "That time you did.. in the crack that looked like a passage...";
+		mes "......You attacked me!";
+		mes "You bastard.. Because of you..!!";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "Hoho. I meet the main culprit of my family's destruction.";
+		mes "Is this meant to be?";
+		next;
+		select("What do you mean family's destruction?");
+		mes "[Aures]";
+		mes "The time, that accident or whatever you call it.";
+		mes "When I found a seemingly artificial obstacle during the juperos excavation..";
+		mes "Ian suddenly disappeared.";
+		emotion ET_SURPRISE, getnpcid(0, "Commander Arquien#ep152");
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "I found myself in a motel room in Yuno when I came to.";
+		mes "I didn't even know how much time has passed.";
+		next;
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "The man went to look around the excavation site and didn't return in over a week...";
+		mes "What do you think we thought?";
+		mes "We wondered if he suffered an unfortunate accident.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "My teeth gnash whenever I think of that time.";
+		mes "Because of the vague memories of that time..";
+		mes "I clung to juperos like a mad man.";
+		next;
+		cutin "ep15_tatio02.bmp",0;
+		mes "[Chief secretary]";
+		mes "......I am sorry about that.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "You're the one who attacked me, right?";
+		mes "What happened to the week I lost.";
+		mes "...After that, I chased after an illusion I wasn't sure was a dream or hallucination.";
+		next;
+		mes "[Ian Atnad]";
+		mes "I blindly went around Juperos.";
+		mes "Lost my team members.. even forgot that I had a family and a home to go back to.";
+		next;
+		cutin "Arquien_n_atnad01.bmp",0;
+		mes "[Arquien]";
+		mes "...Why did you?";
+		mes "Please tell me. Chief Secretary.";
+		mes "Why did you attack father?";
+		next;
+		cutin "ep15_tatio03.bmp",0;
+		mes "[Chief secretary]";
+		mes "That is.. because the doctor saw something he shouldn't have at the time.";
+		mes "Verus city was not ready to be revealed.";
+		next;
+		cutin "verus_ian02.bmp",2;
+		mes "[Ian Atnad]";
+		mes "What?! Verus!!!";
+		mes "So what I found then was a passage to Verus?!";
+		next;
+		cutin "Arquien_n_atnad02.bmp",0;
+		mes "[Arquien]";
+		mes "No no wait wait.";
+		mes "Father, speak to me for a moment.";
+		mes "I just need a moment.";
+		next;
+		mes "I don't know what is happening.";
+		mes "Should we listen to the Atnads first?";// cross line?
+		VER_MAIN = 38;
+		close3;
+	}
+	if (VER_MAIN == 38) {
+		cutin "ep15_rekenber02.bmp",0;
+		mes "[Rekenber]";
+		mes ".... What can we do.";
+		mes "We will wait. Please speak.";
+		close3;
+	}
+	cutin "ep15_rekenber01.bmp",0;
+	mes "[Rekenber]";
+	mes "A chairman's job is to do nothing in times like this.";
+	mes "... That is it.";
+	close3;
+}
+
+lhz_in01,267,257,5	script	Chief secretary#e152i01	4_M_TATIO,{
+	if (VER_MAIN < 37)
+		end;
+	if (VER_MAIN == 37) {
+		mes "[Chief secretary]";
+		cutin "ep15_tatio01.bmp",0;
+		mes "The chairman has waited for a long time.";
+		mes "I as well.";
+		close3;
+	}
+	if (VER_MAIN == 38) {
+		mes "[Chief secretary]";
+		cutin "ep15_tatio01.bmp",0;
+		mes "Are you taken aback?";
+		mes "So have I. I did not think people's lives to be tied together as so.";
+		mes "Anyway that young lady...";
+		next;
+		cutin "ep15_tatio03.bmp",0;
+		mes "[Chief secretary]";
+		mes ".. has a good strong attitude.";
+		mes "True.";
+		mes "Please speak.";
+		mes "I will wait.";
+		close3;
+	}
+	if (VER_MAIN == 39) {
+		mes "[Chief secretary]";
+		cutin "ep15_tatio01.bmp",0;
+		mes "I see it is my turn again.";
+		mes "I will formally introduce you.";
+		mes "The last survivor of Verus City, Tatio.W.00H-1.";
+		mes "Simply call him Tatio.";
+		next;
+		npctalk "What?!", "Ian Atnad#ep152i01";
+		mes "[Tatio]";
+		mes "Not revealing the contents of the Memory Records by the corporation.";
+		mes "Attacking you at Juperos was all because I wanted to.";
+		next;
+		cutin "ep15_tatio02.bmp",0;
+		mes "[Tatio]";
+		mes "To tell you this I have no choice but to reveal my identity.";
+		mes "I have prepared for this but.. it does not feel great.";
+		next;
+		cutin "",255;
+		mes "Everybody seems frozen by the massive news.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "I am the Tatio in the Memory Records you have discovered.";
+		mes "And Atnad is Lasse Atnad, the great-grandfather of Dr. Atnad.";
+		next;
+		cutin "ep15_tatio03.bmp",0;
+		mes "[Tatio]";
+		mes "Lasse is one of the people who made me, and a friend.";
+		mes "I wanted to protect Verus, which is home to my undead machine body...";
+		next;
+		mes "[Tatio]";
+		mes "I have committed that discourtesy that the time.";
+		mes "And on top of that, I had a hand on hiding what the doctor saw........";
+		mes "I manipulated his memory a bit.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "That is why you have that one week gap.";
+		mes "I took care of you for four days and sent you to the motel in Yuno.";
+		next;
+		cutin "ep15_tatio02.bmp",0;
+		mes "[Tatio]";
+		mes "I would not have done that if I knew you were a descendant of Lasse.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "Verus city a long.. long. Time ago was once side by side with Juperos..";
+		mes "No surpassed it as a great city of science with a scientific civilization.";
+		next;
+		mes "[Tatio]";
+		mes "Although an unfortunate accident turned it the way it is now.";
+		mes "I did not die because I was made of machines so I just watched over Verus.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "This story. Does the chairman know?";
+		mes "Wait. He already knows I bet. Isn't that why he called us here.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "That is right.";
+		mes "The chairman knows of me and the Verus City secrets.";
+		mes "Only two in the whole world knew of this secret.";
+		next;
+		mes "[Tatio]";
+		mes "Ah, No. One of the founders, Janet Zerter knows of this as well.";
+		mes "Also one of the descendants of Verus City.";
+		next;
+		cutin "ep15_tatio02.bmp",0;
+		mes "[Tatio]";
+		mes ".....Do you now understand my previous proposal?";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Oh oh well...";
+		mes "Although open, Verus City is still something you want to protect ..I see.";
+		mes "That is why the Memory Records...";
+		next;
+		mes "[Ian Atnad]";
+		mes "Then this doesn't apply to the other data in the city?";
+		mes "You're trying to hide it to prevent your's and my name being revealed and becoming a public issue, right?";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "The quantum level core technology unsuitable for this world's civilization has already been discarded.";
+		mes "Just like how lethal weapons are not put in the hands of children.";
+		next;
+		mes "[Tatio]";
+		mes "Although most of the data has been lost by accident...";
+		mes "You will probably gain plenty with what is now remaining.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "Why did you reveal it?";
+		mes "Should have wrapped it tightly instead.";
+		mes "Like you did to me.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "..To be honest, the first reason is that I could not easily approach the laboratories because of the energy storms during the time";
+		next;
+		mes "[Tatio]";
+		mes "And because although I do not know the reason the energy storms disappeared and";
+		mes "I assessed it as not being too dangerous.";
+		next;
+		mes "[Tatio]";
+		mes "The right time to reveal it has came.";
+		mes "This place has also come to understand what is science and engineering.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes ".. Something is doubtful, but okay.";
+		mes "I guess I should be satisfied at even having this kind of opportunity.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "I thank you for understanding.";
+		mes "I will give you sole rights to the Memory Records.";
+		mes "However the revealing of information and timing must be decided here.";
+		next;
+		mes "[Tatio]";
+		mes "And... In order to avoid affecting our descendants";
+		mes "we should keep it a secret between us as well.";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "I understand that.";
+		mes "Then I will handle the collecting of the Memory Records as I have been until now.";
+		mes "I will decide to report directly or not through you.";
+		next;
+		mes "[Ian Atnad]";
+		mes "That is it, right?";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Tatio]";
+		mes "That is right.";
+		mes "In reality there is not much change to the actual work.";
+		mes "Ah also...";
+		mes "For working diligently as a member of the Atnad excavation team..";
+		mes "" + strcharinfo(0) + " I will give you a small reward.";
+		getexp 4500000,3000000;
+		VER_MAIN = 40;
+		next;
+		mes "[Tatio]";
+		mes "The contents of the Memory Records are precious memories to me.";
+		mes "...It is like going through my diary. So I hope you take care in the future.";
+		close3;
+	}
+	cutin "ep15_tatio03.bmp",0;
+	mes "[Tatio]";
+	mes "...I hope everything goes smoothly with this...";
+	close3;
+}
+
+lhz_in01,272,255,3	script	Ian Atnad#ep152i01	4_M_IAN,{
+	if (VER_MAIN < 37)
+		end;
+	mes "[Ian Atnad]";
+	if (VER_MAIN == 37) {
+		cutin "verus_ian01.bmp",2;
+		mes "Have you arrived now?";
+		mes "It seems everybody has gathered.";
+		mes "So, let's see what it was you had to say to everybody.";
+		close3;
+	}
+	if (VER_MAIN == 38) {
+		cutin "verus_ian01.bmp",2;
+		mes "So, what do you want to say?";
+		mes "What is it that you cut me off in this important moment.";
+		next;
+		cutin "Arquien_n_atnad01.bmp",0;
+		mes "[Arquien]";
+		mes "What that man just said, was the incident of your disappearance?";
+		mes "The reason why you were running around outside for years.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Chief secretary]";
+		mes "No.. it's not that..";
+		mes "The time I was with the doctor was only four days.";
+		next;
+		cutin "Arquien_n_atnad04.bmp",0;
+		mes "[Arquien]";
+		mes "Before you said you were stuck somewhere for a week!";
+		mes "And running around like you were possessed by a ghost!";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "That.. that..!";
+		mes "Don't treat my passion for my field like a runaway ghost!";
+		mes "At the time I thought I was going to find something about my grand-grandfather..";
+		next;
+		mes "[Ian Atnad]";
+		mes "The place I saw.. The memory I had of that place...";
+		mes ".....";
+		mes "...?";
+		next;
+		mes "[Ian Atnad]";
+		mes "Wait a minute. Are you blaming me now?";
+		mes "I sent letters home, but you were the one who didn't reply!";
+		next;
+		cutin "Arquien_n_atnad04.bmp",0;
+		mes "[Arquien]";
+		mes "All the letters were sent back because the address wasn't clear!";
+		mes "Why are you talking big!";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "And didn't you sell the house and sent all my letters back!";
+		mes "You couldn't wait a few years so sell the house and disappear?!";
+		mes "What do you have to say for yourself!";
+		next;
+		mes "The situation is overheating due to the fight between father and daughter.";
+		mes "Aures and the secretary giving embarrassed looks.";
+		next;
+		select("Should the table be turned over?");
+		cutin "Arquien_n_atnad01.bmp",0;
+		mes "[Arquien]";
+		mes "What's that sound..";
+		mes "An..anyway isn't that secretary the main instigator of this whole incident?";
+		mes "What happened?";
+		VER_MAIN = 39;
+		close3;
+	}
+	if (VER_MAIN == 39) {
+		cutin "verus_ian01.bmp",2;
+		mes "We keep losing the point.";
+		mes "Shouldn't you ask why he attacked me first.";
+		mes "Let's please listen to what he has to say. Daughter.";
+		close3;
+	}
+	cutin "verus_ian01.bmp",2;
+	mes "It is confusing to hear a surprising story at once but";
+	mes "At the same time it's cathartic.";
+	mes "Hm.. I see. I see.";
+	close3;
+}
+
+lhz_in01,267,255,7	script	Aures#ep152i01	4_M_OLDSCHOLAR,{
+	if (VER_MAIN < 37)
+		end;
+	cutin "verus_aures.bmp",0;
+	mes "[Aures]";
+	if (VER_MAIN == 37) {
+		mes "Now you are here.";
+		mes "Sit here comfortably.";
+		mes "Although it might uncomfortable to sit on the corporation toilet.";
+		next;
+		mes "[Aures]";
+		mes "It is amusing to see those two together.";
+		mes "Seems you cannot trick blood.";
+		mes "Seeing how they talk alike.";
+	}
+	else if (VER_MAIN == 38)
+		mes "I loathe fighting but.. It is fun to see them together. Yes.";
+	else if (VER_MAIN > 38) {
+		cutin "verus_aures.bmp",0;
+		mes "[Aures]";
+		mes "I loathe fighting but.. It is fun to see them together. Yes.";
+	}
+	close3;
+}
+
+lhz_in01,272,251,3	script	Commander Arquien#ep152i	4_F_EDEN_MASTER,{
+	if (VER_MAIN < 37)
+		end;
+	if (VER_MAIN == 37) {
+		mes "[Arquien]";
+		cutin "Arquien_n_atnad01.bmp",2;
+		mes "Let's see if you gathered all of us to give us some bombastic story.";
+		close3;
+	}
+	if (VER_MAIN == 38) {
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "So, what do you want to say?";
+		mes "What is it that you cut me off in this important moment.";
+		next;
+		cutin "Arquien_n_atnad01.bmp",0;
+		mes "[Arquien]";
+		mes "What that man just said, was the incident of your disappearance?";
+		mes "The reason why you were running around outside for years.";
+		next;
+		cutin "ep15_tatio01.bmp",0;
+		mes "[Chief secretary]";
+		mes "No.. it's not that..";
+		mes "The time I was with the doctor was only four days.";
+		next;
+		cutin "Arquien_n_atnad04.bmp",0;
+		mes "[Arquien]";
+		mes "Before you said you were stuck somewhere for a week!";
+		mes "And running around like you were possessed by a ghost!";
+		next;
+		cutin "verus_ian01.bmp",2;
+		mes "[Ian Atnad]";
+		mes "That.. that..!";
+		mes "Don't treat my passion for my field like a runaway ghost!";
+		mes "At the time I thought I was going to find something about my grandfather..";
+		next;
+		mes "[Ian Atnad]";
+		mes "The place I saw.. The memory I had of that place...";
+		mes ".....";
+		mes "...?";
+		next;
+		mes "[Ian Atnad]";
+		mes "Wait a minute. Are you blaming me now?";
+		mes "I sent letters home, but you were the one who didn't reply!";
+		next;
+		cutin "Arquien_n_atnad04.bmp",0;
+		mes "[Arquien]";
+		mes "All the letters were sent back because the address wasn't clear!";
+		mes "Why are you talking big!";
+		next;
+		cutin "verus_ian03.bmp",2;
+		mes "[Ian Atnad]";
+		mes "And didn't you sell the house and sent all my letters back!";
+		mes "You couldn't wait a few years so sell the house and disappear?!";
+		mes "What do you have to say for yourself!";
+		next;
+		mes "The situation is overheating due to the fight between father and daughter.";
+		mes "Aures and the secretary giving embarrassed looks.";
+		next;
+		select("Should the table be turned over?");
+		cutin "Arquien_n_atnad04.bmp",2;
+		mes "[Arquien]";
+		mes "What's that sound..";
+		mes "An..anyway isn't that secretary the main instigator of this whole incident?";
+		mes "What happened?";
+		VER_MAIN = 39;
+		close3;
+	}
+	if (VER_MAIN == 39) {
+		mes "[Arquien]";
+		mes ".......Let's keep listening to that secretary guy.";
+		mes "If give me nonsense I'm going to flip this company over.";
+		close3;
+	}
+	cutin "Arquien_n_atnad02.bmp",2;
+	mes "[Arquien]";
+	mes "So he means we can know the embarrassing past of the secretary by collecting and listening to the Memory Records?";
+	mes "That is kind of interesting.";
+	next;
+	cutin "Arquien_n_atnad03.bmp",2;
+	mes "[Arquien]";
+	mes "What are you doing?";
+	mes "Let's go back now.";
+	mes "To the city that was too good for its own good.";
+	close3;
+}
+
+//- To Phantasmagorika!
+yuno_fild07,216,157,5	script	Guide Elisha#ep15_1bs2	4_F_ZONDAGIRL,{
+	if (VER_MAIN >= 4) {
+		mes "[Elisha]";
+		mes "Good day.";
+		mes "Please say your name, so I can check your registration.";
+		emotion ET_THROB;
+		next;
+		switch( select( "Say your name.", "Ask about the registration.", "End conversation." ) ) {
+		case 1:
+			mes "[Elisha]";
+			switch(VER_ELEVATOR) {
+			case 0:
+			case 1:
+				mes "Um, let's see...";
+				mes "I'm sorry, but you're not on the list. Could you check your registration status?";
+				emotion ET_PROFUSELY_SWEAT;
+				close;
+			case 2:
+				mes "You're back already.";
+				emotion ET_THROB;
+				next;
+				mes "[Elisha]";
+				mes "Let's see...";
+				mes "Ah, I've found your name.";
+				mes "Would you like to ^0000FFmove to Phantasmagorika^000000 now?";
+				next;
+				if (select( "No.", "Yes." ) == 1) {
+					mes "[Elisha]";
+					mes "Have a good day.";
+					emotion ET_THROB;
+					close;
+				}
+				mes "[Elisha]";
+				mes "Let me send you to Phantasmagorika.";
+				next;
+				mes "[Elisha]";
+				mes "For your safety, please avoid running or jumping while inside.";
+				next;
+				mes "[Elisha]";
+				mes "Ready?";
+				mes "Have a safe exploration!";
+				emotion ET_THROB;
+				next;
+				mes "^FF0000- BEEP-! -";
+				mes "- Service temporarily unavailable. -^000000";
+				emotion ET_HUK, playerattached();
+				next;
+				mes "[Elisha]";
+				mes "Um?";
+				mes "Could you hold on a moment?";
+				emotion ET_PROFUSELY_SWEAT;
+				next;
+				mes "^FF0000- BEEP-! -";
+				mes "- Service temporarily unavailable. -^000000";
+				emotion ET_HUK, playerattached();
+				next;
+				mes "[Elisha]";
+				mes "Um...";
+				mes "What's wrong with it?";
+				mes "Please give me a moment.";
+				emotion ET_PROFUSELY_SWEAT;
+				next;
+				mes "^FF0000- BEEP-! -";
+				mes "- Service temporarily unavailable. -^000000";
+				emotion ET_HUK, playerattached();
+				next;
+				mes "[Elisha]";
+				mes "Uh-oh.";
+				mes "Is it out of order?";
+				mes "It can't be!";
+				emotion ET_HUK;
+				next;
+				mes "^FF0000- BEEP-! -";
+				mes "- Service temporarily unavailable. -^000000";
+				emotion ET_HUK, playerattached();
+				next;
+				mes "[Elisha]";
+				mes "I'm sorry, " + strcharinfo(0) + ".";
+				mes "I know you're registered for the service, but it's out of order at this moment.";
+				mes "I'm sorry for this inconvenience.";
+				emotion ET_PROFUSELY_SWEAT;
+				emotion ET_HUK, playerattached();
+				next;
+				mes "[Elisha]";
+				mes "It was working fine just a moment ago.";
+				mes "I'm sorry.";
+				mes "I'll have to call in a technician. Please use the stairs instead.";
+				next;
+				mes "[Elisha]";
+				mes "^0000FFPhantasmagorika is past the tunnel to the south from the southeast gate outside Juperos Ruins.^000000";
+				next;
+				mes "[Elisha]";
+				mes "There are elevator doors near the fountain in the center of the place. Could you check what happened to the elevator?";
+				mes "I'm so sorry for all this.";
+				emotion ET_CRY;
+				changequest 11364,11365;// To Phantasmagorika!
+				VER_ELEVATOR = 3;
+				close;
+			case 3:
+				mes "It was working fine just a moment ago.";
+				mes "I'm sorry.";
+				mes "I'll have to call in a technician. Please use the stairs instead.";
+				next;
+				mes "[Elisha]";
+				mes "^0000FFPhantasmagorika is past the tunnel to the south from the southeast gate outside Juperos Ruins.^000000";
+				next;
+				mes "[Elisha]";
+				mes "There are elevator doors near the fountain in the center of the place. Could you check what happened to the elevator?";
+				mes "I'm so sorry for all this.";
+				emotion ET_CRY;
+				close;
+			case 4:
+				mes "I'm sorry.";
+				mes "The elevator is currently out of order.";
+				close;
+			default:
+				mes "Let's see...";
+				mes "A... B... C... D... E... F... Ah, there it is!";
+				emotion ET_PROFUSELY_SWEAT;
+				next;
+				mes "[Elisha]";
+				mes "" + strcharinfo(0) + ", your registration has been confirmed.";
+				mes "Would you like to move to Phantasmagorika?";
+				emotion ET_THROB;
+				next;
+				if (select( "No.", "Yes." ) == 1) {
+					mes "[Elisha]";
+					mes "Have a good day.";
+					close;
+				}
+				mes "[Elisha]";
+				mes "Let me send you to Phantasmagorika.";
+				next;
+				mes "[Elisha]";
+				mes "For your safety, please avoid running or jumping while inside.";
+				next;
+				mes "[Elisha]";
+				mes "Ready?";
+				mes "Have a safe exploration!";
+				close2;
+				warp "verus04",122,217;
+				end;
+			}
+		case 2:
+			mes "[Elisha]";
+			mes "*Clears her throat*";
+			mes "This facility is provided by ^0000FFRekenber^000000";
+			next;
+			mes "[Elisha]";
+			mes "to ^0000FFthe members of the Eden Group^000000 for their safe transportation to ^0000FFPhantasmagorika^000000.";
+			next;
+			mes "[Elisha]";
+			mes "To use this facility, you must be ^0000FFa member of the Eden Group who is registered for the Phantasmagorika excavation project^000000.";
+			next;
+			mes "[Elisha]";
+			mes "You can register for the use of the facility at ^0000FFRekenber Corporation Headquarters^000000, so long as you're a registered excavator of the Eden Group.";
+			if (VER_ELEVATOR >= 2)
+				close;
+			next;
+			if (select( "End conversation.", "Ask for directions." ) == 2) {
+				mes "[Elisha]";
+				mes "To register for the use of the facility, please visit ^0000FFRekenber Corporation Headquarters in Lighthalzen and talk to Leitner at the information desk to the west from the main entrance on the first floor^000000.";
+				next;
+				mes "[Elisha]";
+				mes "The whole registration process may sound cumbersome, but using the elevator is worth the trouble.";
+				if (VER_ELEVATOR == 0) {
+					setquest 11363;// To Phantasmagorika!
+					VER_ELEVATOR = 1;
+				}
+				close;
+			}
+			break;
+		case 3:
+			break;
+		}
+	}
+	mes "[Elisha]";
+	mes "My company Rekenber is in partnership with the Eden Group";
+	mes "for the ^0000FFPhantasmagorika excavation project^000000.";
+	next;
+	mes "[Elisha]";
+	mes "The newly discovered legacy of the ancients: Phantasmagorika!";
+	mes "Contact the ^0000FFEden Group^000000 to join its Phantasmagorika excavation project!";
+	close;
+
+OnInit:
+	questinfo 11363,QTYPE_QUEST,1;
+	setquestinfo_req 11363,11364,0,11365,0,11366,0;
+	end;
+}
+
+lhz_in01,75,209,3	script	Leitner#ep15_1bs	4_LGTSCIENCE,{
+	mes "[Leitner]";
+	switch(VER_ELEVATOR) {
+	case 0:
+		mes "Heya!";
+		mes "What brings you here, sweetheart?";
+		mes "If you're looking for a shoulder to cry on, I'm here.";
+		emotion ET_CHUP;
+		close;
+	case 1:
+		mes "Heya!";
+		mes "What brings you here, sweetheart?";
+		mes "If you're looking for a shoulder to cry on, I'm here.";
+		emotion ET_CHUP;
+		next;
+		select("Ask about the registration process.");
+		mes "[Leitner]";
+		mes "Oh.";
+		mes "I should have known.";
+		mes "You mean the elevator to Phantasmagorika, eh?";
+		emotion ET_THINK;
+		next;
+		mes "[Leitner]";
+		mes "When I first got this job, the elevator was private and I did diddly-squat.";
+		next;
+		mes "[Leitner]";
+		mes "Then, the management opened it to the public and my life went straight to hell.";
+		next;
+		mes "[Leitner]";
+		mes "Ah, why me?!";
+		mes "Goodbye, peaceful days!";
+		mes "I'm so busy that I barely have time for the ladies.";
+		emotion ET_HELP;
+		next;
+		mes "[Leitner]";
+		mes "Anyway, let's get you registered. I want to get back to my break.";
+		mes "Err... Write down your name here, and put your fingerprint next to it.";
+		mes "Done. Easy, huh?";
+		next;
+		mes "[Leitner]";
+		mes "I know, I know; why the extra step when the elevator is open to the public?";
+		next;
+		mes "^0000FF- BEEP-! -";
+		mes "- The following users -";
+		mes "- have been registered. -^000000";
+		next;
+		mes "[Leitner]";
+		mes "Alright,";
+		mes "you're good to go.";
+		mes "Now you can use the elevator.";
+		changequest 11363,11364;// To Phantasmagorika!
+		VER_ELEVATOR = 2;
+		close;
+	case 2:
+		mes "I know, I know; why the extra step when the elevator is open to the public?";
+		next;
+		mes "[Leitner]";
+		mes "Now you can use the elevator.";
+		close;
+	default:
+		mes "The elevator breaks almost every day, probably from carrying too many people.";
+		mes "Ah, I need rest. Sigh.";
+		emotion ET_HELP;
+		close;
+	}
+}
+
+verus04,119,220,3	script	Guide Scarlet#ep15_1bs	4_M_TELEPORTER,{
+	mes "[Scarlet]";
+	switch(VER_ELEVATOR) {
+	case 0:
+	case 1:
+	case 2:
+		mes "*Clears her throat*";
+		mes "This facility is provided by ^0000FFRekenber^000000";
+		next;
+		mes "[Scarlet]";
+		mes "to ^0000FFthe members of the Eden Group^000000 for their safe transportation to ^0000FFPhantasmagorika^000000.";
+		next;
+		mes "[Scarlet]";
+		mes "To use this facility, you must be ^0000FFa member of the Eden Group who is registered for the Phantasmagorika excavation project^000000.";
+		next;
+		mes "[Scarlet]";
+		mes "You can register for the use of the facility at ^0000FFRekenber Corporation Headquarters^000000, so long as you're a registered excavator of the Eden Group.";
+		next;
+		mes "[Scarlet]";
+		mes "Once you are registered, please double-check your registration status before using the facility.";
+		close;
+	case 3:
+		mes "What did you do in the elevator?";
+		emotion ET_FRET;
+		next;
+		mes "[Scarlet]";
+		mes "I told you not to run or jump inside the elevator!";
+		next;
+		mes "[Scarlet]";
+		mes "I can't believe you crushed the doors!";
+		next;
+		mes "[Mark]";
+		mes "It's my fault.";
+		mes "I should have kept a tight rein on him.";
+		emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Mark#ep15_1elb");
+		cutin "bu_mark3.bmp",0;
+		next;
+		mes "[Deu]";
+		mes "How do you expect me to trust myself to such a shoddy machine?";
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du3.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Enough!";
+		mes "Apologize to the lady!";
+		emotion ET_FRET, getnpcid(0, "Mark#ep15_1elb");
+		cutin "bu_mark4.bmp",0;
+		next;
+		mes "[Deu]";
+		mes "But he started it...";
+		cutin "bu_du3.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "...";
+		emotion ET_FRET, getnpcid(0, "Mark#ep15_1elb");
+		cutin "bu_mark4.bmp",0;
+		next;
+		mes "[Tamarin]";
+		mes "I told you stop jumping!";
+		emotion ET_HUK, getnpcid(0, "Tamarin#ep15_1elb");
+		cutin "ep143_taang.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "You guys,";
+		mes "stop fighting.";
+		mes "The floor feels dangerously unstable.";
+		emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Alf#ep15_1elb");
+		cutin "bu_alp2.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "We all should get off and call in a techni...";
+		cutin "",255;
+		next;
+		mes "^FF0000- THUD -^000000";
+		emotion ET_HUK;
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		emotion ET_HUK, getnpcid(0, "Mark#ep15_1elb");
+		emotion ET_HUK, getnpcid(0, "Tamarin#ep15_1elb");
+		emotion ET_HUK, getnpcid(0, "Alf#ep15_1elb");
+		emotion ET_HUK, getnpcid(0, "Magi#ep15_1elb");
+		next;
+		mes "[Magi]";
+		mes "Kyaaaaah-!";
+		emotion ET_HUK, getnpcid(0, "Magi#ep15_1elb");
+		cutin "bu_maggi4.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "Wah!";
+		mes "The floor rattled!";
+		emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "Stop!";
+		mes "Everyone, stay still!";
+		mes "Or we might plummet to the bottom!";
+		emotion ET_HUK;
+		cutin "",255;
+		next;
+		mes "[Scarlet]";
+		mes "Hey,";
+		mes "you!";
+		mes "Help!";
+		emotion ET_HELP;
+		next;
+		mes "[Scarlet]";
+		mes "This elevator is so unstable that none of us can move.";
+		mes "Could you bring us something to ^0000FFsupport the floor^000000?";
+		next;
+		mes "[Scarlet]";
+		mes "We don't have time to wait for a technician!";
+		mes "We just need ^FF000030 Used Iron Plates from Dimiks^000000 in Juperos!";
+		next;
+		mes "[Scarlet]";
+		mes "Please help us!";
+		changequest 11365,11366;// To Phantasmagorika!
+		VER_ELEVATOR = 4;
+		close;
+	case 4:
+		mes "Careful!";
+		mes "Everyone, stop moving!";
+		next;
+		mes "[Deu]";
+		mes "WAH-!";
+		mes "We're going to crash to the ground!";
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "Don't say that!";
+		mes "This is your fault!";
+		emotion ET_FRET, getnpcid(0, "Tamarin#ep15_1elb");
+		cutin "ep143_taang.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "Quiet, both of you!";
+		mes "If you move an inch, we are all going to die!";
+		emotion ET_HUK;
+		cutin "",255;
+		next;
+		mes "[Scarlet]";
+		if (countitem(7319) < 30) {// Used_Iron_Plate
+			mes "This elevator is so unstable that none of us can move.";
+			mes "Could you bring us something to ^0000FFsupport the floor^000000?";
+			next;
+			mes "[Scarlet]";
+			mes "We don't have time to wait for a technician!";
+			mes "We just need ^FF000030 Used Iron Plates from Dimiks^000000 in Juperos!";
+			next;
+			mes "[Scarlet]";
+			mes "Please help us!";
+			close;
+		}
+		mes "Did you bring Used Iron Plates?";
+		mes "Please push them in here carefully, one by one.";
+		delitem 7319,30;// Used_Iron_Plate
+		completequest 11366;// To Phantasmagorika!
+		VER_ELEVATOR = 5;
+		next;
+		mes "[Scarlet]";
+		mes "They might not hold for long, but that should still be enough us to get out.";
+		next;
+		select("Push in Used Iron Plates.");
+		mes "[Scarlet]";
+		mes "Now, get off!";
+		mes "The plates won't hold for long!";
+		next;
+		mes "[Deu]";
+		mes "Thank the gods!";
+		mes "Here, Magi!";
+		mes "Take my hand and get down.";
+		cutin "bu_du4.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "Whew...";
+		mes "I'm glad no one's hurt.";
+		mes "I'll let this go,";
+		mes "but never again!";
+		cutin "",255;
+		next;
+		mes "[Scarlet]";
+		mes "And " + strcharinfo(0) + ", thank you so much.";
+		mes "We could have been in big trouble if it weren't for you.";
+		emotion ET_THANKS;
+		next;
+		mes "[Scarlet]";
+		mes "I've just heard from Elisha.";
+		mes "You had to walk because the elevator was broken, right?";
+		next;
+		mes "[Scarlet]";
+		mes "I'm sorry for the inconvenience.";
+		mes "The elevator is back in operation now. Let me know if you want to go up.";
+		next;
+		mes "[Mark]";
+		mes "Whew! " + strcharinfo(0) + ", you've saved us.";
+		mes "Sigh, I don't know when he's going to grow up.";
+		emotion ET_THANKS, getnpcid(0, "Mark#ep15_1elb");
+		cutin "bu_mark2.bmp",0;
+		next;
+		mes "[Magi]";
+		mes "*Sob* *Hiccup*";
+		mes "Th-thanks... *Sob* *Hiccup*";
+		mes "I was so scared! Wah-!";
+		emotion ET_THANKS, getnpcid(0, "Magi#ep15_1elb");
+		cutin "bu_maggi4.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "...Sorry.";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "Thank you.";
+		mes "Sigh, I don't want to imagine what might have happened if you, " + strcharinfo(0) + ", didn't pass by at that moment.";
+		emotion ET_THANKS, getnpcid(0, "Tamarin#ep15_1elb");
+		cutin "ep143_tasmi.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "...Thank you.";
+		cutin "bu_alp1.bmp",2;
+		emotion ET_THANKS, getnpcid(0, "Alf#ep15_1elb");
+		next;
+		mes "[Tamarin]";
+		mes "By the way, don't you think it's strange";
+		mes "that an elevator is set up and running in the newly discovered ruins?";
+		cutin "ep143_tasta.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Well,";
+		mes "Rekenber is sponsoring the excavation, and that's a good enough reason for me.";
+		cutin "bu_mark1.bmp",0;
+		next;
+		mes "[???]";
+		mes "The ruins under Juperos. Isn't that exciting?";
+		cutin "",255;
+		next;
+		mes "[Deu]";
+		mes "It is!";
+		mes "No one hasn't figured out when the ruins were built.";
+		mes "Let's go! I want to be the first to know!";
+		cutin "bu_du2.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Calm down!";
+		mes "Haven't you learned? You almost broke the elevator!";
+		emotion ET_FRET, getnpcid(0, "Mark#ep15_1elb");
+		cutin "bu_mark3.bmp",0;
+		next;
+		mes "[Scarlet]";
+		mes "Be careful!";
+		mes "The floor is still unstable!";
+		cutin "",255;
+		close;
+	default:
+		mes "Good day.";
+		mes "Please say your name, so I can check your registration.";
+		next;
+		if (select( "Say your name.", "End conversation." ) == 1) {
+			mes "[Scarlet]";
+			mes "Hm...";
+			mes "Yes, " + strcharinfo(0) + ", your registration has been confirmed.";
+			mes "Would you like to move to the entrance to Juperos?";
+			next;
+			if (select( "No.", "Yes." ) == 2) {
+				mes "[Scarlet]";
+				mes "Ready?";
+				mes "Have a safe exploration!";
+				close2;
+				warp "yuno_fild07",230,156;
+				end;
+			}
+		}
+		mes "[Scarlet]";
+		mes "Have a good day.";
+		close;
+	}
+}
+
+function	script	excavator_part2	{
+	mes "[Deu]";
+	mes "Hm...";
+	mes "This place doesn't look as exciting as I thought.";
+	cutin "bu_du3.bmp",2;
+	next;
+	mes "[Mark]";
+	mes "What did you expect?";
+	emotion ET_THINK, getnpcid(0, "Mark#ep15_1elb");
+	cutin "bu_mark1.bmp",0;
+	next;
+	mes "[Deu]";
+	mes "You know,";
+	mes "I thought it'd be filled with amazing treasures.";
+	cutin "bu_du2.bmp",2;
+	next;
+	mes "[Mark]";
+	mes "It it were, other people probably beat us to it.";
+	cutin "bu_mark2.bmp",0;
+	next;
+	mes "[Alf]";
+	mes "Um...";
+	mes "The place may not look like much, but the building styles and materials are not like what I've seen in Midgard.";
+	cutin "bu_alp1.bmp",2;
+	next;
+	mes "[Alf]";
+	mes "Or in Juperos.";
+	next;
+	mes "[Deu]";
+	mes "Whoa!";
+	mes "Guys, come look at this fountain!";
+	emotion ET_HUK, getnpcid(0, "Fountain#ep15_1elb");
+	cutin "bu_du2.bmp",2;
+	setquest 11367;// Looking for the Traces
+	VER_ELEVATOR = 100;
+	return;
+}
+
+verus04,117,219,0	script	Alf#ep15_1elb	4_M_BLACKMAN,{
+	switch(VER_ELEVATOR) {
+	case 0:
+	case 1:
+	case 2:
+		mes "[Alf]";
+		mes "Excavation, that's a good subject.";
+		emotion ET_THINK;
+		cutin "bu_alp4.bmp",2;
+		break;
+	case 3:
+		mes "[Alf]";
+		mes "...";
+		mes "S-stop moving.";
+		emotion ET_PROFUSELY_SWEAT;
+		cutin "bu_alp2.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "WAAAAAHH-!";
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "What did you do in the elevator?";
+		mes "I told you not to run or jump inside the elevator!";
+		emotion ET_HUK, getnpcid(0, "Guide Scarlet#ep15_1bs");
+		cutin "",255;
+		close;
+	case 4:
+		mes "[Alf]";
+		mes "S-stop moving.";
+		mes "Th-the f-floor...";
+		emotion ET_PROFUSELY_SWEAT;
+		cutin "bu_alp2.bmp",2;
+		break;
+	case 5:
+		excavator_part2();
+		break;
+	case 100:
+		mes "[Alf]";
+		mes "What about the fountain?";
+		emotion ET_HUK, getnpcid(0, "Fountain#ep15_1elb");
+		cutin "bu_alp1.bmp",2;
+		break;
+	default:
+		mes "[Alf]";
+		mes "...Thank you.";
+		cutin "bu_alp1.bmp",2;
+		break;
+	}
+	close3;
+}
+verus04,115,220,5	script	Deu#ep15_1elb	4_M_REDMAN,{
+	switch(VER_ELEVATOR) {
+	case 0:
+	case 1:
+	case 2:
+		mes "[Deu]";
+		mes "Adventurers,";
+		mes "let's go!";
+		cutin "bu_du2.bmp", 2;
+		break;
+	case 3:
+		mes "[Deu]";
+		mes "WAAAAAHH-!";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "Someone please do something!";
+		next;
+		mes "[Scarlet]";
+		mes "What did you do in the elevator?";
+		mes "I told you not to run or jump inside the elevator!";
+		emotion ET_HUK, getnpcid(0, "Guide Scarlet#ep15_1bs");
+		cutin "",255;
+		close;
+	case 4:
+		mes "[Deu]";
+		mes "WAH-!";
+		mes "We're going to crash to the ground!";
+		emotion ET_HUK;
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "Don't say that!";
+		mes "This is your fault!";
+		emotion ET_HUK, getnpcid(0, "Tamarin#ep15_1elb");
+		cutin "ep143_tahuk.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "Quiet, both of you!";
+		mes "If you move an inch, we are all going to die!";
+		emotion ET_HUK, getnpcid(0, "Guide Scarlet#ep15_1bs");
+		cutin "",255;
+		close;
+	case 5:
+		excavator_part2();
+		break;
+	case 100:
+		mes "[Deu]";
+		mes "Whoa!";
+		mes "Guys, come look at this fountain!";
+		emotion ET_HUK, getnpcid(0, "Fountain#ep15_1elb");
+		cutin "bu_du2.bmp",2;
+		break;
+	default:
+		mes "[Deu]";
+		mes "Adventuring is all about bravery and curiosity!";
+		cutin "bu_du2.bmp",2;
+	}
+	close3;
+}
+verus04,117,220,3	script	Magi#ep15_1elb	4_F_PINKWOMAN,{
+	switch(VER_ELEVATOR) {
+	case 0:
+	case 1:
+	case 2:
+		mes "[Magi]";
+		mes "Phantasmagorika. What a pretty name!";
+		cutin "bu_maggi2.bmp", 2;
+		break;
+	case 3:
+		mes "[Magi]";
+		mes "Kyaaaahhh-!";
+		emotion ET_HUK;
+		cutin "bu_maggi4.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "WAAAAAHH-!";
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "What did you do in the elevator?";
+		mes "I told you not to run or jump inside the elevator!";
+		emotion ET_HUK, getnpcid(0, "Guide Scarlet#ep15_1bs");
+		cutin "",255;
+		close;
+	case 4:
+		mes "[Magi]";
+		mes "Kyaaaaah-!";
+		emotion ET_HUK;
+		cutin "bu_maggi4.bmp",2;
+		break;
+	case 5:
+		excavator_part2();
+		break;
+	case 100:
+		mes "[Magi]";
+		mes "Deu is full of bile and vinegar.";
+		mes "What's so interesting about the fountain?";
+		emotion ET_HUK, getnpcid(0, "Fountain#ep15_1elb");
+		cutin "bu_maggi1.bmp",2;
+		break;
+	default:
+		mes "[Magi]";
+		mes "*Sob* *Hiccup*";
+		mes "Th-thanks... *Sob* *Hiccup*";
+		mes "I was so scared! Wah-!";
+		emotion ET_CRY;
+		cutin "bu_maggi4.bmp",2;
+	}
+	close3;
+}
+verus04,115,221,5	script	Mark#ep15_1elb	4_M_BLUEMAN,{
+	switch(VER_ELEVATOR) {
+	case 0:
+	case 1:
+	case 2:
+		mes "[Mark]";
+		mes "Phantasmagorika.";
+		mes "I can't wait to know more about this place.";
+		cutin "bu_mark1.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "It's discovered near Juperos, but believed to belong to a different civilization.";
+		cutin "bu_mark2.bmp",0;
+		break;
+	case 3:
+		mes "[Mark]";
+		mes "Watch out!";
+		emotion ET_HUK;
+		cutin "bu_mark4.bmp",0;
+		next;
+		mes "[Deu]";
+		mes "WAAAAAHH-!";
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "What did you do in the elevator?";
+		mes "I told you not to run or jump inside the elevator!";
+		emotion ET_HUK, getnpcid(0, "Guide Scarlet#ep15_1bs");
+		cutin "",255;
+		close;
+	case 4:
+		mes "[Mark]";
+		mes "By the gods, Deu!";
+		mes "You're going to give me a heart attack!";
+		emotion ET_FRET;
+		cutin "bu_mark3.bmp",0;
+		break;
+	case 5:
+		excavator_part2();
+		break;
+	case 100:
+		mes "[Mark]";
+		mes "What about the fountain?";
+		emotion ET_HUK, getnpcid(0, "Fountain#ep15_1elb");
+		cutin "bu_mark3.bmp",0;
+		break;
+	default:
+		mes "[Mark]";
+		mes "Whew! " + strcharinfo(0) + ", you've saved us.";
+		mes "Sigh, I don't know when he's going to grow up.";
+		cutin "bu_mark3.bmp",0;
+	}
+	close3;
+}
+verus04,116,219,5	script	Tamarin#ep15_1elb	4_M_TAMARIN,{
+	switch(VER_ELEVATOR) {
+	case 0:
+	case 1:
+	case 2:
+		mes "[Tamarin]";
+		mes "An excavation project of this scale should attract throngs of people.";
+		cutin "ep143_tasta.bmp",2;
+		break;
+	case 3:
+		mes "[Tamarin]";
+		mes "I told you stop jumping!";
+		emotion ET_HUK;
+		cutin "ep143_tahuk.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "WAAAAAHH-!";
+		emotion ET_HUK, getnpcid(0, "Deu#ep15_1elb");
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Scarlet]";
+		mes "What did you do in the elevator?";
+		mes "I told you not to run or jump inside the elevator!";
+		emotion ET_HUK, getnpcid(0, "Guide Scarlet#ep15_1bs");
+		cutin "",255;
+		close;
+	case 4:
+		mes "[Tamarin]";
+		mes "Argh,";
+		mes "nothing is going in my favor!";
+		emotion ET_CRY;
+		cutin "ep143_tahuk.bmp",2;
+		break;
+	case 5:
+		excavator_part2();
+		break;
+	case 100:
+		mes "[Tamarin]";
+		mes "Hm, did Deu find something in the fountain?";
+		emotion ET_HUK, getnpcid(0, "Fountain#ep15_1elb");
+		cutin "ep143_tasmi.bmp",2;
+		break;
+	default:
+		mes "[Tamarin]";
+		mes "Thank you.";
+		mes "Sigh, I don't want to imagine what might have happened if you, " + strcharinfo(0) + ", didn't pass by at that moment.";
+		cutin "ep143_tasmi.bmp",2;
+	}
+	close3;
+}
+
+verus04,116,226,0	script	Fountain#ep15_1elb	4_ENERGY_BLUE,{
+	if (VER_ELEVATOR == 100) {
+		mes "[Deu]";
+		mes "Look, I wiped it, and it sparkles!";
+		cutin "bu_du2.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Why can't you just listen to us?";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "Stop wasting your time on something so stupid!";
+		cutin "ep143_taang.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Um...";
+		mes "Wait.";
+		cutin "bu_alp3.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Look, it doesn't look like it's been buried deep underground for centuries.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "You're right. It looks too clean underneath all the dirt and grime.";
+		cutin "ep143_tasta.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Let's see...";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Um...";
+		mes "It's too clean. I can't tell anything about it.";
+		cutin "bu_alp2.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "If this fountain was ever used, it should have some sort of deposit left on the bottom, but there's none at all. It's almost as if the water was drained out of it at once.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "The deposit could have been wiped off naturally after a long time.";
+		next;
+		mes "[Alf]";
+		mes "Let's look around for something else.";
+		next;
+		mes "[Tamarin]";
+		mes "How about those sundries on the left side?";
+		emotion ET_HUK, getnpcid(0, "Sundries#ep15_1elb");
+		cutin "ep143_tasta.bmp",2;
+		changequest 11367,11368;// Looking for the Traces
+		VER_ELEVATOR = 101;
+	}
+	else if (VER_ELEVATOR == 101) {
+		mes "[Alf]";
+		mes "Let's look around for something else.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "How about those sundries on the left side?";
+		emotion ET_HUK, getnpcid(0, "Sundries#ep15_1elb");
+		cutin "ep143_tasta.bmp",2;
+	}
+	else {
+		mes "- Ordinary-looking Fountain -";
+		mes "- There's nothing in it. -";
+	}
+	close3;
+}
+
+verus04,95,238,0	script	Sundries#ep15_1elb	4_ENERGY_BLUE,{
+	if (VER_ELEVATOR == 101) {
+		mes "[Alf]";
+		mes "Hm...";
+		mes "Everything looks too clean.";
+		mes "This site doesn't look like it's as old as we thought it was.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Aside from those piles of broken machines, nothing looks too special.";
+		next;
+		mes "[Alf]";
+		mes "And look at the tree on the left side.";
+		emotion ET_HUK, getnpcid(0, "Tree#ep15_1elb");
+		changequest 11368,11369;// Looking for the Traces
+		VER_ELEVATOR = 102;
+	}
+	else if (VER_ELEVATOR == 102) {
+		mes "[Alf]";
+		mes "Look at the tree on the left side.";
+		cutin "bu_alp1.bmp",2;
+		emotion ET_HUK, getnpcid(0, "Tree#ep15_1elb");
+	}
+	else
+		mes "- The ground is littered with sundries. -";
+	close3;
+}
+
+verus04,79,249,0	script	Tree#ep15_1elb	4_ENERGY_BLUE,{
+	if (VER_ELEVATOR == 102) {
+		mes "[Deu]";
+		mes "I've been wondering since we arrived: don't trees need sunlight to grow?";
+		cutin "bu_du1.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "*Gasp*";
+		mes "Deu, that's the smartest thing I've ever heard you say.";
+		cutin "ep143_tahuk.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "What did you say?";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "How did this tree grow underground?";
+		mes "There's no sunlight.";
+		cutin "bu_mark1.bmp",0;
+		next;
+		mes "[Magi]";
+		mes "It doesn't look like it's enchanted.";
+		cutin "bu_maggi1.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "Oh, look here!";
+		mes "Something strange is standing in front of the door!";
+		emotion ET_HUK, getnpcid(0, "Signboard#ep15_1elb");
+		cutin "bu_du2.bmp",2;
+		changequest 11369,11370;// Looking for the Traces
+		VER_ELEVATOR = 103;
+	}
+	else if (VER_ELEVATOR == 103) {
+		mes "[Deu]";
+		mes "Oh, look here!";
+		mes "Something strange is standing in front of the door!";
+		emotion ET_HUK, getnpcid(0, "Signboard#ep15_1elb");
+		cutin "bu_du2.bmp",2;
+	}
+	else {
+		mes "A tall, verdant tree.";
+		mes "Nothing looks special about it, except that it's growing underground.";
+	}
+	close3;
+}
+
+verus04,62,255,0	script	Signboard#ep15_1elb	4_ENERGY_BLUE,{
+	if (VER_ELEVATOR == 103 || VER_ELEVATOR == 104) {
+		if (VER_ELEVATOR == 103) {
+			mes "[Mark]";
+			mes "Hey!";
+			mes "Stop wandering off! This place can be dangerous!";
+			cutin "bu_mark3.bmp",0;
+			next;
+			mes "[Deu]";
+			mes "Adventuring is all about bravery and curiosity!";
+			cutin "bu_du2.bmp",2;
+			next;
+			mes "[Deu]";
+			mes "And I'm not going to let other people take all the treasures!";
+			cutin "bu_du1.bmp",2;
+			next;
+			mes "[Tamarin]";
+			mes "Last time you said that, you were hospitalized for a month.";
+			cutin "ep143_taang.bmp",2;
+			next;
+			mes "[Deu]";
+			mes "This time, it's different!";
+			mes "Plus, what doesn't kill me only makes me stronger. It did!";
+			cutin "bu_du5.bmp",2;
+			next;
+			mes "[Mark]";
+			mes "You're delusional.";
+			cutin "bu_mark4.bmp",0;
+			next;
+			mes "[Alf]";
+			mes "Oh,";
+			mes "wait.";
+			cutin "bu_alp1.bmp",2;
+			next;
+		}
+		mes "[Alf]";
+		mes "Look behind the building.";
+		mes "There's a path that leads upward.";
+		cutin "bu_alp3.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "I go";
+		mes "wherever my instinct leads me!";
+		mes "Mwah hah hah!";
+		cutin "bu_du2.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Deu, stop!";
+		mes "Did you not hear me?!";
+		cutin "bu_mark3.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "Grr!";
+		mes "He's out of control.";
+		next;
+		mes "[Magi]";
+		mes "Mark,";
+		mes "Deu's managed to get that far already.";
+		cutin "bu_maggi1.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Grr!";
+		mes "That knucklehead!";
+		cutin "bu_mark3.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "We'd better follow him before we lose him.";
+		cutin "bu_mark1.bmp",0;
+		if (VER_ELEVATOR == 103) {
+			changequest 11370,11371;// Looking for the Traces
+			VER_ELEVATOR = 104;
+		}
+		close3;
+	}
+	mes "- The door is blocked. -";
+	close;
+}
+
+verus03,46,23,3	script	Deu#ep15_1elb03	4_M_REDMAN,{
+	mes "[Deu]";
+	if (VER_ELEVATOR == 104) {
+		mes "Whoa...";
+		mes "I thought this place would be the same as the last one, but it's overrun with machines.";
+		emotion ET_HUK;
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "Are these the same as those in Juperos?";
+		cutin "bu_du1.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "What does this place have to do with Juperos?";
+		next;
+		mes "[Deu]";
+		mes "Up there, I saw another fountain looking similar to the last one.";
+		mes "Do you want to go check it out?";
+		cutin "bu_du2.bmp",2;
+		changequest 11371,11372;// Looking for the Traces
+		VER_ELEVATOR = 105;
+	}
+	else if (VER_ELEVATOR == 105) {
+		mes "Up there, I saw another fountain looking similar to the last one.";
+		mes "Do you want to go check it out?";
+		cutin "bu_du2.bmp",2;
+	}
+	else {
+		mes "What does this place have to do with Juperos?";
+		cutin "bu_du5.bmp",2;
+	}
+	close3;
+}
+
+verus03,44,65,0	script	Fountain#ep15_1elb03	4_ENERGY_BLUE,{
+	if (VER_ELEVATOR == 105) {
+		mes "[Alf]";
+		mes "Hm...";
+		mes "This place is disturbingly clean.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "All the buildings are well preserved. What do you think happened to the owners?";
+		cutin "ep143_tasta.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "If they're dead, they're not buried or left to rot in here. If they left... well, I don't think they did.";
+		cutin "bu_alp3.bmp",2;
+		next;
+		mes "[Magi]";
+		mes "I tried to read with magic,";
+		mes "but to no avail.";
+		cutin "bu_maggi1.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "So the trail of clues went cold.";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "...";
+		cutin "bu_mark3.bmp",0;
+		next;
+		mes "[Deu]";
+		mes "Ouch! Why did you hit me?";
+		cutin "bu_du4.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "I'll take the path north. Meet me up there later.";
+		cutin "bu_mark2.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "Keep an eye on Deu; he wanders off easily.";
+		cutin "bu_mark4.bmp",0;
+		changequest 11372,11373;// Looking for the Traces
+		VER_ELEVATOR = 106;
+	}
+	else if (VER_ELEVATOR == 106) {
+		mes "[Mark]";
+		mes "I'll take the path north. Meet me up there later.";
+		cutin "bu_mark2.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "Keep an eye on Deu; he wanders off easily.";
+		cutin "bu_mark4.bmp",0;
+	}
+	else {
+		mes "- Ordinary-looking Fountain -";
+		mes "- There's nothing in it. -";
+	}
+	close3;
+}
+
+verus03,88,237,3	script	Mark#ep15_1elb03	4_M_BLUEMAN,{
+	mes "[Mark]";
+	if (VER_ELEVATOR == 106) {
+		mes "Do you see the giant machine ahead of us?";
+		mes "Unlike the first place, this place is filled with giant machines.";
+		cutin "bu_mark1.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "Buildings are crumbled. The ground is caved in here and there.";
+		next;
+		mes "[Mark]";
+		mes "I've found a path over there, though it's blocked.";
+		next;
+		mes "[Mark]";
+		mes "That doesn't bode well.";
+		cutin "bu_mark4.bmp",0;
+		next;
+		mes "[Mark]";
+		mes "Oh, Tamarin!";
+		mes "Don't go over there!";
+		cutin "bu_mark1.bmp",0;
+		emotion ET_HUK;
+		changequest 11373,11374;// Looking for the Traces
+		VER_ELEVATOR = 107;
+	}
+	else if (VER_ELEVATOR == 107) {
+		mes "Oh, Tamarin!";
+		mes "Don't go over there!";
+		cutin "bu_mark1.bmp",0;
+		emotion ET_HUK;
+	}
+	else {
+		mes "Do you see the giant machine ahead of us?";
+		mes "Unlike the first place, this place is filled with giant machines.";
+		cutin "bu_mark3.bmp", 0;
+	}
+	close3;
+}
+
+verus03,51,256,3	script	Tamarin#ep15_1elb03	4_M_TAMARIN,{
+	mes "[Tamarin]";
+	mes "Look over there.";
+	mes "That part of the place is completely destroyed.";
+	cutin "ep143_tahuk.bmp",2;
+	if (VER_ELEVATOR == 107 || VER_ELEVATOR == 108) {
+		next;
+		mes "[Tamarin]";
+		mes "Magi, how's it like over there?";
+		cutin "ep143_tasta.bmp",2;
+		emotion ET_HUK, getnpcid(0, "Magi#ep15_1elb03");
+		if (VER_ELEVATOR == 107) {
+			changequest 11374,11375;// Looking for the Traces
+			VER_ELEVATOR = 108;
+		}
+	}
+	close3;
+}
+
+verus03,35,254,3	script	Magi#ep15_1elb03	612,{
+	if (VER_ELEVATOR < 108) {
+		mes "[Magi]";
+		mes "Danger is in the air. I can feel it in my bones.";
+		cutin "bu_maggi3.bmp",2;
+	}
+	else if (VER_ELEVATOR == 108) {
+		mes "[Magi]";
+		mes "Oh.";
+		mes "The path over here is also blocked.";
+		cutin "bu_maggi1.bmp",2;
+		next;
+		mes "[Magi]";
+		mes "I'm sensing some kind of current on the other side,";
+		mes "but I can't tell exactly what.";
+		cutin "bu_maggi3.bmp",2;
+		next;
+		mes "[Magi]";
+		mes "It doesn't feel like a living thing,";
+		mes "but it's strong just the same.";
+		cutin "bu_maggi1.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "Um.";
+		mes "I really don't want to go over there.";
+		cutin "bu_du3.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "...!";
+		mes "That's a first. You earned the nickname Red-haired Boar because you never stop running.";
+		cutin "ep143_tahuk.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "No one calls me that!";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "I've got cooler nicknames! Call me those!";
+		next;
+		mes "[Alf]";
+		mes "Deu.";
+		mes "Don't insult boars.";
+		mes "All their parts, from head to toe, are useful.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "Delicious, too.";
+		cutin "bu_alp4.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "That's not the point!";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Deu's instinct has never betrayed us. We should steer clear of that path.";
+		mes "Right, Boar?";
+		cutin "bu_mark2.bmp",0;
+		next;
+		mes "[Deu]";
+		mes "Grr!";
+		mes "I said";
+		mes "don't call me that!";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Alf]";
+		mes "The path is blocked, and if the Phantasmagorika Excavation Team hasn't cleared it, then there must be a reason. Let's steer clear of it until we find out more about it.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Deu]";
+		mes "Don't you make fun of me!";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "I agree.";
+		mes "Let's check the other places first.";
+		completequest 11375;// Looking for the Traces
+		getexp 1000000,0;
+		cutin "bu_mark2.bmp",0;
+		VER_ELEVATOR = 109;
+	}
+	else {
+		mes "[Alf]";
+		mes "The path is blocked, and if the Phantasmagorika Excavation Team hasn't cleared it, then there must be a reason. Let's steer clear of it until we find out more about it.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "I agree.";
+		mes "Let's check the other places first.";
+		cutin "bu_mark2.bmp",0;
+	}
+	close3;
+}
+
+// Part 3 : Vestige
+verus01,221,65,5	script	Due#Verus	4_M_REDMAN,{
+	if (VER_MAIN < 19)
+		end;
+	mes "[Due]";
+	if (VER_ELEVATOR == 109 || VER_ELEVATOR == 1000) {
+		if (VER_ELEVATOR == 109) {
+			mes "Isn't this a complete mess?";
+			mes "Whew, barely got in!";
+			mes "I hate these access protocols.";
+			cutin "bu_du3.bmp",2;
+			next;
+			mes "[Mark]";
+			mes "I think it's an essential protocol needed for safety.";
+			cutin "bu_mark3.bmp",0;
+			next;
+			mes "[Due]";
+			mes "You guys, look at this!";
+			cutin "bu_du2.bmp",2;
+			next;
+			mes "[Due]";
+			mes "Isn't this a complete mess?";
+			next;
+			mes "[Mark]";
+			mes "Hey...";
+			mes "Didn't you just say that?";
+			cutin "bu_mark3.bmp",0;
+			next;
+			mes "[Alp]";
+			mes "Hey.";
+			mes "Forget about that and let's start on the investigation instead.";
+			cutin "bu_alp1.bmp",2;
+			next;
+			mes "[Tamarin]";
+			mes "By the way I think I know why only this place was sealed off.";
+			cutin "ep143_tasta.bmp",2;
+			next;
+			mes "[Tamarin]";
+			mes "There are no intact buildings and the cracks on the ground are much more severe compared to other areas...";
+			next;
+			mes "[Tamarin]";
+			mes "Not to mention these monsters...";
+			cutin "ep143_tahuk.bmp",2;
+			next;
+			mes "[Tamarin]";
+			mes "It seems they are only found here so something is wrong...";
+			next;
+			mes "[Due]";
+		}
+		mes "Right!";
+		mes "Our job is to investigate that!";
+		cutin "bu_du2.bmp",2;
+		next;
+		mes "[Alp]";
+		mes "Come to think of it the people passing by earlier did say there is an incredible device in the center...";
+		cutin "bu_alp3.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "Then let's investigate that part first.";
+		cutin "bu_mark1.bmp",0;
+		if (VER_ELEVATOR == 109) {
+			setquest 11381;// Vestige
+			VER_ELEVATOR = 1000;
+		}
+		close3;
+	}
+	mes "Investigations are supposed to be done calmly...";
+	cutin "bu_du3.bmp",2;
+	close3;
+}
+
+verus01,151,173,3	script	Fruit#Verus	4_F_FRUIT,{
+	mes "[Fruit]";
+	if (VER_ELEVATOR < 110) {
+		mes "Coooooooooolll!!!!";
+		mes "See this?";
+		mes "Right here!!!!";
+		cutin "EP15_2_fru_2.bmp",2;
+		next;
+		mes "[Fruit]";
+		mes "Doesn't it look like something will go swirly?!";
+		mes "Haaa!";
+		close3;
+	}
+	if (VER_ELEVATOR == 1000 || VER_ELEVATOR == 1001) {
+		if (VER_ELEVATOR == 1000) {
+			mes "Coooooooooolll!!!!";
+			mes "See this?";
+			mes "Right here!!!!";
+			cutin "EP15_2_fru_2.bmp",2;
+			next;
+			mes "[Fruit]";
+			mes "Doesn't it look like something will go swirly?!";
+			mes "Haaa!";
+			next;
+			mes "[Fruit]";
+			mes "I wish I could take the whole thing to my laboratory!";
+			mes "I can only watch on...";
+			cutin "EP15_2_fru_3.bmp",2;
+			next;
+			mes "[Fruit]";
+			mes "So I was thinking...";
+			mes "I was busy here so I haven't been able to go down to the underground bunker they say is right underneath.";
+			cutin "EP15_2_fru_2.bmp",2;
+			next;
+			mes "[Fruit]";
+			mes "Do you want to go?";
+			next;
+			mes "[Fruit]";
+			mes "It isn't common to have someone tell you all the investigation points, right?";
+			next;
+			mes "[Fruit]";
+			mes "I am not asking you to work for free either!";
+			mes "If you bring back interesting results there will be rewards!";
+			next;
+			mes "[Fruit]";
+			mes "What do you think?";
+			next;
+			if (select( "Quit.", "Do it." ) == 1) {
+				mes "[Fruit]";
+				mes "Eh...";
+				cutin "EP15_2_fru_1.bmp",2;
+				close2;
+				cutin "",255;
+				end;
+			}
+		}
+		mes "Yahoo!!!";
+		mes "If you go in a little ways there will probably be someone to guide you.";
+		next;
+		mes "[Fruit]";
+		mes "I will be expecting you to bring back lots of fun stuff.";
+		if (VER_ELEVATOR == 1000) {
+			erasequest 11381;// Vestige
+			setquest 11382;// Vestige
+			VER_ELEVATOR = 1001;
+		}
+		close3;
+	}
+	if (checkquest(11380,HUNTING) == 2) {
+		mes "[Fruit]";
+		mes "Aarrghhhh!!!";
+		mes "Amazing!!!";
+		cutin "EP15_2_fru_2.bmp",2;
+		next;
+		mes "[Fruit]";
+		mes "So? So? Then what?";
+		mes "Come on! Tell me more!!!";
+		erasequest 11380;// Final Room
+		getitem 6827,1;// Intact Machine Component
+		getitem 6828,1;// Gravity Safety Device
+		close3;
+	}
+	mes "Hm... Is there anything more interesting?";
+	cutin "EP15_2_fru_1.bmp",2;
+	next;
+	if (select( "Trade goods.", "Quit." ) == 1) {
+		mes "[Fruit]";
+		mes "I will give you equipment in return for 17 intact machine components!";
+		next;
+		switch( select( "Runaway Chip", "Broken Chip 1", "Broken Chip 2" ) ) {
+		case 1:
+			mes "[Fruit]";
+			mes "Runaway Chip is HIT + 50, FLEE + 50, MSP - 50%";
+			next;
+			mes "[Fruit]";
+			mes "When equipped together with Broken Chip 1 and Broken Chip 2, you get unlimited movement acceleration.";
+			next;
+			mes "[Fruit]";
+			mes "ATK and MATK + 50. If helmet refinement is at 9, it has an affect of MSP + 50%, MHP + 10%.";
+			.@item_id = 18997;
+			break;
+		case 2:
+			mes "[Fruit]";
+			mes "Broken Chip 1 has STR + 4. If equipped with Broken Chip 2, it has a STR + 8, INT+ 8 affect.";
+			.@item_id = 28326;
+			break;
+		case 3:
+			mes "[Fruit]";
+			mes "Broken Chip 2 has INT + 4. If equipped with Broken Chip 1, it has a STR + 8, INT+ 8 affect.";
+			.@item_id = 28327;
+			break;
+		}
+		next;
+		if (select( "Exchange", "Quit." ) == 1) {
+			if (countitem(6827) < 17) {
+				mes "[Fruit]";
+				mes "Not enough!!!";
+				close3;
+			}
+			delitem 6827,17;// Intact Machine Component
+			getitem .@item_id,1;// Runaway Chip
+			close3;
+		}
+		// continue
+	}
+	mes "[Fruit]";
+	mes "Is this not what you wanted?";
+	close3;
+}
+
+un_bunker,100,96,3	script	Mark#Bunker Entrance	4_M_BLUEMAN,{
+	mes "[Mark]";
+	if (VER_ELEVATOR == 1001 || VER_ELEVATOR == 1002) {
+		if (VER_ELEVATOR == 1001) {
+			mes "This part is very pristinely preserved compared to the upper parts.";
+			mes "But this disgusting smell....";
+			cutin "bu_mark4.bmp",0;
+			next;
+			mes "[Mark]";
+			mes "The Undead not seen in other areas can be easily seen in this zone.";
+			next;
+			mes "[Mark]";
+			mes "If you look at the structure of this place...";
+			mes "Or the condition, I think this place was built to be used as a bunker.";
+			next;
+			mes "[Tamarin]";
+			mes "Then that means... The Undead...";
+			cutin "ep143_tahuk.bmp",2;
+			next;
+			mes "[Maggi]";
+			mes "Eeeeeeeeeeek!!!!!";
+			cutin "bu_maggi4.bmp",2;
+			next;
+			mes "[Mark]";
+		}
+		mes "It might be a good idea to calm down first...and look around thoroughly.";
+		cutin "bu_mark1.bmp",0;
+		next;
+		mes "[Due]";
+		mes "O...o...o...okay!";
+		mes "Thi...thi...this stuff..... is...is nothing...";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Alp]";
+		mes "Then let's look around individually and send a signal when something of value is found.";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Due]";
+		mes "Wa...wait!!";
+		mes "Wouldn't it be better to move together since it's dangerous?";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Due]";
+		mes "Hey!";
+		mes "Look!";
+		mes "Don't leave me!";
+		mes "Hey!!!";
+		next;
+		mes "[Due]";
+		mes "Wait for me!!!!!";
+		if (VER_ELEVATOR == 1001) {
+			changequest 11382,11383;// Vestige
+			VER_ELEVATOR = 1002;
+		}
+		close3;
+	}
+	mes "What is this disgusting smell?";
+	cutin "bu_mark4.bmp",0;
+	close3;
+}
+
+un_bunker,363,171,3	script	Alp#Entrance	4_M_BLACKMAN,{
+	mes "[Alp]";
+	if (VER_ELEVATOR < 1002) {
+		mes "There are too many suspicious places...";
+		cutin "bu_alp3.bmp",2;
+		close3;
+	}
+	if (VER_ELEVATOR == 1002) {
+		mes "Um...";
+		mes "You're here...";
+		cutin "bu_alp3.bmp",2;
+		next;
+		mes "[Alp]";
+		mes "I didn't send the signal yet but did you come here because you also got a strange feeling?";
+		cutin "bu_alp1.bmp",2;
+		next;
+		mes "[Alp]";
+		mes "A long time ago...";
+		mes "...";
+		next;
+		mes "[Alp]";
+		mes "No...no.";
+		mes "Let's call the others and start the investigation.";
+		cutin "bu_alp2.bmp",2;
+		next;
+		switch( select( "Quit.", "Investigate." ) ) {
+		case 1:
+			mes "[Alp]";
+			mes "...";
+			mes "Don't forget our goal is to investigate...";
+			cutin "bu_alp1.bmp",2;
+			break;
+		case 2:
+			mes "[Alp]";
+			mes "I just sent out the signal so the others will arrive soon.";
+			cutin "bu_alp1.bmp",2;
+			next;
+			mes "[Due]";
+			mes "Aaarghhhh!!!!";
+			mes "Get away you unctuous bastards!!!!!";
+			cutin "bu_du5.bmp",2;
+			next;
+			mes "[Mark]";
+			mes "Be quiet...";
+			cutin "bu_mark3.bmp",0;
+			next;
+			mes "[Verity]";
+			mes "Is there something special about this room?";
+			cutin "EP15_2_brt_3.bmp",2;
+			next;
+			mes "[Due]";
+			mes "Oh! The woman at the entrance earlier?";
+			mes "Why are you at a dangerous place like this?";
+			cutin "bu_du5.bmp",2;
+			next;
+			mes "[Verity]";
+			mes "Oh?";
+			mes "Did you not hear?";
+			mes "That..";
+			cutin "EP15_2_brt_5.bmp",2;
+			next;
+			mes "[Tamarin]";
+			mes "Come to think of it that girl did say there would probably be a guide.";
+			cutin "ep143_tasmi.bmp",2;
+			next;
+			mes "[Alp]";
+			mes "....Um...";
+			mes "Was there...";
+			cutin "bu_alp1.bmp",2;
+			next;
+			mes "[Mark]";
+			mes "Anyway it seems everybody is here so let's go in.";
+			cutin "bu_mark1.bmp",0;
+			next;
+			mes "[Alp]";
+			mes "Right...";
+			mes "There's a bad energy so be careful...";
+			cutin "bu_alp1.bmp",2;
+			erasequest 11383;// Vestige
+			setquest 11384;// Vestige
+			VER_ELEVATOR = 1003;
+			close2;
+			warp "un_bunker",385,83;
+			end;
+		}
+	}
+	mes "Is there more left to investigate in this room?";
+	cutin "bu_alp1.bmp",2;
+	next;
+	if (select( "Quit.", "Go in." ) == 1) {
+		mes "[Alp]";
+		mes "...";
+		mes "Don't forget our goal is to investigate...";
+		close3;
+	}
+	mes "[Alp]";
+	mes "Right...";
+	mes "There's a bad energy so be careful...";
+	close2;
+	warp "un_bunker",385,83;
+	end;
+}
+
+un_bunker,388,86,3	script	Alp#Entrance2	4_M_BLACKMAN,{
+	if (VER_ELEVATOR < 1003)// inaccurate
+		end;
+	if (VER_ELEVATOR == 1003) {
+		mes "[Alp]";
+		mes "As expected..";
+		mes "Only this room has a different lay out than the rest...";
+		cutin "bu_alp3.bmp",2;
+		next;
+		mes "[Mark]";
+		mes "I see.";
+		mes "There's a door that doesn't seem to belong in a very unnatural location.";
+		cutin "bu_mark1.bmp",0;
+		next;
+		mes "[Tamarin]";
+		mes "...There is no other way but to go in and investigate ourselves?";
+		cutin "ep143_taang.bmp",2;
+		next;
+		mes "[Due]";
+		mes "Charge!!!!!";
+		cutin "bu_du5.bmp",2;
+		erasequest 11384;// Vestige
+		setquest 11385;// Vestige
+		VER_ELEVATOR = 1004;
+		close2;
+		warp "un_myst",11,206;
+		end;
+	}
+	mes "[Alp]";
+	mes "Unnatural room... Unnatural door...";
+	cutin "bu_alp1.bmp",2;
+	next;
+	if (select( "Quit.", "Go in." ) == 1) {
+		mes "[Alp]";
+		mes "...";
+		close3;
+	}
+	mes "[Alp]";
+	mes "Haa...";
+	close2;
+	warp "un_myst",11,206;
+	end;
+}
+
+un_myst,27,208,5	script	Verity#Myst	4_F_BERRYTEA,{
+	mes "[Verity]";
+	mes "This space is suffocating.";
+	mes "My head is starting to throb already.";
+	cutin "EP15_2_brt_3.bmp",2;
+	next;
+	if (VER_ELEVATOR == 1004 || VER_ELEVATOR == 1005) {
+		mes "[Tamarin]";
+		mes "What is this space?";
+		mes "It seems to be poorly built for it to be used as a bunker...";
+		cutin "ep143_tasta.bmp",2;
+		next;
+		mes "[Alp]";
+		mes "The disgusting smell has gotten worse...";
+		cutin "bu_alp5.bmp",2;
+		next;
+		mes "[Tamarin]";
+		mes "There looks to be another door there so let's check it out.";
+		cutin "ep143_tasta.bmp",2;
+		if (VER_ELEVATOR == 1004) {
+			changequest 11385,11386;// Vestige
+			VER_ELEVATOR = 1005;
+			close2;
+			cutin "",255;
+			end;
+		}
+		next;
+	}
+	if (VER_ELEVATOR == 1005)
+		.@string$ = "Move to the door.";
+	else
+		.@string$ = "Quit.";
+	if (select( .@string$, "Leave." ) == 1) {
+		mes "[Verity]";
+		mes "...Should have brought some painkillers for headaches.";
+		cutin "EP15_2_brt_4.bmp",2;
+		close3;
+	}
+	mes "[Verity]";
+	mes "Are you quitting the investigation?";
+	cutin "EP15_2_brt_4.bmp",2;
+	close2;
+	warp "un_bunker",300,166;
+	end;
+}
+
+un_myst,56,206,0	script	warp_un_myst	WARPNPC,1,1,{
+	end;
+OnTouch:
+	if (VER_ELEVATOR == 1005) {
+		mes "- Does not seem locked but blocked by something.-";
+		next;
+		if (select( "Break it.", "Quit." ) == 2) {
+			mes "[Due]";
+			mes "You want to leave a place like this alone?";
+			cutin "bu_du1.bmp",2;
+			close3;
+		}
+		mes "[Due]";
+		mes "Alright then....";
+		mes "One!";
+		mes "Two!";
+		mes "Three!";
+		cutin "bu_du5.bmp",2;
+		erasequest 11386;// Vestige
+		setquest 11387;// Vestige
+		VER_ELEVATOR = 1006;
+		close2;
+	}
+	warp "un_myst",81,190;
+	end;
+}
+
+un_myst,100,190,3	script	Due#Hall	4_M_REDMAN,{
+	if (VER_ELEVATOR == 1006 || VER_ELEVATOR == 1007) {
+		if (VER_ELEVATOR == 1006) {
+			mes "[Due]";
+			mes "Wow...What is this place?";
+			cutin "bu_du1.bmp",2;
+			next;
+			mes "[Mark]";
+			mes "It is a really suspicious place...";
+			mes "I didn't think such a space would exist inside a bunker...";
+			cutin "bu_mark1.bmp",0;
+			next;
+			mes "[Maggi]";
+			mes "Ah...Ah...";
+			cutin "bu_maggi3.bmp",2;
+			next;
+			mes "[Tamarin]";
+			mes "It seems to be haphazardly made considering its use... Hm...";
+			cutin "ep143_tasta.bmp",2;
+			next;
+			mes "[Maggi]";
+			mes "The...door....";
+			cutin "bu_maggi3.bmp",2;
+			next;
+			mes "[Alp]";
+			mes "There is a kind of subtlety for it be a secret space...";
+			cutin "bu_alp3.bmp",2;
+			next;
+			mes "[Maggi]";
+			mes "Door...door....";
+			cutin "bu_maggi3.bmp",2;
+			next;
+			mes "[Due]";
+			mes "Maggi what are you gaping about?";
+			cutin "bu_du2.bmp",2;
+			next;
+			mes "[Maggi]";
+			mes "The...door is stuck.";
+			cutin "bu_maggi4.bmp",2;
+			next;
+			mes "[Due]";
+			mes "Eh?";
+			cutin "bu_du5.bmp",2;
+			next;
+			mes "[Mark]";
+			mes "What?!?!?";
+			cutin "bu_mark4.bmp",0;
+			next;
+			mes "[Due]";
+			mes "Argh!!!";
+			mes "It's true?!";
+			cutin "bu_du5.bmp",2;
+			next;
+		}
+		mes "[Due]";
+		mes "Are we all trapped here?!";
+		next;
+		mes "[Mark]";
+		mes "Wa..wait let's think about this stoically.";
+		cutin "bu_mark4.bmp",0;
+		next;
+		mes "[Verity]";
+		mes "Oh no what do we do...";
+		cutin "EP15_2_brt_5.bmp",2;
+		next;
+		mes "[Alp]";
+		mes "Ah...";
+		cutin "bu_alp2.bmp",2;
+		next;
+		mes "[Verity]";
+		mes "Since there is no way to get out, should we go further inside?";
+		cutin "EP15_2_brt_4.bmp",2;
+		next;
+		mes "[Due]";
+		mes "Wait... Come to think Verity!";
+		mes "You say you are a guide and you don't know the way out?";
+		cutin "bu_du5.bmp",2;
+		next;
+		mes "[Verity]";
+		mes "This is the first time for me go in this deep...";
+		mes "There is no other way!";
+		cutin "EP15_2_brt_6.bmp",2;
+		if (VER_ELEVATOR == 1006) {
+			erasequest 11387;// Vestige
+			setquest 11388;// Vestige
+			VER_ELEVATOR = 1007;
+		}
+		close3;
+	}
+	mes "[Due]";
+	mes "Wow...What is this place?";
+	cutin "bu_du1.bmp",2;
+	next;
+	mes "[Mark]";
+	mes "It is a really suspicious place...";
+	mes "I didn't think such a space would exist inside a bunker...";
+	cutin "bu_mark1.bmp",0;
+	close3;
+}
+
+un_myst,333,206,3	script	Weird piece#01	4_GC109,{
+	if (isbegin_quest(11388) == 0 && isbegin_quest(11389) == 0) {
+		mes "There is a weird piece.";
+		close;
+	}
+	if (@weird_piece == 1) {// A
+		mes "I cannot tell how long it has been since I entered this place.";
+		mes "In this darkness my sense of time grows dull and the people are quickly growing tired.";
+		next;
+		mes "They talk of escaping without knowing the outside situation... Is this the right choice?";
+		next;
+		mes "But we have already lost our way back.";
+		mes "Yes.... This was not an escape.";
+		mes "Merely fleeing to survive...";
+		next;
+		mes "How long can we keep running?";
+		close2;
+		erasequest 11388;// Vestige
+		setquest 11389;// Vestige
+		warp "un_myst",260,204;
+		@weird_piece = 2;
+		end;
+	}
+	if (@weird_piece == 2) {
+		mes "Even though I was ready for this, the situation is deteriorating.";
+		mes "I can only say I would not have survived if I stayed at that place.";
+		next;
+		mes "Hope...";
+		next;
+		mes "Many have already become incapable of hope...";
+		close2;
+		warp "un_myst",260,204;
+		@weird_piece = 3;
+		end;
+	}
+	if (@weird_piece == 3) {
+		mes "We should have been out by now according to the calculations but there is only dirt still.";
+		next;
+		mes "The calculations could be wrong and we may be going in circles.";
+		mes "It doesn't feel right.";
+		next;
+		mes "No..";
+		mes "I haven't felt at ease since that day.";
+		close2;
+		warp "un_myst",347,138;
+		@weird_piece = 4;
+		end;
+	}
+}
+
+un_myst,182,137,3	script	Weird piece#02	4_GC109,{
+	if (@weird_piece == 4) {// B
+		mes "I may have reached my limits.";
+		mes "I must blame my overtaxed body for not listening to me now.";
+		next;
+		mes "The numbers of survivors are dwindling.";
+		next;
+		mes "Like this...";
+		mes "I thought it was karma that I am witnessing the end...";
+		mes "Perhaps it is my selfishness.";
+		mes "I don't think there is no such time left for me..";
+		close2;
+		warp "un_myst",86,136;
+		@weird_piece = 5;
+		end;
+	}
+	if (@weird_piece == 5) {
+		mes "Even walking is difficult now.";
+		next;
+		mes "Once I confidently claimed I will lead all of us...";
+		mes "I find myself pathetic for becoming a burden much less of help.";
+		next;
+		mes "Everything is regretful.";
+		mes "Everything I started...";
+		mes "Everything of mine...";
+		close2;
+		warp "un_myst",86,136;
+		@weird_piece = 6;
+		end;
+	}
+	if (@weird_piece == 6) {
+		mes "It would be better to abandon me...";
+		close2;
+		warp "un_myst",86,136;
+		@weird_piece = 7;
+		end;
+	}
+	if (@weird_piece == 7) {
+		mes "The days I am asleep are outnumbering the days I am awake now.";
+		next;
+		mes "I suddenly picture his face in my increasingly hazy consciousness.";
+		next;
+		mes "Tatio...";
+		next;
+		mes "A person sweet to me even though all I only cared about was my work.";
+		next;
+		mes "Ha... person...";
+		mes "I cannot endure the shame of my past for considering him a mere successful project.'";
+		next;
+		mes "Though I cannot help that I may die here...";
+		mes "If only to apologize to him...";
+		mes "If only to muster one sweet word, I have thoughts of survival.";
+		next;
+		mes "..Is it possible?";
+		close2;
+		warp "un_myst",14,92;
+		@weird_piece = 8;
+		end;
+	}
+}
+
+un_myst,214,86,3	script	Weird piece#03	4_GC109,{
+	if (@weird_piece > 7 && @weird_piece < 17) {
+		if (@weird_piece == 8)// C
+			mes "01001000010001010100110001001100010011110101011101001111010100100100110001000100";
+		else if (@weird_piece == 9)
+			mes "s o g g g o h o h h h h h h h h h h h h";
+		else if (@weird_piece == 10)
+			mes "debugging";
+		else if (@weird_piece == 11) {
+			mes "File...error...restore...";
+			mes "Operation...range...25%...30%...35%.......";
+		}
+		else if (@weird_piece == 12)
+			mes "45%...50%... Minimal normal operations possible start safety mode operations";
+		else if (@weird_piece == 13)
+			mes "60% movement speed normal. Bodily functions normal.";
+		else if (@weird_piece == 14)
+			mes "70% Most language function restored. Slight symptoms of septic anemia but it seems it will be fixed soon.";
+		else if (@weird_piece == 15) {
+			mes "80% Surgery was fairly successful despite having had no proper preparations.";
+			mes "Planning to apply treatment to the rest of the survivors based on this success.";
+		}
+		else if (@weird_piece == 16) {
+			mes "98% Corrupt sector detected.";
+			mes "For more effective operations I have copied the memory chip and constructed 'T_W_O_002b.'";
+			mes "There seems to have been some loss of data during the copying process...";
+			close2;
+			warp "un_myst",209,33;
+			@weird_piece = 17;
+			end;
+		}
+		close2;
+		warp "un_myst",160,89;
+		@weird_piece++;
+		end;
+	}
+}
+
+un_myst,209,42,3	script	Tamarin#Lastroom Entrance	4_M_TAMARIN,{
+	if (VER_ELEVATOR < 1007)
+		end;
+	mes "[Tamarin]";
+	mes "... It seems the last survivors have lingered here...";
+	cutin "ep143_taang.bmp",2;
+	next;
+	mes "[Tamarin]";
+	mes "I feel scared to open the next door for some reason.";
+	next;
+	if (VER_ELEVATOR == 1007 && @weird_piece == 17) {
+		select("Open door.");
+		completequest 11389;// Vestige
+		VER_ELEVATOR = 1008;
+		getexp 0,1000000;
+		@weird_piece = 0;
+		getitem 6827,1;// Complete_Machine_Parts
+		getitem 6828,1;// Gravity_Safety_Device
+	}
+	else {
+		if (@weird_piece == 0)	// can't go outside following path weird piece
+			.@string$ = "Go outside.";
+		.@s = select( "Open door.", .@string$ ) - 1;
+	}
+	mes "[Tamarin]";
+	mes "There is a bitter feeling of sorts...";
+	close2;
+	if (.@s == 0)
+		warp "un_myst",142,38;
+	else {
+		warp "un_bunker",98,91;
+		@weird_piece = 0;
+	}
+	end;
+}
+
+verus04,144,239,3	shop	Tool Merchant#verus	4_M_DEWMAN,611:-1,504:-1,656:-1,601:-1,602:-1,610:-1

npc/re/quests/quests_15_2.txt

@@ -0,0 +1,2579 @@
+//===== rAthena Script =======================================
+//= Phantasmagorika Quests.
+//===== Description: =========================================
+//--- Memory Record Daily Quests:
+//- Help Her
+//- Air Purifier
+//- Grape Harvest
+//- Subdue Hysterical Patients
+//- Daily Necessities Transport
+//===== Changelogs: ==========================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+// Return 0 if a time limit of "Restriction on the Journey" quests has been reached.
+function	script	F_time_limit_recorder	{
+	return (checkquest(5341,PLAYTIME) != 2 && checkquest(5351,PLAYTIME) != 2 && checkquest(5358,PLAYTIME) != 2 && checkquest(5363,PLAYTIME) != 2 && checkquest(5366,PLAYTIME) != 2);
+}
+
+// Erase datas if a time limit of "Restriction on the Journey" quests has been reached.
+function	script	F_erase_datas_recorder	{
+	if (callfunc("F_time_limit_recorder") == 1)
+		return;
+	mes "";
+	mes "Your whole body suddenly becomes heavy and time seems to be passing faster around you.";
+	mes "";
+	for ( .@quest_id = 5341; .@quest_id < 5371; .@quest_id++ ) {
+		if (isbegin_quest(.@quest_id) > 0)
+			erasequest .@quest_id;
+	}
+	delitem 6825, countitem(6825);// Air Purifier Box
+	delitem 6826, countitem(6826);// Fresh Grape
+	recorder_quest_type = 0;
+	recorder_quest_status = 0;
+	mes "Ah- This cozy and snug fe...el.....ling";
+	warp "un_bunker",98,91;
+	close;
+}
+
+// Monitoring room
+un_bk_q,97,141,0	script	Monitoring room#A-0	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 1 && recorder_quest_status == 0) {
+		mes "[Bunker Sayhu]";
+		mes "Hey!! Where do you think you're going when we're trying to get a headcount? Get over here.";
+		close;
+	}
+	warp "un_bk_q",98,121;
+	end;
+}
+
+un_bk_q,69,167,0	script	Monitoring room#L-1	WARPNPC,1,1,{
+	end;
+OnTouch:
+	if (recorder_quest_type == 1 && recorder_quest_status == 0) {
+		mes "[Bunker Sayhu]";
+		mes "Hey!! Where do you think you're going when we're trying to get a headcount? Get over here.";
+		close;
+	}
+	warp "un_bk_q",57,168;
+	end;
+}
+
+un_bk_q,126,168,0	script	Monitoring room#L-2	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 1 && recorder_quest_status == 0) {
+		mes "[Bunker Sayhu]";
+		mes "Hey!! Where do you think you're going when we're trying to get a headcount? Get over here.";
+		close;
+	}
+	warp "un_bk_q",140,167;
+	end;
+}
+
+un_bk_q,103,147,4	script	Bunker Sayhu#EP15.2MR	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		switch( recorder_quest_status ) {
+		case 0:
+			emotion ET_CONGRATULATION;
+			mes "[Bunker Sayhu]";
+			mes "First congratulations on surviving. I'm glad you got into the air-raid shelter. If you were outside..";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "...";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "Whew.. even thinking about it makes me dizzy. Both of us were lucky. Don't you think so?";
+			next;
+			select("I think so too.");
+			emotion ET_CRY;
+			mes "[Bunker Sayhu]";
+			mes "I feel a lot of sympathy though. It looks like a lot of people are blaming this explosion on Fresa.";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "The explosion can't be only Lona's responsibility.";
+			next;
+			select("Lona?");
+			emotion ET_QUESTION, playerattached();
+			mes "[Bunker Sayhu]";
+			mes "A great person for sure despite failing the experiment.";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "She took charge of figuring out the number of survivors in that confusing mess of a situation.";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "If it was me...";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "I would probably be wandering around without knowing what do to right about now..";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "Ugh- I guess even I should go and help. Want to help?";
+			next;
+			select("Agree to help.");
+			emotion ET_THANKS;
+			mes "[Bunker Sayhu]";
+			mes "Really? You will help? What a relief because I wasn't confident about going by myself.";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "There is a researcher with a cold demeanor in the center of this room, right?";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "She is the head of the experiment, Lona Fresa. People usually call her Dr. Fresa.";
+			next;
+			setquest 5341;// Limits of Journeys
+			setquest 5342;// Help Her
+			recorder_quest_status = 1;
+			mes "[Bunker Sayhu]";
+			mes "Do you want to go and ask her if she needs any help?";
+			close;
+		case 1:
+			mes "[Bunker Sayhu]";
+			mes "There is a researcher with a cold demeanor in the center of this room, right?";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "Do you want to go and ask her if she needs any help?";
+			close;
+		case 3:
+		case 5:
+		case 9:
+		case 17:
+			mes "[Bunker Sayhu]";
+			mes "I was asked to find out how many are capable of cooking.";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "We have to try hard even though the air-raid shelter is complex and wide.";
+			close;
+		case 100:
+			mes "[Bunker Sayhu]";
+			mes "Thanks for helping her.";
+			next;
+			mes "[Bunker Sayhu]";
+			mes "Is it because we helped? I thought I saw a faint smile on her face.";
+			close;
+		}
+		end;
+	case 2:
+		emotion ET_QUESTION;
+		mes "[Bunker Sayhu]";
+		mes "Uh?! I don't think I've seen you before in the air-raid shelter?";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "Ah! Are you the Adventurer who's helping with moving the newly made air cleaning unit?";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "You are working a lot because of those thoughtless Mechanicians.";
+		close;
+	case 3:
+		mes "[Bunker Sayhu]";
+		mes "The Bioengineers succeeded in cultivating grapes right?";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "They say at least one grape harvest every 2 weeks is possible? The harvest day is probably either today or tomorrow.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "I want to taste fresh grapes soon. I've been eating only dry food for the past few days.";
+		close;
+	case 4:
+		mes "[Bunker Sayhu]";
+		mes "There's a rumor going around in the air-raid shelter.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "A while ago the Chemical Substance Specialist and a few others went outside the air-raid shelter.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "Apparently some contaminated substance got inside the air-raid shelter.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "I heard the number of convulsing patients are rapidly increasing because of the contaminant.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "Ah! It's just a rumor! A Rumor!!";
+		close;
+	case 5:
+		mes "[Bunker Sayhu]";
+		mes "It seems the rumor going around was true.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "I hear they are moving supplies to the clean Zone Z-2 even though it's newly opened because of the contaminant.";
+		next;
+		mes "[Bunker Sayhu]";
+		mes "I think I will lend a hand even just a little.";
+		close;
+	}
+}
+
+un_bk_q,93,168,4	script	Dr.Fresa#EP15.2MR	4_F_BERRYTEA,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		switch( recorder_quest_status ) {
+		case 0:
+			mes "[Lona Fresa]";
+			emotion ET_SORRY;
+			mes "I am sorry. Right now I am a little busy with several problems. Can we speak later?";
+			close;
+		case 1:
+			mes "[Lona Fresa]";
+			emotion ET_SORRY;
+			mes "I am sorry. Right now I am a little busy with several problems. Can we speak later?";
+			next;
+			select("No! What I mean..");
+			emotion ET_SURPRISE;
+			emotion ET_QUESTION;
+			mes "[Lona Fresa]";
+			mes "What?! The Adventurer wants to help me?";
+			next;
+			mes "[Lona Fresa]";
+			mes "Good. The people are uncontrollable because they are shocked and confused.";
+			next;
+			mes "[Lona Fresa]";
+			mes "If the intimidating Adventurer helps out it will be easier to control the confused masses.";
+			next;
+			mes "[Lona Fresa]";
+			mes "Good!! I approve. Just in time for a troublesome problem as well.";
+			next;
+			select("Troublesome problem?");
+			emotion ET_QUESTION, playerattached();
+			mes "[Lona Fresa]";
+			mes "The personnel with various specialties such as yourself have not changed their positions and are easy to grasp, but the other employees are the problem.";
+			next;
+			mes "[Lona Fresa]";
+			mes "Surely they are moving according to the Emergency Situation Guidelines of their respective teams.";
+			next;
+			emotion ET_SCRATCH;
+			mes "[Lona Fresa]";
+			mes "I cannot figure out from here where they are and what they are doing.";
+			next;
+			mes "[Lona Fresa]";
+			mes "So I was thinking if you";
+			next;
+			mes "[Lona Fresa]";
+			.@r = rand(1,4);
+			switch(.@r) {
+			case 1:
+				setquest 5343;// Headcount
+				mes "Can you figure out the number of ^0000FFBioengineers ^000000?";
+				break;
+			case 2:
+				setquest 5344;// Headcount
+				mes "Can you figure out the number of ^0000FFMechanicians^000000?";
+				break;
+			case 3:
+				setquest 5345;// Headcount
+				mes "Can you figure out the number of ^0000FFFacilities managers^000000?";
+				break;
+			case 4:
+				setquest 5346;// Headcount
+				mes "Can you figure out the number of ^0000FFChemical Substance Specialists^000000?";
+				break;
+			}
+			recorder_quest_status = recorder_quest_status | pow(2,.@r);
+			next;
+			mes "[Lona Fresa]";
+			mes "I ask you for this favor even though it won't be easy in this large and complex shelter.";
+			close;
+		case 3:
+			callsub( S_Num, 22, 5343, "Bioengineers" );
+		case 5:
+			callsub( S_Num, 18, 5344, "Mechanicians" );
+		case 9:
+			callsub( S_Num, 28, 5345, "Facilities managers" );
+		case 17:
+			callsub( S_Num, 11, 5346, "Chemical Substance Specialists" );
+		case 100:
+			mes "[Lona Fresa]";
+			mes "I know it is frustrating but I hope you will adjust to life inside the air-raid shelter until the outside situation becomes safer.";
+			close;
+		}
+		end;
+	case 2:
+		emotion ET_SORRY;
+		mes "[Lona Fresa]";
+		mes "I am sorry. Right now I am a little busy with several problems. It would be better if we speak later.";
+		close;
+	case 4:
+		if (recorder_quest_status == 2) {
+			emotion ET_SORRY;
+			mes "[Lona Fresa]";
+			mes "I am sorry. Right now I am a little busy with several problems. It would be better if we speak later.";
+			next;
+			select("I have something urgent to tell you.");
+			mes "[Lona Fresa]";
+			mes "What?! What is going on?";
+			next;
+			mes "Explain current situation at the temporary clinic.";
+			next;
+			emotion ET_HUK;
+			mes "[Lona Fresa]";
+			mes "Patients are convulsing simultaneously.. this is not good.";
+			next;
+			mes "[Lona Fresa]";
+			mes "I got it. We need to take measures.";
+			next;
+			erasequest 5364;// Convulsing Patient Suppression
+			erasequest 5365;// Urgent News
+			setquest 5370;// Memory Record
+			getexp 750000,750000;
+			recorder_quest_status = 3;
+			mes "The small round capsule has percolated through the skin. It feels like experience has accumulated.";
+			next;
+			mes "[Lona Fresa]";
+			mes "Thank you for informing me.";
+			close;
+		}
+		emotion ET_PROFUSELY_SWEAT;
+		mes "[Lona Fresa]";
+		mes "This situation is grave so we need to quickly take measures.";
+		close;
+	case 5:
+		emotion ET_SORRY;
+		mes "[Lona Fresa]";
+		mes "I am sorry. Right now I am a little busy with several problems. It would be better if we speak later.";
+		close;
+	}
+	end;
+
+S_Num:
+	.@bon_nombre = getarg(0);
+	.@quest_id = getarg(1);
+	.@headcount_complete = isbegin_quest(getarg(1)+4);
+
+	mes "[Lona Fresa]";
+	if (.@headcount_complete > 0)
+		mes "Ah! You are here. Isn't the interior of the shelter a bit complicated? The favor I asked of you..";
+	else {
+		emotion ET_QUESTION;
+		mes "Huh?! You're already back? You came back earlier than I thought.";
+		next;
+		mes "[Lona Fresa]";
+		mes "The favor that I asked.. ah?! Ah!!";
+	}
+	next;
+	mes "[Lona Fresa]";
+	mes "The number of ^0000FF" + getarg(2) + "^000000? How many do they say have survived?";
+	next;
+	input .@num;
+	mes "[Lona Fresa]";
+	if (.@num != .@bon_nombre || .@headcount_complete == 0) {
+		mes "" + .@num + " people you say?";
+		next;
+		emotion ET_SCRATCH;
+		mes "[Lona Fresa]";
+		mes "That's strange? According to the list they have never been that number.";
+		next;
+		mes "[Lona Fresa]";
+		mes "Can you check again?";
+		close;
+	}
+	mes "Really? It is roughly the same as the number on the list. Good work.";
+	next;
+	mes "[Lona Fresa]";
+	mes "Sayhu says Adventurers like this kind of stuff. This is compensation for your help.";
+	next;
+	mes "The small round capsule has percolated through the skin. It feels like experience has accumulated.";
+	next;
+	erasequest 5342;// Help Her
+	erasequest .@quest_id;// Headcount
+	erasequest (.@quest_id + 4);// Headcount Complete
+	setquest 5370;// Memory Record
+	getexp 750000,750000;
+	recorder_quest_status = 100;
+	mes "[Lona Fresa]";
+	mes "Good work. I know it is frustrating but I hope you will adjust to the life inside the air-raid shelter until the outside situation becomes safer.";
+	close;
+}
+
+un_bk_q,76,175,4	script	Researcher Grum#EP15.2M	4_F_SCIENCE,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		if (recorder_quest_status == 0) {
+			mes "[Researcher Grum]";
+			mes "I really don't like self-righteous and hypocritical Fresa.";
+			close;
+		}
+		mes "[Researcher Grum]";
+		mes "Who is that woman to conduct a headcount as if she's the leader?";
+		next;
+		mes "[Researcher Grum]";
+		mes "There wouldn't have been an explosion if there was no experiment the first place? Right?";
+		close;
+	case 2:
+		mes "[Researcher Grum]";
+		mes "I think the self-righteous and haggardly Fresa has changed.";
+		next;
+		mes "[Researcher Grum]";
+		mes "She's become more warm compared to the past, right?";
+		close;
+	case 3:
+		mes "[Researcher Grum]";
+		mes "Fresa has definitely changed a lot.";
+		next;
+		mes "[Researcher Grum]";
+		mes "Today she is handing out grapes to people. In the past that would have been unimaginable.";
+		close;
+	case 4:
+		mes "[Researcher Grum]";
+		mes "Why is that Fresa acting like the leader alone but still hasn't taken measures?";
+		next;
+		mes "[Researcher Grum]";
+		mes "Measures need to taken about the convulsing patients. Are you going to cover this up like in the past?";
+		close;
+	case 5:
+		mes "[Researcher Grum]";
+		mes "So this is what's happening?";
+		next;
+		mes "[Researcher Grum]";
+		mes "I should have known when she tried to half-ass things.";
+		close;
+	}
+}
+
+// Corridor Monitoring room
+un_bk_q,86,121,4	script	Chemical Substance Specialist Karsten	4_M_ALCHE_B,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		if (recorder_quest_status == 17) {
+			if (isbegin_quest(5350) == 0) {
+				mes "[Chemical Substance Specialist Karsten]";
+				emotion ET_QUESTION;
+				mes "Who are you?";
+				next;
+				select("I am...");
+				emotion ET_SURPRISE;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Ah! Ah! Fresa? I have met her a few times at plenary sessions.";
+				next;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "If I recall she is the one in charge of this failed project?";
+				next;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Anyway!!";
+				next;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Not everybody is fit to be director. A headcount in this hectic situation.";
+				next;
+				emotion ET_PROFUSELY_SWEAT;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Wait a minute. I did a headcount and wrote it down somewhere..";
+				next;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Was it this number? That number? Ah?! This number.";
+				next;
+				setquest 5350;// Headcount Complete
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Total number of Chemical Substance Specialists is ^FF000011^000000. Damn a lot less.";
+				next;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "Ah! Tell Fresa on your way that we are checking for hazardous substances within the air-raid shelter according to emergency protocol.";
+				next;
+				mes "[Chemical Substance Specialist Karsten]";
+				mes "We have to do our job even if there aren't many of us left.";
+				close;
+			}
+			mes "[Chemical Substance Specialist Karsten]";
+			mes "Total number of Chemical Substance Specialists is ^FF000011^000000.";
+			next;
+			mes "[Chemical Substance Specialist Karsten]";
+			mes "Tell Fresa that although there are only a few left but, we are checking for hazardous substances within the air-raid shelter.";
+			close;
+		}
+		mes "[Chemical Substance Specialist Karsten]";
+		mes "We are checking for hazardous substances within the air-raid shelter according to emergency protocol.";
+		close;
+	case 3:
+		if (recorder_quest_status == 2) {
+			mes "[Chemical Substance Specialist Karsten]";
+			mes "Is that the first grape harvested by the Bioengineers?";
+			next;
+			emotion ET_QUESTION;
+			mes "[Chemical Substance Specialist Karsten]";
+			mes "The rumors say a grape tree got smashed because of the Mechanicians but it seems it hasn't affected the harvest.";
+			next;
+			mes "[Chemical Substance Specialist Karsten]";
+			mes "Anyway thanks. I prepared this for compensation.";
+			next;
+			erasequest 5359;// Grape Harvest
+			erasequest 5362;// Grape Delivery
+			setquest 5370;// Memory Record
+			getexp 1000000,1000000;
+			recorder_quest_status = 3;
+			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
+			next;
+			emotion ET_CRY;
+			mes "[Chemical Substance Specialist Karsten]";
+			mes "I've been eating nothing but dried food for the past few days so it moves me to eat fresh grape.";
+			close;
+		}
+		mes "[Chemical Substance Specialist Karsten]";
+		mes "I've been eating nothing but dried food so eating fresh grape makes me feel fresh.";
+		close;
+	case 2:
+	case 4:
+	case 5:
+		emotion ET_SMILE;
+		mes "[Chemical Substance Specialist Karsten]";
+		mes "Us Chemical Substance Specialists are living like we always do. It's not like we can do chemical experiments in a place like this.";
+		close;
+	}
+}
+
+// Control Room
+un_bk_q,98,246,8	script	Facilities manager Jiko	4_M_EINMAN2,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Facilities manager Jiko]";
+		mes "Aah- I don't know the reason but the control room is";
+		next;
+		mes "[Facilities manager Jiko]";
+		mes "is damaged a lot. At this point it isn't a control room but a warehouse.";
+		close;
+	case 2:
+		mes "[Facilities manager Jiko]";
+		mes "Ah the air cleaning unit doesn't belong here.";
+		next;
+		mes "[Facilities manager Jiko]";
+		mes "If my memory is correct, you have to deliver them to Zones C-0, F-1, F-2, I-0, Z-0.";
+		close;
+	case 3:
+		mes "[Facilities manager Jiko]";
+		mes "Haa- I have been cleaning the Control room for several days now";
+		next;
+		mes "[Facilities manager Jiko]";
+		mes "This place cannot be organized no matter how I much organize it. I guess we should just use it for storage.";
+		close;
+	case 4:
+		mes "[Facilities manager Jiko]";
+		mes "Come on in. Welcome to the Warehouse.";
+		next;
+		mes "[Facilities manager Jiko]";
+		mes "Urrghh";
+		close;
+	case 5:
+		mes "[Facilities manager Jiko]";
+		mes "This is not the control room.";
+		next;
+		mes "[Facilities manager Jiko]";
+		mes "It's the warehouse!!";
+		close;
+	}
+}
+
+un_bk_q,108,243,4	script	Discarded Mechanical Device	4_ENERGY_BLUE,{
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 1) {
+		mes "The mechanical device thrown on the floor cannot be determined if it is still operable.";
+		close;
+	}
+	for ( .@i = 0; .@i < (recorder_quest_type - 1); .@i++ )
+		.@listen_continue$[.@i] = "Continue listening.";
+	.@listen_again$[.@i] = "Listen again.";
+
+	mes "There is a Memory Record somebody is recording.";
+	next;
+	if (select( "Listen.", "Quit." ) == 2)
+		close;
+	while(true) {
+		mes "Oh- Is this a memory record? Does it work? Oh it works. Works! Should I try it since I'm bored?";
+		next;
+		mes "My name is Maso an Adventurer traveling the world. Today is 4th day of entering the air-raid shelter? 3rd day? The vibe here is weird and hard to adjust to.";
+		next;
+		mes "Verus city has Adventurers amongst its original population but the treatment towards Adventurers is strangely good.";
+		next;
+		mes "The mood is that Adventurers are people caught up in an uncontrollable accident and need to be treated well.";
+		next;
+		mes "As an Adventurer who eats and plays as much as he works, I cannot stand the itching for action. Urgh";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Is today day 6? Details aren't told to Adventurers so I am not sure but the people of Verus city seem very gloomy.";
+		next;
+		mes "The Adventurer's blood is boiling and wanting to explore places but there isn't much to do.";
+		next;
+		mes "I looked around the air-raid shelter but whoever designed it has not one artistic hair on him.";
+		next;
+		mes "It is no fun to keep looking at the same hallways and same room lay outs.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Is today day 21? The Verus City people look happy to have solved the food problem.";
+		next;
+		mes "It is cute to see the mild looking researchers going around cheering and screaming.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "The 30th night but because it's always dark I don't really know if it's night or day. I just ate supper so it must be night.";
+		next;
+		mes "Today I moved the really heavy air cleaning units made by the Mechanicians with the other Adventurers.";
+		next;
+		mes "The air-raid shelter is so large that I had no idea where they were but thanks to that I became friends with some of the Adventurers, especially Castle and Blat.";
+		next;
+		mes "By the way the Mechanicians seem to have mental problems. They make a ruckus for not being able to make machines and got dragged out by the guards.";
+		next;
+		mes "The Mechanicians are definitely going to cause trouble someday.";
+		next;
+		switch( select( .@listen_again$[1], .@listen_continue$[1], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Today is day 32 and I worked on the grape harvest.";
+		next;
+		mes "I ate fresh grapes and since I don't have anything to do anything to do, I'm going to sleep early.";
+		next;
+		mes "Ah.. the grape was good, I want it again. Did they say harvest was possible once every 2 weeks?";
+		next;
+		switch( select( .@listen_again$[2], .@listen_continue$[2], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Today is the 38th day of being in the shelter and there is a fuss since the morning.";
+		next;
+		mes "This morning the recruited Adventurers to join the Chemical Substance Specialists for an investigation outside the air-raid shelter, many volunteered despite the dangers.";
+		next;
+		mes "I am of the belief danger should be avoided but my friends Castle and Blat volunteered.";
+		next;
+		mes "Well I understand that they were sick of living in the shelter for a while.";
+		next;
+		mes "They have not returned past the afternoon. Verus City leader Fresa has concluded that the people who left are dead.";
+		next;
+		mes "Everybody had a moment of silence at dawn. They were good people so it is sad to part like this.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Is it since the morning of the 40th day? There is a mysterious infectious disease going around the shelter.";
+		next;
+		mes "A few people have suddenly attacked those near them and convulsed";
+		next;
+		mes "And Adventurers have been deployed to suppress the convulsing people because a lot of the weak researchers are wounded.";
+		next;
+		mes "There is a rumor saying a contaminant came in because of the people who went outside the shelter a while go.";
+		next;
+		switch( select( .@listen_again$[3], .@listen_continue$[3], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Lunch during day 44 the air-raid shelter leader Fresa gathered the Adventurers and had a presentation.";
+		next;
+		mes "The rumor has been confirmed true and a safety partition will be built in Zone Z-0";
+		next;
+		mes "A decision has been made to move necessities to Zone Z-2 tomorrow and I heard they need the help of Adventurers.";
+		next;
+		mes "I have to work tomorrow so I am doing to sleep early.";
+		next;
+		mes "There is no more recorded content.";
+		next;
+		switch( select( .@listen_again$[4], .@listen_continue$[4], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+	}
+}
+
+// Corridor Control Room
+un_bk_q,56,192,4	script	Chemical Substance Specialist Kori	4_M_ALCHE_B,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Chemical Substance Specialist Kori]";
+		mes "We are seeing if there are hazardous substances within the air-raid shelter according to emergency protocol.";
+		next;
+		mes "[Chemical Substance Specialist Kori]";
+		mes "You want to know how many Chemical Substance Specialists there are? Go to Karsten then. Should be here somewhere.";
+		close;
+	case 2:
+		mes "[Chemical Substance Specialist Kori]";
+		mes "This next room is temporarily being used by the Chemical Substance Specialist.";
+		next;
+		mes "[Chemical Substance Specialist Kori]";
+		mes "We tightly hid away dangerous things but don't touch anything just in case.";
+		close;
+	case 3:
+		mes "[Chemical Substance Specialist Kori]";
+		mes "Karsten gave me grapes.";
+		next;
+		mes "[Chemical Substance Specialist Kori]";
+		mes "How fresh and tasty it was.";
+		close;
+	case 4:
+		mes "[Chemical Substance Specialist Kori]";
+		mes "My colleagues left the air-raid shelter to investigate and haven't come back.";
+		next;
+		mes "[Chemical Substance Specialist Kori]";
+		mes "It was concluded they are dead but are they really all dead? I want to see my colleagues.";
+		close;
+	case 5:
+		mes "[Chemical Substance Specialist Kori]";
+		mes "Good work.";
+		next;
+		mes "[Chemical Substance Specialist Kori]";
+		mes "We are working to find a solution for the contaminant.";
+		close;
+	}
+}
+
+// Corridor K-0
+un_bk_q,161,193,6	script	Adventurer Bamdaku#EP15.2MR	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Adventurer Bamdaku]";
+		mes "I found this while looking around the air-raid shelter";
+		next;
+		mes "[Adventurer Bamdaku]";
+		mes "but there is a lot of this on the wall. What can it be?";
+		close;
+	case 2:
+		mes "[Adventurer Bamdaku]";
+		mes "I have been investigating this for 30 days already but I do not know what it is.";
+		next;
+		mes "[Adventurer Bamdaku]";
+		mes "I am too proud to ask somebody.";
+		close;
+	case 3:
+		mes "[Adventurer Bamdaku]";
+		mes "I have been investigating this for 32 days already but I do not know what it is.";
+		next;
+		mes "[Adventurer Bamdaku]";
+		mes "Ugh what to do.. Should I just ask somebody?";
+		close;
+	case 4:
+		mes "[Adventurer Bamdaku]";
+		mes "I have been investigating this for 40 days already.";
+		next;
+		mes "[Adventurer Bamdaku]";
+		mes "My pride won't let me quit now.";
+		close;
+	case 5:
+		mes "[Adventurer Bamdaku]";
+		mes "45 days have passed since I started investigating this unknown thing.";
+		next;
+		mes "[Adventurer Bamdaku]";
+		mes "How did I come to investigate this?";
+		close;
+	}
+}
+
+un_bk_q,103,393,4	script	Memory_Record#EP15.2MR	4_ENERGY_BLUE,{
+	callfunc("F_time_limit_recorder");
+
+	for ( .@i = 0; .@i < (recorder_quest_type - 1); .@i++ )
+		.@listen_continue$[.@i] = "Continue listening.";
+	.@listen_again$[.@i] = "Listen again.";
+
+	mes "There is a Memory Record somebody is recording.";
+	next;
+	if (select( "Listen.", "Quit." ) == 2)
+		close;
+	while(true) {
+		mes "Ah ah- One two three test- test-";
+		next;
+		mes "To distinguish survival days in the air-raid shelter, today will be designated Explosion Day 1 after the experiment explosion.";
+		next;
+		mes "Everybody fell into panic after seeing the outside situation on the monitor after the explosion.";
+		next;
+		mes "But chief researcher Dr. Fresa calmly consoled everybody and checked how many survived.";
+		next;
+		mes "The final number of survivors including adventurers seems to be 326.";
+		next;
+		mes "The camera showing outside was damaged in the afternoon. It seems we cannot see the situation outside anymore.";
+		next;
+		mes "There is no more recorded content.";
+		next;
+		switch( select( .@listen_again$[0], .@listen_continue$[0], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Explosion Day 2";
+		next;
+		mes "A witch hunt against the director and chief researcher Fresa began.";
+		next;
+		mes "My opinion is different. The research and experiment was conducted under her direction but this is an accident.";
+		next;
+		mes "If not Fresa, they would have made somebody else to blame.";
+		next;
+		mes "But she is handling it in a dignified manner despite concerns.";
+		next;
+		mes "She says problem solving is more important than blame and is checking assignments of survivors before the accident.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 3";
+		next;
+		mes "Fresa.. She naturally became the leader of the survivors.";
+		next;
+		mes "There was no vote of sorts, but nobody is complaining about her being the leader.";
+		next;
+		mes "The day before she had a briefing on the situation of the total survivors.";
+		next;
+		mes "20 Bioengineers";
+		mes "16 Mechanicians";
+		mes "27 Facilities managers";
+		mes "10 Chemical Substance Specialists";
+		mes "Other than specialists the assignments of survivors such as cafeteria staff, janitors, gardeners, distribution directors, health professionals, adventurers caught in the accident have been assessed.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 4";
+		next;
+		mes "Everybody's work has been decided based on Fresa's briefing the day before.";
+		next;
+		mes "It was decided that researchers including myself know nothing much research and must continue our lives in the air-raid shelter under the guidance of those who have technical skill needed for survival.";
+		next;
+		mes "First the Chemical Substance Specialists and Facilities managers started to install Air Contamination Gauge Sensors in the air-raid shelter.";
+		next;
+		mes "After evaluating that oxygen levels were low the Mechanicians have started to assemble Air cleaning units.";
+		next;
+		mes "Lora, a former cafeteria employee was consulted on the important problem of food.";
+		next;
+		mes "We assessed that about 40 days of survival is possible based on the food in the warehouse and the number of survivors.";
+		next;
+		mes "This prompted the Bioengineers to cultivate plants that can self-produce.";
+		next;
+		mes "Other miscellaneous assignments were issued under Fresa's direction.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 5";
+		next;
+		mes "I don't know the details but the air pollution level outside of the shelter was measured.";
+		next;
+		mes "According to the Chemical Substance Specialists the situation is hopeless.";
+		next;
+		mes "It seems life in the air-raid shelter has to continue longer. Just can quietly keep working..";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 21";
+		next;
+		mes "After silently working for several days the Bioengineers have good news.";
+		next;
+		mes "They have succeeded in artificially germinating a plant that can self-produce.";
+		next;
+		mes "Fortunately the air-raid shelter has a warehouse spacious enough to grow plants in.";
+		next;
+		mes "It seems we can forget about our food problem now.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 30";
+		next;
+		mes "A small problem has occurred in the air-raid shelter. The air cleaning units made in the beginning are broken.";
+		next;
+		mes "Fortunately there will be no problem maintaining oxygen concentration levels thanks to the air cleaning units the Mechanicians made without approval.";
+		next;
+		mes "They are too heavy so adventurers were deployed because nobody else is able to move them.";
+		next;
+		switch( select( .@listen_again$[1], .@listen_continue$[1], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Explosion Day 32";
+		next;
+		mes "Today is the first harvest of the grape tree cultivated by the Bioengineers.";
+		next;
+		mes "Although there was a small problem of the Mechanicians destroying one grape tree";
+		next;
+		mes "The air-raid shelter residents are throwing a small party to celebrate the successful harvest.";
+		next;
+		mes "There is no more recorded content.";
+		next;
+		switch( select( .@listen_again$[2], .@listen_continue$[2], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Explosion Day 38";
+		next;
+		mes "Chemical Substance Specialists and some Adventurers sick of living in the air-raid shelter have left the shelter to measure the air.";
+		next;
+		mes "They have not returned by evening.";
+		next;
+		mes "Was the freedom of outside better than the life in the dark air-raid shelter?";
+		next;
+		mes "After midnight the remaining Chemical Substance Specialists assessed that they were dead and everybody had a brief moment of silence.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 40";
+		next;
+		mes "A dark rumor is going around the shelter.";
+		next;
+		mes "There is a rumor that a contaminant from the outside has invaded the air-raid shelter because of the people who left a while ago.";
+		next;
+		mes "Is it because of the contaminant? There are patients who suddenly convulse and attack others.";
+		next;
+		mes "Under the leader Fresa's decision, everybody was checked and those found with transfectants were quarantined in the temporary clinic.";
+		next;
+		switch( select( .@listen_again$[3], .@listen_continue$[3], "Stop listening." ) ) {
+		case 1:
+			continue;
+		case 2:
+			break;
+		case 3:
+			close;
+		}
+		mes "Explosion Day 43";
+		next;
+		mes "The rumor in the air-raid shelter has come true.";
+		next;
+		mes "The remaining Chemical Substance Specialists have confirmed that the contaminant is eroding into the air-raid shelter";
+		next;
+		mes "And Fresa and experts have started taking measures.";
+		next;
+		if (select( "Continue listening.", "Stop listening." ) == 2)
+			close;
+		mes "Explosion Day 45";
+		next;
+		mes "The invading contaminant will not stop.";
+		next;
+		mes "It has been decided to move all equipment and necessities to the less contaminated Zone Z-2";
+		next;
+		mes "And facility managers have started to install a partition in Zone Z-0 to prevent the contaminant from coming in further.";
+		next;
+		mes "There is no more recorded content.";
+		next;
+		if (select( "Listen again.", "Stop listening." ) == 2)
+			close;
+	}
+}
+
+// Machine Warehouse
+un_bk_q,41,275,0	script	Machine Warehouse#J-0	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 2 && recorder_quest_status == 0) {
+		emotion ET_O, getnpcid(0, "Mechanician Mugeosi#EP1");
+		mes "[Mechanician Mugeosi]";
+		mes "Ah! You're the adventurer send to deliver air cleaners. You are at the right place. Come this way.";
+		close;
+	}
+	warp "un_bk_q",21,276;
+	end;
+}
+
+un_bk_q,56,286,4	script	Mechanician Mugeosi#EP1	4_M_REPAIR,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Mechanician Mugeosi]";
+		mes "Are you an Adventurer? This is the machine warehouse.";
+		next;
+		mes "[Mechanician Mugeosi]";
+		mes "It was originally a warehouse but it is now being used by Mechanicians to assemble machines for the air-raid shelter.";
+		next;
+		emotion ET_FRET;
+		mes "[Mechanician Mugeosi]";
+		mes "You want to know the total number of Mechanicians? I don't think I know?";
+		next;
+		mes "[Mechanician Mugeosi]";
+		mes "Ah! Al up there might know. Go to Al.";
+		close;
+	case 2:
+		if (recorder_quest_status == 0) {
+			mes "[Mechanician Mugeosi]";
+			mes "An adventure to move the air cleaner?";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "You look solid just like the other researchers mentioned. I bet you can lift the air cleaner like nothing!!";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "We shouldn't be ordering people like you who got caught up in an accident, but the situation is urgent.";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "We made a new air cleaning unit because the one operating previously broke down a while ago.";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "We should have made it in modular form. Made it as one solid piece by mistake.";
+			next;
+			emotion ET_SMILE;
+			mes "[Mechanician Mugeosi]";
+			mes "Didn't think of it when we were making it!!";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "It happens. Right?";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "Facilities managers are making a fuss about needing the air cleaning unit soon.";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "We can't move the air cleaning unit with the equipment we have now..";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "We could make the machine that can transport it if we had more time..";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "So we ended up asking the strong Adventurer.";
+			next;
+			select("Yes sir.");
+			emotion ET_SMILE;
+			mes "[Mechanician Mugeosi]";
+			mes "Aren't you refreshing!!";
+			next;
+			setquest 5351;// Limits of Journeys
+			setquest 5352;// Air Cleaning Unit
+			recorder_quest_status = 1;
+			mes "[Mechanician Mugeosi]";
+			mes "We are counting on you. Take five air cleaning units to areas C-0, F-1, F-2, I-0, Z-0. Talk to me when you're ready.";
+			close;
+		}
+		if (recorder_quest_status == 1) {
+			.@total = isbegin_quest(5353) + isbegin_quest(5354) + isbegin_quest(5355) + isbegin_quest(5356) + isbegin_quest(5357);
+			if (.@total < 5) {
+				emotion ET_QUESTION;
+				mes "[Mechanician Mugeosi]";
+				mes "Are you ready to move heavy objects?";
+				next;
+				select("Give it to me.");
+				if (checkweight(6825,1) == 0) {
+					mes "[Mechanician Mugeosi]";
+					mes "You look strong but seems you are weak. You can't lift the air cleaning unit like that.";
+					close;
+				}
+				getitem 6825,1;// Air Purifier Box
+				mes "[Mechanician Mugeosi]";
+				mes "Deliver them to zones C-0, F-1, F-2, I-0, Z-0. The order doesn't matter and please be careful since they are precise machines.";
+				close;
+			}
+			emotion ET_BEST;
+			mes "[Mechanician Mugeosi]";
+			mes "Good work. The air cleaning units are heavy, right?";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "Sayhu says Adventurers like this kind of stuff and I should use this as compensation after giving you work.";
+			next;
+			erasequest 5352;// Air Cleaning Unit
+			erasequest 5353;// C-0 Delivery Complete
+			erasequest 5354;// F-1 Delivery Complete
+			erasequest 5355;// F-2 Delivery Complete
+			erasequest 5356;// I-0 Delivery Complete
+			erasequest 5357;// Z-0 Delivery Complete
+			setquest 5370;// Memory Record
+			getexp 1000000,1000000;
+			recorder_quest_status = 2;
+			mes "The small round capsule has percolated through skin. It feels like experience has accumulated.";
+			next;
+			mes "[Mechanician Mugeosi]";
+			mes "Thanks to you we overcame a crisis. I need to make a machine that can move heavy objects in case this happens again.";
+			close;
+		}
+		mes "[Mechanician Mugeosi]";
+		mes "Good work. Let's relax for now.";
+		close;
+	case 3:
+		mes "[Mechanician Mugeosi]";
+		mes "Have you tried the grapes made by the Bioengineers using that growth thingy?";
+		next;
+		mes "[Mechanician Mugeosi]";
+		mes "We can now eat fresh fruit in this dull and dark air-raid shelter.";
+		close;
+	case 4:
+		mes "[Mechanician Mugeosi]";
+		mes "Are you worried because people are suddenly attacking? What? You aren't infected right?";
+		close;
+	case 5:
+		mes "[Mechanician Mugeosi]";
+		mes "Why is everybody rejecting us making a machine that can make shipping easier? Pssh!!";
+		close;
+	}
+}
+
+un_bk_q,82,323,2	script	Mechanician Al#EP15.2MR	4_M_REPAIR,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		switch( recorder_quest_status ) {
+		case 3:
+		case 9:
+		case 17:
+			mes "[Mechanician Al]";
+			mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
+			close;
+		case 5:
+			if (isbegin_quest(5348) == 0) {
+				mes "[Mechanician Al]";
+				emotion ET_DELIGHT;
+				mes "You are?";
+				next;
+				select("I am...");
+				emotion ET_SCRATCH;
+				mes "[Mechanician Al]";
+				mes "Fresa? Hm? Who is Fresa?";
+				next;
+				mes "[Mechanician Al]";
+				mes "Ah?! Ah!! The chief director of the experiment was ^0000FF Lona Fresa^000000.";
+				next;
+				mes "[Mechanician Al]";
+				mes "OK Adventurer man, identity confirmation complete!!";
+				next;
+				mes "[Mechanician Al]";
+				mes "Was it your business to check the Mechanician survivor headcount?";
+				next;
+				setquest 5348;// Headcount Complete
+				mes "[Mechanician Al]";
+				mes "There weren't many in the first place, and too bad for the poor bastards who didn't make it into the shelter.";
+				next;
+				mes "[Mechanician Al]";
+				mes "Tell Fresa, Fress or whatever her name is, that the Mechanicians are inspecting";
+				next;
+				mes "[Mechanician Al]";
+				mes "the mechanical systems in the air-raid shelter according to the emergency protocols. Thanks~";
+				close;
+			}
+			mes "[Mechanician Al]";
+			mes "^FF000018^000000 Mechanicians have survived.";
+			next;
+			mes "[Mechanician Al]";
+			mes "Tell Fresa, Fress or whatever her name is, that the Mechanicians are inspecting the mechanical systems in the air-raid shelter.";
+			close;
+		default:
+			mes "[Mechanician Al]";
+			mes "The Mechanicians are checking for irregularities in the internal mechanical systems according to Emergency Situation Guidelines.";
+			next;
+			emotion ET_FRET;
+			mes "[Mechanician Al]";
+			mes "Darn it- Why am I even explaining this? You're bothering me so go away.";
+			close;
+		}
+	case 2:
+		mes "[Mechanician Al]";
+		mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
+		close;
+	case 3:
+		mes "[Mechanician Al]";
+		mes "Is that grape for me? It's not? Pssh!!";
+		close;
+	case 4:
+		mes "[Mechanician Al]";
+		mes "So busy. This is why I asked for additional manpower in the first place. No use now I guess.";
+		close;
+	case 5:
+		switch( recorder_quest_status ) {
+		case 0:
+			end;
+		case 1:
+			mes "[Mechanician Al]";
+			mes "Huh? What's going on?";
+			next;
+			mes "[Mechanician Al]";
+			mes "What, shouldn't the items be moved to Zone Z-2 and not here? Take them there.";
+			close;
+		case 2:
+			mes "[Mechanician Al]";
+			mes "Huh? What's going on? I heard the Adventurers are being used to move the supplies?";
+			next;
+			select("The message from Ernon..");
+			mes "[Mechanician Al]";
+			mes "Ernon? Goods manager Ernon? He has a message for me? What is it?";
+			next;
+			input .@string$;
+			setquest 5369;// Message Delivery Complete
+			recorder_quest_status = 3;
+			mes "[" + strcharinfo(0) + "]";
+			mes .@string$;
+			next;
+			emotion ET_OTL;
+			mes "[Mechanician Al]";
+			mes "Huh.. uh.. buh.. buh..";
+			next;
+			mes "He seems shocked and out of it. Go back to Ernon since the message has been delivered.";
+			close;
+		case 3:
+			emotion ET_OTL;
+			mes "[Mechanician Al]";
+			mes "Huh.. uh.. buh.. buh..";
+			next;
+			mes "He is out of it. Go back to Ernon since the message has been delivered.";
+			close;
+		case 4:
+			emotion ET_OTL;
+			mes "[Mechanician Al]";
+			mes "Er.. non.. ar.. argh!!";
+			next;
+			mes "He is convulsing like an infected patient.";
+			close;
+		}
+	}
+}
+
+un_bk_q,100,312,6	script	Mechanician Bukal#EP15.	4_M_REPAIR,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Mechanician Bukal]";
+		mes "You're conducting a headcount?";
+		next;
+		mes "[Mechanician Bukal]";
+		mes "I am not sure. Maybe you can ask Al over there?";
+		close;
+	case 2:
+		if (recorder_quest_status == 0) {
+			mes "[Mechanician Bukal]";
+			mes "Ugh.. I want to make something.";
+			close;
+		}
+		mes "[Mechanician Bukal]";
+		mes "I mean the air cleaning unit you are moving now.";
+		next;
+		mes "[Mechanician Bukal]";
+		mes "I made that. Isn't it awesome?";
+		close;
+	case 3:
+		mes "[Mechanician Bukal]";
+		mes "Ah!! You're the adventurer. You could check out the farm.";
+		next;
+		mes "[Mechanician Bukal]";
+		mes "Isn't the farm good because it's warm? I made the temperature control device there. Isn't it awesome?";
+		close;
+	case 4:
+		mes "[Mechanician Bukal]";
+		mes "I am worried of the people suddenly attacking.";
+		next;
+		mes "[Mechanician Bukal]";
+		mes "Since we're already here should I make something like a patient suppression device?";
+		close;
+	case 5:
+		mes "[Mechanician Bukal]";
+		mes "I don't know why everybody is rejecting a device that can move heavy objects.";
+		next;
+		mes "[Mechanician Bukal]";
+		mes "I should have made one when they were making new air cleaning units..";
+		close;
+	}
+}
+
+un_bk_q,91,283,2	script	Guard#EP15.2MR	4_M_HUMAN_02,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Guard]";
+		mes "Hello adventurer?";
+		next;
+		mes "[Guard]";
+		mes "I don't know the reason, but Fresa assigned me here.";
+		close;
+	case 2:
+		if (recorder_quest_status == 0) {
+			mes "[Guard]";
+			mes "Hello adventurer?";
+			close;
+		}
+		mes "[Guard]";
+		mes "I always wondered why I was assigned here but now I think I know the reason.";
+		next;
+		mes "[Guard]";
+		mes "It is to watch if the Mechanicians make useless things.";
+		close;
+	case 3:
+		mes "[Guard]";
+		mes "The Mechanicians occasionally want to make something.";
+		next;
+		mes "[Guard]";
+		mes "My job is to stop them.";
+		close;
+	case 4:
+		mes "[Guard]";
+		mes "I hear patients these days are convulsing and attacking the people around them?";
+		next;
+		mes "[Guard]";
+		mes "The Mechanician constantly convulse saying they want to make something so it's not weird to me.";
+		close;
+	case 5:
+		mes "[Guard]";
+		mes "The convulsion of Mechanicians are reaching extremes.";
+		next;
+		mes "[Guard]";
+		mes "They are convulsing so much I may need to call back up.";
+		close;
+	}
+}
+
+un_bk_q,212,294,6	script	Zone C-0 Facilities man#1	4_M_EINMAN2,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Facilities manager]";
+		mes "We are inspecting the interior facilities of the air-raid shelter according to emergency regulations.";
+		close;
+	case 2:
+		.@npc_num = strnpcinfo(2);
+		switch(.@npc_num) {
+		case 1:
+			if (isbegin_quest(5353) == 0 && recorder_quest_status == 1) {
+				emotion ET_DELIGHT;
+				mes "[Facilities manager]";
+				mes "Oh- You're here? I was waiting.";
+				next;
+				mes "[Facilities manager]";
+				mes "I have heard Adventurers are all strong as oxen but it is still impressive.";
+				next;
+				if (countitem(6825) < 1) {
+					mes "[Facilities manager]";
+					mes "But where is the air cleaning unit? You didn't bring the most important thing. Bring it here.";
+					close;
+				}
+				delitem 6825,1;// Air Purifier Box
+				setquest 5353;// C-0 Delivery Complete
+				mes "[Facilities manager]";
+				mes "Good work. Good work. We have received the air cleaning unit.";
+				close;
+			}
+			mes "[Facilities manager]";
+			mes "Good work. Good work. We have received the air cleaning unit.";
+			close;
+		case 2:
+			if (isbegin_quest(5354) == 0 && recorder_quest_status == 1) {
+				emotion ET_THANKS;
+				mes "[Facilities manager]";
+				mes "Oh my you are working hard. You can place the item over here.";
+				next;
+				mes "[Facilities manager]";
+				mes "Whoa- I heard the rumors but you are really strong.";
+				next;
+				mes "[Facilities manager]";
+				mes "It's hard for even four of us Facilities managers to lift it for a moment..";
+				next;
+				if (countitem(6825) < 1) {
+					mes "[Facilities manager]";
+					mes "But where is the air cleaning unit? You didn't bring the most important thing. Bring it here.";
+					close;
+				}
+				delitem 6825,1;// Air Purifier Box
+				setquest 5354;// F-1 Delivery Complete
+				mes "[Facilities manager]";
+				mes "Anyway we have received the air cleaning unit.";
+				close;
+			}
+			mes "[Facilities manager]";
+			mes "Anyway we have received the air cleaning unit.";
+			close;
+		case 3:
+			if (isbegin_quest(5355) == 0 && recorder_quest_status == 1) {
+				emotion ET_QUESTION;
+				mes "[Facilities manager]";
+				mes "Ah?! Are you the Adventurer who's delivering air cleaning units?";
+				next;
+				if (countitem(6825) < 1) {
+					mes "[Facilities manager]";
+					mes "But where is the air cleaning unit? Did you not bring it?";
+					close;
+				}
+				delitem 6825,1;// Air Purifier Box
+				setquest 5355;// F-2 Delivery Complete
+				mes "[Facilities manager]";
+				mes "We need to work fast so place the item here.";
+				close;
+			}
+			mes "[Facilities manager]";
+			mes "We have received the air cleaning unit.";
+			close;
+		case 4:
+			if (isbegin_quest(5356) == 0 && recorder_quest_status == 1) {
+				emotion ET_QUESTION;
+				mes "[Facilities manager]";
+				mes "Has the adventurer not delivered the air cleaning unit yet? Uh?! It's here. Hurry.. the air cleaning unit..";
+				next;
+				if (countitem(6825) < 1) {
+					mes "[Facilities manager]";
+					mes "Arwhat!! Why didn't you bring it. Bring it now, okay?";
+					close;
+				}
+				delitem 6825,1;// Air Purifier Box
+				setquest 5356;// I-0 Delivery Complete
+				mes "[Facilities manager]";
+				mes "It's urgent. I'll thank you later..";
+				close;
+			}
+			mes "[Facilities manager]";
+			mes "Don't talk to me. Every hour is precious.";
+			close;
+		case 5:
+			if (isbegin_quest(5357) == 0 && recorder_quest_status == 1) {
+				emotion ET_BEST;
+				mes "[Facilities manager]";
+				mes "Oh- You're here? I was waiting.";
+				next;
+				mes "[Facilities manager]";
+				mes "I have heard Adventurers are all strong as oxen but it is still impressive.";
+				next;
+				if (countitem(6825) < 1) {
+					mes "[Facilities manager]";
+					mes "But where is the air cleaning unit? You didn't bring the most important thing. Bring it here.";
+					close;
+				}
+				delitem 6825,1;// Air Purifier Box
+				setquest 5357;// Z-0 Delivery Complete
+				mes "[Facilities manager]";
+				mes "Good work. Good work. We have received the air cleaning unit.";
+				close;
+			}
+			mes "[Facilities manager]";
+			mes "Good work. Good work. We have received the air cleaning unit.";
+			close;
+		}
+		end;
+	case 3:
+		mes "[Facilities manager]";
+		mes "Have you tried the grape made by the Bioengineers?";
+		next;
+		mes "[Facilities manager]";
+		mes "Science is truly amazing to have us enjoy fresh grapes in this underground air-raid shelter.";
+		close;
+	case 4:
+		mes "[Facilities manager]";
+		mes "I think the air cleaner might be useless because the contaminant has already infiltrated the air-raid shelter.";
+		close;
+	case 5:
+		mes "[Facilities manager]";
+		mes "You are going through a lot.";
+		close;
+	}
+}
+
+un_bk_q,223,217,4	duplicate(Zone C-0 Facilities man#1)	Zone F-1 Facilities man#2	4_M_EINMAN2
+un_bk_q,372,217,6	duplicate(Zone C-0 Facilities man#1)	Zone F-2 Facilities man#3	4_M_EINMAN2
+un_bk_q,389,276,6	duplicate(Zone C-0 Facilities man#1)	Zone I-0 Facilities man#4	4_M_EINMAN2
+un_bk_q,291,158,4	duplicate(Zone C-0 Facilities man#1)	Zone Z-0 Facilities man#5	4_M_EINMAN2
+
+// Corridor Farm
+un_bk_q,213,303,4	script	Bioengineer Touring#EP1	4W_M_02,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		if (recorder_quest_status == 3) {
+			if (isbegin_quest(5347) == 0) {
+				mes "[Bioengineer Touring]";
+				emotion ET_QUESTION;
+				mes "Huh?! Who are you?";
+				next;
+				select("I am...");
+				emotion ET_SURPRISE;
+				mes "[Bioengineer Touring]";
+				mes "Ah! Dr. Fresa sent you to check the conditions of survivor assignments?";
+				next;
+				mes "[Bioengineer Touring]";
+				mes "What a relief. The disaster network came on a bit ago and we just confirmed how many Bioengineers have survived.";
+				next;
+				setquest 5347;// Headcount
+				mes "[Bioengineer Touring]";
+				mes "We have confirmed ^FF000022 ^000000Bioengineers have survived including myself.";
+				next;
+				mes "[Bioengineer Touring]";
+				mes "Oh yeah! Tell Dr. Fresa that the Bioengineers are using growth acceleration technology for food production according to the Emergency Situation Guidelines.";
+				next;
+				emotion ET_THANKS;
+				mes "[Bioengineer Touring]";
+				mes "I will count on you.";
+				close;
+			}
+			mes "[Bioengineer Touring]";
+			mes "We have confirmed ^FF000022 ^000000Bioengineers have survived including myself.";
+			next;
+			mes "[Bioengineer Touring]";
+			mes "Oh yeah! Tell Dr. Fresa that the Bioengineers are using growth acceleration technology for food production according to the Emergency Situation Guidelines.";
+			next;
+			emotion ET_THANKS;
+			mes "[Bioengineer Touring]";
+			mes "I will count on you.";
+			close;
+		}
+		mes "[Bioengineer Touring]";
+		mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
+		close;
+	case 2:
+		mes "[Bioengineer Touring]";
+		mes "Wait a minute. You cannot enter the farm right now.";
+		close;
+	case 3:
+		mes "[Bioengineer Touring]";
+		mes "We have just finished the last grape harvest and are getting ready for the next one.";
+		next;
+		emotion ET_SORRY;
+		mes "[Bioengineer Touring]";
+		mes "If people come and go often, it may interfere with the work so access is prohibited.";
+		close;
+	case 4:
+		mes "[Bioengineer Touring]";
+		mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
+		next;
+		emotion ET_SORRY;
+		mes "[Bioengineer Touring]";
+		mes "If people come and go often, it may interfere with the work for the next harvest so access will be prohibited.";
+		close;
+	case 5:
+		mes "[Bioengineer Touring]";
+		mes "We Bioengineers are doing all we can to produce food for the people inside the air-raid shelter.";
+		next;
+		emotion ET_SORRY;
+		mes "[Bioengineer Touring]";
+		mes "If people come and go often, it may interfere with the work for the next harvest so access will be prohibited.";
+		close;
+	}
+}
+
+// Farm
+un_bk_q,216,300,0	script	C-0#farm	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	mes "[Bioengineer Touring]";
+	mes "Wait a minute. You cannot enter the farm right now.";
+	close;
+}
+
+un_bk_q,213,346,0	script	farm#C-0	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 3 && recorder_quest_status == 0) {
+		emotion ET_BIGTHROB, getnpcid(0, "Bioengineer Ebrik#EP15.2MR");
+		mes "[Bioengineer Ebrik]";
+		mes "Are you the Adventurer here to help us with the grape harvest? Right here!!";
+		close;
+	}
+	warp "un_bk_q",213,299;
+	end;
+}
+
+un_bk_q,220,350,4	script	Bioengineer Ebrik#EP15.2MR	4_M_01,{
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type != 3)
+		end;
+	switch( recorder_quest_status ) {
+	case 0:
+		emotion ET_QUESTION;
+		mes "[Bioengineer Ebrik]";
+		mes "Are you the Adventurer here to help us with the grape harvest? Nice to meet you.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Bioengineers alone do not have enough hands to harvest the amount of grapes we need to provide all the people inside the air-raid shelter.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "So we ended up asking the Adventurers.";
+		next;
+		select("Are there others who can help?");
+		mes "[Bioengineer Ebrik]";
+		mes "Don't even mention it. We gave the task of harvesting grapes to the meandering Mechanicians and..";
+		next;
+		emotion ET_KEK;
+		mes "[Bioengineer Ebrik]";
+		mes "They ended up smashing one of the grape trees!!";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "We were lucky to have found out and stopped them before they destroyed the other trees. The thought of it is horrible.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Ah! That is not what's important.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "We used growth acceleration to make ripe grapes drop periodically.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "It would be nice if you can wait in front of the grape tree and collect 30 bunches of grapes.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "You can collect more, but the remaining ones from the harvest will naturally decompose and disappear.";
+		next;
+		setquest 5358;// Limits of Journeys
+		setquest 5359;// Grape Harvest
+		recorder_quest_status = 1;
+		mes "[Bioengineer Ebrik]";
+		mes "Then the soil fertility will recover partially. Good luck.";
+		close;
+	case 1:
+		if (countitem(6826) < 30) {
+			mes "[Bioengineer Ebrik]";
+			mes "We have decided to give out one grape box per team.";
+			next;
+			mes "[Bioengineer Ebrik]";
+			mes "One box can hold 30~32 bunches so collect accordingly.";
+			close;
+		}
+		emotion ET_BEST;
+		mes "[Bioengineer Ebrik]";
+		mes "Whoa good job. As I thought Adventurers are so much more capable than Mechanicians.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Since the grapes are harvested should we deliver them to each team?";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "I will be rude and ask you another favor on top of your hard work.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Let's see.. the grapes you just harvested";
+		next;
+		delitem 6826, countitem(6826);// Fresh Grape
+		setquest 5362;// Grape Delivery
+		recorder_quest_status = 2;
+		mes "[Bioengineer Ebrik]";
+		mes "This should be delivered to the Chemical Substance team. You can deliver this to Karsten.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Oh! You do not have to come back after the deliveries. We will be busy starting the next project.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "The people receiving the deliveries will probably give you compensation. If they don't, you can nag them.";
+		close;
+	case 2:
+		mes "[Bioengineer Ebrik]";
+		mes "That grape box you are holding";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Has to be delivered to Karsten of the Chemical substance team.";
+		next;
+		mes "[Bioengineer Ebrik]";
+		mes "Compensation will be paid by the people receiving the deliveries so you do not have to come back here.";
+		close;
+	}
+	end;
+
+OnInit:
+	freeloop 1;
+	setarray .amount[0],1,1,2;
+	setarray .grap_num[0],1,2,3,4,5;
+	setarray .coord[0],
+		242,391,	// Grape tree 1
+		274,391,	// Grape tree 2
+		333,360,	// Grape tree 3
+		316,344,	// Grape tree 4
+		241,343;	// Grape tree 5
+
+	while(true) {
+		sleep 60000;
+		callsub( S_Random_Grap, 0 );
+		callsub( S_Random_Grap, 1 );
+	}
+
+S_Random_Grap:
+	.@end = 4 - getarg(0);
+	.@r = rand(3);
+	.@tmp = .grap_num[.@r];
+	.@index = (.@tmp - 1) * 2;
+	.grap_num[.@r] = .grap_num[.@end];
+	.grap_num[.@end] = .@tmp;
+
+	for ( .@i = 0; .@i < 3; .@i++ ) {
+		do {
+			.@x = .coord[.@index] + rand(-2,2);
+			.@y = .coord[.@index+1] + rand(-2,2);
+		}
+		while( !checkcell("un_bk_q",.@x,.@y,cell_chkpass) );
+		makeitem 6826, .amount[.@i], "un_bk_q",.@x,.@y;
+	}
+	return;
+}
+
+un_bk_q,240,380,8	script	Bioengineer#EP15.2MR1	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	mes "[Bioengineer]";
+	mes "It seems we can harvest grape tree number 1 without problems. What a relief.";
+	next;
+	mes "[Bioengineer]";
+	mes "My heart sank when the Mechanicians destroyed a tree..";
+	close;
+}
+
+un_bk_q,274,380,8	script	Bioengineer#EP15.2MR2	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	mes "[Bioengineer]";
+	mes "The soil grape tree number 2 is in seems to be lacking nutrition.";
+	next;
+	mes "[Bioengineer]";
+	mes "We need to prepare fertilizer to provide the soil more nutrition.";
+	close;
+}
+
+un_bk_q,327,360,6	script	Bioengineer#EP15.2MR3	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	mes "[Bioengineer]";
+	mes "I worried because a lot of weird stuff was growing around grape tree number 3.";
+	next;
+	mes "[Bioengineer]";
+	mes "It seems the harvest will have no problem.";
+	close;
+}
+
+un_bk_q,316,351,4	script	Bioengineer#EP15.2MR4	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	mes "[Bioengineer]";
+	mes "Grape tree number 4 has no particular problem.";
+	next;
+	mes "[Bioengineer]";
+	mes "Nutrition state good. Harvest state good.";
+	close;
+}
+
+un_bk_q,249,344,2	script	Bioengineer#EP15.2MR5	4_M_ALCHE_C,{
+	callfunc("F_time_limit_recorder");
+	mes "[Bioengineer]";
+	mes "The nutrition of grape tree number 5 is too good.";
+	next;
+	mes "[Bioengineer]";
+	mes "That doesn't mean there will be a higher harvest yield..";
+	close;
+}
+
+// Clinic
+un_bk_q,269,236,0	script	Clinic#G-1	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 4 && recorder_quest_status == 0) {
+		mes "[Nurse Lapplad]";
+		mes "Look here?! Where are you trying to go? We have to do some tests so don't leave and wait here!!";
+		close;
+	}
+	warp "un_bk_q",255,235;
+	end;
+}
+
+un_bk_q,297,221,0	script	Clinic#H-0	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 4 && recorder_quest_status == 0) {
+		mes "[Nurse Lapplad]";
+		mes "Look here?! Where are you trying to go? We have to do some tests so don't leave and wait here!!";
+		close;
+	}
+	warp "un_bk_q",298,203;
+	end;
+}
+
+un_bk_q,326,236,0	script	Clinic#G-2	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 4 && recorder_quest_status == 0) {
+		mes "[Nurse Lapplad]";
+		mes "Look here?! Where are you trying to go? We have to do some tests so don't leave and wait here!!";
+		close;
+	}
+	warp "un_bk_q",340,235;
+	end;
+}
+
+un_bk_q,276,243,4	script	Nurse Lapplad#EP15.2MR	4_F_BRZ_WOMAN,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 4:
+		switch( recorder_quest_status ) {
+		case 0:
+			emotion ET_SORRY;
+			mes "[Nurse Lapplad]";
+			mes "Sorry. Did you wait long? There are a lot of suspected infection patients as you can see..";
+			next;
+			select("Not really..");
+			emotion ET_HUK;
+			mes "[Nurse Lapplad]";
+			mes "Eh?! You didn't wait? That's strange? Did you cut in line? Cutting is bad.";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "As you know there are infectees who are suddenly showing strange phenomena..";
+			next;
+			emotion ET_SCISSOR;
+			mes "[Nurse Lapplad]";
+			mes "Um...";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "...Ah...";
+			next;
+			emotion ET_SURPRISE;
+			mes "[Nurse Lapplad]";
+			mes "...Oh!!";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "I don't see any problematic symptoms. Fortunate.";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "We are having trouble because of the suddenly convulsing patients.";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "Look here. My skin is getting crispy from not being able to sleep for days~";
+			next;
+			mes "Thudunk!! Babang!! Crash!!";
+			if (mobcount( "un_bk_q", "Nurse Lapplad#EP15.2MR::OnMobDead" ) < 1)
+				callsub S_Random, 1;	// always starts on Patient 1
+			next;
+			emotion ET_SMILE;
+			mes "[Nurse Lapplad]";
+			mes "Yes.. Just like that";
+			next;
+			emotion ET_SCISSOR;
+			mes "[Nurse Lapplad]";
+			mes ". .";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "Argh!! Another convulsing patient.";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "Hey. Aren't you an adventurer? You must be really strong.";
+			next;
+			setquest 5363;// Limits of Journeys
+			setquest 5364;// Convulsing Patient Suppression
+			recorder_quest_status = 1;
+			mes "[Nurse Lapplad]";
+			mes "Can you suppress that convulsing patient? I am counting on you.";
+			close;
+		case 1:
+			if (mobcount( "un_bk_q", "Nurse Lapplad#EP15.2MR::OnMobDead" ) > 0) {
+				emotion ET_CRY;
+				mes "[Nurse Lapplad]";
+				mes "Ee~~ ee~ ek~~~~~~~~~!!";
+				next;
+				emotion ET_CRY;
+				mes "[Nurse Lapplad]";
+				mes "Take those patients down quickly! You're an adventurer!!";
+				close;
+			}
+			mes "[Nurse Lapplad]";
+			mes "You didn't get bit or scratched by the convulsing patient, did you?";
+			next;
+			select("Why?");
+			mes "[Nurse Lapplad]";
+			mes "Hmm~ I don't see any particular wounds.";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "Since I can't figure out the infection route...";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "We have to prepare for a possible disaster...";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "Anyway, Adventurer~ Assuring and the best!";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "I haven't been that bewildered by simultaneously convulsing patients before..";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "Lucky you were here to suppress it with ease.";
+			next;
+			mes "[Nurse Lapplad]";
+			mes "I am sorry but can you report this to Fresa on your way? You know who Fresa is?";
+			next;
+			setquest 5365;// Urgent News
+			recorder_quest_status = 2;
+			mes "[Nurse Lapplad]";
+			mes "It is a situation so I am asking you a favor.";
+			close;
+		case 2:
+			mes "[Nurse Lapplad]";
+			mes "I am sorry but can you report this to Fresa on your way? This is a favor.";
+			close;
+		}
+	}
+	end;
+
+S_Random:
+	.rand_npc = getarg(0);
+	getmapxy .@map$,.@x,.@y, UNITTYPE_NPC, "Patient#EP15.2MR_0" + .rand_npc;
+	disablenpc "Patient#EP15.2MR_0" + .rand_npc;
+	monster .@map$,.@x,.@y, "Convulsing Patient",1015,1,"Nurse Lapplad#EP15.2MR::OnMobDead";
+	.mob_id = $@mobid[0];
+	initnpctimer;
+	return;
+
+OnMobDead:
+	enablenpc "Patient#EP15.2MR_0" + .rand_npc;
+	stopnpctimer;
+	if (rand(7) > 0)	// inaccurate
+		callsub S_Random, rand(1,7);
+	end;
+
+OnTimer3000:
+	if (rand(100) < 50) {
+		if (.rand_npc == 1) unittalk .mob_id, "Woouuu~";
+		else if (.rand_npc == 2) unittalk .mob_id, "Wooaa~";
+		else if (.rand_npc == 3) unittalk .mob_id, "Eh~";
+		else if (.rand_npc == 4) unittalk .mob_id, "Ha-ak-ha-ak~";
+		else if (.rand_npc == 5) unittalk .mob_id, "Uh- Ugh~";
+		else if (.rand_npc == 6) unittalk .mob_id, "Eh~";
+		else if (.rand_npc == 7) unittalk .mob_id, "Kur..urk..kekek..";
+	}
+	initnpctimer;
+	end;
+}
+
+// Patients
+un_bk_q,286,254,4	script	Patient#EP15.2MR_01	4_M_LIEMAN,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_PROFUSELY_SWEAT;
+	mes "[Patient]";
+	mes "Hurts.. It hurts..";
+	close;
+}
+
+un_bk_q,296,252,4	script	Patient#EP15.2MR_02	4_M_DSTMANDEAD,{
+	callfunc("F_time_limit_recorder");
+	mes "[Patient]";
+	mes "I'm fine. They're making a fuss for no reason.";
+	close;
+}
+
+un_bk_q,316,231,4	script	Patient#EP15.2MR_03	4_M_DIEMAN,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_SLEEPY;
+	mes "[Patient]";
+	mes "I keep feeling sleepy for some reason. Is it because I'm sick?";
+	close;
+}
+un_bk_q,281,226,4	script	Patient#EP15.2MR_04	4_F_PATIENT,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_OHNO;
+	mes "[Patient]";
+	mes "My head feels blank.. Uh? Did you say something?";
+	close;
+}
+
+un_bk_q,320,249,4	script	Patient#EP15.2MR_05	4_M_PATIENT,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_CONFUSE;
+	mes "[Patient]";
+	mes "Ugh.. Feels like my whole body is cramped.";
+	close;
+}
+
+un_bk_q,306,233,4	script	Patient#EP15.2MR_06	4_M_DIEMAN,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_SEXY;
+	mes "[Patient]";
+	mes "Urk.. I feel sick even though I didn't drink.";
+	close;
+}
+
+un_bk_q,310,261,4	script	Patient#EP15.2MR_07	4_M_LIEMAN,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_OTL;
+	mes "[Patient]";
+	mes "Oh no is there a transfectant found in me..";
+	close;
+}
+
+// Nurses
+un_bk_q,313,261,2	script	Nurse#EP15.2MR1	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	mes "[Nurse]";
+	mes "Patient~ That chair is quite high.. doesn't your head ache?";
+	close;
+}
+
+un_bk_q,322,249,2	script	Nurse#EP15.2MR2	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	mes "[Nurse]";
+	mes "Why does he say he has a cramp? The other patients didn't have that problem.";
+	close;
+}
+
+un_bk_q,316,233,4	script	Nurse#EP15.2MR3	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	mes "[Nurse]";
+	mes "Argh- I told you not to scribble on the floor while pretending to sleep.";
+	close;
+}
+
+un_bk_q,304,233,4	script	Nurse#EP15.2MR4	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	mes "[Nurse]";
+	mes "You ran around the elephant trunk thirty times so you must be sick. Claiming he can't feel dizziness. Quite the bluffer.";
+	close;
+}
+
+un_bk_q,283,226,2	script	Nurse#EP15.2MR5	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_CRY;
+	mes "[Nurse]";
+	mes "Ah geez! There is no other issues yet but why is he saying he's dizzy?";
+	close;
+}
+
+un_bk_q,284,255,4	script	Nurse#EP15.2MR6	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	mes "[Nurse]";
+	mes "So what do you mean!! Where does it hurt!!";
+	close;
+}
+
+un_bk_q,296,254,4	script	Nurse#EP15.2MR7	4_F_NURSE,{
+	callfunc("F_time_limit_recorder");
+	emotion ET_CRY;
+	mes "[Nurse]";
+	mes "What do you mean nothing is wrong, your face has gone purple.";
+	close;
+}
+
+// Cafeteria
+un_bk_q,271,290,0	script	Cafeteria#G-1	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 5 && recorder_quest_status == 0) {
+		emotion ET_FRET, getnpcid(0, "Transportation Executive Ernon");
+		mes "[Transportation Executive Ernon]";
+		mes "Hey~ This is a time to borrow even the hands of small children. Stop goofing around and come here.";
+		close;
+	}
+	warp "un_bk_q",255,261;
+	end;
+}
+
+un_bk_q,324,290,0	script	Cafeteria#G-2	WARPNPC,1,1,{
+	end;
+OnTouch:
+	callfunc("F_time_limit_recorder");
+	if (recorder_quest_type == 5 && recorder_quest_status == 0) {
+		mes "[Transportation Executive Ernon]";
+		mes "Hey~ This is a time to borrow even the hands of small children. Stop goofing around and come here.";
+		close;
+	}
+	warp "un_bk_q",340,261;
+	end;
+}
+
+un_bk_q,279,294,4	script	Transportation Executive Ernon	4_M_LGTMAN,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Transportation Executive Ernon]";
+		mes "We used to deliver things like daily necessities or research tools here before the accident.";
+		next;
+		mes "[Transportation Executive Ernon]";
+		mes "Work that involved going out to other places a lot more even as a staff member here.";
+		close;
+	case 2:
+		emotion ET_QUESTION;
+		mes "[Transportation Executive Ernon]";
+		mes "What?! Is something going on? The Mechanicians and Facilities managers look busy.";
+		close;
+	case 3:
+		emotion ET_BEST;
+		mes "[Transportation Executive Ernon]";
+		mes "Yaa~ Did you try the grapes?";
+		next;
+		mes "[Transportation Executive Ernon]";
+		mes "Isn't it great that we can grow fresh grapes in an underground evacuation facility like this?";
+		close;
+	case 4:
+		mes "[Transportation Executive Ernon]";
+		mes "Some people are suddenly attacking others.";
+		next;
+		mes "[Transportation Executive Ernon]";
+		mes "What in the hell is going on?";
+		close;
+	case 5:
+		switch( recorder_quest_status ) {
+		case 0:
+			emotion ET_QUESTION;
+			mes "[Transportation Executive Ernon]";
+			mes "They were talking about it in the broadcast since yesterday so you know the gist of the situation, right?";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "The contaminant is getting to the interior of the air-raid shelter so the decision has been made to move all supplies to the uncontaminated zone Z-2 that the Chemical Substance Specialists found.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "There was a request to move the cargo with the Adventurers since the scrawny researchers won't be of help.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "Alright- let's move the cargo to Zone Z-2 first.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "If you go to the machine Warehouse on your way back there will a person called Al. Tell him";
+			next;
+			emotion ET_KIK;
+			mes "[Transportation Executive Ernon]";
+			mes "^0000FF You idiots!! Stop wasting material with stupid machines!!^000000 for me and come back.";
+			next;
+			select("Eh?");
+			mes "[Transportation Executive Ernon]";
+			mes "Don't understand? Tell Al in the machine Warehouse";
+			next;
+			emotion ET_KIK;
+			mes "[Transportation Executive Ernon]";
+			mes "^0000FF You idiots!! Stop wasting material with stupid machines!!^000000 and come back.";
+			next;
+			setquest 5366;// Limits of Journeys
+			setquest 5367;// Transport Necessities
+			recorder_quest_status = 1;
+			mes "[Transportation Executive Ernon]";
+			mes "Remember to get every postposition right and convey my feeling 100%.";
+			close;
+		case 1:
+		case 2:
+			mes "[Transportation Executive Ernon]";
+			mes "Transport the cargo to Zone Z-2 first.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "On your way back go to the machine Warehouse and tell Al";
+			next;
+			emotion ET_KIK;
+			mes "[Transportation Executive Ernon]";
+			mes "??^0000FF You idiots!! Stop wasting material with stupid machines!!^000000?? for me and come back.";
+			close;
+		case 3:
+			mes "[Transportation Executive Ernon]";
+			mes "You conveyed my feeling right?";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "They should be smartened up by now. They wouldn't waste precious components again, right?";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "Here! This is compensation for the job.";
+			next;
+			erasequest 5367;// Transport Necessities
+			erasequest 5368;// Goods delivery Complete
+			erasequest 5369;// Message Delivery Complete
+			setquest 5370;// Memory Record
+			getexp 750000,500000;
+			recorder_quest_status = 4;
+			mes "- The small round capsule has percolated through skin. It feels like experience has accumulated.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "Though our survival isn't sure because of the contaminant,";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "The chief researcher told us to adequately compensate the adventurers who were caught up in the explosion.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "Don't worry about it though.";
+			close;
+		case 4:
+			mes "[Transportation Executive Ernon]";
+			mes "Though our survival isn't sure because of the contaminant,";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "The chief researcher told us to adequately compensate the adventurers who were caught up in the explosion.";
+			next;
+			mes "[Transportation Executive Ernon]";
+			mes "Don't worry about it though.";
+			close;
+		}
+	}
+}
+
+un_bk_q,297,287,6	script	Adventurer Jean#EP15.2M	4_M_HUBOY,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Adventurer Jean]";
+		mes "Uh?! You're an adventurer too?";
+		next;
+		mes "[Adventurer Jean]";
+		mes "Ugh.. It seems you are unlucky as well.";
+		close;
+	case 2:
+		mes "[Adventurer Jean]";
+		mes "Don't you think this place is trying to exploit us Adventurers?";
+		next;
+		mes "[Adventurer Jean]";
+		mes "The Cafeteria food is good though.";
+		close;
+	case 3:
+		mes "[Adventurer Jean]";
+		mes "Grapes were served on the side today.";
+		next;
+		mes "[Adventurer Jean]";
+		mes "I like grapes. I want to eat more.";
+		close;
+	case 4:
+		mes "[Adventurer Jean]";
+		mes "A friend I made here is confined in the temporary clinic. They found a transfectant or something.";
+		next;
+		mes "[Adventurer Jean]";
+		mes "To us adventurers a healthy body is an asset.";
+		close;
+	case 5:
+		mes "[Adventurer Jean]";
+		mes "I ate a lot of different things from adventuring places.";
+		next;
+		mes "[Adventurer Jean]";
+		mes "I think the food here is one of the best.";
+		close;
+	}
+}
+
+un_bk_q,318,299,2	script	Cafeteria Lady#EP15.2MR	4_F_CAVE1,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Cafeteria Lady]";
+		mes "Sorry. We aren't ready to distribute food yet.";
+		close;
+	case 2:
+		mes "[Cafeteria Lady]";
+		mes "Grab a plate or tray and wait in line.";
+		close;
+	case 3:
+		mes "[Cafeteria Lady]";
+		mes "Oh no what should we do? We ran out of grapes.";
+		next;
+		mes "[Cafeteria Lady]";
+		mes "New grapes should be delivered from the farm soon. Do you want to wait?";
+		close;
+	case 4:
+		mes "[Cafeteria Lady]";
+		mes "Do you know that's the temporary clinic? You cannot go that way now.";
+		next;
+		mes "[Cafeteria Lady]";
+		mes "The passage is blocked because of convulsing patients.";
+		close;
+	case 5:
+		mes "[Cafeteria Lady]";
+		mes "You are working hard.";
+		close;
+	}
+}
+
+// Corridor
+un_bk_q,280,280,8	script	Access Control Guard#EP_clinic1	4_M_HUMAN_02,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+	case 2:
+	case 3:
+		mes "[Access Control Guard]";
+		mes "You cannot enter this area because it is under construction.";
+		next;
+		mes "[Access Control Guard]";
+		mes "According to the Facilities managers it will be later used as a Clinic.";
+		close;
+	case 4:
+		mes "[Access Control Guard]";
+		mes "Access to the temporary clinic is restricted to quarantine convulsing patients.";
+		next;
+		mes "[Access Control Guard]";
+		mes "I ask for your understanding.";
+		close;
+	case 5:
+		mes "[Access Control Guard]";
+		mes "Movement in this area is currently prohibited.";
+		next;
+		mes "[Access Control Guard]";
+		mes "I ask for your understanding.";
+		close;
+	}
+}
+un_bk_q,313,280,8	duplicate(Access Control Guard#EP_clinic1)	Access Control Guard#EP_clinic2	4_M_HUMAN_02
+un_bk_q,340,235,6	duplicate(Access Control Guard#EP_clinic1)	Access Control Guard#EP_clinic3	4_M_HUMAN_02
+un_bk_q,298,203,4	duplicate(Access Control Guard#EP_clinic1)	Access Control Guard#EP_clinic4	4_M_HUMAN_02
+un_bk_q,255,236,2	duplicate(Access Control Guard#EP_clinic1)	Access Control Guard#EP_clinic5	4_M_HUMAN_02
+
+un_bk_q,248,258,2	script	Adventurer Dally#EP15.2	4_F_SITDOWN,{
+	callfunc("F_time_limit_recorder");
+	mes "[Adventurer Dally]";
+	mes "Darn it!! Frustrating";
+	next;
+	sc_start SC_INCREASEAGI,240000,10;
+	mes "[Adventurer Dally]";
+	mes "Sister- Run~";
+	close;
+}
+
+// Z-2 Zone
+un_bk_q,72,53,4	script	Distribution Chief Avrandi	4_M_TWTEAMAN,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		emotion ET_OHNO;
+		mes "[Distribution Chief Avrandi]";
+		mes "It is a relief we were able to evacuate to the air-raid shelter interior in advance.";
+		next;
+		mes "[Distribution Chief Avrandi]";
+		mes "If we weren't able to evacuate..? We probably won't be here.";
+		close;
+	case 2:
+		emotion ET_QUESTION;
+		mes "[Distribution Chief Avrandi]";
+		mes "Is there something wrong?";
+		next;
+		mes "[Distribution Chief Avrandi]";
+		mes "A while ago the Facilities managers were running around in haste.";
+		close;
+	case 3:
+		emotion ET_HUK;
+		mes "[Distribution Chief Avrandi]";
+		mes "What in the world?! You ate fresh grapes? Why didn't I get to eat them? Why?";
+		close;
+	case 4:
+		emotion ET_SHY;
+		mes "[Distribution Chief Avrandi]";
+		mes "This place is sure quiet. Why you ask?";
+		next;
+		mes "[Distribution Chief Avrandi]";
+		mes "Not many people come this far.";
+		close;
+	case 5:
+		if (recorder_quest_status == 1) {
+			mes "[Distribution Chief Avrandi]";
+			mes "Ah! Come on in. It seems there are a lot of visitors today because of the broadcast this morning.";
+			next;
+			mes "[Distribution Chief Avrandi]";
+			mes "You're here because Ernon sent you right?";
+			next;
+			mes "[Distribution Chief Avrandi]";
+			mes "I have received the item you have brought.";
+			next;
+			setquest 5368;// Goods delivery Complete
+			recorder_quest_status = 2;
+			mes "[Distribution Chief Avrandi]";
+			mes "Eh-? Are you taking it back? That is a lot of work.";
+			close;
+		}
+		mes "[Distribution Chief Avrandi]";
+		mes "Good luck. You are working hard.";
+		close;
+	}
+}
+
+// B-1 Warehouse
+un_bk_q,34,138,4	script	Warehouse Keeper Pik#EP	4W_M_03,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Warehouse Keeper Pik]";
+		mes "I don't know what brings you here but please don't touch anything.";
+		next;
+		mes "[Warehouse Keeper Pik]";
+		mes "I haven't finished checking the stock and it would be annoying if anything went missing.";
+		close;
+	case 2:
+		mes "[Warehouse Keeper Pik]";
+		mes "You're an adventurer. You don't have to deliver air cleaners here.";
+		next;
+		mes "[Warehouse Keeper Pik]";
+		mes "It's a warehouse anyway. The independent air circulation system is enough.";
+		close;
+	case 3:
+		mes "[Warehouse Keeper Pik]";
+		mes "Aahh- Looking after the warehouse is annoying.";
+		next;
+		mes "[Warehouse Keeper Pik]";
+		mes "There is nobody to rotate my shift";
+		close;
+	case 4:
+		mes "[Warehouse Keeper Pik]";
+		mes "Wha- wha- wait stop!!";
+		next;
+		mes "[Warehouse Keeper Pik]";
+		mes "You're not here to ambush me right? It's alright if not.";
+		close;
+	case 5:
+		mes "[Warehouse Keeper Pik]";
+		mes "Are you here to move items?";
+		next;
+		mes "[Warehouse Keeper Pik]";
+		mes "The goods in this warehouse should not be today I think? From what I know today we are moving necessities first.";
+		close;
+	}
+}
+
+// Corridor F-2
+un_bk_q,347,217,4	script	Facilities manager Remodeling	4_M_EINMAN,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		if (recorder_quest_status == 9) {
+			if (isbegin_quest(5349) == 0) {
+				emotion ET_QUESTION;
+				mes "[Facilities manager Remodeling]";
+				mes "Uh?! Hello. First time meeting you. What brings you here?";
+				next;
+				select("Explain situation.");
+				mes "[Facilities manager Remodeling]";
+				mes "Ah! Is that so? Fresa you say? It hasn't been long since my department was placed here.";
+				next;
+				mes "[Facilities manager Remodeling]";
+				mes "I only heard of the name Fresa.";
+				next;
+				setquest 5349;// Headcount Complete
+				mes "[Facilities manager Remodeling]";
+				mes "Anyway the current number of us facilities managers is ^FF000028^000000.";
+				next;
+				mes "[Facilities manager Remodeling]";
+				mes "There might be some others who are hiding somewhere but as of right now there are ^FF000028^000000.";
+				next;
+				mes "[Facilities manager Remodeling]";
+				mes "Tell Fresa on your way that Facilities managers are inspecting facilities in their assigned areas because the air-raid shelter facilities have not really been used.";
+				close;
+			}
+			mes "[Facilities manager Remodeling]";
+			mes "The current number of facilities managers is ^FF000028^000000.";
+			next;
+			mes "[Facilities manager Remodeling]";
+			mes "Tell Fresa that Facilities managers are inspecting facilities in their assigned areas because the air-raid shelter facilities have not really been used.";
+			close;
+		}
+		mes "[Facilities manager Remodeling]";
+		mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
+		close;
+	case 2:
+		mes "[Facilities manager Remodeling]";
+		mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
+		close;
+	case 3:
+		mes "[Facilities manager Remodeling]";
+		mes "What!! That grape!! I had some already so I am guessing it's not mine.";
+		close;
+	case 4:
+		mes "[Facilities manager Remodeling]";
+		mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
+		close;
+	case 5:
+		mes "[Facilities manager Remodeling]";
+		mes "I don't know who equipped the air-raid shelter. But it surely is well made and sturdy.";
+		close;
+	}
+}
+
+// Off Limits
+un_bk_q,102,97,2	script	Adventurer Breezin#EP15.2MR	4_F_BRZ_INDOLD,{
+	callfunc("F_time_limit_recorder");
+	switch( recorder_quest_type ) {
+	case 1:
+		mes "[Adventurer Breezin]";
+		mes "Ahh.. Why did I travel here..";
+		next;
+		mes "[Adventurer Breezin]";
+		mes "Hey don't think of going out that way. It's going to be dangerous because of the explosion.";
+		close;
+	case 2:
+		mes "[Adventurer Breezin]";
+		mes "Today is strange. Hey do you see the mysterious device over there too?";
+		close;
+	case 3:
+		mes "[Adventurer Breezin]";
+		mes "I think I said it 30 times today alone but there is no device at the door.";
+		next;
+		mes "[Adventurer Breezin]";
+		mes "I am itching for an adventure but safety outside isn't confirmed so don't think of going outside.";
+		close;
+	case 4:
+		mes "[Adventurer Breezin]";
+		mes "A while I ago I couldn't stop the Chemical Substance Specialists from going outside.";
+		next;
+		mes "[Adventurer Breezin]";
+		mes "Seeing how they didn't return, they must be dead, right?";
+		close;
+	case 5:
+		mes "[Adventurer Breezin]";
+		mes "The situation has grown out of control.";
+		next;
+		mes "[Adventurer Breezin]";
+		mes "Haa- Should have I stopped those people leaving the air-raid shelter?";
+		close;
+	}
+}
+
+// Bulletin Board
+un_bk_q,101,92,8	script	Off Limits#01	4_BULLETIN_BOARD2,{ end; }
+un_bk_q,94,92,8	duplicate(Off Limits#01)	Off Limits#02	4_BULLETIN_BOARD2
+un_bk_q,22,279,4	duplicate(Off Limits#01)	Machine Warehouse	4_BULLETIN_BOARD2
+un_bk_q,215,303,4	duplicate(Off Limits#01)	farm#C0	4_BULLETIN_BOARD2
+
+un_bk_q,58,185,4	duplicate(Off Limits#01)	Control room#Left	4_BULLETIN_BOARD2
+un_bk_q,139,187,4	duplicate(Off Limits#01)	Control room#Right	4_BULLETIN_BOARD2
+
+un_bk_q,101,122,4	duplicate(Off Limits#01)	Monitoring room#A0Center	4_BULLETIN_BOARD2
+un_bk_q,58,171,4	duplicate(Off Limits#01)	Monitoring room#L1Left	4_BULLETIN_BOARD2
+un_bk_q,139,171,4	duplicate(Off Limits#01)	Monitoring room#L2Right	4_BULLETIN_BOARD2
+
+un_bk_q,256,239,4	duplicate(Off Limits#01)	Temporary Clinic#G1	4_BULLETIN_BOARD2
+un_bk_q,301,204,4	duplicate(Off Limits#01)	Temporary Clinic#H0	4_BULLETIN_BOARD2
+
+un_bk_q,58,121,4	duplicate(Off Limits#01)	A-0 Zone#L1	4_BULLETIN_BOARD2
+un_bk_q,141,115,4	duplicate(Off Limits#01)	A-0 Zone#L2	4_BULLETIN_BOARD2
+un_bk_q,278,193,4	duplicate(Off Limits#01)	A-0 Zone#H0Left	4_BULLETIN_BOARD2
+un_bk_q,317,193,4	duplicate(Off Limits#01)	A-0 Zone#H0Right	4_BULLETIN_BOARD2
+
+un_bk_q,49,137,4	duplicate(Off Limits#01)	B-1 Warehouse	4_BULLETIN_BOARD2
+
+un_bk_q,219,265,4	duplicate(Off Limits#01)	C-0 Zone#G1	4_BULLETIN_BOARD2
+
+un_bk_q,247,217,4	duplicate(Off Limits#01)	F-1 Zone#G1	4_BULLETIN_BOARD2
+un_bk_q,349,217,4	duplicate(Off Limits#01)	F-2 Zone#G2	4_BULLETIN_BOARD2
+
+un_bk_q,214,283,4	duplicate(Off Limits#01)	G-1 Zone#C0	4_BULLETIN_BOARD2
+un_bk_q,228,217,4	duplicate(Off Limits#01)	G-1 Zone#F1	4_BULLETIN_BOARD2
+un_bk_q,273,203,4	duplicate(Off Limits#01)	G-1 Zone#H0	4_BULLETIN_BOARD2
+un_bk_q,322,203,4	duplicate(Off Limits#01)	G-2 Zone#H0	4_BULLETIN_BOARD2
+un_bk_q,388,266,4	duplicate(Off Limits#01)	G-2 Zone#I0	4_BULLETIN_BOARD2
+
+un_bk_q,122,125,4	duplicate(Off Limits#01)	H-0 Zone#Right	4_BULLETIN_BOARD2
+un_bk_q,78,125,4	duplicate(Off Limits#01)	H-0 Zone#Left	4_BULLETIN_BOARD2
+un_bk_q,340,203,4	duplicate(Off Limits#01)	H-0 Zone#H0	4_BULLETIN_BOARD2
+un_bk_q,300,184,4	duplicate(Off Limits#01)	H-0 Zone#Z0	4_BULLETIN_BOARD2
+
+un_bk_q,368,267,4	duplicate(Off Limits#01)	I-0 Zone#G2	4_BULLETIN_BOARD2
+
+un_bk_q,25,193,4	duplicate(Off Limits#01)	J-0 Zone#L1	4_BULLETIN_BOARD2
+
+un_bk_q,173,193,4	duplicate(Off Limits#01)	K-0 Zone#L2	4_BULLETIN_BOARD2
+
+un_bk_q,71,121,4	duplicate(Off Limits#01)	L-1 Zone#A0	4_BULLETIN_BOARD2
+un_bk_q,22,259,4	duplicate(Off Limits#01)	L-1 Zone#J0	4_BULLETIN_BOARD2
+un_bk_q,126,121,4	duplicate(Off Limits#01)	L-2 Zone#A0	4_BULLETIN_BOARD2
+un_bk_q,171,233,4	duplicate(Off Limits#01)	L-2 Zone#K0	4_BULLETIN_BOARD2
+
+un_bk_q,300,194,4	duplicate(Off Limits#01)	Z-0 Zone#H0	4_BULLETIN_BOARD2
+un_bk_q,164,55,4	duplicate(Off Limits#01)	Z-0 Zone#Z1	4_BULLETIN_BOARD2
+un_bk_q,27,55,4	duplicate(Off Limits#01)	Z-0 Zone#Z2	4_BULLETIN_BOARD2
+un_bk_q,230,167,4	duplicate(Off Limits#01)	Z-1 Zone#Z0	4_BULLETIN_BOARD2
+un_bk_q,365,167,4	duplicate(Off Limits#01)	Z-2 Zone#Z0	4_BULLETIN_BOARD2
+
+un_bk_q,97,84,4	script	Dimension move Portal#E	PORTAL,{
+	callfunc("F_time_limit_recorder");
+	mes "[Dimension-mover]";
+	mes "Do you want finish your travels and";
+	mes "go back to your original time?";
+	mes "^FF0000All traces in this place will be erased if you go back to your original time.^000000";
+	next;
+	if (select( "Stay here.", "Go back." ) == 2) {
+		mes "[Dimension-mover]";
+		delitem 6825, countitem(6825);// Air Purifier Box
+		delitem 6826, countitem(6826);// Fresh Grape
+		for ( .@quest_id = 5341; .@quest_id < 5371; .@quest_id++ ) {
+			if (isbegin_quest(.@quest_id) > 0)
+				erasequest .@quest_id;
+		}
+		recorder_quest_type = 0;
+		recorder_quest_status = 0;
+		mes "Your whole body becomes heavy and time seems to be passing faster around you.";
+		close2;
+		warp "un_bunker",98,91;
+	}
+	end;
+}

npc/re/scripts_athena.conf

@@ -54,17 +54,19 @@ npc: npc/re/guides/guides_woe_te.txt
 npc: npc/re/instances/BakonawaLake.txt
 npc: npc/re/instances/BangungotHospital.txt
 npc: npc/re/instances/BuwayaCave.txt
+npc: npc/re/instances/CentralLaboratory.txt
+npc: npc/re/instances/EclageInterior.txt
 npc: npc/re/instances/FacewormsNest.txt
 npc: npc/re/instances/GhostPalace.txt
 npc: npc/re/instances/HazyForest.txt
 npc: npc/re/instances/HorrorToyFactory.txt
+npc: npc/re/instances/LastRoom.txt
 npc: npc/re/instances/MalangdoCulvert.txt
 npc: npc/re/instances/OctopusCave.txt
 npc: npc/re/instances/OldGlastHeim.txt
-npc: npc/re/instances/WolfchevLaboratory.txt
-npc: npc/re/instances/EclageInterior.txt
 npc: npc/re/instances/SarahAndFenrir.txt
 npc: npc/re/instances/SaraMemory.txt
+npc: npc/re/instances/WolfchevLaboratory.txt
 //npc: npc/custom/official/GeffenMagicTournament.txt
 
 // ---------------- Kafras & Cool Event Corp. -------------------
@@ -151,6 +153,8 @@ npc: npc/re/quests/mrsmile.txt
 npc: npc/re/quests/ninja_quests.txt
 npc: npc/re/quests/pile_bunker.txt
 npc: npc/re/quests/quests_13_1.txt
+npc: npc/re/quests/quests_15_1.txt
+npc: npc/re/quests/quests_15_2.txt
 npc: npc/re/quests/quests_aldebaran.txt
 npc: npc/re/quests/quests_brasilis.txt
 npc: npc/re/quests/quests_dewata.txt

npc/re/scripts_monsters.conf

@@ -7,6 +7,7 @@ npc: npc/re/mobs/championmobs.txt
 npc: npc/re/mobs/citycleaners.txt
 npc: npc/re/mobs/int_land.txt
 npc: npc/re/mobs/towns.txt
+npc: npc/re/mobs/verus.txt
 
 // -------------------------- Dungeons --------------------------
 npc: npc/re/mobs/dungeons/abbey.txt

npc/re/scripts_warps.conf

@@ -41,4 +41,6 @@ npc: npc/re/warps/other/jobquests.txt
 npc: npc/re/warps/other/paradise.txt
 npc: npc/re/warps/other/s_workshop.txt
 npc: npc/re/warps/other/sign.txt
+npc: npc/re/warps/other/un_myst.txt
+npc: npc/re/warps/other/verus.txt
 npc: npc/re/warps/guildcastles.txt

npc/re/warps/other/paradise.txt

@@ -23,3 +23,9 @@ moc_para01,113,32,0	warp2	#warp_2_ware	1,1,moc_para01,105,92
 moc_para01,102,92,0	warp2	#warp_2_pass_2	1,1,moc_para01,109,33
 moc_para01,41,187,0	warp2	#warp_2_room2	1,1,moc_para01,179,93
 moc_para01,179,90,0	warp2	#warp_2_2fhall_3	1,1,moc_para01,41,185
+
+moc_para01,47,38,0	warp2	#warp_2_pass_2_2	1,1,moc_para01,106,14
+moc_para01,17,187,0	warp2	#warp_2_bossroom	1,1,moc_para01,132,159
+moc_para01,132,156,0	warp2	#warp_2_2fhall_1	1,1,moc_para01,17,185
+moc_para01,29,187,0	warp2	#warp_2_room1	1,1,moc_para01,180,159
+moc_para01,180,156,0	warp2	#warp_2_2fhall_2	1,1,moc_para01,29,185

npc/re/warps/other/un_myst.txt

@@ -0,0 +1,132 @@
+//===== rAthena Script =======================================
+//= un_myst warps
+//===== Description: =========================================
+//= Warp Points for episodes 15.1 & 15.2
+//===== Changelogs: ==========================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+// A
+un_myst,124,189,0	script	#un_myst_entrance	WARPNPC,1,1,{
+	end;
+OnTouch:
+	warp "un_myst",171,197;
+	@weird_piece = 1;
+	end;
+}
+un_myst,171,183,0	warp2	#un_myst_A_1	1,1,un_myst,259,200
+
+un_myst,258,208,0	script	#un_myst_A_2	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",329,205;
+	else if (.@r < 5)
+		warp "un_myst",291,203;
+	else
+		warp "un_myst",259,200;
+	end;
+}
+un_myst,295,208,0	script	#un_myst_A_3	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",329,205;
+	else if (.@r < 5)
+		warp "un_myst",291,203;
+	else
+		warp "un_myst",259,200;
+	end;
+}
+
+// B
+un_myst,393,139,0	script	#un_myst_B_1	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",176,137;
+	else if (.@r < 5)
+		warp "un_myst",138,138;
+	else
+		warp "un_myst",86,136;
+	end;
+}
+un_myst,104,136,0	script	#un_myst_B_2	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",176,137;
+	else if (.@r < 5)
+		warp "un_myst",138,138;
+	else
+		warp "un_myst",86,136;
+	end;
+}
+un_myst,138,140,0	script	#un_myst_B_3	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",176,137;
+	else if (.@r < 5)
+		warp "un_myst",138,138;
+	else
+		warp "un_myst",86,136;
+	end;
+}
+
+// C
+un_myst,75,91,0	script	#un_myst_C_1	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",217,84;
+	else if (.@r < 5)
+		warp "un_myst",160,89;
+	else
+		warp "un_myst",107,88;
+	end;
+}
+un_myst,169,89,0	script	#un_myst_C_2	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",217,84;
+	else if (.@r < 5)
+		warp "un_myst",160,89;
+	else
+		warp "un_myst",107,88;
+	end;
+}
+un_myst,121,82,0	script	#un_myst_C_3	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",217,84;
+	else if (.@r < 5)
+		warp "un_myst",160,89;
+	else
+		warp "un_myst",107,88;
+	end;
+}
+un_myst,219,88,0	script	#un_myst_C_4	WARPNPC,1,1,{
+	end;
+OnTouch:
+	.@r = rand(9);
+	if (.@r == 0)
+		warp "un_myst",217,84;
+	else if (.@r < 5)
+		warp "un_myst",160,89;
+	else
+		warp "un_myst",107,88;
+	end;
+}
+
+un_myst,108,38,0	warp2	#un_myst_tamarin	1,1,un_myst,209,33

npc/re/warps/other/verus.txt

@@ -0,0 +1,156 @@
+//===== rAthena Script =======================================
+//= Verus warps
+//===== Description: =========================================
+//= Warp Points for episodes 15.1 & 15.2
+//===== Changelogs: ==========================================
+//= 1.0 First version. [Capuche]
+//============================================================
+
+verus04,204,163,0	warp2	fr_ver04_to_tun	1,1,ver_tunn,13,35
+verus04,121,267,0	warp2	fr_ver04_to_ver03_1	1,1,verus03,121,20
+verus04,44,267,0	warp2	fr_ver04_to_ver03_2	1,1,verus03,44,20
+
+verus01,247,58,0	warp2	verus01_to_verus03	1,1,verus03,55,251
+verus02,72,16,0	warp2	verus02_to_verus03	1,1,verus03,169,255
+verus03,122,17,0	warp2	fr_ver03_to_ver04_1	1,1,verus04,121,264
+verus03,44,17,0	warp2	fr_ver03_to_ver04_2	1,1,verus04,44,264
+
+juperos_01,245,87,0	warp2	fr_ju_to_eju	1,1,ver_eju,13,148
+ver_eju,10,148,0	warp2	fr_eju_to_ju	1,1,juperos_01,242,87
+ver_eju,107,36,0	warp2	fr_eju_to_tun	2,2,ver_tunn,84,82
+ver_tunn,84,86,0	warp2	fr_tun_to_eju	1,1,ver_eju,113,38
+ver_tunn,10,36,0	warp2	fr_tun_to_ver04	1,1,verus04,202,165
+
+lhz_in01,276,238,0	warp2	in_to_out#e152i02	1,1,lhz_in01,276,230
+
+// Bunker
+un_bunker,41,275,0	warp2	A_0#A_1	1,1,un_bunker,21,276
+un_bunker,98,85,0	warp2	#bunker_out	1,1,verus01,115,190
+un_bunker,24,276,0	warp2	A_1#A_0	1,1,un_bunker,45,275
+un_bunker,24,256,0	warp2	A_2#A_3	1,1,un_bunker,26,190
+un_bunker,23,190,0	warp2	A_3#A_2	1,1,un_bunker,21,256
+un_bunker,31,196,0	warp2	A_4#A_5	1,1,un_bunker,22,378
+un_bunker,21,375,0	warp2	A_5#A_4	1,1,un_bunker,32,193
+un_bunker,51,196,0	warp2	A_6#A_7	1,1,un_bunker,68,378
+un_bunker,67,375,0	warp2	A_7#A_6	1,1,un_bunker,52,193
+un_bunker,60,183,0	warp2	A_8#A_9	1,1,un_bunker,75,235
+un_bunker,71,236,0	warp2	A_9#A_8	1,1,un_bunker,57,182
+un_bunker,60,169,0	warp2	A_10#A_11	1,1,un_bunker,72,168
+un_bunker,69,167,0	warp2	A_11#A_10	1,1,un_bunker,57,168
+un_bunker,47,135,0	warp2	A_12#A_13	1,1,un_bunker,37,134
+un_bunker,40,135,0	warp2	A_13#A_12	1,1,un_bunker,50,134
+un_bunker,57,118,0	warp2	A_14#A_15	1,1,un_bunker,72,117
+un_bunker,69,118,0	warp2	A_15#A_14	1,1,un_bunker,53,117
+un_bunker,97,124,0	warp2	A_16#A_17	1,1,un_bunker,100,144
+un_bunker,97,141,0	warp2	A_17#A_16	1,1,un_bunker,98,121
+un_bunker,128,118,0	warp2	A_18#A_19	1,1,un_bunker,144,117
+un_bunker,140,118,0	warp2	A_19#A_18	1,1,un_bunker,125,117
+un_bunker,137,168,0	warp2	A_20#A_21	1,1,un_bunker,122,167
+un_bunker,126,168,0	warp2	A_21#A_20	1,1,un_bunker,140,167
+un_bunker,137,185,0	warp2	A_22#A_23	1,1,un_bunker,120,235
+un_bunker,124,236,0	warp2	A_23#A_22	1,1,un_bunker,140,184
+un_bunker,147,196,0	warp2	A_24#A_25	1,1,un_bunker,106,378
+un_bunker,105,375,0	warp2	A_25#A_24	1,1,un_bunker,148,193
+un_bunker,167,196,0	warp2	A_26#A_27	1,1,un_bunker,152,378
+un_bunker,151,375,0	warp2	A_27#A_26	1,1,un_bunker,168,193
+un_bunker,174,190,0	warp2	A_28#A_29	1,1,un_bunker,172,229
+un_bunker,169,230,0	warp2	A_29#A_28	1,1,un_bunker,171,189
+un_bunker,213,346,0	warp2	A_30#A_31	1,1,un_bunker,213,299
+un_bunker,216,300,0	warp2	A_31#A_30	1,1,un_bunker,216,345
+un_bunker,216,280,0	warp2	A_32#A_33	1,1,un_bunker,220,261
+un_bunker,217,262,0	warp2	A_33#A_32	1,1,un_bunker,213,279
+un_bunker,249,268,0	warp2	A_34#A_35	1,1,un_bunker,390,380
+un_bunker,389,377,0	warp2	A_35#A_34	1,1,un_bunker,250,265
+un_bunker,258,262,0	warp2	A_36#A_37	1,1,un_bunker,274,289
+un_bunker,271,290,0	warp2	A_37#A_36	1,1,un_bunker,255,261
+un_bunker,258,236,0	warp2	A_38#A_39	1,1,un_bunker,272,235
+un_bunker,269,236,0	warp2	A_39#A_38	1,1,un_bunker,255,235
+un_bunker,245,214,0	warp2	A_40#A_41	1,1,un_bunker,226,213
+un_bunker,230,214,0	warp2	A_41#A_40	1,1,un_bunker,248,213
+un_bunker,262,200,0	warp2	A_42#A_43	1,1,un_bunker,274,199
+un_bunker,271,200,0	warp2	A_43#A_42	1,1,un_bunker,258,199
+un_bunker,75,128,0	warp2	A_44#B_1	1,1,un_bunker,276,196
+un_bunker,275,191,0	warp2	B_1#A_44	1,1,un_bunker,76,121
+un_bunker,119,128,0	warp2	A_45#B_2	1,1,un_bunker,319,196
+un_bunker,320,191,0	warp2	B_2#A_45	1,1,un_bunker,120,121
+un_bunker,297,206,0	warp2	B_3#B_4	1,1,un_bunker,298,224
+un_bunker,297,221,0	warp2	B_4#B_3	1,1,un_bunker,298,203
+un_bunker,324,200,0	warp2	B_5#B_6	1,1,un_bunker,344,199
+un_bunker,339,200,0	warp2	B_6#B_5	1,1,un_bunker,321,199
+un_bunker,350,214,0	warp2	B_7#B_8	1,1,un_bunker,368,213
+un_bunker,365,214,0	warp2	B_8#B_7	1,1,un_bunker,347,213
+un_bunker,337,236,0	warp2	B_9#B_10	1,1,un_bunker,323,235
+un_bunker,326,236,0	warp2	B_10#B_9	1,1,un_bunker,340,235
+un_bunker,281,266,0	warp2	B_11#B_12	1,1,un_bunker,282,282
+un_bunker,281,279,0	warp2	B_12#B_11	1,1,un_bunker,282,263
+un_bunker,313,266,0	warp2	B_13#B_14	1,1,un_bunker,314,282
+un_bunker,313,279,0	warp2	B_14#B_13	1,1,un_bunker,314,262
+un_bunker,324,290,0	warp2	B_15#B_16	1,1,un_bunker,340,261
+un_bunker,337,262,0	warp2	B_16#B_15	1,1,un_bunker,321,289
+un_bunker,343,270,0	warp2	B_17#B_18	1,1,un_bunker,382,328
+un_bunker,381,325,0	warp2	B_18#B_17	1,1,un_bunker,344,267
+un_bunker,370,264,0	warp2	B_19#B_20	1,1,un_bunker,388,263
+un_bunker,385,264,0	warp2	B_20#B_19	1,1,un_bunker,367,263
+un_bunker,297,192,0	warp2	B_21#B_22	1,1,un_bunker,298,181
+un_bunker,297,186,0	warp2	B_22#B_21	1,1,un_bunker,298,196
+un_bunker,229,163,0	warp2	B_23#B_24	1,1,un_bunker,159,52
+un_bunker,164,51,0	warp2	B_24#B_23	1,1,un_bunker,233,164
+un_bunker,366,164,0	warp2	B_25#B_26	1,1,un_bunker,31,51
+un_bunker,27,52,0	warp2	B_26#B_25	1,1,un_bunker,361,163
+un_bunker,387,79,0	warp2	alp2#out	1,1,un_bunker,366,164
+
+// Memory bunker
+un_bk_q,69,118,0	warp2	A-0#L-1	1,1,un_bk_q,53,117
+un_bk_q,128,118,0	warp2	A-0#L-2	1,1,un_bk_q,144,117
+un_bk_q,97,124,0	warp2	A-0#Monitoring room	1,1,un_bk_q,100,144
+un_bk_q,40,135,0	warp2	B-1#L-1	1,1,un_bk_q,50,134
+un_bk_q,71,236,0	warp2	Control room#L-1	1,1,un_bk_q,57,182
+un_bk_q,124,236,0	warp2	Control room#L-2	1,1,un_bk_q,140,184
+un_bk_q,216,280,0	warp2	C-0#G-1	1,1,un_bk_q,220,261
+un_bk_q,21,375,0	warp2	D-1#L-1	1,1,un_bk_q,32,193
+un_bk_q,67,375,0	warp2	D-2#L-1	1,1,un_bk_q,52,193
+un_bk_q,105,375,0	warp2	E-1#L-2	1,1,un_bk_q,148,193
+un_bk_q,151,375,0	warp2	E-2#L-2	1,1,un_bk_q,168,193
+un_bk_q,230,214,0	warp2	F-1#G-1	1,1,un_bk_q,248,213
+un_bk_q,365,214,0	warp2	F-2#G-2	1,1,un_bk_q,347,213
+un_bk_q,258,262,0	warp2	G-1#Cafeteria	1,1,un_bk_q,274,289
+un_bk_q,217,262,0	warp2	G-1#C-0	1,1,un_bk_q,213,279
+un_bk_q,245,214,0	warp2	G-1#F-1	1,1,un_bk_q,226,213
+un_bk_q,262,200,0	warp2	G-1#H-0	1,1,un_bk_q,274,199
+un_bk_q,249,268,0	warp2	G-1#M-0	1,1,un_bk_q,390,380
+un_bk_q,350,214,0	warp2	G-2#F-2	1,1,un_bk_q,368,213
+un_bk_q,324,200,0	warp2	G-2#H-0	1,1,un_bk_q,344,199
+un_bk_q,370,264,0	warp2	G-2#I-0	1,1,un_bk_q,388,263
+un_bk_q,343,270,0	warp2	G-2#N-0	1,1,un_bk_q,382,328
+un_bk_q,337,262,0	warp2	H-0#Cafeteria	1,1,un_bk_q,321,289
+un_bk_q,271,200,0	warp2	H-0#G-1	1,1,un_bk_q,258,199
+un_bk_q,339,200,0	warp2	H-0#G-2	1,1,un_bk_q,321,199
+un_bk_q,297,192,0	warp2	H-0#Z-0	1,1,un_bk_q,298,181
+un_bk_q,385,264,0	warp2	I-0#G-2	1,1,un_bk_q,367,263
+un_bk_q,24,256,0	warp2	J-0#L-1	1,1,un_bk_q,26,190
+un_bk_q,24,276,0	warp2	J-0#Machine Warehouse	1,1,un_bk_q,45,275
+un_bk_q,169,230,0	warp2	K-0#L-2	1,1,un_bk_q,171,189
+un_bk_q,60,183,0	warp2	L-1#Control room	1,1,un_bk_q,75,235
+un_bk_q,60,169,0	warp2	L-1#Monitoring room	1,1,un_bk_q,72,168
+un_bk_q,137,168,0	warp2	L-2#Monitoring room	1,1,un_bk_q,122,167
+un_bk_q,57,118,0	warp2	L-1#A-0	1,1,un_bk_q,72,117
+un_bk_q,47,135,0	warp2	L-1#B-1	1,1,un_bk_q,37,134
+un_bk_q,31,196,0	warp2	L-1#D-1	1,1,un_bk_q,22,378
+un_bk_q,51,196,0	warp2	L-1#D-2	1,1,un_bk_q,68,378
+un_bk_q,23,190,0	warp2	L-1#J-0	1,1,un_bk_q,21,256
+un_bk_q,137,185,0	warp2	L-2#Control room	1,1,un_bk_q,120,235
+un_bk_q,140,118,0	warp2	L-2#A-0	1,1,un_bk_q,125,117
+un_bk_q,147,196,0	warp2	L-2#E-1	1,1,un_bk_q,106,378
+un_bk_q,167,196,0	warp2	L-2#E-2	1,1,un_bk_q,152,378
+un_bk_q,174,190,0	warp2	L-2#K-0	1,1,un_bk_q,172,229
+un_bk_q,389,377,0	warp2	M-0#G-1	1,1,un_bk_q,250,265
+un_bk_q,381,325,0	warp2	N-0#G-2	1,1,un_bk_q,344,267
+un_bk_q,297,186,0	warp2	Z-0#H-0	1,1,un_bk_q,298,196
+un_bk_q,164,51,0	warp2	Z-1#Z-0	1,1,un_bk_q,233,164
+un_bk_q,27,52,0	warp2	Z-2#Z-0	1,1,un_bk_q,361,163
+un_bk_q,229,163,0	warp2	Z-0#Z-1	1,1,un_bk_q,159,52
+un_bk_q,366,164,0	warp2	Z-0#Z-2	1,1,un_bk_q,31,51
+un_bk_q,75,128,0	warp2	LA-0#LH-0	1,1,un_bk_q,276,196
+un_bk_q,275,191,0	warp2	LH-0#LA-0	1,1,un_bk_q,76,121
+un_bk_q,119,128,0	warp2	RA-0#RH-0	1,1,un_bk_q,319,196
+un_bk_q,320,191,0	warp2	RH-0#RA-0	1,1,un_bk_q,120,121