Переглянути джерело

Implemented the Shinokas quest, thanks to Dj-Yhn for scripting it.

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@7007 54d463be-8e91-2dee-dedb-b68131a5f0ec
MasterOfMuppets 19 роки тому
батько
коміт
db029f5c9b
5 змінених файлів з 1314 додано та 2 видалено
  1. 1 0
      npc/Changelog.txt
  2. 34 0
      npc/airports/airships.txt
  3. 19 0
      npc/airports/einbroch.txt
  4. 172 1
      npc/cities/einbech.txt
  5. 1088 1
      npc/cities/einbroch.txt

+ 1 - 0
npc/Changelog.txt

@@ -32,6 +32,7 @@ Evera
 Date		Added
 ======
 06/06
+	* Implemented the Shinokas quest, thanks to Dj-Yhn for scripting it. [MasterOfMuppets]
 	* Added Rachel interior warps thanks to Celestria [Playtester]
 06/05
 	* Implemented some more Louyang npcs, thanks to Prometheus for them. [MasterOfMuppets]

+ 34 - 0
npc/airports/airships.txt

@@ -14,6 +14,7 @@
 //= 0.1a Fixed the Airport Staff#Iz which was [MasterOfMuppets]
 //= 	 warping you to the same location as Airport Staff#Ein
 //= 0.2 Implemented some more airship NPCs, more are to come.
+//= 0.3 Implemented some more NPCs [MasterOfMuppets]
 //============================================================ 
 
 //============================================================ 
@@ -355,6 +356,39 @@ s_Material:
 
 }
 
+
+airplane.gat,33,69,4 script Kaci 73,{
+	end;
+
+	OnLose:
+	emotion e_wah;
+	end;
+	
+	OnWin:
+	emotion e_no1;
+	end;
+}
+
+airplane.gat,80,71,4	script	Zerta	834,{
+	mes "[Zerta]";
+	mes "Oh, hello adventurer.";
+	mes "I am currently on a";
+	mes "sacred journey, offering";
+	mes "prayer for the sake of the";
+	mes "Rune-Midgard continent.";
+	close;
+}
+
+airplane.gat,65,63,4	script	Maelin	714,{
+	mes "[Maelin]";
+	mes "Um, this Airship is";
+	mes "to Lutie, isn't it? I've";
+	mes "been waiting so long,";
+	mes "but I haven't heard any";
+	mes "broadcast about Lutie.";
+	close;
+}
+
 //============================================================ 
 //= The Airship System (Yuno -> Izlude -> Repeat)
 //============================================================ 

+ 19 - 0
npc/airports/einbroch.txt

@@ -95,3 +95,22 @@ airport.gat,143,51,4	duplicate(AirportE2)	Airport Staff#5	90,{
 
 airport.gat,156,51,4	duplicate(AirportE2)	Airport Staff#6	90,{
 }
+
+einbroch.gat,94,267,4	script	Airship Staff	91,{
+	mes "[Airship Staff]";
+	mes "Welcome to the";
+	mes "Einbroch Airport.";
+	mes "Please use this door to";
+	mes "board the Airship wich stops";
+	mes "over Lighthalzen and Juno in";
+	mes "the Schwaltzvalt Republic";
+	next;
+	mes "[Airship Staff]";
+	mes "Otherwise, if Einbroch is";
+	mes "your intended destination,";
+	mes "please head down the stairs";
+	mes "and ask the Arrival Staff to lead";
+	mes "you to the main terminal. Thank";
+	mes "you, and enjoy your travels.";
+	close;
+}

+ 172 - 1
npc/cities/einbech.txt

@@ -17,6 +17,8 @@
 //= 0.3 Added some more npcs, thanks to Muad_Dib [MasterOfMuppets]
 //= 1.0 Added the last of the town npcs, [MasterOfMuppets]
 //=     all credits to muad_dib for scripting them.
+//= 1.1 Made some changes according to the Shinokas quest, [MasterOfMuppets]
+//=	thanks to Dj-Yhn for scripting them.
 //============================================================
 
 
@@ -973,11 +975,13 @@ L_FINE:
 }
 
 einbech.gat,165,105,7	script	Buender Hikeman	847,{
+	if(Shinokas_Quest == 5) goto L_P2;
 	if(einbech_buender == 2)goto L_BEST;
 	if(einbech_buender == 1)goto L_BASTARD;
 	mes "[Buender Hikeman]";
 	mes "...";
 	mes "......";
+	if(!ein_young_man)close;
 	next;
 	mes "[Buender Hikeman]";
 	mes "...";
@@ -1101,6 +1105,7 @@ L_WHAT:
 	mes "[Buender Hikeman]";
 	mes "Yes...";
 	mes "Nothing.";
+	next;
 	goto L_CONTINUE;
 L_UNGOLIANT:
 	mes "[Buender Hikeman]";
@@ -1144,6 +1149,7 @@ L_ORE:
 	mes "Don't you remember";
 	mes "what happened? What";
 	mes "you did to us at that time?!";
+	next;
 	goto L_CONTINUE;
 L_BASTARD:
 	mes "[Buender Hikeman]";
@@ -1158,7 +1164,7 @@ L_HOW:
 	mes "I was lying on my";
 	mes "stomach in the ruins";
 	mes "of that dark tunnel.";
-	next;	
+	next;
 	mes "[Buender Hikeman]";
 	mes "And I found...";
 	mes "You know what I found.";
@@ -1251,6 +1257,171 @@ L_IM:
 	mes "of the person who";
 	mes "shattered my life?!";
 	goto L_HOW;
+	
+L_P2:
+	mes "^0000FFHikeman is dozing^000000";
+	mes "^0000FFoff in his chair. Judging^000000";
+	mes "^0000FFfrom the look of discomfort^000000";
+	mes "^0000FFon his face, he seems to be^000000";
+	mes "^0000FFhaving a nightmare.^000000";
+	if (einbech_buender == 3) close;
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Excuse me...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Huh...?";
+	mes ".........!!";
+	mes "Hahahahaha!";
+	mes "Come back for";
+	mes "your beating,";
+	mes "eh, Shinokas?!";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Look...!";
+	mes "I'm not Shinokas,";
+	mes "okay? How can you";
+	mes "forget what he looks";
+	mes "like or how old he is?";
+	mes "I'm way younger!";
+	next;
+	mes "[Buender Hikeman]";
+	mes "What...?";
+	next;
+	mes "[Buender Hikeman]";
+	mes "..................";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Uhhhh......";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Huh.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "It seems...";
+	mes "I've made a";
+	mes "huge mistake.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Ever since the accident, people";
+	mes "have said that I haven't been the";
+	mes "same. Maybe they're right.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "I keep making the same";
+	mes "mistakes, so maybe they're";
+	mes "right about me getting senile.";
+	mes "Did you come just to clear";
+	mes "up this misunderstanding?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Um...";
+	mes "Actually...";
+	next;
+	menu "Tell Hikeman about Shinakas's death.",-,"Don't notify Hikeman",L_NNotify;
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas died";
+	mes "a while ago in";
+	mes "Einbroch.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Wh-what...?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas was killed by";
+	mes "some men. He thinks they";
+	mes "may have been the ones";
+	mes "who hired you guys. In the";
+	mes "end, he was betrayed too...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "I...";
+	mes "I see...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas may have";
+	mes "gotten some money,";
+	mes "but he spent the rest";
+	mes "of his life in hiding,";
+	mes "being hunted down.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Nothing's left.";
+	mes "I've got nothing";
+	mes "to look forward to.";
+	mes "I was living only to";
+	mes "avenge my friends...";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Please...";
+	mes "Just go back to";
+	mes "wherever you came";
+	mes "from. Leave me alone...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Did Hikeman really want";
+	mes "revenge on Shinokas or did";
+	mes "he want to hear him out since";
+	mes "they used to be close friends?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "If I mention that";
+	mes "what they found was";
+	mes "the Ymir Heart Piece,";
+	mes "Hikeman might end up";
+	mes "getting hunter down, so";
+	mes "I better not say anything.";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Why are those men";
+	mes "so obsessed with that";
+	mes "Ymir Heart Piece? Is it";
+	mes "really worth this kind of";
+	mes "cruelty? Whoever they are,";
+	mes "their intentions can't be good.";
+	close2;
+	set einbech_buender,3;
+	if(BaseLevel < 40)set BaseExp,BaseExp+34750;
+	if(BaseLevel < 60)set BaseExp,BaseExp+69500;
+	if(BaseLevel > 60 && BaseLevel < 70)set BaseExp,BaseExp+139000;
+	if(BaseLevel > 70 && BaseLevel < 80)set BaseExp,BaseExp+278000;
+	if(BaseLevel > 80 && BaseLevel < 90)set BaseExp,BaseExp+417000;
+	if(BaseLevel > 90)set BaseExp,BaseExp+556000;
+	end;
+	
+L_NNotify:
+	mes "["+strcharinfo(0)+"]";
+	mes "Yeah...";
+	mes "That's right.";
+	mes "I wanted to clear up";
+	mes "this misunderstanding";
+	mes "so you could calm down,";
+	mes "even if it's just a little bit.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Well, you don't have";
+	mes "to worry so much about";
+	mes ",u stress. I find that the";
+	mes "winds that pass through";
+	mes "this town to be very relaxing.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Each time the wind";
+	mes "blows by, my vision blurs,";
+	mes "my memories haze and all";
+	mes "of my hatred just drifts away.";
+	next;
+	mes "[Buender Hikeman]";
+	mes "Without the wind, I'd only";
+	mes "have my hatred towards ^FF0000him^000000.";
+	mes "Maybe it's my only reason for";
+	mes "living and maybe I'm lonely,";
+	mes "but it's too late to feel";
+	mes "sorry for myself now.";
+	close;
 }
 
 ein_in01.gat,281,85,2	script	Drunken Man	849,{

+ 1088 - 1
npc/cities/einbroch.txt

@@ -3,7 +3,7 @@
 //===== By: ================================================== 
 //= Nexon
 //===== Current Version: ===================================== 
-//= 0.7
+//= 0.8
 //===== Compatible With: ===================================== 
 //= eAthena Revision 3000+
 //===== Description: ========================================= 
@@ -18,6 +18,8 @@
 //=	Info provided by RockmanEXE [erKURITA]
 //= 0.6 Implemented a crap quest [MasterOfMuppets]
 //= 0.7 Implemented an inn NPC [MasterOfMuppets]
+//= 0.8 Implemented the Shinokas quest, thanks to [MasterOfMuppets]
+//= 	Dj-Yhn for scripting it.
 //============================================================
 
 
@@ -1959,6 +1961,1091 @@ s_NEnoughZeny:
 
 }
 
+ein_in01.gat,231,163,1	script	Sick Old Man	849,6,6,{
+	if(Shinokas_Quest == 5) goto L_Dead;
+	if(ein_lab == 2) goto L_Lab2;
+	if(Shinokas_Quest == 4) goto L_Lab1;
+	if(EinFactory == 16 && Shinokas_Quest == 3) goto L_Factory2;
+	if(Shinokas_Quest == 3) goto L_Factory3;
+	if(ein_maid) goto L_Factory;
+	if(Shinokas_Quest == 2) goto L_Find;
+	if(!Shinokas_Quest)set Shinokas_Quest,1;
+	mes "[Sick Old Man]";
+	mes "...!";
+	next;
+	mes "[Sick Old Man]";
+	mes "Awwwk~";
+	mes "It's killing me!";
+	mes "Arrrgh! Awwwrgh!";
+	mes "W-when will my son";
+	mes "come back from";
+	mes "the factory...?!";
+	next;
+	if (einbech_buender == 2) goto L_Ask;
+	mes "^3131FFYou feel really awkward";
+	mes "just staring at this old";
+	mes "man violently rolling";
+	mes "around in his bed.";
+	close;
+	
+L_Ask:
+	mes "["+strcharinfo(0)+"]";
+	mes "Shi...";
+	mes "Shinokas?";
+	next;
+	mes "[Sick Old Man]";
+	mes "Huh...?";
+	mes "Noooo! My name is";
+	mes "Shinotarous. Y-you've";
+	mes "got the wrong person!";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "This has to be the";
+	mes "Shinokas that Hikeman";
+	mes "was talking about in Einbech";
+	mes "Hmmm, but how can I get";
+	mes "him to admit it?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "*Ahem!*";
+	mes "Excuse me...";
+	next;
+while(1)
+{
+	switch(select("Remember the mine tunnel collapse?:Didn't you used to be a miner?:Have you lived in Einbroch all your life?")) {
+	 case 1: //remember
+		  if(@quest2 > 4 || @quest3 > 4)goto L_Cont;
+		  mes "[Sick Old Man]";
+		  mes "Noooo!";
+		  mes "I don't know";
+		  mes "what the hell";
+		  mes "you're talking";
+		  mes "about!";
+		  next;	
+	 break;
+
+	 case 2: //miner
+		  if(@quest2 > 1)goto s_Quest2;
+		  mes "[Sick Old Man]";
+		  mes "Noooo...!";
+	 	  mes "W-why would you";
+		  mes "even ask me that";
+		  mes "kind of question?!";
+	  s_Quest2:
+		  set @quest2,@quest2 + 1;
+		  if(@quest3)set @quest3,0;
+		  next;
+	 break;
+
+	 case 3: //einbroch
+		  if(@quest3 > 1)goto s_Quest3;
+		  mes "[Sick Old Man]";
+		  mes "Y-yes!";
+		  mes "Born and raised";
+		  mes "raised here in";
+		  mes "Einbe--Einbroch!";
+		  next;
+		  mes "^3131FFIt doesn't seem";
+		  mes "like this old man";
+		  mes "is telling the truth...";
+	s_Quest3:
+		  set @quest3,@quest3 + 1;
+		  if(@quest2)set @quest2,0;
+		  next;
+	 break;
+	}
+}
+	
+L_Cont:
+	mes "[Shinokas]";
+	mes "Hmm...";
+	mes "^0000FFBuender Hikeman^000000...";
+	next;
+	mes "[Shinokas]";
+	mes "No!";
+	mes "I've never met";
+	mes "Buender Hikeman";
+	mes "in my entire li--";
+	next;
+	mes "[Shinokas]";
+	mes "...";
+	mes "......";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "I was right!";
+	mes "You're Shinokas!";
+	next;
+	mes "[Shinokas]";
+	mes "Curses!";
+	mes "I've blown";
+	mes "my cover!";
+	mes "W-wait! How much";
+	mes "do you know?!";
+	next;
+	mes "[Shinokas]";
+	mes "Did ^0000FFthey^000000 send you?";
+	mes "*Sigh* I think that this";
+	mes "is it. I'll never be";
+	mes "able to solve the";
+	mes "secret before I die.";
+	next;
+	mes "[Shinokas]";
+	mes "Okay.";
+	mes "Get on with it.";
+	mes "I'm ready now...";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Tell me everything";
+	mes "you know related to";
+	mes "that incident where";
+	mes "the mine tunnel";
+	mes "collapsed around";
+	mes "you and Hikeman.";
+	next;
+	mes "[Shinokas]";
+	mes "...?";
+	mes "Errr....";
+	mes "You're not";
+	mes "here to kill me?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "No...!";
+	mes "I'm here to find";
+	mes "out the truth";
+	next;
+	mes "[Shinokas]";
+	mes "That means...";
+	mes "I still have some time.";
+	mes "This must be destiny!";
+	mes "Allright, I'll tell you what";
+	mes "happened. But it's a";
+	mes "long story...";
+	next;
+	mes "[Shinokas]";
+	mes "How much do you know";
+	mes "about the accident? No,";
+	mes "wait. Don't answer that.";
+	mes "I don't want to hear it";
+	next;
+	mes "[Shinokas]";
+	mes "I admit it. Yes.";
+	mes "I stabbed my friends";
+	mes "in the back. It was an";
+	mes "unforgivable sin that will";
+	mes "haunt me untill the day that I die";
+	next;
+	mes "[Shinokas]";
+	mes "I sold out my friends for";
+	mes "money. I destroyed that";
+	mes "tunnel and killed them. But";
+	mes "I suppose I was tricked as well.";
+	mes "^0000FFThey^000000 never intended to keep";
+	mes "their end of our agreement.";
+	next;
+	mes "[Shinokas]";
+	mes "After I destroyed the tunnel,";
+	mes "they targeted me and I ended";
+	mes "spending the rest of my life being";
+	mes "pursued and running for place to";
+	mes "place. What the hell was that ^0000FFore^000000";
+	mes "and why was it so important?";
+	next;
+	mes "[Shinokas]";
+	mes "I need to know more about";
+	mes "that ore if it's worth killing for.";
+	mes "That's why I've risked sneaking";
+	mes "into Einbroch. Sopposedly, an ore";
+	mes "similar to the ore we found has";
+	mes "been transported here recently";
+	next;
+	menu "Did you find it?",-;
+	mes "[Shinokas]";
+	mes "No, not yet.";
+	mes "I've been searching";
+	mes "for that ore every night.";
+	mes "During the day, this kind";
+	mes "blacksmith has managed";
+	mes "to hide me from those men";
+	next;
+	mes "[Shinokas]";
+	mes "But I won't be safe";
+	mes "for very long. Look, I'm";
+	mes "no saint, but before I die,";
+	mes "I wanna do this one last";
+	mes "thing and see what's so";
+	mes "great about this ore...";
+	next;
+	menu "Wait, who's trying to get you?",-;
+	mes "[Shinokas]";
+	mes "Who's trying to kill me?";
+	mes "The people who hired me and";
+	mes "my friends to dig up that ore in";
+	mes "the first place. We thought they";
+	mes "were ordinary businessmen,";
+	mes "but... They're dangerous.";
+	next;
+	mes "[Shinokas]";
+	mes "So I told you everything";
+	mes "and now you know that my";
+	mes "day might be numbered.";
+	mes "Please do an old man a favor";
+	mes "and search Einbroch for that";
+	mes "strange, mysterious ore.";
+	next;
+	mes "[Shinokas]";
+	mes "Now, the first thing I learned";
+	mes "in this tows is that the richest";
+	mes "family is the Kapelltheines. Only";
+	mes "the rich and powerful can possibly";
+	mes "be involved in something so big.";
+	next;
+	mes "[Shinokas]";
+	mes "Would you search";
+	mes "Kappelltheine Manor";
+	mes "for that ore? It's on the way";
+	mes "to the Airport and it shouldn't be";
+	mes "hard to miss. They're the richest";
+	mes "people in Einbroch, after all.";
+	next;
+	mes "[Shinokas]";
+	mes "I'm too old and weak to leave";
+	mes "this house, and there's the change";
+	mes "that those men will find me. If you";
+	mes "can sympathize with my situation,";
+	mes "please find out if the Kapelltheine";
+	mes "family has any unique ores...";
+	set Shinokas_Quest,2;
+	close;
+	
+L_Find:
+	mes "[Shinokas]";
+	mes "Please...";
+	mes "Find out if the Kapelltheines";
+	mes "are keeping some kind of unique";
+	mes "ore. Their manor is on the road";
+	mes "that leads to the Airport.";
+	close;
+	
+L_Factory:
+	mes "[Shinokas]";
+	mes "So, did you find";
+	mes "anything from the";
+	mes "Kapellthaines?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Well, Mr. Kapelltheine";
+	mes "is kind of violent, but";
+	mes "I didn't find anything";
+	mes "really suspicious.";
+	next;
+	mes "[Shinokas]";
+	mes "Huh...";
+	mes "I must have";
+	mes "been wrong, then...";
+	mes "Where else could it be?";
+	next;
+	mes "[Shinokas]";
+	mes "Oh, right! The huge";
+	mes "factory in Einbroch!";
+	mes "What could be more";
+	mes "suspicious? There's a ton";
+	mes "of workers, but no one really";
+	mes "knows what they do there...";
+	next;
+	mes "[Shinokas]";
+	mes "If they're so secretive";
+	mes "it's possible that they're";
+	mes "keeping the ore over there.";
+	mes "Please go and search the";
+	mes "Factory for that ore as";
+	mes "soon as you can.";
+	set Shinokas_Quest,3;
+	close;
+
+L_Factory3:
+	mes "[Shinokas]";
+	mes "So...";
+	mes "Did you learn";
+	mes "anything new";
+	mes "in the Factory?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "I haven't went there";
+	mes "yet.";
+	next;
+	mes "[Shinokas]";
+	mes "Then why did you come";
+	mes "back? Go and investigate";
+	mes "the factory now.";
+	close;
+	
+L_Factory2:
+	mes "[Shinokas]";
+	mes "So...?";
+	mes "Did you learn";
+	mes "anything new";
+	mes "in the Factory?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Well...";
+	mes "There's a lot of";
+	mes "suspicious business";
+	mes "in the factory, but I don't";
+	mes "think any of it is related";
+	mes "to that ore you mentioned.";
+	next;
+	mes "[Shinokas]";
+	mes "Damn it...";
+	mes "Then where did";
+	mes "they hide it? Where";
+	mes "do you think that";
+	mes "ore might be?";
+	next;
+while(1)
+{
+	switch(select("Airport:Factory:Train Station:Airship Repairshop:Laboratory")) {
+	 case 1: //airport
+	  mes "[Shinokas]";
+	  mes "No...";
+	  mes "The Airport is always";
+	  mes "crowded with people.";
+	  mes "It'd be a bad idea to hide";
+	  mes "something so important";
+	  mes "in that kind of place.";
+	  next;
+		 break;
+	 case 2: //factory
+	  mes "[Shinokas]";
+	  mes "Didn't you just";
+	  mes "check the factory?";
+	  mes "You couldn't find";
+	  mes "any clues to the";
+	  mes "ore over there...";
+			next;
+	 	break;
+	 case 3: //train
+	  mes "[Shinokas]";
+	  mes "Hmm...";
+	  mes "People are always going";
+	  mes "in and out of the Train Station.";
+	  mes "It's not the best place to hide";
+	  mes "something as important as the ore.";
+	  next;
+		 break;
+	 case 4: //repairshop
+	  mes "The Airship? Hm, it does";
+	  mes "fly through some mysterious";
+	  mes "power... But I already checked";
+	  mes "the Airship Replairshop myself.";
+	  mes "I haven't found any trace of";
+	  mes "the ore over there.";
+			next;
+		 break;
+		case 5: //Laboratory
+		 mes "[Shinokas]";
+		 mes "...!";
+		 mes "Yes. Yes...!";
+		 mes "That could be it!";
+		 mes "Why didn't I think";
+		 mes "about the Laboratory?";
+		 mes "It makes so much sense!";
+			next;
+			mes "[Shinokas]";
+			mes "I have a good feeling";
+			mes "about this. Please sneak";
+			mes "into that Laboratory and";
+			mes "see if you can find the ore!";
+			next;
+			mes "[Shinokas]";
+			mes "Remember...";
+			mes "Not just anybody";
+			mes "can enter that kind";
+			mes "of place. But I'm sure";
+			mes "you'll figure something out.";
+			set Shinokas_Quest,4;
+			close;
+	}
+}
+
+L_Lab1:
+	mes "[Shinokas]";
+	mes "...";
+	mes "......";
+	close;
+
+OnTouch:
+	if (ein_lab < 2) end;
+	mes "^3131FFThe open window rattles";
+	mes "as you enter the room and";
+	mes "are welcomed by a sudden";
+	mes "chill. A trail of red footprints";
+	mes "lies near your feet.";
+	next;
+	mes "^3131FFA grey sheet lies";
+	mes "rumpled on the bed,";
+	mes "but you can see dark red";
+	mes "stains in between the folds.";
+	set ein_lab,3;
+	close;
+	
+L_Lab2:
+	mes "["+strcharinfo(0)+"]";
+	mes "Shinokas,";
+	mes "I found something!";
+	next;
+	mes "[Shinokas]";
+	mes "You...";
+	mes "Came... back...";
+	mes "Even... if... it's";
+	mes "already... Too late.";
+	mes "*Couhg Cough*";
+	next;
+ 	mes "^3131FFYou help Shinokas";
+ 	mes "sit up, but find that";
+	mes "your hands have been";
+	mes "stained with his blood.^000000";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Blood...?!";
+	mes "Shinokas!";
+	mes "Who did this to you?";
+	mes "W-we need to call for help!";
+	next;
+	mes "[Shinokas]";
+	mes "No...";
+	mes "It's already";
+	mes "too late for me.";
+	mes "I should have died";
+	mes "a long time ago...";
+	next;
+	mes "[Shinokas]";
+	mes "*Cough*";
+	mes "I only regret that";
+	mes "I've never been able";
+	mes "to apologize to my";
+	mes "friends... *Cough!*";
+	next;
+	mes "[Shinokas]";
+	mes "But did you";
+	mes "find out? D-did";
+	mes "you find out what's";
+	mes "so special about";
+	mes "that ore? W-what";
+	mes "is it... Really?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "It was...";
+	next;
+	input @text$;
+	mes "^0000FF"+@text$+"^000000!";
+	next;
+	mes "[Shinokas]";
+	mes "W-wait...!";
+	mes "What did...";
+	mes "I can't underst--";
+	mes "*Couhgh cough!*";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "No...!";
+	mes "Tell me who";
+	mes "did this to you!";
+	mes "Where are they?";
+	mes "Speak to me, please!";
+	next;
+	mes "[Shinokas]";
+	mes "W-wha...?";
+	mes "I told you.";
+	mes "Th-they we--";
+	next;
+	mes "[Shinokas]";
+	mes "...";
+	mes "......";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "No!";
+	mes "Shinokas!";
+	mes "Why, God?";
+	mes "Why...";
+	set Shinokas_Quest,5;
+	close;
+	
+L_Dead:
+ mes "^3131FFShinokas's";
+ mes "body has grown";
+ mes "cold to the tough.";
+ close;
+
+}
+
+ein_in01.gat,21,147,4	script	Megass	853,3,3,{
+	end;
+
+OnTouch:
+	mes "[Megass]";
+	mes "How dare you...";
+	mes "A vagabond like";
+	mes "you setting foot";
+	mes "into my home!?";
+	mes "Unthinkable!";
+	next;
+	mes "[Megass]";
+	mes "Leave immediately";
+	mes "before I report you";
+	mes "to the authorities";
+	mes "for trespassing!";
+	close2;
+	warp "einbroch.gat",112,245;
+	end;
+}
+
+ein_in01.gat,31,151,4	script	Satra	850,{
+	mes "[Satra]";
+	mes "A wandering";
+	mes "adventurer...?";
+	mes "How sinfully";
+	mes "intriguing!";
+	mes "Ho ho ho ho~";
+	next;
+	mes "[Satra]";
+	mes "Oh, do not worry";
+	mes "I'm sure the beauty of";
+	mes "my home has captured your";
+	mes "curiosity. My brutish excuse";
+	mes "for a husband would have you";
+	mes "beat if he found you...";
+	next;
+	mes "[Satra]";
+	mes "But I'm far more genteel";
+	mes "then Megass. You're more";
+	mes "than welcome to enjoy the";
+	mes "furnishings. Ho ho ho ho~";
+	close;
+}
+
+ein_in01.gat,31,138,4	script	Calla	90,{
+	mes "[Calla]";
+	mes "Hello adventurer.";
+	mes "Our city must just be";
+	mes "another place where";
+	mes "you'll stay no longer";
+	mes "than a few days.";
+	next;
+	mes "[Calla]";
+	mes "You must have so much";
+	mes "freedom. I envy you. I can't";
+	mes "do what I want to do. I don't";
+	mes "even have the courage to tell";
+	mes "my family what I really want,";
+	mes "much less change things here...";
+	next;
+	mes "[Calla]";
+	mes "How is it like?";
+	mes "Going wherever you";
+	mes "please, following your";
+	mes "heart's true desire?";
+	mes "What I would give to";
+	mes "be able to do that...";
+	close;
+}
+
+ein_in01.gat,32,133,6	script	Maid	850,{
+	if (Shinokas_Quest == 2 && ein_maid == 0) goto L_Ore;
+	mes "[Maid]";
+	mes "There's no end";
+	mes "to all these plates";
+	mes "I have to clean...!";
+	close;
+	
+L_Ore:
+	mes "[Maid]";
+	mes "Did you ask me";
+	mes "if I saw some kind";
+	mes "of ore around here?";
+	mes "That's strange...";
+	next;
+	mes "[Maid]";
+	mes "Will, I've been with";
+	mes "this family for a long";
+	mes "time. Let me assure you";
+	mes "that there's no secrets";
+	mes "from me in this household!";
+	next;
+	mes "[Maid]";
+	mes "I'm sorry, but I don't";
+	mes "think we have any ores,";
+	mes "special or otherwise, here";
+	mes "in the manor. What exactly";
+	mes "do you need them for?";
+	set ein_maid,1;
+	close;
+}
+
+einbroch.gat,51,52,1	script	lab_warp	45,2,2{
+	if(Shinokas_Quest >= 4 && ein_scientist != 1) goto L_Sec;
+	mes "^3131FFThe door is locked.";
+	mes "You cannot enter.";
+	close;
+	
+L_Sec:
+	mes "[Security System]";
+	mes "^FF0000*Beep Boop*^000000";
+	mes "Restricted Access Area.";
+	mes "Please identify yourself";
+	mes "through the system.";
+	next;
+	switch(select("Identify.:Information:Cancel")) {
+	 case 1: //Identify
+	  break; //continue after switch =\
+		case 2: //information
+		 mes "[Security System]";
+		 mes "You must use the";
+		 mes "security system in order";
+		 mes "to gain access into the";
+		 mes "Einbroch Laboratory.";
+		 next;
+		 mes "[Security System]";
+		 mes "You will be given";
+		 mes "a password that you";
+		 mes "must input correctly";
+		 mes "withing 60 seconds.";
+		 mes "Otherwise, you will";
+		 mes "fail the security check.";
+		 //hell of a security system ye got there mate
+		 //wonder if gravity co has the same sort? xD
+		 next;
+		 mes "[Security System]";
+		 mes "If you take longer";
+		 mes "then 3 minutes to";
+		 mes "enter the password,";
+		 mes "the security system";
+		 mes "will initiate lockout.";
+			close;
+		case 3: //cancel
+		 mes "[Security System]";
+		 mes "You have canceled";
+		 mes "the ID security check.";
+		 close;
+	}
+	//ID check:
+	mes "[Security System]";
+	mes "Enter the following";
+	mes "password in 60 seconds.";
+	mes "Failure to do so will result";
+	mes "in lockout. Please wait.";
+	next;
+	mes "[Security System]";
+	set @startseconds,gettime(3)*60*60+gettime(2)*60+gettime(1);
+	switch(rand(1,11)) {
+	case 1:
+		mes "^00CCFFburrdingdingdilidingdingphoohudaamb";
+		mes "^00CCFFandoora^0000FFbambarambambamburanbamding";
+		input @str$;
+		if (@str$ != "burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding") goto L_SCFail;
+		goto L_Suc;
+	case 2:
+		mes "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi";
+		mes "^990066kabamturubamdingding";
+		next;
+		input @str$;
+		if (@str$ != "barapaphurarlandreamduranbatuhiwooikabamturubamdingding") goto L_SCFail;
+		goto L_Suc;
+	case 3:
+	 mes "^00CCFFbelief love luck grimace sweat rush";
+	 mes "^00CCFFfolktale rodimus optimus burnblebe";
+	 input @str$;
+	 if (@str$ != "belief love luck grimace sweat rush folktale rodimus optimus burnblebe") goto L_SCFail;
+	 goto L_Suc;
+	case 4:
+	 mes "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn";
+	 mes "^FF33CCRiGhT BuRn OrIGInAL GaNgSteR SmACk";
+		input @str$;
+		if (@str$ != "LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk") goto L_SCFail;
+		goto L_Suc;
+	case 5:
+	 mes "^00CCFFCoboman no chikara-yumei na";
+	 mes "^00CCFFchikara-daiookii na chikara da ze!";
+	 mes "^00CCFFCOBO ON";
+	 input @str$;
+	 if (@str$ != "Coboman no chikara-yumei na chikara-daiookii na chikara da ze! COBO ON") goto L_SCFail;
+	 goto L_Suc;
+	case 6:
+		mes "^FF33CChfjdkeldjs^990066hfjdjeiskdlefvbd";
+		input @str$;
+		if (@str$ != "hfjdkeldjshfjdjeiskdlefvbd") goto L_SCFail;
+		goto L_Suc;
+	case 7:
+	 mes "^00CCFFI'm the King of all Weirdos! Now";
+	 mes "^00CCFFyou know of my true power. Obey~!";
+	 input @str$;
+	 if (@str$ != "I'm the King of all Weirdos! Now you know of my true power. Obey~!") goto L_SCFail;
+	 goto L_Suc;
+	case 8:
+	 mes "^990066uNflAPPaBLe LoVaBLe SeCreTs AnD";
+	 mes "^990066BoWLiNg aGaINST tHe KarMA of YoUtH";
+	 input @str$;
+	 if (@str$ != "uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA if YoUtH") goto L_SCFail;
+	 goto L_Suc;
+	case 9:
+		mes "^00CCFFBy the power of^000000";
+		mes "^00CCFFp-po-poi-po-poi-poin-poing";
+		mes "^00CCFFGOD-POING. I NEVER LOSE!";
+		input @str$;
+		if (@str$ != "By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!") goto L_SCFail;
+		goto L_Suc;
+	case 10:
+	 mes "^00CCFF...silence. quiet benevolence...";
+	 mes "^00CCFFsoul mate... wonder. enigma...";
+	 mes "^00CCFFcloud.^000000";
+	 input @str$;
+	 if (@str$ != "...silence. quiet benevolence... soul mate... wonder. enigma... cloud") goto L_SCFail;
+	 goto L_Suc;
+	case 11:
+	 mes "^FF33CCopeN,Open!op3n.openOpen0p3nOpEn0pen";
+	 mes "^FF33CC`open'0Pen open?open!111OPENSESAME";
+	 input @str$;
+	 if (@str$ != "opeN,Open!op3n.openOpenOp3nIoEnOpen`open'0Pen open?open!111OPENSESAME") goto L_SCFail;
+	 goto L_Suc;
+	}
+L_Suc:
+	next;
+	set @endtime,gettime(3)*60*60+gettime(2)*60+gettime(1);
+	set @time,@endtime-@startseconds;
+	if (@time > 60) goto L_SC60;
+	mes "[Security System]";
+	mes "It took ^FF0000"+@time+" seconds^000000";
+	mes "for you to enter the";
+	mes "password. Initiating";
+	mes "override. Access granted.";
+	close2;
+	warp "ein_in01.gat",283,25;
+	end;
+	
+L_SC60:
+	mes "[Security System]";
+	mes "Time over.";
+	mes "It took ^FF0000"+@time+" seconds^000000";
+	mes "for you to enter the";
+	mes "password. Initiating";
+	mes "lockout. Access denied.";
+	close;
+	
+L_SCFail:
+	next;
+	mes "[Security System]";
+	mes "You have failed"; //you haved? =\
+	mes "the identification";
+	mes "check. Access denied.";
+	close;
+}
+einbroch.gat,51,56,6	script	Laboratory Soldier	852,{
+	mes "[Laboratory Soldier]";
+	mes "This area is off limits.";
+	mes "Please leave";
+	mes "immediately";
+	close;
+}
+einbroch.gat,51,47,6	script	Laboratory Soldier	852,{
+	mes "[Laboratory Soldier]";
+	mes "This area is off limits.";
+	mes "Please leave";
+	mes "immediately";
+	close;
+}
+ein_in01.gat,254,35,1	script	Scientist	749,{
+	mes "[Scientist]";
+	mes "*Grumble grumble*";
+	next;
+	if (ein_scientist == 1) goto L_P2;
+	mes "[Scientist]";
+	mes "Huh...?";
+	mes "How did you";
+	mes "get in here?";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Oh! Ah...";
+	mes "I'm the new...";
+	mes "Guard. Nice";
+	mes "to meet you.";
+	next;
+	mes "[Scientist]";
+	mes "Oh. Yeah.";
+	mes "Nice-meet-you";
+	mes "..............";
+	mes "*Grumble grumble*";
+	next;
+	switch(select("What's wrong?:Catch you later.")) {
+		case 2: //catch
+		 mes "[Scientist]";
+		 mes "Right.";
+		 mes "Yeah.";
+		 mes "Later, man.";
+		 close;
+		case 1:
+	}
+	mes "[Scientist]";
+	mes "What's wrong...?!";
+	mes "Oh, don't get me started!";
+	mes "I'm stuck here doing all the";
+	mes "work while the Lab Departement";
+	mes "Head goes out every freakin' day!";
+	next;
+	mes "[Scientist]";
+	mes "While I'm slaving";
+	mes "away here, he's in";
+	mes "that Airship, busy";
+	mes "flirting with that";
+	mes "woman. God...!";
+	mes "I'm like, so teed off!";
+	set ein_scientist,1;
+	close;
+	
+L_P2:
+	mes "[Scientist]";
+	mes "Man alive!";
+	mes "Would it kill the";
+	mes "Department Head";
+	mes "to come in here and do";
+	mes "some work for a change?!";
+	next;
+	mes "[Scientist]";
+	mes "I mean, come on!";
+	mes "I shouldn't have to";
+	mes "carry his workload!";
+	close;
+}
+
+ein_in01.gat,266,26,1	script	Unknown Stuff	111,{
+	mes "^3131FFThere's something";
+	mes "attached to a huge";
+	mes "machine with many cords";
+	mes "and folds of barbed wire";
+	set ein_lab,1;
+	close;
+}
+
+airplane.gat,31,77,4	script	Drunken Man	853,{
+	if (ein_lab == 2) goto L_Done;
+	mes "[Drunken Man]";
+	mes "Okay okay...";
+	mes "Daddy's gonna";
+	mes "win some Apples";
+	mes "this time for sure!";
+	next;
+	if(ein_lab == 1)
+	{
+	mes "[Drunken Man]";
+	mes "Let's do it!";
+	mes "^3131FFYmir's Heart^000000 is";
+	mes "on my side! GO!";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Huh...?";
+	mes "What did he just say?";
+	mes "It seemed important!";
+	next;
+	}
+	mes "^0000FF*Rolling and rumbling*^000000";
+	next;
+	mes "[Kaci]";
+	mes "I have a total of ^FF000011^000000";
+	mes "and you have total ^FF00005^000000.";
+	mes "You lose this game. I'm";
+	mes "sorry, but I hope we play";
+	mes "again sometime.";
+	donpcevent "Kaci::OnLose";
+	next;
+	mes "[Drunken Man]";
+	mes "Waaaaaahhhhhhhhh!";
+	mes "Apples! My apples!";
+	mes "Apples, I need more...!";
+	if (countitem(512) && ein_lab==1) goto L_Apples;
+	close;
+	
+L_Apples:
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Do you want";
+	mes "some of mine?";
+	next;
+	if (countitem(512) <100) {
+		mes "[Drunken Man]";
+		mes "What...?";
+		mes "I can't do anything";
+		mes "with so few Apples!";
+		mes "I'm a high roller and";
+		mes "this is a high stakes game!";
+		close;
+	}
+	mes "[Drunken Man]";
+	mes "Wha--? Yes...";
+	mes "Hell yes! Gimme";
+	mes "some of your Apples!";
+	mes "Yeeeeeeeeeeehaw!";
+	mes "I'm back, baby!";
+	next;
+	mes "[Drunken Man]";
+	mes "Now, to win!";
+	mes "Daddy needs love...";
+	mes "Time to go from";
+	mes "crappy to classy!";
+	next;
+	mes "^0000FF*Rolling and rumbling*^000000";
+	next;
+	delitem 512,countitem(512);
+	set @kaci,rand(2,12);
+	set @man,rand(2,12);
+	if(@man == @kaci){
+	switch(rand(1,2))
+		{
+		case 1:
+			if(@man != 12)set @man,@man+1;
+			else set @man,@man-1;
+		break;
+
+		case 2:
+			if(@man != 2)set @man,@man-1;
+			else set @man,@man+1;
+		break;
+
+		}
+	}
+	mes "[Kaci]";
+	mes "Oooh...";
+	mes "I got a total of ^FF0000"+@kaci+"^000000,";
+	mes "and you have a total of ^FF0000"+@man+"^000000.";
+	if (@man < @kaci) {
+	mes "I'm sorry, but you lose";
+	mes "again. Better luck next time...";
+	donpcevent "Kaci::OnLose";
+	next;
+	mes "[Drunken Man]";
+	mes "Waaaaaahhhhhhhhhhhh!";
+	mes "Waaaaaaaahhhhhhh!";
+	close;
+	}
+	mes "Congratulations, you won!";
+	mes "Let me give you your winning";
+	mes "and we'll play again some time~";
+	donpcevent "Kaci::OnWin";
+	next;
+	mes "[Drunken Man]";
+	mes "Mwahhhahahahaha!";
+	mes "Whahahahahahahahaha!";
+	mes "That's why they call me";
+	mes "the 'Resurrection Kid!'";
+	mes "I always come back!";
+	next;
+	mes "[Drunken Man]";
+	mes "Oh yes, right!";
+	mes "You...! You lent";
+	mes "me those lucky";
+	mes "Apples. ^111111*Hiccup*^000000";
+	next;
+	mes "[Drunken Man]";
+	mes "I'm Kurschenburg!";
+	mes "Thanks to you, I'm";
+	mes "on a winning streak!";
+	mes "Hahaha! Th-thank you~";
+	mes "^111111*Hic-hic-hiccup!*^000000";
+	next;
+	switch(select("So what was that about Ymir's Heart?:Hehe, you're welcome.")) {
+		case 1: //heart
+		 break;
+		case 2: //welcome
+		 mes "[Drunken Man]";
+		 mes "Hahahaha!";
+		 mes "You're great!";
+		 mes "And I feel great!";
+		 mes "Bwahahahaahahah!";
+		 mes "^111111*Hiccup*^000000";
+		 close;
+	}
+	mes "[Drunken Man]";
+	mes "What...?";
+	mes "Ymir's Heart?";
+	mes "How do you know";
+	mes "about that? ^111111*Hiccup*^000000";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Y-you...!";
+	mes "You were just yelling,";
+	mes "'Ymir's Heart is on my";
+	mes "side,' while you were";
+	mes "gambling with those Apples!";
+	next;
+	mes "[Drunken Man]";
+	mes "What...?!";
+	mes "No way~";
+	mes "Err...? Did I...?";
+	next;
+	mes "[Drunken Man]";
+	mes "Heh heh...";
+	mes "I'm not really";
+	mes "supposed to be talking";
+	mes "about this. As head of";
+	mes "the Laboratory, I'm sworn";
+	mes "to secrecy about Ymir's Heart.";
+	next;
+	mes "[Drunken Man]";
+	mes "But what do I care?!";
+	mes "All they want are the";
+	mes "results of my research!";
+	mes "They don't appreciate";
+	mes "my work at all! My title";
+	mes "is completely worthless!";
+	next;
+	mes "[Drunken Man]";
+	mes "You don't know how long I've";
+	mes "been imprisoned in the lab and";
+	mes "that the work conditions just get";
+	mes "worse and worse. Screw them! I'll";
+	mes "keep getting paid as long as I show";
+	mes "them some progress in our project!";
+	next;
+	menu "Project?",-;
+	mes "[Drunken Man]";
+	mes "Yeah, we're researching";
+	mes "Ymir's Heart. It was found";
+	mes "a long time ago in ^3131FFEinbech^000000";
+	mes "and it's in our lab now.";
+	next;
+	mes "[Drunken Man]";
+	mes "Everyone knows it's supposed";
+	mes "to hold some legendary power,";
+	mes "but even I was surprised to see";
+	mes "what it was capable of. It's both";
+	mes "terrible and miraculous, scary";
+	mes "and wondrous...";
+	next;
+	mes "[Drunken Man]";
+	mes "So...";
+	mes "I figure...";
+	mes "It may even";
+	mes "have the power to";
+	mes "win me Dice games!";
+	mes "Bwahaha--*Hiccup!*";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "(That thing I saw";
+	mes "hooked up to all those";
+	mes "wires in the Laboratory";
+	mes "must have been a piece";
+	mes "of ^3131FFYmir's Heart^000000. I better";
+	mes "tell Shinokas about this.)";
+	set ein_lab,2;
+	close;
+	
+L_Done:
+	mes "[Drunken Man]";
+	mes "Hahahahaha!";
+	mes "You're great!";
+	mes "I feel great!";
+	mes "Everything's great!";
+	mes "Bwahahahaahahah!";
+	mes "*Hiccup*";
+	close;
+}
+
 //| Temporal NPC locations until the text inside it has been obtained
 
 //que_ng.gat,182,85,2	script	TempNPC0	109,{