diff options
Diffstat (limited to 'npc/quests/Kiel_Hyre_Quest.txt')
| -rw-r--r-- | npc/quests/Kiel_Hyre_Quest.txt | 30245 |
1 files changed, 30129 insertions, 116 deletions
diff --git a/npc/quests/Kiel_Hyre_Quest.txt b/npc/quests/Kiel_Hyre_Quest.txt index 950948a4d..2bb7fb9b5 100644 --- a/npc/quests/Kiel_Hyre_Quest.txt +++ b/npc/quests/Kiel_Hyre_Quest.txt @@ -41,6 +41,14 @@ //= 2.3 Should NOT have been setting .KHQuestBusy at all. It's not used or accessed anymore. Removed. [L0ne_W0lf] //= 2.4 Lots of fixes (4ish) from Valandi. [L0ne_W0lf] //= Added a getmapuser check to the mapwarp in KHTimerEnd so it's not trying to warp out 0 users. [L0ne_W0lf] +//= 2.5 FIxed several small issues (and large one) such as typos in cutins, typos in dialog, etc. [L0ne_W0lf] +//= Added some of the missing dialogs for several NPCs, and fixed a few NPC locations. +//= ALL books can now trigger the wall. +//= Allysia will now summon 4 (was 2) G_CONSTANTS instead of REGULAR constants. +//= Fixed where Golden_Key and Exquisite_Button are deleted. +//= Removed KHTimerEnd, and instead use OnReset. +//= Fixed typo in the second NPC that gives Black Keycards. +//= Added and Monster Warps. (Keeps monsters from being in dungeon quest area.) Non-functional though. // //============================================================ @@ -72,14 +80,8 @@ // - Near the end I finshed the quest with some people. Used packet logging to get dialog. // - Because of the above mentioned, NPC placement and dialog is a little sloppier. // - Possible missing dialog for "Kiel Hyre" (Accept and Okay responses) -// - Lots of missing dialog, possible improper order of some things in "Kiehl's room". // - Parties are *NOT REQUIRED* as per Doddler's Wiki information. // - Possible missing dialog for "Kiel Hyre" if you don't have Allysia's Ring. -// - Using "atcommand" to kill all players on kh_kiel02, if you think of a better way, let me know. -// - ALL of the 5 doors in kh_kiehl01 will disable after 30 seconds. -// - Due to lack of information, the boss room WILL reset 10 minutes after entering -// - For the same reason, the 3 minute timer after the boss battle will also reset the quest. -// - The effects during the 3 minute timer events are not official (as far as I know) // //---------------------------------------------------------------------------- // [Maps] [Use] @@ -264,6 +266,15 @@ // Juno Pub Master/Starting point. //---------------------------------------------------------------------------- yuno_in01,35,179,1 script Pub Master 46,4,4,{ + if (checkweight(7487,1) == 1) { + mes "^3355FF- Wait!! -"; + mes "- You are carrying too many items-"; + mes "- so you can't receive any more items -"; + mes "- please take off some items -"; + mes "- and come for the challenge again -^000000"; + close; + } + if (KielHyreQuest == 1) { mes "[Vandt]"; mes "Hi there, welcome"; @@ -281,6 +292,7 @@ yuno_in01,35,179,1 script Pub Master 46,4,4,{ mes "is out special Schwaltz Beer."; next; mes "^3355FF*Gulp gulp gulp*^000000"; + percentheal 5,-5; next; mes "["+strcharinfo(0)+"]"; mes "Ahhh, it's really"; @@ -610,18 +622,20 @@ lighthalzen,365,300,2 script Windmill Owner 46,{ close; } + } else if (KHToastGirlEnd >= 2) { mes "[Mills]"; mes "That Cutz is such"; mes "a lazy rascal. The guy"; - mes "thinks he can feel around"; + mes "thinks he can fool around"; mes "when he's on the clock...!"; mes "Ah well, he knows I can't find"; mes "a better assistant. He'll learn..."; close; } + } //============================================================================ @@ -629,7 +643,7 @@ lighthalzen,365,300,2 script Windmill Owner 46,{ //============================================================================ //---------------------------------------------------------------------------- -// Academy Security Guards +// Girl (Talks about the academy) //---------------------------------------------------------------------------- yuno_fild08,196,196,5 script Hanie 102,{ mes "[Hanie]"; @@ -841,7 +855,15 @@ kh_school,57,139,1 script Student::StudentKHQ2 893,{ // Mrs. Lecollane //---------------------------------------------------------------------------- kh_school,176,60,4 script Lady::LadyKHQ 101,{ - if (KielHyreQuest == 2) { + if (KielHyreQuest < 2) { + mes "[Mrs. Lecollane]"; + mes "Is there a problem?"; + mes "Outsiders are not allowed to come"; + mes "in here, please leave."; + close; + } + + else if (KielHyreQuest == 2) { mes "[Mrs. Lecollane]"; mes "Oh, hello. Ah!"; mes "have you come to"; @@ -920,8 +942,9 @@ kh_school,176,60,4 script Lady::LadyKHQ 101,{ // Elly (In school) //---------------------------------------------------------------------------- kh_school,179,39,1 script Cute Student 895,{ - cutin "kh_elly03",2; + cutin "kh_elly01",2; if (KielHyreQuest < 4) { + cutin "kh_elly03",2; mes "[Elly]"; mes "W-wah! Oh...!"; mes "*Phew* That was close,"; @@ -932,10 +955,11 @@ kh_school,179,39,1 script Cute Student 895,{ } else if (KielHyreQuest == 4) { + cutin "kh_elly03",2; mes "[Elly]"; mes "Oh no, what should"; mes "I do? *Sob* Wh-what"; - mes "am I going to do? *snuff*"; + mes "am I going to do? *sniff*"; next; switch(select("What happened?","......")) { @@ -985,6 +1009,7 @@ kh_school,179,39,1 script Cute Student 895,{ mes "this huge favor and bring"; mes "all these ingredients?"; next; + cutin "kh_elly01",2; mes "[Elly]"; mes "^3355FF1 Wine^000000"; mes "^3355FF7 Milks^000000"; @@ -1228,7 +1253,7 @@ kh_school,179,39,1 script Cute Student 895,{ mes "any business trips. I thought"; mes "he'd be at home all day..."; next; - cutin "klh_elly04",2; + cutin "kh_elly04",2; mes "[Elly]"; mes "Would you go back to his"; mes "cottage once more time? Here,"; @@ -1266,7 +1291,7 @@ kh_school,179,39,1 script Cute Student 895,{ mes "If you don't hear from me"; mes "7 days after I've written"; mes "it's possible I may be in"; - mes "trouble. Don't trust anyone,"; + mes "trouble. Don't trust anyone"; mes "at the Academy, Elly."; mes "I've left something for you"; mes "In the Study."; @@ -1566,10 +1591,13 @@ yuno_fild08,69,185,0 script Window::WindowKHQ1 111,{ kh_school,178,180,5 script Elly 895,{ if (KielHyreQuest <= 30) { mes "[Elly]"; - mes "......"; - mes "........."; - mes "............"; - close; + mes "Oh~!"; + mes "Who are you!"; + mes "How did you get here? Please leave"; + close2; + percentheal -99,0; + warp "yuno_fild08",100,100; + end; } else if (KielHyreQuest == 32) { @@ -2140,37 +2168,42 @@ OnOpenDoor: //---------------------------------------------------------------------------- // Store room interior; books //---------------------------------------------------------------------------- -kh_vila,184,20,0 script Book::BookKHQ1 111,{ - if (KielHyreQuest != 26) { +kh_vila,184,20,0 script Book#1::BookKHQ1 111,{ + if ((KielHyreQuest < 26) || (KielHyreQuest > 26)) { mes "^3355FFThis bookshelf is^000000"; mes "^3355FFcrammed with many^000000"; mes "^3355FFlarge, hardcover books^000000"; close; } else if (KielHyreQuest == 26) { - mes "^3355FFWithout thinking, you^000000"; - mes "^3355FFreach for a book from^000000"; - mes "^3355FFthe bookshelf. As you^000000"; - mes "^3355FFpull it toward you, the^000000"; - mes "^3355FFwall slides open to^000000"; - mes "^3355FFreveal a secret path.^000000"; - donpcevent "Wall::OnOpenDoor"; - set KielHyreQuest,28; - close; + if (rand(1,10) == 8) { + mes "^3355FFWithout thinking, you^000000"; + mes "^3355FFreach for a book from^000000"; + mes "^3355FFthe bookshelf. As you^000000"; + mes "^3355FFpull it toward you, the^000000"; + mes "^3355FFwall slides open to^000000"; + mes "^3355FFreveal a secret path.^000000"; + donpcevent "Wall::OnOpenDoor"; + set KielHyreQuest,28; + close; + } + + else { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + } } -kh_vila,181,20,0 script Book::BookKHQ2 111,{ - mes "^3355FFThis bookshelf is^000000"; - mes "^3355FFcrammed with many^000000"; - mes "^3355FFlarge, hardcover books^000000"; - close; -} +kh_vila,181,20,0 duplicate(BookKHQ1) Book#2::BookKHQ2 111 -kh_vila,178,20,0 duplicate(BookKHQ2) Book::BookKHQ3 111 +kh_vila,178,20,0 duplicate(BookKHQ1) Book#3::BookKHQ3 111 -kh_vila,175,19,0 duplicate(BookKHQ2) Book::BookKHQ4 111 +kh_vila,175,19,0 duplicate(BookKHQ1) Book#4::BookKHQ4 111 //---------------------------------------------------------------------------- // Store room interior; Letter to Elly on the floor. @@ -2606,7 +2639,7 @@ kh_vila,39,41,0 script pool 111,{ //---------------------------------------------------------------------------- // Cottage interior, upstairs; Vicious Dog //---------------------------------------------------------------------------- -kh_vila,180,178,4 script Vicious Dog 81,7,7,{ +kh_vila,181,178,4 script Vicious Dog 81,7,3,{ OnTouch: mes "*Grrr~*"; next; @@ -3493,7 +3526,7 @@ kh_dun01,76,233,0 script Heavy Door::HeavyDoorKHQ2 111,{ kh_dun01,106,233,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ3 111 kh_dun01,6,164,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ4 111 -kh_dun01,6,134,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ5 111 +kh_dun01,6,133,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ5 111 kh_dun01,6,60,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ6 111 kh_dun01,6,30,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ7 111 kh_dun01,6,18,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ8 111 @@ -3557,8 +3590,10 @@ kh_school,119,149,4 script Beautiful lady::BeatifulLadyKHQ1 894,{ mes "not taking any changes!"; close2; cutin "",255; - monster "kh_school",116,145,"Constant",1738,1; - monster "kh_school",117,143,"Constant",1738,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; end; case 5: @@ -3825,9 +3860,24 @@ kh_dun01,166,223,0 script Mechanical Device::KHKeyardReader 111,{ kh_dun01,162,206,0 duplicate(KHKeyardReader) Mechanical Device 111 //---------------------------------------------------------------------------- +// Keep monsters out of the quest area. +// Silly really sinc ehte rest of it's a dungeon +//---------------------------------------------------------------------------- +//kh_dun01,180,220,0 script Monster Warp#kh1::KHMobWarp -1,5,20,{ +//OnTouchNPC: +// warp "kh_dun01",178,138; +// end; +//} + +//kh_dun01,190,220,0 duplicate(KHMobWarp) Monster Warp#kh2 -1,5,20 +//kh_dun01,200,250,0 duplicate(KHMobWarp) Monster Warp#kh3 -1,5,20 +//kh_dun01,210,220,0 duplicate(KHMobWarp) Monster Warp#kh4 -1,5,20 +//kh_dun01,220,220,0 duplicate(KHMobWarp) Monster Warp#kh5 -1,5,10 + +//---------------------------------------------------------------------------- // Kiel Hyre - OnTouch //---------------------------------------------------------------------------- -kh_dun01,224,232,0 script Kiel_Hyre_Door -1,2,2,{ +kh_dun01,224,233,0 script Kiel_Hyre_Door -1,5,5,{ OnTouch: if (KielHyreQuest == 40) { mes "^3355FFyou can faintly hear^000000"; @@ -3960,6 +4010,15 @@ kh_dun01,36,195,0 duplicate(KHAccess) Entrance Device#KHEntry2 111 // Kiel's Steward //---------------------------------------------------------------------------- kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ + if (KielHyreQuest < 46) { + mes "[Steward]"; + mes "This is a private residence,"; + mes "please leave."; + close2; + warp "lighthalzen",188,201; + end; + } + if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) { mes "[Steward]"; mes "Greetings."; @@ -3975,7 +4034,6 @@ kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ mes "Ah, Master "+strcharinfo(0)+"."; mes "I've been expecting your"; mes "arival. Please, this way."; - delitem 7493,1; //Golden_Key close2; warp "kh_mansion",21,14; end; @@ -4079,7 +4137,14 @@ kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ //---------------------------------------------------------------------------- kh_mansion,22,28,4 script Kiel Hyre 903,{ cutin "kh_kyel02",2; - if (KielHyreQuest == 46) { + if (KielHyreQuest < 46) { + mes "[Kiehl Hyre]"; + mes "........."; + close; + } + + else if (KielHyreQuest == 46) { + cutin "kh_kyel01",2; mes "[Kiel Hyre]"; mes "Ah, you must be "+strcharinfo(0)+"."; mes "I'd like to thank you for saving"; @@ -4174,6 +4239,8 @@ kh_mansion,22,28,4 script Kiel Hyre 903,{ mes "let me rest?? I'm still not"; mes "feeling well from the time"; mes "I was locked up in the factory."; + delitem 7493,1; //Golden_Key + delitem 7494,1; //Exquisite_Button set KielHyreQuest,48; } @@ -4237,7 +4304,7 @@ kh_mansion,22,28,4 script Kiel Hyre 903,{ mes "an old portrait of a woman"; mes "that looks just like Allysia."; next; - cutin "kh_kyel01",2; + cutin "kh_kyel02",2; mes "[Kiel Hyre]"; mes "Oh..."; mes "Is that all?"; @@ -4278,6 +4345,7 @@ kh_mansion,22,28,4 script Kiel Hyre 903,{ mes "[Kiel Hyre]"; mes "............"; next; + cutin "kh_kyel01",2; mes "["+strcharinfo(0)+"]"; mes "I think this is what happened:"; mes "when you were a young, poor"; @@ -4557,7 +4625,6 @@ kh_mansion,22,28,4 script Kiel Hyre 903,{ delitem 7501,1; //K.H's_Letter delitem 7502,1; //James's_Memo delitem 7503,1; //Portrait_of_a_Guy - delitem 7494,1; //Exquisite_Button close; } @@ -4891,7 +4958,7 @@ kh_mansion,22,28,4 script Kiel Hyre 903,{ mes "your help, "+@KHTitle+". "+strcharinfo(0)+"."; getitem 616,1; //Old card Album delitem 7508,1; //Elisia's_Ring - getexp 1300000,0; + getexp 1000000,0; } else if (KielHyreQuest >= 108) { @@ -4912,7 +4979,15 @@ kh_mansion,22,28,4 script Kiel Hyre 903,{ //---------------------------------------------------------------------------- kh_mansion,18,30,4 script Allysia 894,{ cutin "kh_ellisia",2; - if (KielHyreQuest < 70) { + if (KielHyreQuest <= 68) { + mes "[Allysia]"; + mes "Who are you?"; + mes "How did you get here?"; + mes "Go away"; + close; + } + + else if (KielHyreQuest < 70) { mes "[Allysia]"; mes "You must be surprised"; mes "by everything that's been"; @@ -5078,7 +5153,7 @@ kh_mansion,18,30,4 script Allysia 894,{ //---------------------------------------------------------------------------- // Abduction triggering NPC //---------------------------------------------------------------------------- -lighthalzen,188,200,0 script Abduction_trigger -1,2,2{ +lighthalzen,188,200,0 script Abduction_trigger -1,3,1,{ OnTouch: if (KielHyreQuest == 50) { mes "^3355FFAs you walked out of^000000"; @@ -5100,7 +5175,7 @@ OnTouch: //---------------------------------------------------------------------------- // Mysterious Woman "Mitchell Layla" //---------------------------------------------------------------------------- -kh_mansion,25,79,4 script Mysterious Woman 727,4,4,{ +kh_mansion,25,79,4 script Mysterious Woman 727,3,3,{ L_StartDialog: if (KielHyreQuest == 50) { mes "^3355FFYou awaken with your^000000"; @@ -6101,7 +6176,7 @@ kh_kiehl01,17,39,0 script Receiver 111,{ close2; monster "kh_kiehl01",16,32,"Alicel",1739,1,"Receiver::OnMyMobDead"; - monster "kh_kiehl01",18,29,"Aliot",1740,1,"Receiver::OnMyMobDead"; + monster "kh_kiehl01",18,31,"Aliot",1740,1,"Receiver::OnMyMobDead"; end; } @@ -6112,7 +6187,7 @@ kh_kiehl01,17,39,0 script Receiver 111,{ OnMyMobDead: set .KHKilled,.KHKilled+1; if (.KHKilled == 3) { - makeitem 7506,1,"this",18,37; + makeitem 7506,1,"this",19,36; set .KHKilled,0; } end; @@ -6122,6 +6197,13 @@ OnMyMobDead: // Kiehl's Room; Flower Vase (Gives...password...for Box) //---------------------------------------------------------------------------- kh_kiehl01,13,40,0 script Flower Vase 111,{ + if (KielHyreQuest < 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + close; + } + + if (KielHyreQuest >= 74) { mes "^3355FFYou found"; mes "a flower vase.^000000"; next; @@ -6155,6 +6237,8 @@ kh_kiehl01,13,40,0 script Flower Vase 111,{ } + } + } @@ -6450,7 +6534,7 @@ OnTouch: //---------------------------------------------------------------------------- // Kiehl's Room; Robots //---------------------------------------------------------------------------- -kh_kiehl01,15,181,0 script Robots 111,{ +kh_kiehl01,15,179,0 script Robots#kh1 111,{ if (.KHKilled < 1) { set .KHKilled,.KHKilled+1; mes "^3355FFAs soon as you"; @@ -6458,10 +6542,10 @@ kh_kiehl01,15,181,0 script Robots 111,{ mes "a bunch of robots"; mes "suddenly appeared.^000000."; close2; - monster "kh_kiehl01",17,183,"Alicel",1739,1,"Robots::OnMyMobDead"; - monster "kh_kiehl01",18,180,"Aliot",1740,1,"Robots::OnMyMobDead"; - monster "kh_kiehl01",21,182,"Alicel",1739,1,"Robots::OnMyMobDead"; - monster "kh_kiehl01",19,184,"Aliot",1740,1,"Robots::OnMyMobDead"; + monster "kh_kiehl01",18,181,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,180,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,179,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,178,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; end; } @@ -6470,33 +6554,7503 @@ kh_kiehl01,15,181,0 script Robots 111,{ } OnMyMobDead: - set .HKilled,.KHKilled+1; + set .KHKilled,.KHKilled+1; if (.KHKilled == 4) { - makeitem 7506,1,"this",17,182; + makeitem 7506,1,"this",18,180; set .KHKilled,0; } end; } //---------------------------------------------------------------------------- +// Kiehl's Room; Dummy Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,177,0 script Robots#kh2::RobotsKHQ 111,{ + end; +} +kh_kiehl01,15,180,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,15,182,0 duplicate(RobotsKHQ) Robots#kh4 111 +kh_kiehl01,35,187,0 duplicate(RobotsKHQ) Robots#kh1 111 +kh_kiehl01,37,187,0 duplicate(RobotsKHQ) Robots#kh2 111 +kh_kiehl01,39,187,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,41,187,0 duplicate(RobotsKHQ) Robots#kh4 111 + +//---------------------------------------------------------------------------- // Kiehl's Room; Big Door, (Fifth, and final) // - Anyone can pass through this door // - Consumes 4 Solid Iron Pieces -// - 10 minute timer is QEUSTIONABLE, may not even be a 10 minute limit. -// Put it in anyway, used to make sure people don't abuse the room. //---------------------------------------------------------------------------- kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ - if (($@KH_DoorInvoker$ == "") && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + if (KielHyreQuest < 86) { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + next; + + switch(select("Push Door","Kick Door","Shake Door","Pull Door","Lift Door")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + case 4: + break; + + case 5: + break; + + } + + mes "^3355FFA group of monsters"; + mes "suddenly appeared as"; + mes "soon as you applied"; + mes "pressure to the door."; + mes "This must be some"; + mes "kind of security device.^000000"; + close2; + set @KHDoorPushAttempt,@KHDoorPushAttempt+1; + monster "kh_kiehl01",163,183,"Alicel",1739,1; + monster "kh_kiehl01",163,179,"Aliot",1740,1; + monster "kh_kiehl01",169,183,"Alicel",1739,1; + monster "kh_kiehl01",169,179,"Aliot",1740,1; + if (@KHDoorPushAttempt >= 3) { + set KielHyreQuest,86; + } + end; + } + + else if ((KielHyreQuest > 84) && (KielHyreQuest < 94)) { + mes "^3355FFYou apply some"; + mes "pressure to the door,"; + mes "and find that you can"; + mes "budge it slightly, but"; + mes "you can't fully open it.^000000"; + next; + mes "^3355FFIf you wedged something"; + mes "into the gap between the"; + mes "door and its frame, and"; + mes "fully leveraged it, then you"; + mes "should be able to open it.^000000"; + next; + + switch(select("Steel","Rusty Iron Piece","Solid Iron Piece","Iron Piece","Screw","Cancel")) { + + case 1: + set @KHPryingItem$,"Steel"; + break; + + case 2: + set @KHPryingItem$,"Rusty Iron Piece"; + break; + + case 3: + if (countitem(7507) >= 1) { + if (KielHyreQuest < 92) { + mes "^3355FFYou insert one end of"; + mes "a Solid Iron Piece into the"; + mes "door's gap in a strenuous"; + mes "effort to pry the door open"; + mes "The gap widens a little bit,"; + mes "but you break one of your"; + mes "Solid Iron Pieces.^000000"; + set KielHyreQuest,KielHyreQuest+2; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + else if (KielHyreQuest == 92) { + mes "^3355FFWith a mighty heave,"; + mes "you pry a Solid Iron"; + mes "Piece into the door jamb,"; + mes "and fling the door wide open"; + mes "Unable the withstand the"; + mes "awesome force, this Solid"; + mes "Iron Piece shatters into dust.^000000"; + set KielHyreQuest,94; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + } + + else { + mes "^3355FFIf only you had a Solid"; + mes "Iron Piece you could use to"; + mes "pry open this door.^000000"; + close; + } + + case 4: + set @KHPryingItem$,"Iron Piece"; + break; + + case 5: + set @KHPryingItem$,"Screw"; + break; + + case 6: + mes "^3355FFLet's look for something"; + mes "heavy we can use to pry"; + mes "open this door.^000000"; + close; + + } + + mes "^3355FFThis "+@KHPryingItem$+" is far"; + mes "to weak for what you're using it for"; + mes "and breaks.^000000"; + close; + + } + + else if ((KielHyreQuest >= 94) && (KielHyreQuest <= 104)) { + if (.KHDoor5Opened == 0) { + mes "^3355FFThe large door"; + mes "is wide open, and."; + mes "you may now enter.^000000"; + next; + + switch(select("Yes","No")) { + + case 1: + close2; + set $@KH_DoorInvoker$,strcharinfo(0); + donpcevent "Big_Door_5_Warp::OnEnable"; + enablenpc"Big_Door_5_Warp"; + set .KHDoor5Opened,1; + end; + + case 2: + mes "^3355FFWho knows what is on the"; + mes "other side of this door. Let's"; + mes "think about it before barging in..^000000"; + close; + + } + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + +} + +kh_kiehl01,166,186,0 script Big_Door_5_Warp 45,1,1,{ + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_5_Warp"; + set getvariableofnpc(.KHDoor5Opened,"Big Door#BigDoorKHQ5"),0; + end; + +OnInit: + disablenpc "Big_Door_5_Warp"; + end; + +OnTouch: + + if (KielHyreQuest >= 46) { + warp "kh_kiehl02",50,6; + } + else { + warp "kh_kiehl01",166,183; + } + + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Trap (Entry way trap) +//---------------------------------------------------------------------------- +kh_kiehl02,49,10,0 script Kiehl_Room_Trap -1,5,3,{ + end; + +OnTouch: + if (.KHTrapSprung < 1) { + set .KHTrapSprung,1; + set $@KHQuestBusy,1; + initnpctimer; + monster "kh_kiehl02",47,13,"Aliot",1740,1; + monster "kh_kiehl02",54,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + monster "kh_kiehl02",51,13,"Aliot",1740,1; + monster "kh_kiehl02",53,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + end; + } + + end; + + +OnTimer300000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer600000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer900000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer1200000: + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + end; + +OnGlobalTimerOff: + stopnpctimer; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl +// - Only the player who invoked the final door should progress this npc. +// - Only the player who invoked the final door should be able to get ring. +// - Timer will drop to 3 minutes once Kiehl is defeated. +//---------------------------------------------------------------------------- +kh_kiehl02,50,52,4 script Kiehl#Original 902,{ + cutin "kh_kiel01",2; + if (KielHyreQuest < 94) { + mes "[Kiehl]"; + mes "........."; + close; + } + + if ($@KH_DoorInvoker$ == strcharinfo(0)) { + if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) { + mes "[Kiehl]"; + mes "I'm surprised you made"; + mes "it this far, adventurer~"; + mes "I bid you welcome to my"; + mes "humble room. I assume that"; + mes "you've come for the Condensed"; + mes "Memory Scroll... my mind."; + next; + mes "[Kiehl]"; + mes "You can understand"; + mes "why I can't let you have it,"; + mes "so if you really want the"; + mes "Condensed Memory Scroll,"; + mes "then show me what you've got!"; + close2; + cutin "",255; + set getvariableofnpc(.KHKilled,"KiehlRoom"),0; + monster "kh_kiehl02",49,48,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,50,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",53,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,55,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,53,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } + + else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") == 5)) { + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Hmpf! You're pretty good."; + mes "Father must have spent"; + mes "a lot of money to hire"; + mes "you. So has he sent"; + mes "you to kill me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre sent me to ask"; + mes "you to stop turning all of"; + mes "the Third Generation robots"; + mes "into killing machines! How"; + mes "can do something like that"; + mes "to other robots like you?"; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Why not? It's said that man"; + mes "was made in the image of God."; + mes "Well, robots were made in the"; + mes "image of man. You humans kill"; + mes "each other as much as you"; + mes "like, as far as I can tell."; + next; + mes "[Kiehl]"; + mes "It might not be ethical"; + mes "for me to provide weapons"; + mes "to humans that need them..."; + mes "But that's what they are."; + mes "Weapons. It's more humane"; + mes "for robots to fight than humans."; + next; + mes "[Kiehl]"; + mes "Robots don't naturally"; + mes "feel pain or emotions."; + mes "Not unless they're specially"; + mes "programmed. Sorry, but I don't"; + mes "plans to stop what I'm doing."; + next; + cutin "kh_kiel04",2; + mes "["+strcharinfo(0)+"]"; + mes "Humankind may not be"; + mes "perfect, but think about"; + mes "who you're working with!"; + mes "Rekenber is the epitome of"; + mes "human evil! How can you"; + mes "support them like this?"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "I've had a long relationship"; + mes "with Rekenber. I'm fully aware"; + mes "of their capabilities. Do you"; + mes "remember the first room you"; + mes "passed on your way here, the"; + mes "one with all the toys?"; + next; + mes "[Kiehl]"; + mes "I bet you didn't know that there"; + mes "were 5 Second Generation"; + mes "robots. Me, and my four other"; + mes "brothers and sisters. Father"; + mes "built that room so that all"; + mes "five of us could live together."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "I was the only one to"; + mes "survive. I returned to"; + mes "Father and even got a"; + mes "name. But yes, I know"; + mes "how bad Rekenber really is."; + next; + mes "[Kiehl]"; + mes "I don't... I don't want"; + mes "to talk about this any more"; + mes "You've made me... Just leave."; + mes "I think I will let you live."; + next; + cutin "",255; + mes "[Mitchell]"; + mes "Freeze!"; + mes "Kiehl Hyre, you're"; + mes "under arrest for creating"; + mes "and trading illegal weapons!"; + set KielHyreQuest,100; + donpcevent "::OnKHAgent"; + enablenpc "Mitchell#KiehlRoom"; + enablenpc "Agent#KHAgent1"; + enablenpc "Agent#KHAgent2"; + enablenpc "Agent#KHAgent3"; + enablenpc "Agent#KHAgent4"; + close; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) { + set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Ah, Schwaltzvalt Republic"; + mes "agents. Heh. I haven't had"; + mes "this many guests before."; + mes "Well, I guess this means"; + mes "we'll have to fight after"; + mes "all, you and I. *Sigh* Pity..."; + next; + mes "[Kiehl]"; + mes "First, in all fairness,"; + mes "let me take care of these"; + mes "nuisances. They're just"; + mes "mindlessly doing their"; + mes "jobs--sort of like robots-- but"; + mes "don't worry, they won't be hurt."; + next; + donpcevent "::OnKHSpiderWeb"; + mes "[Mitchell]"; + mes "Nooooo!"; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "And now, you and I can"; + mes "have a proper duel, human"; + mes "I'm interested in seeing just"; + mes "how strong you really are~"; + close2; + cutin "",255; + monster "kh_kiehl02",50,52,"Kiehl",1733,1,"KiehlRoom::OnKiehlDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } - if ($@KHQuestBusy$ == "") { + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") == 1)) { + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "D-damn...!"; + mes "Well played, adventurer"; + mes "Well played. I should have"; + mes "known that Father would send"; + mes "the very best after me. Still,"; + mes "you've failed to truly defeat me."; + next; + mes "[Kiehl]"; + mes "I still have a few"; + mes "trump cards left"; + mes "I think... I'll take you"; + mes "to hell with me... Well"; + mes "if robots can go there~"; + announce "*Jeeeezzzgggg~ Geezzz~ Grrrr~ Clank~*",bc_map,0xFF0000; + next; + mes "[Mitchell]"; + mes "No...! We're locked"; + mes "in the room! We're"; + mes "We're trapped in here!"; + next; + mes "[Kiehl]"; + mes "Yay~ Let's burn"; + mes "everything down~"; + next; + mes "[Mitchell]"; + mes "Quick, "+strcharinfo(0)+","; + mes "use Kiel Hyre's power"; + mes "device, the one that's"; + mes "supposed to mess with"; + mes "Kiehl's power supply!"; + mes "Hurry, use it right now!"; + next; + delitem 7504,1; //Power_Source + announce "*Gzzzz~ Gzzzz~*",bc_map,0xFF0000; + next; + mes "[Kiehl]"; + mes "Wh-what? I c-can't"; + mes "move! This day is just"; + mes "full of surprises. Oh, well."; + mes "I guess it's time for me to"; + mes "use my other trump card."; + next; + mes "[Mitchell]"; + mes "What...?"; + mes "How many trump"; + mes "cards do you have?"; + next; + mes "[????]"; + mes "I'm so disappointed..."; + mes "I can't believe none"; + mes "of you thought of this..."; + next; + mes "[Mitchell]"; + mes "Who are you...?"; + mes "Show yourself!"; + next; + donpcevent "Kiehl#Copy::OnChangeState"; + enablenpc "Kiehl#Copy"; + mes "[????]"; + mes "Please."; + mes "Don't insult me."; + mes "You know this voice."; + mes "It's been talking to"; + mes "you this entire time~"; + next; + mes "[Mitchell]"; + mes "Impossible!"; + mes "How can there"; + mes "be two of you...?!"; + next; + cutin "kh_kiel01",0; + mes "[Kiehl]"; + mes "Hahahahaha!"; + mes "I'm a robot!"; + mes "I can make extra"; + mes "bodies, switch brains"; + mes "with them. It's awfully"; + mes "convenient, let me tell you."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Anyway, I don't mean to show"; + mes "off, but I suppose I better"; + mes "reveal to you my final trump"; + mes "card. First of all, I know all"; + mes "about you, Ms. Mitchell Layla~"; + next; + mes "[Mitchell]"; + mes "What? How do you"; + mes "know my name?"; + next; + mes "[Kiehl]"; + mes "Well, I have a few"; + mes "spies of my own..."; + mes "I'll allow him to explain."; + next; + mes "[Masked Man]"; + mes "Mitchell..."; + mes "I'm sorry that"; + mes "you had to get"; + mes "involved in all this."; + next; + mes "[Mitchell]"; + mes "Wolkeus? Wolkeus Kaiser?!"; + mes "You're the spy?! But you risked"; + mes "your life to save our president!"; + mes "No! Oh, God! How can this be"; + mes "happening?! Everything's just..."; + mes "This is all crazy! All of it!"; + next; + mes "[Wolkeus]"; + mes "This is just the result"; + mes "of elaborate plans that"; + mes "were made years ago. I didn't"; + mes "expect you to be this surprised,"; + mes "Mitchell. It's the way the game"; + mes "is played. You know that."; + next; + mes "[Mitchell]"; + mes "Mister President..."; + mes "I failed you... I'm sorry..."; + next; + mes "[Kiehl]"; + mes "Well, Kaiser, she took"; + mes "it pretty badly, but at least"; + mes "you're being gentlemanly"; + mes "about it. Well, I'd like for"; + mes "all of us to get better"; + mes "acquainted, but..."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "We'd better say our"; + mes "farewells here. This"; + mes "place will be gone in"; + mes "five minutes. Ah, and"; + mes "Ms. Layla, you're coming"; + mes "with us. We have questions~"; + next; + mes "[Kiehl]"; + mes "I'm curious as to what"; + mes "the president's plans are"; + mes "Mister Kaiser, if you'll"; + mes "escort Ms. Layla, please."; + next; + mes "[Wolkeus Kaiser]"; + mes "Sorry, Mitchell."; + mes "I gotta do it..."; + next; + mes "[Mitchell]"; + mes "No, get away! Let me go!"; + mes "Let go of me, Wolkeus!"; + donpcevent "::OnKHAgent"; + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "Great, we're done with"; + mes "that ugly business. Now,"; + mes "where was I? Ah, right."; + mes "Yes. I'm sorry. We don't"; + mes "have any more time to play."; + next; + mes "[Kiehl]"; + mes "Here, adventurer."; + mes "I'm aware that my father"; + mes "sent you here to get this."; + mes "Consider it my final gift"; + mes "to him. I'm surprised he left"; + mes "this ring inside me, though."; + next; + cutin "kh_kiel04",2; + mes "[Kiehl]"; + mes "I imagine that it must"; + mes "be precious to him. But"; + mes "I wonder why he placed"; + mes "it inside me? Well, anyway,"; + mes "I have a message I'd like"; + mes "for you to deliver to him."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "First... I guess we"; + mes "should get rid of this"; + mes "old thing. It was a good"; + mes "body, and it's served me"; + mes "well for 23 years. I'll miss"; + mes "it. Rest well, old Kiehl."; + next; + mes "[Kiehl]"; + mes "Now, this was the body"; + mes "that my father made."; + mes "Please tell him that"; + mes "this means that we're"; + mes "no longer related to"; + mes "each other at all."; + next; + mes "[Kiehl]"; + mes "The body I'm using right now?"; + mes "I made it myself with the most"; + mes "advanced technology. Consider"; + mes "it... a Fourth Generation robot"; + mes "body if you will. Father will"; + mes "understand what I mean."; + next; + mes "[Kiehl]"; + mes "Anyway, please tell him"; + mes "that, and get his old ring"; + mes "out of my old robot body,"; + mes "and then give it to him. For"; + mes "now, let's get out of here: we"; + mes "just have 3 minutes to evacuate."; + next; + mes "[Kiehl]"; + mes "You're a worthy opponent,"; + mes "and a human I respect."; + mes "I don't know if we'll meet"; + mes "again, but who knows?"; + mes "Anyway, I'll open up the"; + mes "exit for you. Farewell~"; + set KielHyreQuest,104; + donpcevent "Kiehl_Room_Exit::OnEnable"; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + donpcevent "Kiehl#Copy::OnChangeState"; + disablenpc "Kiehl#Copy"; initnpctimer; - set $@KHQuestBusy$,strcharinfo(0); + end; + } + + if (KielHyreQuest == 104) { + cutin "kh_kiel02",2; + mes "^3355FFYou retrieve the"; + mes "ring from the heart of"; + mes "Kiehl's old robotic body.^000000"; + getitem 7508,1; //Elisia's_Ring + set KielHyreQuest,106; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + end; + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + + + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + +OnTimer180000: + stopnpctimer; + mapannounce "kh_kiehl02","Beeeeeeeeeeeeep~",bc_npc,0xFF0000; + donpcevent "KiehlRoom::OnReset"; + end; + +OnTimer179000: + mapannounce "kh_kiehl02","1 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer178000: + mapannounce "kh_kiehl02","2 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer177000: + mapannounce "kh_kiehl02","3 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer176000: + mapannounce "kh_kiehl02","4 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer175000: + mapannounce "kh_kiehl02","5 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer170000: + mapannounce "kh_kiehl02","10 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer160000: + mapannounce "kh_kiehl02","20 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer150000: + mapannounce "kh_kiehl02","30 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer120000: + mapannounce "kh_kiehl02","1 minutes remaining until detonation.",bc_npc,0xFF0000; + misceffect 563; + end; + +OnTimer60000: + mapannounce "kh_kiehl02","2 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnTimer1000: + mapannounce "kh_kiehl02","3 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; NPC for mob control, timers, and other junk. +//---------------------------------------------------------------------------- +kh_kiehl02,1,1,0 script KiehlRoom -1,{ + end; + +OnKiehlMobDead: +debugmes "KLol: "+.KHKilled; + set .KHKilled,.KHKilled+1; + if (.KHKilled == 5) { + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + } + end; + +OnKiehlDead: + set .KHKilledBoss,1; + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + end; + +OnReset: + donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff"; + if (getmapusers("kh_kiehl02") > 0) { + mapwarp "kh_kiehl02","lighthalzen",192,200; + } + killmonsterall "kh_kiehl02"; + disablenpc "Kiehl_Room_Exit"; + set .KHKilledBoss,0; + set .KHKilled,0; + set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0; + set $@KHQuestBusy,0; + set $@KH_DoorInvoker$,""; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Mitchell and Agents. (Floating NPC + Duplicates) +//---------------------------------------------------------------------------- +- script Agent#KHAgent1::KHAgent -1,{ + end; + +OnKHAgent: + misceffect 215; + end; + +OnKHSpiderWeb: + misceffect 404; + end; +} + + +kh_kiehl02,49,55,7 duplicate(KHAgent) Mitchell#KiehlRoom 727 + +kh_kiehl02,53,52,4 duplicate(KHAgent) Agent#KHAgent1 880 + +kh_kiehl02,51,49,0 duplicate(KHAgent) Agent#KHAgent2 880 + +kh_kiehl02,47,50,0 duplicate(KHAgent) Agent#KHAgent3 880 + +kh_kiehl02,46,53,6 duplicate(KHAgent) Agent#KHAgent4 880 + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Copy of Kiehl. +//---------------------------------------------------------------------------- +kh_kiehl02,48,53,7 script Kiehl#Copy 902,{ + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl#Copy"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Exit +//---------------------------------------------------------------------------- +kh_kiehl02,50,59,0 script Kiehl_Room_Exit 45,1,1,{ +OnTouch: + if (getmapusers("kh_kiehl02") < 1) { + donpcevent "KiehlRoom::OnReset"; + warp "lighthalzen",193,202; + } + + else { + warp "lighthalzen",193,202; + } + + end; + +OnEnable: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl_Room_Exit"; + end; +} + +//============================================================================ + +//===== eAthena Script ======================================= +//= Kiel Hyre Quest +//===== By: ================================================== +//= L0ne_W0lf (Script), DZeroX (Timer) +//===== Current Version: ===================================== +//= 2.4 +//===== Compatible With: ===================================== +//= eAthena SVN +//===== Description: ========================================= +//= Quest for opening Robot Factory first and second floors. +//===== Comments: ============================================ +//= See below +//===== Additional Comments: ================================= +//= 1.0 First version, needs testing [Playtester] +//= 1.1 Copied over some changes made by -Tsuyuki- [L0ne_W0lf] +//= Reworked variables slightly so that the permenents ones aside from the +//= main tracking variable, are deleted when no longer needed. Renamed +//= several variables that handle strings to @KHInput$. [L0ne_W0lf] +//= 1.2 Removed duplicate NPCs. [Toms] +//= 1.3 More Bug fixes, fixed typo. Updated Additional comments. [L0ne_W0lf] +//= 1.4 Fixed doors not resetting in kh_kiehl01 after 30 second timer is up. [L0ne_W0lf] +//= 1.5 Another bug fixed (&& instead of ||). [L0ne_W0lf] +//= 1.6 More squashed bugs with if checking. [L0ne_W0lf] +//= 1.7 Corrected some spelling mistakes. [Balish] +// Corrected Exploit with the pub man, giving infinite wine and money. +// Corrected pool and map not showing text for some states of the quest. +// Corrected Elly showing cutin but not text for some states of the quest (causing players to log off to continue). +// Let fisherman talk to you when you have 10 fishes OR MORE. +// Corrected not letting you enter the tombstone after finishing the quest. +//= 1.8 Elly now deletes the Iron_Box, and Kiel Hyre deletes the Pin. [L0ne_W0lf] +//= More security on the 5th Big Door, now makes sure no one outside of who- +//= acticated it initially can use it. Resets after 10 minutes to make it. +//= Made it so that you need to be at least step 84 to activate the final door. +//= Corrected not deleting Allysia's Ring from inventory. +//= 1.9 Exit will now enable if you are just retrieving the Ring, keeps you from getting stuck. [L0ne_W0lf] +//= Corrected "KH_Kielh02", was setting off a debug, invalid map index. Should have been "kh_Kiehl02" +//= Made .KHQuestBusy$ into a temp global variable. $@KHQuestBusy$. +//= 2.0 Changed the labels on the "Big Doors" to "Identifier Names" to prevent an error with using getvariableofnpc [L0ne_W0lf] +//= 2.1 Fifth door now checks for a variable HIGHER or EQUAL to 74 not 84, as pointed out by Stollen. [L0ne_W0lf] +//= 2.2 Another fix for elly, no longer RESETS to 26 when you tak to her. [L0ne_W0lf] +//= 2.3 Should NOT have been setting .KHQuestBusy at all. It's not used or accessed anymore. Removed. [L0ne_W0lf] +//= 2.4 Lots of fixes (4ish) from Valandi. [L0ne_W0lf] +//= Added a getmapuser check to the mapwarp in KHTimerEnd so it's not trying to warp out 0 users. [L0ne_W0lf] +//= 2.5 FIxed several small issues (and large one) such as typos in cutins, typos in dialog, etc. [L0ne_W0lf] +//= Added some of the missing dialogs for several NPCs, and fixed a few NPC locations. +//= ALL books can now trigger the wall. +//= Allysia will now summon 4 (was 2) G_CONSTANTS instead of REGULAR constants. +//= Fixed where Golden_Key and Exquisite_Button are deleted. +//= Removed KHTimerEnd, and instead use OnReset. +//= Fixed typo in the second NPC that gives Black Keycards. +//= Added and Monster Warps. (Keeps monsters from being in dungeon quest area.) Non-functional though. +// +//============================================================ + + +//============================================================================ +// Kiel Hyre Quest/Robotic Lab Dungeon +// +// Script Dialog Obtained and Copied Down by L0ne_W0lf +// Timer work and some variable dances by DZeroX +// Based on [iRO Sakray] as of [03/29/2007] +//============================================================================ +//---------------------------------------------------------------------------- +// [Notes] +// - Let it be noted that ALL DIALOG IS OFFICIAL TO IRO UNLESS SPECIFIED. +// - I've fixed a few of iRO's mistakes, but I'm sure I made some of my own. +// - Will probably require a major optimizing. +// - Accidentally progressed Mills' dialog. Improvising. +// - Accidentally progressed Elly's dialog while reading 'Letter to Elly'. Improvising. +// - Possible missing dialog for all getitems when overweight. +// - Possible missing dialog for absense of Green Key item in "Bookshelf" NPC +// - Possible missing dialog for "Test Tube" if you haven't read the second poem. +// - Possible missing dialog for Elly in Dromitory if you don't have "Grey Box" +// - Possible missing dialog for "Grave" if you don't have "Yellow Keycard" +// - Not going to list ALL of the more usless NPCs. (Doors + Empty "Beautiful Ladies") +// - Accidently progressed Kiel Hyre's dialog. Improvising. +// - Improvising for getting back in to see Mitchell if you butterfly wing and need to get back in. +// - Possible missing dialog for "Odd Grandma" +// - Possible missing dialog for "Shelf" +// - Near the end I finshed the quest with some people. Used packet logging to get dialog. +// - Because of the above mentioned, NPC placement and dialog is a little sloppier. +// - Possible missing dialog for "Kiel Hyre" (Accept and Okay responses) +// - Parties are *NOT REQUIRED* as per Doddler's Wiki information. +// - Possible missing dialog for "Kiel Hyre" if you don't have Allysia's Ring. +// +//---------------------------------------------------------------------------- +// [Maps] [Use] +// yuno_in01 ........... Start quest in pub +// kh_school ........... Deliver Wine here, Meet Elly +// yuno ................ Get Delivery for/from "Little Kid" +// lighthalzen ......... Get Delivery package for "Little Kid" +// kh_vila ............. Kiel Hyre cottage. +// kh_dun01 ............ Robot Factory; Save Kiel Hyre +// kh_mansion .......... Kiel Hyre's Mansion in Lighthalzen +// kh_kiehl01 .......... Kiehl's room/Cave +// kh_kiehl02 .......... Kiehl's room/Boss Room +// +//---------------------------------------------------------------------------- +// [Variables in Use] +// KielHyreQuest - Main quest tracking variable +// +// KHPubMasterEnd - Finished with Pun Master if set to 1 +// - Deleted once no longer needed. +// +// KHToastGirlEnd - Pick up delivery if set to 1, +// - picked up delivery if set to 2 +// - finished if set to 3 +// - Deleted once no longer needed. +// +// KHCottagePoem1 - Tracks Poem 1 quest in cottage. (finished = 5) +// - Deleted once no longer needed. +// +// KHCottagePoem2 - Tracks Poem 2 quest in cottage. (finished = 3) +// - Deleted once no longer needed. +// +// @KHInput$ - Used with "Security Guard" +// - Used with "Test Tube" +// - Used when "Elly" (inputing string in attempt to wake her) +// - Used with "Grave", (twice) +// - Used with "Heavy Door" +// - Used with "Mechanical Device" +// - Used for opening various doors in Kiehl's area. +// +// @KHFirstKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// @KHSecondKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// +// @KHPotionColor$ - Holds 'red', 'green', or 'yellow' depending on what wrong potion is selected. +// +// @KHFirstSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHSecondSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHThirdSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHFourthSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// +// @KHClimbAttempt - Set to random (1-5) to determine if you fail at climbing the water pipe. +// +// @KHQ1Read - Make sure player has asked question 1 to Kiel Hyre +// @KHQ2Read - Make sure player has asked question 2 to Kiel Hyre +// @KHQ3Read - Make sure player has asked question 3 to Kiel Hyre +// +// @KHTitle$ - Holds "Mr", "Mrs", or "Miss" +// +// @KHDoorPushAttempt - Keeps track of how many times a person has attmepted pushed the door open. +// +// @KHPryingItem$ - Used for incorrect options when prying open last door. +// +// .KHKilled - Tracks how many monsters have been killed. Used with "Receiver", "Robots", and "Kiehl" NPCs +// +// .KHDoor1Open - 0/1 Depending on if the first door is opened. +// .KHDoor2Open - 0/1 Depending on if the second door is opened. +// .KHDoor3Open - 0/1 Depending on if the third door is opened. +// .KHDoor4Open - 0/1 Depending on if the fourth door is opened. +// .KHDoor5Open - 0/1 Depending on if the fifth door is opened. +// +// .KHKilledBoss - 0/1 depending on if the boss has been killed. +// +// $@KHQuestBusy$ - Holds strcharinfo(0) for "locking" reasons, so only that person can use the door. Variable is unset at boss room reset. +// +// $@KH_DoorInvoker$ - Holds character name, so only that person can use certain NPCs. +// +//---------------------------------------------------------------------------- +// [NPCs] [Location] +// Pub Master .................. yuno_in01 [ 35,178] +// Hanie ....................... yuno_fild08 [196,196] +// Security Guard .............. yuno_fild08 [158,194] +// Security Guard .............. yuno_fild08 [158,183] +// Student ..................... kh_school [ 57,142] +// Student ..................... kh_school [ 57,139] +// Lady ........................ kh_school [176, 60] +// Cute Student ................ kh_school [179, 39] +// Little Kid .................. yuno [217,114] +// Windmill Owner .............. lighthalzen [365,300] +// Cottage Keeper .............. yuno_fild02 [ 93,210] +// Door ........................ yuno_fild02 [ 75,218] +// Door ........................ yuno_fild02 [109,218] +// Wall ........................ kh_vila [191, 14] +// Book ........................ kh_vila [184, 20] +// Book ........................ kh_vila [181, 20] +// Book ........................ kh_vila [178, 20] +// Book ........................ kh_vila [175, 19] +// KH_Letter_Trigger ........... kh_vila [179, 11] +// Box ......................... kh_vila [ 16,175] +// Apple Box ................... kh_vila [ 30,184] +// Map ......................... kh_vila [ 44,125] +// Pot ......................... kh_vila [ 33,148] +// Calabash .................... kh_vila [ 14, 55] +// Pool ........................ kh_vila [ 39, 39] +// Vicious Dog ................. kh_vila [180,178] +// Drawer ...................... kh_vila [115,186] +// Box ......................... kh_vila [107,126] +// Bookshelf ................... kh_vila [181,138] +// Sword Hilt .................. kh_vila [136, 69] +// Test Tube ................... kh_vila [179, 69] +// Test Tube ................... kh_vila [185, 69] +// Window ...................... yuno_fild08 [ 69,185] +// Elly ........................ kh_school [178,180] +// Cookie Basket ............... kh_school [175,175] +// Window ...................... kh_school [188,185] +// Grave ....................... yuno_fild08 [ 72,170] +// Heavy Door .................. kh_dun01 [236, 48] +// Beautiful lady .............. kh_school [119,149] +// Beautiful lady .............. kh_school [122,186] +// Signboard ................... kh_dun01 [163,223] +// Mechanical Device ........... kh_dun01 [166,223] +// Mechanical Device ........... kh_dun01 [162,206] +// Kiel_Hyre_Door .............. kh_dun01 [224,232] +// Steward ..................... kh_mansion [ 78, 55] +// Kiel Hyre ................... kh_mansion [ 22, 27] +// Allysia ..................... kh_mansion [ 22, 27] +// Abduction_trigger ........... lighthalzen [188,200] +// Mysterious Woman ............ kh_mansion [ 25, 79] +// Odd Granma .................. yuno [250,132] +// Old Lady .................... yuno [250,132] +// Rosimmir_Entrance ........... yuno [273,141] +// Table ....................... kh_rossi [ 23, 23] +// Shelf ....................... kh_rossi [ 92, 40] +// Desk ........................ kh_rossi [144,146] +// Bookshelf ................... kh_rossi [144,146] +// Old Fisherman ............... yuno_fild12 [232,222] +// Wooden Board ................ yuno_fild09 [158,217] +// Kiehl_Room_Warp ............. kh_mansion [ 29, 27] +// Entrance Device#KHEntry1 .... kh_dun01 [ 44, 20] +// Entrance Device#KHEntry2 .... kh_dun01 [ 44,203] +// Security Guard .............. yuno_fild08 [158,194] +// Receiver .................... kh_kiehl01 [ 17, 39] +// Flower Vase ................. kh_kiehl01 [ 13, 40] +// Box ......................... kh_kiehl01 [ 19, 25] +// Big Door .................... kh_kiehl01 [ 44, 33] +// Big_Door_1_Warp ............. kh_kiehl01 [ 43, 33] +// Big Door .................... kh_kiehl01 [174, 40] +// Big_Door_2_Warp ............. kh_kiehl01 [174, 39] +// Big Door .................... kh_kiehl01 [ 77,108] +// Big_Door_3_Warp ............. kh_kiehl01 [ 68,108] +// Big Door .................... kh_kiehl01 [ 41,177] +// Big_Door_4_Warp ............. kh_kiehl01 [ 78,177] +// Robots ...................... kh_kiehl01 [ 15,181] +// Big Door .................... kh_kiehl01 [166,187] +// Big_Door_5_Warp ............. kh_kiehl01 [166,186] +// Kiehl_Room_Trap ............. kh_kiehl02 [ 49, 15] +// Kiehl#Original .............. kh_kiehl02 [ 50, 52] +// KiehlRoom ................... kh_kiehl02 [ 1, 1] +// Floating NPC (Agent#KHAgent0::KHAgent) +// Mitchell#KiehlRoom .......... kh_kiehl02 [ 49, 55] +// Agent#KHAgent1 .... ....... kh_kiehl02 [ 53, 52] +// Agent#KHAgent2 .............. kh_kiehl02 [ 51, 49] +// Agent#KHAgent3 .............. kh_kiehl02 [ 47, 50] +// Agent#KHAgent4 .............. kh_kiehl02 [ 46, 53] +// Kiehl#Copy .................. kh_kiehl02 [ 48, 53] +// Kiehl_Roomn_Exit ............ kh_kiehl01 [ 50, 59] +// +//---------------------------------------------------------------------------- +// [Functions] +// None +// +//---------------------------------------------------------------------------- +// [Conflicts] +// Resolved +// +//============================================================================ + + +//============================================================================ +// Affiliated NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Juno Pub Master/Starting point. +//---------------------------------------------------------------------------- +yuno_in01,35,179,1 script Pub Master 46,4,4,{ + if (checkweight(7487,1) == 1) { + mes "^3355FF- Wait!! -"; + mes "- You are carrying too many items-"; + mes "- so you can't receive any more items -"; + mes "- please take off some items -"; + mes "- and come for the challenge again -^000000"; + close; + } + + if (KielHyreQuest == 1) { + mes "[Vandt]"; + mes "Hi there, welcome"; + mes "to my pub. So what"; + mes "would you like to have?"; + next; + + switch(select("Beer, please","A coctail, please","Soju, please.","You look worried, what's up?","Cancel")) { + + case 1: + mes "[Vandt]"; + mes "Alright, let me get"; + mes "you a glass of beer on"; + mes "tap. There you are, this"; + mes "is out special Schwaltz Beer."; + next; + mes "^3355FF*Gulp gulp gulp*^000000"; + percentheal 5,-5; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ahhh, it's really"; + mes "good! That really"; + mes "hits the spot!"; + close; + + case 2: + mes "[Vandt]"; + mes "I'm sorry, but I have to"; + mes "deliver all of our cocktail"; + mes "ingredients to other customers."; + mes "Maybe I'll have enough to make"; + mes "you something next time, okay?"; + close; + + case 3: + mes "[Vandt]"; + mes "S-soju? I'm sorry,"; + mes "but we don't serve that"; + mes "here. It's too much of"; + mes "a tough guy drink for me..."; + close; + + case 4: + mes "[Vandt]"; + mes "Oh, did you overhear?"; + mes "I'm sorry, it's just that one"; + mes "of my employees had an"; + mes "accident and was pretty hurt,"; + mes "so I have nodoby that can"; + mes "deliver this merchandise."; + next; + mes "[Vandt]"; + mes "I have an urgent order"; + mes "that I need to send to"; + mes "the Kiel Hyre Academy,"; + mes "but I can't find anyone"; + mes "that's avaliable for this"; + mes "kind of temporaty job."; + next; + + switch(select("I'm sorry to hear that","Do you want me to help you?")) { + + case 1: + mes "[Vandt]"; + mes "Well, I'm sure that I'll"; + mes "figure something out."; + mes "Do you know anyone"; + mes "that'd be interested in"; + mes "some part time work?"; + close; + + case 2: + mes "[Vandt]"; + mes "Really? That's great!"; + mes "But first, I think it's fair to"; + mes "tell you that this job may not"; + mes "be as simple as you'd think."; + mes "I expect you to complete the"; + mes "delivery, no matter what."; + next; + + switch(select("Sure I'll do it", "Wait, let me think about it...")) { + + case 1: + mes "[Vandt]"; + mes "I'm glad to hear that."; + mes "Well then, please take this"; + mes "bottle of Culinary Wine to"; + mes "Mrs. ^ff0000Lecollane^000000 in the Kiel"; + mes "Hyre Academy. I'll pay you"; + mes "once you finish the job, okay?"; + getitem 7487,1; //Culinary_Wine + set KielHyreQuest,2; + close; + + case 2: + mes "[Vandt]"; + mes "Sure thing. I really need"; + mes "to get this done, so if you"; + mes "can't do it, but know any"; + mes "capable, responsible"; + mes "people that can, then please"; + mes "tell them about my situation."; + close; + + } + + } + + case 5: + mes "[Vandt]"; + mes "Sure, just take"; + mes "your time, relax,"; + mes "and order something"; + mes "when you're ready."; + close; + } + + } + + else if ((KielHyreQuest >= 2) && (KielHyreQuest < 6)) { + mes "[Vandt]"; + mes "Please deliver that bottle"; + mes "of Wine I gave you to Mrs."; + mes "Mrs. ^ff0000Lecollane^000000, who should be"; + mes "inside the Kiel Hyre Academy."; + mes "Hurry and get it to her before she"; + mes "can complain about the delivery."; + close; + } + + else if ((KielHyreQuest == 6) && (KHPubMasterEnd != 1)) { + mes "[Vandt]"; + mes "Oh, you're back."; + mes "Thanks for making that"; + mes "delivery. Just give me"; + mes "a moment, and then I can"; + mes "pay you in zeny, okay?"; + next; + switch(select("I need more wine...")) { + + case 1: + mes "[Vandt]"; + mes "Oh, you need to deliver"; + mes "another bottle? Alright,"; + mes "let me look around, and"; + mes "I'll give you the wine"; + mes "and your payment."; + next; + mes "^3355FFRummage Rummage^000000"; + mes "^3355FFRummage Rummage^000000"; + next; + mes "[Vandt]"; + mes "There you go!"; + mes "Thank you so much"; + mes "for helping me out~"; + getitem 7487,1; //Culinary_Wine + set zeny,zeny+1000; + set KHPubMasterEnd,1; + close; + } + } + + else if ((KielHyreQuest > 6) || (KHPubMasterEnd == 1)) { + mes "[Vandt]"; + mes "Hey, thanks a lot"; + mes "for helping me out that"; + mes "last time. I knew I asked"; + mes "you out of the blue, but"; + mes "you ended up being a life"; + mes "saver! I really appreicate it!"; + close; + } + +OnTouch: + if (KielHyreQuest < 1) { + mes "[Vandt]"; + mes "Arrrggghhh..."; + mes "This can't be good..."; + mes "This isn't good at all!"; + mes "What am I suposed to do?"; + set KielHyreQuest,1; + close; + } +} + +//---------------------------------------------------------------------------- +// Juno Toast Sales Girl. +//---------------------------------------------------------------------------- +yuno,217,114,4 script Little Kid 96,{ + if (KielHyreQuest < 6) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + close; + } + + else if ((KielHyreQuest == 6) && (KHToastGirlEnd != 3)) { + if (KHToastGirlEnd < 1) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + mes "Oh! Hi hi~ Did you want"; + mes "to buy some yummy toast?"; + next; + + switch(select("I'm here for Elly","No, thanks")) { + + case 1: + mes "[Cezu]"; + mes "Oh, I see. Elly must have"; + mes "wasted another batch of"; + mes "ingredients again. Well,"; + mes "she's a regular customer,"; + mes "so I really want to help, but"; + mes "I can't really do anything."; + next; + mes "[Cezu]"; + mes "You see, I just ran"; + mes "out of ingredients too!"; + mes "But I can't really leave"; + mes "to get some more. What if"; + mes "people need to buy toast?"; + mes "Listen, can you help me out?"; + next; + mes "[Cezu]"; + mes "would you please go get"; + mes "some flour and eggs for me"; + mes "from the ^3355FFLighthalzen Windmill^000000"; + mes "Then, when you come back, I can"; + mes "divide the ingredients, and you"; + mes "can deliver some to Elly."; + next; + mes "[Cezu]"; + mes "I know that I'm basically"; + mes "making you do everything"; + mes "on your own, but please try"; + mes "to understand that my hands"; + mes "are tied. D-don't ask me"; + mes "why, they just are!"; + set KHToastGirlEnd,1; + close; + + case 2: + mes "[Cezu]"; + mes "Okay okay~"; + mes "Please come again!"; + close; + } + } + + else if (KHToastGirlEnd == 1) { + mes "[Cezu]"; + mes "Would you please go to"; + mes "the Lighthalzen Windmill"; + mes "and tell them that Cezu needs"; + mes "lots of flour and lots of eggs!"; + mes "Then, bring all the stuff over"; + mes "to me as soon as you can~"; + close; + } + + else if (KHToastGirlEnd == 2) { + mes "[Cezu]"; + mes "Hey, you're back with the"; + mes "ingredients! Thank you so"; + mes "much, I really needed these!"; + mes "Now please give this flour"; + mes "and these eggs to Elly, and"; + mes "send her my regards. See you~"; + delitem 7488,1; //Delivery_Package + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,3; + close; + } + + } + + else if ((KielHyreQuest >= 6) || (KHToastGirlEnd == 3)) { + //KHToastGirlEnd no longer needed-- deleting. + set KHToastGirlEnd,0; + mes "[Cezu]"; + mes "Hot, fresh and"; + mes "cruuuunchy toast!"; + mes "Come and get some!"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Lighthalzen WindMill Owner. +//---------------------------------------------------------------------------- +lighthalzen,365,300,2 script Windmill Owner 46,{ + if (KHToastGirlEnd < 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "I'm pretty busy right"; + mes "now, so you mind coming"; + mes "back later? Then we'll talk."; + close; + } + + else if (KHToastGirlEnd == 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "You just happened to"; + mes "catch me at a good time,"; + mes "but if you need anything,"; + mes "you'd better spit it out quick"; + mes "before things get hectic again."; + next; + + switch(select("I'm here for Cezu","......")) { + + case 1: + mes "[Mills]"; + mes "Oh, Cezu from the"; + mes "toast stand? Okay,"; + mes "I've got everything"; + mes "here, let me just get"; + mes "it ready for you..."; + next; + mes "[Mills]"; + mes "Kid's one of my regular"; + mes "customers, so you don't"; + mes "have to pay me, or run any"; + mes "extra errands on my end. Yeah,"; + mes "I know how other people treat"; + mes "you adventurers. Well, see ya."; + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,2; + close; + + case 2: + mes "[Mills]"; + mes "......"; + mes "Um, okay, well, if"; + mes "you need something,"; + mes "just hollar, I guess."; + mes "Cuts, Cutz where are you?"; + mes "You'd better not be goofing off!"; + close; + + } + + } + + else if (KHToastGirlEnd >= 2) { + mes "[Mills]"; + mes "That Cutz is such"; + mes "a lazy rascal. The guy"; + mes "thinks he can fool around"; + mes "when he's on the clock...!"; + mes "Ah well, he knows I can't find"; + mes "a better assistant. He'll learn..."; + close; + } + +} + +//============================================================================ +//Kiel Hyre Academy NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Girl (Talks about the academy) +//---------------------------------------------------------------------------- +yuno_fild08,196,196,5 script Hanie 102,{ + mes "[Hanie]"; + mes "Oh, I wish I could study"; + mes "at the Kiel Hyre Academy..."; + mes "All of the graduates get"; + mes "really nice jobs! I'm almost"; + mes "jealous of the students!"; + next; + + switch(select("Kiel Hyre Academy?")) { + + case 1: + mes "[Hanie]"; + mes "Oh, the Kiel Hyre Academy"; + mes "is a school founded by Kiel"; + mes "Hyre, an inventor that became"; + mes "rich from his strange machines."; + mes "He decided to give back to society"; + mes "by building this private academy."; + next; + mes "[Hanie]"; + mes "However, the school will"; + mes "only accept orphans that are"; + mes "too poor to enroll in any other"; + mes "schools. Sometimes, it makes"; + mes "me wish that I was an orphan too!"; + mes "Well, not really, but you know..."; + close; + } +} + + +//---------------------------------------------------------------------------- +// Academy Security Guards +//---------------------------------------------------------------------------- +yuno_fild08,158,194,5 script Security Guard#1::KHAGuard 852,{ + if ((KielHyreQuest < 2) && (KielHyreQuest >= 30)) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + close; + } + + + else if (KielHyreQuest == 2) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + next; + switch(select("I'm here for a delivery.","......")) { + case 1: + mes "[Security Guard]"; + mes "You're here to deliver"; + mes "something? Okay, just give"; + mes "me the recipient's ^FF0000name^000000,"; + mes "followed by the ^FF0000item^000000 being"; + mes "delivered, and I'll verify it"; + mes "before letting you inside."; + next; + + input @KHDelivery$; + if (@KHDelivery$ != "Lecollane") { + mes "[Security Guard]"; + mes "You're here to deliver some"; + mes "Wine to...to who? What was"; + mes "the name? I...I don't think"; + mes "we have anybody in the"; + mes "academy named "+@KHDelivery$+""; + close; + } + + input @KHDelivery$ ; + if (@KHDelivery$ != "Culinary Wine") { + mes "[Security Guard]"; + mes "So you're here to make"; + mes "a delivery to Mrs. Lecollane?"; + mes "What is it you've brought for"; + mes "her? Some ^3355FF"+@KHDelivery$+"^000000?"; + next; + mes "[Security Guard]"; + mes "Let me buzz her first,"; + mes "and check to make sure"; + mes "that she's been expecting"; + mes "you. Let's see now..."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Huh. Mrs Lecollane"; + mes "is expecting a delivery,"; + mes "but not the item that you"; + mes "say that you've brought for"; + mes "her. You might want to check"; + mes "to see if there's been a mixup..."; + close; + } + + mes "[Security Guard]"; + mes "Alright...."; + mes "So you're here to"; + mes "deliver a bottle of"; + mes "Wine to Mrs. Lecollane?"; + mes "Let me buzz her, and get"; + mes "this confirmed real quickly."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Okay, everything looks"; + mes "good. Mrs. Lecollane"; + mes "has been expecting you."; + mes "I guess you can enter."; + close2; + warp "kh_school",71,155; + end; + + case 2: + mes "[Security Guard]"; + mes "If you don't have"; + mes "an appoointment, then"; + mes "don't loiter around in"; + mes "front of the academy!"; + close; + + } + + } + + else if (KielHyreQuest >= 4) { + mes "[Security Guard]"; + mes "Oh, did you have"; + mes "other business inside"; + mes "the academy? I remember"; + mes "you from before, so there"; + mes "shouldn't be any problems"; + mes "letting you back inside..."; + close2; + warp "kh_school",71,155; + end; + } + +} + +yuno_fild08,158,183,7 duplicate(KHAGuard) Security Guard#2 852 + +//---------------------------------------------------------------------------- +// Gossiping Teenagers/Story NPCs +//---------------------------------------------------------------------------- +kh_school,57,142,7 script Student::StudentKHQ1 893,3,3,{ + mes "[Laci]"; + mes "Oh, wow! We usually"; + mes "don't get visitors on"; + mes "campus! Um, you're not"; + mes "a new faculty member, are you?"; + close; + +OnTouch: + mes "[Laci]"; + mes "Hey, Nesha...!"; + mes "have you heard why"; + mes "Aaci hasn't been coming"; + mes "to class for awhile?"; + next; + mes "[Gui Nesha]"; + mes "That's right, I haven't"; + mes "seen Aaci in awhile."; + mes "Did something happen?"; + next; + mes "[Laci]"; + mes "It's because...."; + mes "Aaci saw a freakin' ghost!"; + mes "It's one hundred percent"; + mes "true! I heard about it from,"; + mes "well, you know, my sources."; + next; + mes "[Gui Nesha]"; + mes "...Wha...?"; + mes "Oh, come on,"; + mes "get outta town."; + close; +} + +kh_school,57,139,1 script Student::StudentKHQ2 893,{ + mes "[Gui Nesha]"; + mes "Aren't we a little"; + mes "old to be talking about"; + mes "this kind of stuff? You"; + mes "know, rumors and ghost"; + mes "stories that make no sense?"; + mes "C'mon, Laci, knock it off!"; + emotion e_swt2; + close; +} + +//---------------------------------------------------------------------------- +// Mrs. Lecollane +//---------------------------------------------------------------------------- +kh_school,176,60,4 script Lady::LadyKHQ 101,{ + if (KielHyreQuest < 2) { + mes "[Mrs. Lecollane]"; + mes "Is there a problem?"; + mes "Outsiders are not allowed to come"; + mes "in here, please leave."; + close; + } + + else if (KielHyreQuest == 2) { + mes "[Mrs. Lecollane]"; + mes "Oh, hello. Ah!"; + mes "have you come to"; + mes "deliver my wine? The"; + mes "security guard called and"; + mes "mentioned you were coming."; + next; + + switch(select("Yes, that's right!","Er, s-sorry!")) { + + case 1: + mes "[Mrs. Lecollane]"; + mes "Well, you've come a little"; + mes "later than I thought, but"; + mes "I suppose it can't be helped."; + mes "I guess the waiting has just"; + mes "heightened my anticipation"; + mes "for this bottle of wi--"; + next; + mes "^3355FF*Cling! Crrrack!*^000000"; + next; + mes "[Mrs. Lecollane]"; + mes "Elly? Elly did you"; + mes "break something again?!"; + mes "You've got to be more careful!"; + mes "If you don't finish baking those"; + mes "cookies by the end of today, your"; + mes "semester grades will suffer!"; + next; + mes "[Elly]"; + mes "B-but I just..."; + next; + mes "[Mrs. Lecollane]"; + mes "^FF0000Elly^000000!!"; + next; + mes "[Elly]"; + mes "......"; + mes "Yes, Mrs. Lecollane."; + next; + mes "[Mrs. Lecollane]"; + mes "*Ahem* Excuse me."; + mes "Would you please leave"; + mes "the wine over there? You"; + mes "may go now, and please"; + mes "don't wander needlessly"; + mes "around the academy."; + delitem 7487,1; + set KielHyreQuest,4; + close; + + case 2: + mes "[Mrs. Lecollane]"; + mes "Hm...?"; + mes "I guess I must"; + mes "be mistaken. I'm"; + mes "sorry, I thought you"; + mes "were somebody else."; + close; + } + return; + } + + else if (KielHyreQuest == 4) { + mes "[Mrs Lecollane]"; + mes "Well, our business is"; + mes "completed, so would you"; + mes "please leave the campus"; + mes "as soon as you can? *Sigh*"; + mes "I can't believe our future"; + mes "is in these girls' hands..."; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly (In school) +//---------------------------------------------------------------------------- +kh_school,179,39,1 script Cute Student 895,{ + cutin "kh_elly01",2; + if (KielHyreQuest < 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "W-wah! Oh...!"; + mes "*Phew* That was close,"; + mes "I almost dropped them"; + mes "again! Why do I have so much"; + mes "trouble handling ingredients?"; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh no, what should"; + mes "I do? *Sob* Wh-what"; + mes "am I going to do? *sniff*"; + next; + switch(select("What happened?","......")) { + + case 1: + mes "[Elly]"; + mes "I...I have to finish baking"; + mes "this batch of cookies by the"; + mes "end of today, but then I spilled"; + mes "all of the ingredients on the"; + mes "floor. I don't know how I can"; + mes "bake those cookies now..."; + next; + switch(select("What can I do to help you?","Oh, I'm so sorry.")) { + + case 1: + L_Accept: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "What was that...?"; + mes "You'll really help"; + mes "me? That's wonderful!"; + mes "Thank you! Thank you so much!"; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, I guess the only way"; + mes "I can bake these cookies is"; + mes "to get some new ingredients."; + mes "I'm sorry to be such a burden,"; + mes "but if you didn't offer to help"; + mes "me, then I'd have no one to ask!"; + next; + mes "[Elly]"; + mes "You don't understand how"; + mes "important it is that I bake"; + mes "these cookies...If I don't"; + mes "finish the assignment, then"; + mes "Mrs. Crank will fail me for"; + mes "the entire semester!"; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Okay, I need to calm"; + mes "down. I think I can do"; + mes "this with your help."; + mes "Would you please do me"; + mes "this huge favor and bring"; + mes "all these ingredients?"; + next; + cutin "kh_elly01",2; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + next; + mes "[Elly]"; + mes "Good luck, getting"; + mes "everything, and I hope"; + mes "you hurry back here with"; + mes "those cookie ingredients"; + mes "as quickly as you can, okay?"; + set KielHyreQuest,6; + goto KH_Elly_end; + + Case 2: + mes "What, you don't go"; + mes "to this school, don't"; + mes "you? Y-you're one of"; + mes "those adventurers, right?"; + next; + switch(select("Yeah, that's right.")) { + + mes "Listen, I know you"; + mes "probably have your own"; + mes "plans, but do you think"; + mes "you can help me with this"; + mes "huge problem that I have?"; + next; + switch(select("Accept","Decline")) { + + case 1: + //Missing text, needs another run through. + goto L_Accept; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "I'm outta here."; + next; + emotion e_sob; + mes "W-wait...!"; + mes "Come back, you"; + mes "d-don't...! I really"; + mes "need some help!"; + goto KH_Elly_end; + + } + + } + + } + + case 2: + mes "*Sob*..."; + goto KH_Elly_end; + } + + } + + else if (KielHyreQuest == 6) { + //519 - Milk; 548 - Cheese; 7182 - Cacao; 7487 - Culinary_Wine; 7488 - Delivery_Package + if ((countitem(519) < 7) || (countitem(548) < 2) || (countitem(7182) < 5) || (countitem(7487) < 1) || (countitem(7488) < 1)) { + mes "[Elly]"; + mes "Let's see, would you"; + mes "like me to remind you"; + mes "which ingredients I need?"; + mes "Please bring these things as"; + mes "soon as you can so that I can"; + mes "quickly bake some cookies~"; + next; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + goto KH_Elly_end; + } + else { + emotion e_ho; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Hooray! Finally, I have"; + mes "everything I need! This is"; + mes "great! Oh, would you please"; + mes "give me a moment while I bake"; + mes "these cookies? It shouldn't take"; + mes "long, so hold on just a bit."; + set KielHyreQuest,8; + //KHPubMasterEnd no longer needed-- deleting. + set KHPubMasterEnd,0; + delitem 519,7; //Milk + delitem 548,2; //Cheese + delitem 7182,5; //Cacao + delitem 7487,1; //Culinary_Wine + delitem 7488,1; //Delivery_Package + goto KH_Elly_end; + + } + + } + + else if (KielHyreQuest == 8) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "Tadah! I did it!"; + mes "They're finally done!"; + mes "''Elly's Special Cookies~''"; + mes "I'd like you to have some "; + mes "as a thanks for helping me out"; + next; + mes "[Elly]"; + mes "I'm sorry, but I was so"; + mes "preoccupied with baking"; + mes "these cookies that I didn't"; + mes "even ask for your name. I'm"; + mes "^FF0000Ellyja^000000, but everyone calls me,"; + mes "''Elly.'' What's your name?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "^3355FF"+strcharinfo(0)+"^000000."; + mes "It's ^3355FF"+strcharinfo(0)+"^000000."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes ""+strcharinfo(0)+"?"; + mes "...that name! It's wonderful!"; + set KielHyreQuest,10; + getitem 538,5; //Well_Baked_Cookie + goto KH_Elly_end; + } + + else if (KielHyreQuest == 10) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "I'm sorry, but I have"; + mes "another favor to ask you"; + mes "if you don't mind helping"; + mes "me out again. Don't worry,"; + mes "you won't have to hurry as"; + mes "quickly as you did last time."; + next; + + switch(select("What do you need?","Sorry, but I'm pretty busy...")) { + + case 1: + mes "[Elly]"; + mes "You know how you helped"; + mes "me bake those cookies?"; + mes "It's the first time I was able"; + mes "to do it without burning them!"; + mes "I just know Grandfather'd"; + mes "be so proud of me!"; + next; + mes "[Elly]"; + mes "I really want Grandfather"; + mes "to taste the cookies I baked,"; + mes "but the cookies will be stale"; + mes "by the time I'm able to leave"; + mes "campus. Would you deliver these"; + mes "cookies to my grandfather for me?"; + next; + + switch(select("Sure","I'm busy.")) { + + case 1: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Oh, "+strcharinfo(0)+"!"; + mes "Thank you so much, I knew"; + mes "you'd understand! Would you"; + mes "please bring the cookies to"; + mes "him at ^FF0000Kiel Hyre cottage^000000?"; + next; + mes "[Elly]"; + mes "Oh, right! They're really"; + mes "careful about visitors and"; + mes "keeping strangers off the"; + mes "property, but if you mention"; + mes "my name, they'll let you in."; + mes "Alright then, see you~"; + set KielHyreQuest,12; + goto KH_Elly_end; + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + } + + else if (KielHyreQuest == 12) { + mes "[Elly]"; + mes "Oh, you don't know where"; + mes "to find Kiel Hyre cottage?"; + mes "It's just north from this"; + mes "academy. Please deliver my"; + mes "cookies to grandfather, and"; + mes "let him know I really miss him."; + goto KH_Elly_end; + + } + + else if (KielHyreQuest == 14) { + mes "[Elly]"; + mes "Hm? Grandfather's not"; + mes "home? That's strange, he"; + mes "didn't mention anything about"; + mes "any business trips. I thought"; + mes "he'd be at home all day..."; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Would you go back to his"; + mes "cottage once more time? Here,"; + mes "you can use this Cottage Key."; + mes "That way, you can just go"; + mes "inside and talk to him~"; + getitem 7489,1; //Cottage Key + set KielHyreQuest,16; + goto KH_Elly_end; + } + + else if ((KielHyreQuest >= 14) && (KielHyreQuest < 20)) { + mes "[Elly]"; + mes "That's so weird..."; + mes "I thought Grandfather"; + mes "said that he'd be at"; + mes "home all day today..."; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 20) { + mes "[Elly]"; + mes "Hmmm...?"; + mes "What's this,"; + mes "a letter for me?"; + next; + mes "^3355FFElly opened the envelopre^000000"; + mes "^3355FFand started reading the letter^000000"; + next; + mes "Dearest Elly"; + mes "^FFFFFF_^000000"; + mes "I have something to discuss"; + mes "with my son Kiehl, so I am"; + mes "leaving to meet with him."; + mes "If you don't hear from me"; + mes "7 days after I've written"; + mes "it's possible I may be in"; + mes "trouble. Don't trust anyone"; + mes "at the Academy, Elly."; + mes "I've left something for you"; + mes "In the Study."; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "What? oh no, it's been"; + mes "ten days since he wrote"; + mes "this letter! Ah, does this"; + mes "mean that he's in danger?!"; + mes "Oh no, what should I do?"; + delitem 7490,1; //Letter_to_Elly + set KielHyreQuest,22; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 22) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + switch(select("About your grandpa","Tell me about Kiehl","What's with this academy?")) { + + case 1: + mes "[Elly]"; + mes "Oh! My grandfather is"; + mes "Kiel Hyre, founder and"; + mes "CEO of the Kiel Hyre"; + mes "foundation. He looks"; + mes "strict and cold hearted"; + mes "but he's actually very nice!"; + next; + mes "[Elly]"; + mes "We're not related by"; + mes "blood, but he's taken"; + mes "care of me ever since"; + mes "I lost my parents. Oh,"; + mes "Grandpa, where are you?"; + mes "I'm getting so worried!"; + goto KH_Elly_end; + + case 2: + mes "[Elly]"; + mes "Kiehl? That's my"; + mes "grandfather's son..."; + mes "I don't know him that"; + mes "well, and only saw him"; + mes "once at an academy event."; + next; + mes "[Elly]"; + mes "Mmm, he's a good looking"; + mes "guy with pale skin, silver"; + mes "hair, and this cold, fierce"; + mes "stare. A lot of my classmates"; + mes "worship Kiehl because he's"; + mes "also a business genius~"; + next; + mes "[Elly]"; + mes "It's weird though..."; + mes "I have no idea why my"; + mes "grandpa and Kiehl don't"; + mes "get along. They're both"; + mes "really good at what they do."; + goto KH_Elly_end; + + case 3: + mes "[Elly]"; + mes "Well, I know the security"; + mes "here is really tight, but"; + mes "that's because everything"; + mes "here is so luxurious and"; + mes "expensive, you know~"; + next; + mes "[Elly]"; + mes "We also have a very"; + mes "special curriculum where"; + mes "you learn more of what you"; + mes "want. Personally, I want to"; + mes "become a great career woman,"; + mes "like ^3355FFMs. Allysia^000000. Heh heh~"; + next; + mes "[Elly]"; + mes "This place certainly"; + mes "isn't like other schools."; + mes "You already know that only"; + mes "Yeah, everything is made to"; + mes "fit each of the student's needs."; + next; + mes "[Elly]"; + mes "Recently, though?"; + mes "Some really weird stuff"; + mes "has been happening. All of"; + mes "my classmates are afraid of"; + mes "going out alone by themselves."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "But I'll be okay!"; + mes "You'll be there to"; + mes "rescue me from danger"; + mes "right, "+strcharinfo(0)+"?"; + next; + switch(select("Who is Ms. Allysia?","Strange incidents?")) { + + case 1: + mes "[Elly]"; + mes "Oh, Ms. Allysia is"; + mes "Grandfather's secretary~"; + mes "She's so beautiful, and"; + mes "my grandfather really"; + mes "trusts her with everything!"; + goto KH_Elly_end; + + case 2: + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, "+strcharinfo(0)+"..."; + mes "I'm not supposed to tell"; + mes "anyone outside of the school,"; + mes "but I can trust you! You see..."; + mes "We're haunted by a ghost!"; + next; + mes "[Elly]"; + mes "I know it sounds crazy,"; + mes "but this ghost wanders the"; + mes "campus, and curses it's victims,"; + mes "making them so hold and lifeless."; + mes "It happened to my roommate,"; + mes "Mayo. It's like she's a statue."; + next; + mes "[Elly]"; + mes "I snuck into the medical"; + mes "office to see her, and she..."; + mes "She couldn't do anything!"; + mes "What would happen if the"; + mes "ghost decided to curse me?!"; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "You know what...?"; + mes "If I ever got cursed"; + mes "by that ghost, just yell"; + mes "''^FF0000Wake up, Elly!^000000''"; + mes "That'll wake me up for sure!"; + set KielHyreQuest,24; + goto KH_Elly_end; + + } + + } + + } + + else if (KielHyreQuest == 24) { + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Arg, I'm in a fix!"; + mes "I have to finish my"; + mes "homework before it's due!"; + mes "Yeah, I've got to go see"; + mes "Mrs. Lecollane now."; + next; + goto KH_Step26; + } + + else if (KielHyreQuest == 26) { + KH_Step26: + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + set KielHyreQuest,26; + goto KH_Elly_end; + } + + else if (KielHyreQuest > 26) { + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + goto KH_Elly_end; + } + + KH_Elly_end: + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Elly's Window +//---------------------------------------------------------------------------- +yuno_fild08,69,185,0 script Window::WindowKHQ1 111,{ + if ((KielHyreQuest <= 28) || (KielHyreQuest >= 46)){ + mes "^3355FFThis must be Elly's room.^000000"; + mes "^3355FFIt doesn't sound like anyone^000000"; + mes "^3355FFis inside, so the probably^000000"; + mes "^3355FFisn't back yet. For now, you^000000"; + mes "^3355FFshould try to find what her^000000"; + mes "^3355FFgrandfather left for her^000000"; + mes "^3355FFin their cottage's study.^000000"; + close; + } + + if (KielHyreQuest >= 30) { + mes "^3355FFThis slightly open window^000000"; + mes "^3355FFmust lead into Elly's room.^000000"; + mes "^3355FFAlthought she asked you to^000000"; + mes "^3355FFfind a ladder to enter her^000000"; + mes "^3355FFwindow, you probably won't^000000"; + mes "^3355FFfind one. You might be able^000000"; + mes "^3355FFto climb up that water pipe...^000000"; + next; + switch(select("Climb Water Pipe","Find Another Way")) { + + case 1: + set @KHClimbAttempt,rand(1,5); + if (@KHClimbAttempt == 1) { + mes "^3355FFYou climbed up the^000000"; + mes "^3355FFwater pipe, and sneaked^000000"; + mes "^3355FFinto Elly's room successfully.^000000"; + close2; + warp "kh_school",185,185; + end; + } + + else { + mes "^3355FFYou tried to climb^000000"; + mes "^3355FFthe water pope, but^000000"; + mes "^3355FFyou ended up failing^000000"; + mes "^3355FFand bumping your head^000000"; + percentheal -10,0; + close; + } + + case 2: + mes "^3355FFThere must be some^000000"; + mes "^3355FFother way to get into^000000"; + mes "^3355FFElly's room, aside from^000000"; + mes "^3355FFclimbing up this water pipe...^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Elly (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,178,180,5 script Elly 895,{ + if (KielHyreQuest <= 30) { + mes "[Elly]"; + mes "Oh~!"; + mes "Who are you!"; + mes "How did you get here? Please leave"; + close2; + percentheal -99,0; + warp "yuno_fild08",100,100; + end; + } + + else if (KielHyreQuest == 32) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly seems to have^000000"; + mes "^3355FFbeen cursed, and is^000000"; + mes "^3355FFcompletely still and^000000"; + mes "^3355FFlifeless. You've got to^000000"; + mes "^3355FFtry something, but what?^000000"; + next; + + switch(select("Wake her up by shaking.","Wake her up by yelling.","Ignore")) { + + case 1: + mes "^3355FFYou grab Elly by the^000000"; + mes "^3355FFshoulders and try to get^000000"; + mes "^3355FFher to respond by violently^000000"; + mes "^3355FFshaking her entire body.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Elly? Elly? no!"; + mes "Come back to us!"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + + case 2: + input @KHInput$; + if (@KHInput$ == "Wake up, Elly!") { + mes "[Elly]"; + mes "........."; + mes "^3355FFAs soon as you said those^000000"; + mes "^3355FFwords, a ^000000Small Golden Key^000000"; + mes "^3355FFand a ^000000Button^3355FF drop from Elly's^000000"; + mes "^3355FFhands. It looks like she woke^000000"; + mes "^3355FFup, but only for an instant.^000000"; + getitem 7493,1; //Golden_Key + getitem 7494,1; //Exquisite_Button + set KielHyreQuest,34; + close; + } + + else { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + } + + case 3: + mes "^3355FFAlright.^000000"; + mes "^3355FFBut sooner or later,^000000"; + mes "^3355FFyou should try to break^000000"; + mes "^3355FFthe curse placed on Elly.^000000"; + close; + + } + + } + + else if (KielHyreQuest == 34) { + if (countitem(7491) < 1) { + //Missing text, needs another run through. + mes "^3355FFMaybe the golden key^000000"; + mes "unlocks something in the^000000"; + mes "Cottage. Let's take another look.^000000"; + close; + } + + else { + mes "^3355FFIt looks like Elly's^000000"; + mes "^3355FFGolden Key might fit^000000"; + mes "^3355FFinto the keyhole on the^000000"; + mes "^3355FFGrey Box you found inside^000000"; + mes "^3355FFKiel Hyre's Cottage.^000000"; + next; + mes "^3355FFYou successfully open the^000000"; + mes "^3355FFGrey Box with the Golden Key,^000000"; + mes "^3355FFand find a Blue Keycard, along^000000"; + mes "^3355FFwith a folded note, inside the^000000"; + mes "^3355FFGrey Box. You quickly read^000000"; + mes "^3355FFthe note's contents...^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + getitem 7495,1; //Blue_Keycard + delitem 7491,1; //Iron_Box + set KielHyreQuest,36; + close; + } + + } + + else if (KielHyreQuest >= 36) { + mes "^3355FFThis is where you^000000"; + mes "^3355FFdiscovered the note^000000"; + mes "^3355FFlocked inside the Grey Box.^000000"; + mes "^3355FFThe following message was^000000"; + mes "^3355FFwritten in the note by Elly's^000000"; + mes "^3355FFgrandfather, Kiel Hyre.^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cookie Basket +//---------------------------------------------------------------------------- +kh_school,175,175,0 script Cookie Basket 111,{ + if (KielHyreQuest == 30) { + mes "^3355FFThis must be^000000"; + mes "^3355FFElly's cookie basket.^000000"; + mes "^3355FFThere appears to be^000000"; + mes "^3355FFa folded note wedged^000000"; + mes "^3355FFbetween the cookies.^000000"; + next; + + switch(select("Read Note","Ignore")) { + + case 1: + mes ""+strcharinfo(0)+", help!"; + mes "There's this guy dressed in"; + mes "black who;s walking around,"; + mes "and casting this weird spell!"; + mes "He's the one that's been making"; + mes "people cold and lifeless as"; + mes "puppets! I'm getting scared!"; + mes "^FFFFFF_^000000"; + mes "I hope you get this note..."; + mes "He ran after me, but I locked"; + mes "myself in my room. I'm going"; + mes "to leave my window open so that"; + mes "you can still find me. I hope he"; + mes "doesn't cast his curse on me!"; + set KielHyreQuest,32; + close; + + case 2: + mes "^3355FFThat note probably^000000"; + mes "^3355FFwasn't written just^000000"; + mes "^3355FFfor you, anyway.^000000"; + close; + + } + } + + else if (KielHyreQuest >= 32) { + mes "^3355FFThese cookies aren't^000000"; + mes "^3355FFstale yet, but they're no^000000"; + mes "^3355FFlonger warm. If they're^000000"; + mes "^3355FFnot room temperature,^000000"; + mes "^3355FFthen they're a little cold.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly's Window (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,188,185,0 script Window::WindowKHQ2 111,{ + warp "yuno_fild08",69,183; + end; +} + +//---------------------------------------------------------------------------- +// Grave/Kiel Hyre dungeon entry +//---------------------------------------------------------------------------- +yuno_fild08,72,170,0 script Grave 111,{ + if (KielHyreQuest < 36) { + //Missing text, needs another run through. + mes "^3355FFIt's just a grave.^000000"; + mes "^3355FFIt might be important^000000"; + mes "^3355FFto you later, but now^000000"; + mes "^3355FFit's not really all that^000000"; + mes "^3355FFhelpful to you.^000000"; + close; + } + + else if (KielHyreQuest == 36) { + if (countitem(7492) < 1) { + + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + close; + } + + else { + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + next; + mes "^3355FFWhat should you^000000"; + mes "^3355FFinsert into the slot?^000000"; + next; + + input @KHInput$; + + if (@KHInput$ == "Yellow Keycard") { + mes "^3355FFAn electronic confirmation^000000"; + mes "^3355FFchime sounds once you insert^000000"; + mes "^3355FFthe Yellow Keycard, followed by^000000"; + mes "^3355FFan automated voice that asks:^000000"; + next; + mes "[Security System]"; + mes "Please enter the password."; + next; + + input @KHInput$; + + next; + + if (@KHInput$ == "4772961") { + mes "[Security System]"; + mes "Password confirmed."; + mes "Welcome, Kiel Hyre."; + next; + mes "^3355FFYou hear another^000000"; + mes "^3355FFpleasant beep, and^000000"; + mes "^3355FFa secret path opens.^000000"; + set KielHyreQuest,38; + close; + } + + else { + mes "[Security System]"; + mes "Incorrect password."; + mes "Please try again."; + close; + } + } + + else { + mes "^3355FFWhatever you're trying^000000"; + mes "^3355FFto insert into the slot^000000"; + mes "^3355FFisn't working at all...^000000"; + close; + } + + } + + } + + else if ((KielHyreQuest >= 38) && (KielHyreQuest < 106)) { + mes "^3355FFThe door to the^000000"; + mes "^3355FFfactory is wide open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + + } + + else if (KielHyreQuest >= 106) { + if (countitem(7509) < 1) { + mes "^3355FFThe secret entrance"; + mes "has now been sealed.^000000"; + close; + } + + else { + mes "As you aproach the"; + mes "grave, it begins to"; + mes "emit flashes of light.^000000"; + next; + + switch(select("Use the ^0000FFLuxurious Keycard^000000","Ignore")) { + + case 1: + mes "Once you use the"; + mes "Luxurious Keycard,"; + mes "a secret path opens^000000"; + next; + + switch(select("Enter","cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + } + + } + +} + +//============================================================================ + +//============================================================================ +//Kiel Hyre Cottage NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Cottage Keeper +//---------------------------------------------------------------------------- +yuno_fild02,93,210,3 script Cottage Keeper 85,{ + if ((KielHyreQuest < 12) || (KielHyreQuest > 12)) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + close; + } + + else if (KielHyreQuest == 12) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + next; + + switch(select("I have an apointment with Kiel Hyre.","Alright.")) { + + case 1: + mes "[Cottage Keeper]"; + mes "You have an"; + mes "appointment with"; + mes "Master Kiel Hyre?"; + mes "Um, are you sure?"; + next; + switch(select("Yes","No")) { + + case 1: + mes "[Cottage Keeper]"; + mes "There must be some sort"; + mes "of mistake. Mister Hyre"; + mes "wouldn't have left if he"; + mes "was suposed to keep"; + mes "an appointment..."; + set KielHyreQuest,14; + close; + + case 2: + mes "[Cottage Keeper]"; + mes "Well unless you have"; + mes "an appointment, I don't"; + mes "think you'll be able to"; + mes "meet with Mister Hyre."; + close; + } + + case 2: + mes "[Cottage Keeper]"; + mes "Goodbye."; + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (left) +//---------------------------------------------------------------------------- +yuno_fild02,75,218,0 script Door::DoorKHQ1 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest == 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Unlock","Cancel")) { + + case 1: + mes "^3355FFYou unlock the door with the.^000000"; + mes "^3355FFkey that Elly gave you, and.^000000"; + mes "^3355FFas you push it open, a folded.^000000"; + mes "^3355FFnote dropped from the top of the.^000000"; + mes "^3355FFdoor. The following words.^000000"; + mes "^3355FFare written on this crude note.^000000"; + next; + mes "6 Forward,"; + mes "3 Left,"; + mes "3 Forward,"; + mes "4 Left"; + close2; + set KielHyreQuest,18; + warp "kh_vila",188,18; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } + + if (KielHyreQuest >= 18) { + mes "^3355FFThe door is open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",188,18; + end; + + case 2: + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (Right) +//---------------------------------------------------------------------------- +yuno_fild02,109,218,0 script Door::DoorKHQ2 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest >= 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Open","Cancel")) { + + case 1: + mes "^3355FFYou don't have^000000"; + mes "^3355FFthe key that can^000000"; + mes "^3355FFunlock this door.^000000"; + close; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } +} + + +//---------------------------------------------------------------------------- +// Store room interior; Wall +//---------------------------------------------------------------------------- +kh_vila,191,14,0 script Wall 111,{ + if (KielHyreQuest < 28) { + mes "^3355FFIt's just a wall.^000000"; + mes "^3355FFIt's not particularly^000000"; + mes "^3355FFstanding in your way.^000000"; + close; + } + + if (KielHyreQuest >= 28) { + mes "^3355FFThe wall is now^000000"; + mes "^3355FFopen, revealing^000000"; + mes "^3355FFa secret path.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",17,177; + end; + + case 2: + close; + } + + } + +OnOpenDoor: + misceffect 316; + end; +} + +//---------------------------------------------------------------------------- +// Store room interior; books +//---------------------------------------------------------------------------- +kh_vila,184,20,0 script Book#1::BookKHQ1 111,{ + if ((KielHyreQuest < 26) || (KielHyreQuest > 26)) { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + else if (KielHyreQuest == 26) { + if (rand(1,10) == 8) { + mes "^3355FFWithout thinking, you^000000"; + mes "^3355FFreach for a book from^000000"; + mes "^3355FFthe bookshelf. As you^000000"; + mes "^3355FFpull it toward you, the^000000"; + mes "^3355FFwall slides open to^000000"; + mes "^3355FFreveal a secret path.^000000"; + donpcevent "Wall::OnOpenDoor"; + set KielHyreQuest,28; + close; + } + + else { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + + } + +} + +kh_vila,181,20,0 duplicate(BookKHQ1) Book#2::BookKHQ2 111 + +kh_vila,178,20,0 duplicate(BookKHQ1) Book#3::BookKHQ3 111 + +kh_vila,175,19,0 duplicate(BookKHQ1) Book#4::BookKHQ4 111 + +//---------------------------------------------------------------------------- +// Store room interior; Letter to Elly on the floor. +//---------------------------------------------------------------------------- +kh_vila,179,11,0 script KH_Letter_Trigger -1,2,2,{ +OnTouch: + if (KielHyreQuest == 18) { + mes "^3355FFYou've found a letter^000000"; + mes "^3355FFon the floor. Naturally,^000000"; + mes "^3355FFyou pick i up, despite^000000"; + mes "^3355FFthe fact that it's not^000000"; + mes "^3355FFaddressed to you.^000000"; + getitem 7490,1; //Letter to Elly + set KielHyreQuest,20; + close; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Box (Pet Food vending machine) +//---------------------------------------------------------------------------- +kh_vila,16,175,0 script Box::BoxKHQ1 111,{ + mes "^FFFFFF##^000000*Tasty-Nutricious-Delicious*"; + mes "*Cute Pet Doof Vending Machine*"; + mes "The best food for your Cute Pets"; + mes "that is superior to the Pet Food"; + mes "you can buy in the market!"; + mes "^FFFFFF_^000000"; + mes "Price: 1,100 zeny (cheap!)"; + next; + + switch(select("Buy!","Cancel")) { + + case 1: + mes "^3355FF1,100 zeny seems kind"; + mes "^3355FFor expensive for Pet Food,"; + mes "^3355FFbut if it's better t han the"; + mes "^3355FFnormal stuff, it might"; + mes "^3355FFbe worth a shot."; + next; + if (zeny < 1100) { + //Adlibbed dialog. Need weight check, too. + mes "^3355FFYou don't have enough zeny...^000000"; + close; + } + else { + mes "^3355FFOh no...!^000000"; + mes "^3355FFThere's nothing^000000"; + mes "^3355FFspecial about it^000000"; + mes "^3355FFat all! It's just^000000"; + mes "^3355FFnormal Pet Food!^000000"; + set zeny,zeny-1100; + getitem 537,1; + close; + } + + case 2: + mes "^3355FFThis vending machine^000000"; + mes "^3355FFseems really shady and^000000"; + mes "^3355FFsuspicious for some reason^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Apple Box (Useless?) +//---------------------------------------------------------------------------- +kh_vila,30,184,0 script Apple Box 111,{ + mes "^3355FFYou find a box filled with^000000"; + mes "^3355FFripe, delicious apples.^000000"; + next; + + switch(select("Take the box","Leave it")) { + + case 1: + mes "^3355FFNo...! Wait!^000000"; + mes "^3355FFSomething's wrong!^000000"; + mes "^3355FFWhatever you do,^000000"; + mes "^3355FFdon't take this box!^000000"; + next; + mes "^3355FFAnd so, your inner^000000"; + mes "^3355FFvoice, your Jungian^000000"; + mes "^3355FFshadow if you will,^000000"; + mes "^3355FFprevented you from^000000"; + mes "^3355FFtaking the box.^000000"; + close; + + case 2: + mes "^3355FFSomething is wrong^000000"; + mes "^3355FFwith this box of apples.^000000"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, dining room; Map +//---------------------------------------------------------------------------- +kh_vila,44,126,0 script Map 111,{ + if ((KHCottagePoem1 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFA magnificent world map,^000000"; + mes "^3355FFdetailing the Rune-Midgarts^000000"; + mes "^3355FFKingdom, Schwaltzvalt Republic,^000000"; + mes "^3355FFas well as another country to the^000000"; + mes "^3355FFWest whose name is unfamiliar^000000"; + mes "^3355FFto you, is pasted to this wall.^000000"; + next; + mes "^3355FFAs you examine the^000000"; + mes "^3355FFworld map more closely,^000000"; + mes "^3355FFyou find that something has^000000"; + mes "^3355FFbeen hidden underneath it.^000000"; + next; + + switch(select("ignore","Examine")) { + + case 1: + mes "^3355FFWhatever might be^000000"; + mes "^3355FFhidden beneath this^000000"; + mes "^3355FFmap probably isn't^000000"; + mes "^3355FFimportant enough for^000000"; + mes "^3355FFyou to investigate.^000000"; + close; + + case 2: + mes "^3355FFUnfortunately, you can't^000000"; + mes "^3355FFsee what's under the map^000000"; + mes "^3355FFsince it's pasted to the wall.^000000"; + mes "^3355FFYou'll need to find some^000000"; + mes "^3355FFway to loosen the blue^000000"; + mes "^3355FFwithout damaging the map.^000000"; + set KHCottagePoem1,1; + close; + + } + + } + + else if ((KHCottagePoem1 == 2) && (KielHyreQuest < 30)) { + mes "^3355FFYou bring the pot of^000000"; + mes "^3355FFsteaming hot liquid^000000"; + mes "^3355FFclose to the world map.^000000"; + mes "^3355FFAs the paste on the wall^000000"; + mes "^3355FFmoistens, the map slowly^000000"; + mes "^3355FFbegins to peel back.^000000"; + next; + mes "^3355FFThe peelnig map revealed^000000"; + mes "^3355FFa folded piece of paper^000000"; + mes "^3355FFhidden beneath it. You^000000"; + mes "^3355FFtake the paper, and smooth^000000"; + mes "^3355FFthe map out to adhere it to^000000"; + mes "^3355FFthe wall once again. A message is^000000"; + mes "^3355FFwritten on the piece of paper.^000000"; + next; + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparent as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + set KHCottagePoem1,3; + close; + } + + else if ((KHCottagePoem1 > 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you found^000000"; + mes "^3355FFthe paper on which the^000000"; + mes "^3355FFpoem was written. Perhaps^000000"; + mes "^3355FFit would be a good idea to^000000"; + mes "^3355FFrefresh your memory and^000000"; + mes "^3355FFread that that poem again.^000000"; + next; + + switch(select("Read","Cancel")) { + + case 1: + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparant as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + close; + + case 2: + mes "^3355FFThere's no need for^000000"; + mes "^3355FFyou to reread this poem.^000000"; + mes "^3355FFYou're a freakin' genius!^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Pot +//---------------------------------------------------------------------------- +kh_vila,33,184,0 script Pot 111,{ + if (KHCottagePoem1 < 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + close; + } + + else if (KHCottagePoem1 == 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + mes "^3355FFSteam... That you could^000000"; + mes "^3355FFuse to loosen the glue on^000000"; + mes "^3355FFthe map... You're a genius!^000000"; + next; + + switch(select("Try it.","That? That won't work!")) { + + case 1: + mes "^3355FFYou picked up the^000000"; + mes "^3355FFboiling pot, but^000000"; + mes "^3355FFslightly burned your^000000"; + mes "^3355FFhands on accident.^000000"; + set KHCottagePoem1,2; + close; + + case 2: + mes "^3355FFNo, no...^000000"; + mes "^3355FFWe'd better try^000000"; + mes "^3355FFsomething else.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 1) || (KielHyreQuest >= 30)){ + mes "^3355FFThis is where you^000000"; + mes "^3355FFpicked up the pot filled^000000"; + mes "^3355FFwith steaming liquid.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, fire place; Calabash +//---------------------------------------------------------------------------- +kh_vila,14,55,0 script Calabash 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFIt's an expensive^000000"; + mes "^3355FFlooking calabash--^000000"; + mes "^3355FFor in less fancy^000000"; + mes "^3355FFwords, a 'gourd.'^000000"; + mes "^3355FFWhat do you do?^000000"; + next; + + switch(select("Break Open Calabash","Look Inside Calabash","ignore")) { + + case 1: + mes "^3355FFYou can't break^000000"; + mes "^3355FFopen that calabash...^000000"; + mes "^3355FFYou're a hero, not a vandal.^000000"; + mes "^3355FFNow, if this act of vandalisim^000000"; + mes "^3355FFcan be considered an act of^000000"; + mes "^3355FFheroisim, then it'd be okay.^000000"; + close; + + case 2: + mes "^3355FFYou tenderly place^000000"; + + mes "^3355FFyour hand into the^000000"; + mes "^3355FFcalabash, and gently^000000"; + mes "^3355FFfeel around with your^000000"; + mes "^3355FFfingers until you retrieve^000000"; + mes "^3355FFan Old Bronze Key^000000"; + getitem 7329,1; //Old_Bronze_Key + close; + + case 3: + mes "^3355FFThere's probably^000000"; + mes "^3355FFnothing inside anyway^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the expensive^000000"; + mes "^3355FFlooking calabash from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe Old Bronze Key.^000000"; + mes "^3355FFIt's useless to you now.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, garden; Pool +//---------------------------------------------------------------------------- +kh_vila,39,41,0 script pool 111,{ + if ((KHCottagePoem1 < 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + close; + } + + else if ((KHCottagePoem1 == 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + mes "^3355FFalong with a conscpicuous^000000"; + mes "^3355FFlion statue with two handles^000000"; + next; + + switch(select("Pull handles","cancel")) { + + case 1: + mes "Which handle would^000000"; + mes "you like to pull first?^000000"; + next; + + switch(select("Right Handle","Left Handle")) { + + case 1: + mes "^3355FFYou pull the right^000000"; + mes "^3355FFhandle, causing water^000000"; + mes "^3355FFto gush from the lion's^000000"; + mes "^3355FFmouth. It looks pretty cool~^000000"; + close; + + case 2: + mes "^3355FFAs soon as you pull the^000000"; + mes "^3355FFleft handle, the water in^000000"; + mes "^3355FFthe pool drains away. The^000000"; + mes "^3355FFpool empties, and you can^000000"; + mes "^3355FFsee a later of green moss^000000"; + mes "^3355FFcovering the pool's bottom.^000000"; + next; + + switch(select("Ignore","Investigate")) { + + case 1: + mes "^3355FFyou decide that^000000"; + mes "^3355FFa pool is little more^000000"; + mes "^3355FFthan a hole without^000000"; + mes "^3355FFany water to fill it.^000000"; + close; + + case 2: + mes "^3355FFAs you look through^000000"; + mes "^3355FFthe wet moss at the^000000"; + mes "^3355FFbottom of the pool,^000000"; + mes "^3355FFyou stumble upon a^000000"; + mes "^3355FFsmall, peculliar button.^000000"; + next; + + switch(select("Press button","Don't Press Button")) { + + case 1: + mes "^3355FFYou press the button^000000"; + mes "^3355FFwhich seems to trigger^000000"; + mes "^3355FFa strange sound coming^000000"; + mes "^3355FFfrom the stairs at the hallway.^000000"; + set KHCottagePoem1,4; + close; + + case 2: + mes "^3355FFYou'd better not push^000000"; + mes "^3355FFthis button. Your enemies^000000"; + mes "^3355FFmust have hidden it carefully^000000"; + mes "^3355FFfor you to find. It must be^000000"; + mes "^3355FFsome sort of nefarious trap.^000000"; + close; + + } + + } + + } + + case 2: + mes "^3355FFYou decided not^000000"; + mes "^3355FFto pull and handles.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 3) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you pressed^000000"; + mes "^3355FFthe small button that caused^000000"; + mes "^3355FFsome strange noise to come^000000"; + mes "^3355FFfrom the stairs near the wallway.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Vicious Dog +//---------------------------------------------------------------------------- +kh_vila,181,178,4 script Vicious Dog 81,7,3,{ +OnTouch: + mes "*Grrr~*"; + next; + mes "^3355FFAn extremely vicious^000000"; + mes "^3355FFlooking dog is glaring^000000"; + mes "^3355FFat you. Can you really^000000"; + mes "^3355FFpass by this creature^000000"; + mes "^3355FFwithout getting hurt?^000000"; + next; + + switch(select("March forward","Run away")) { + + case 1: + if (countitem(537) >= 1) { + mes "^3355FFWait! Perhaps you can^000000"; + mes "^3355FFuse food to soothe the^000000"; + mes "^3355FFsavage beast! Why don't^000000"; + mes "^3355FFyou feed it some of your Pet^000000"; + mes "^3355FFFood and see what happens?^000000"; + next; + + switch(select("Give pet Food","It won't work!")) { + + case 1: + mes "^3355FFYou gingerly throw the^000000"; + mes "^3355FFPet Food towards the dog.^000000"; + mes "^3355FFIts tail shakes violently as^000000"; + mes "^3355FFit devours the food. You'd^000000"; + mes "^3355FFbetter pass this dog now^000000"; + mes "^3355FFwhile you have the chance!^000000"; + delitem 537,1; //Pet_Food + close2; + warp "kh_vila",173,182; + end; + + case 2: + NoPetFood: + mes "^3355FFYou slowly approach^000000"; + mes "^3355FFthe dog, but it won't^000000"; + mes "^3355FFstop snarling at you.^000000"; + mes "^3355FFYou try to run past the^000000"; + mes "^3355FFdog, but it blocks all of^000000"; + mes "^3355FFyour moves. What to do?^000000"; + next; + mes "[Vicious Dog]"; + mes "BOW WOW!"; + mes "BOW WOW!"; + mes "BOW WOW WOW!"; + next; + mes "^3355FFThe dog chases you^000000"; + mes "^3355FFdownstairs like the^000000"; + mes "^3355FFsuckah chump you are^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + } + + else { + goto NoPetFood; + } + + case 2: + mes "^3355FFLet's get out of here!^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Drawer, first room nightstand +//---------------------------------------------------------------------------- +kh_vila,115,186,0 script Drawer::DrawerKHQ1 111,{ + if ((countitem(7492) < 1) && (KielHyreQuest < 36)) { + mes "^3355FFyou find an old drawer^000000"; + mes "^3355FFthat has been closed.^000000"; + mes "^3355FFIf you open it, then you^000000"; + mes "^3355FFmight find something^000000"; + mes "^3355FFinside. Or could it be^000000"; + mes "^3355FFempty. Who knows?^000000"; + next; + + switch(select("Open Drawer","Ignore")) { + + case 1: + mes "^3355FFYou obtain a Yellow^000000"; + mes "^3355FFKeycard from inside the^000000"; + mes "^3355FFdrawer. Opening that drawer^000000"; + mes "^3355FFturned out to be worthwhile.^000000"; + getitem 7492,1; //Yellow_Keycard + close; + + case 2: + mes "^3355FFForget opening that^000000"; + mes "^3355FFdrawer. I mean, come on,^000000"; + mes "^3355FFwhat would be the point?^000000"; + close; + } + } + + else { + mes "^3355FFThis is where you^000000"; + mes "^3355FFfound the Yellow Keycard.^000000"; + mes "^3355FFThis drawer is now empty.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Box +//---------------------------------------------------------------------------- +kh_vila,107,126,0 script Box::BoxKHQ2 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + close; + } + + else if ((countitem(7329) >= 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + mes "^3355FFperhaps you can use your^000000"; + mes "^3355FFOld Bronze Key to unlock it.^000000"; + next; + + switch(select("Use Old Bronze Key","No, it'll never work.")) { + + case 1: + mes "^3355FFYour hunch paid off!^000000"; + mes "^3355FFThe Old Bronze Key really^000000"; + mes "^3355FFdid unlock that box! You^000000"; + mes "^3355FFopen the inner box and^000000"; + mes "^3355FFobtain the Green Keycard^000000"; + mes "^3355FFthat was locked inside.^000000"; + getitem 7516,1; + delitem 7329,1; + close; + + + case 2: + mes "^3355FFWhat...?^000000"; + mes "^3355FFWhat? Using a key^000000"; + mes "^3355FFto unlock a lock?^000000"; + mes "^3355FFCome on, that's^000000"; + mes "^3355FFfreakin' crazy talk.^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the box from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe green keycard.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Bookshelf. +//---------------------------------------------------------------------------- +kh_vila,181,138,0 script Bookshelf::BookshelfKHQ1 111,{ + if ((countitem(7491) < 1) && (countitem(7516) >= 1)) { + mes "^3355FFOne of the books on^000000"; + mes "^3355FFthis crammed bookshell^000000"; + mes "^3355FFis labeled with the note,^000000"; + mes "^3355FF'To Elly.' It must have been^000000"; + mes "^3355FFleft behind by her grandfather^000000"; + next; + switch(select("Examine Book","Ignore")) { + + case 1: + mes "^3355FFYou skim through the^000000"; + mes "^3355FFbook's pages, and don't^000000"; + mes "^3355FFfind anything particularly^000000"; + mes "^3355FFinteresting. However, you^000000"; + mes "^3355FFnotice a steel surface behind the^000000"; + mes "^3355FFshelf as you place the book back.^000000"; + next; + + switch(select("Examine The steel surface","Ignore")) { + + case 1: + mes "^3355FFYou remove more of the^000000"; + mes "^3355FFself's books to reveal^000000"; + mes "^3355FFthat the steel surface is^000000"; + mes "^3355FFpart of a safe hidden behind^000000"; + mes "^3355FFthe bookshelf. There are two^000000"; + mes "^3355FFkeyholes on the steel safe.^000000"; + next; + + switch(select("Try all your keys","Cancel")) { + + case 1: + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe first keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHFirstKeyhole,1; + break; + + case 2: + set @KHFirstKeyhole,2; + break; + + } + + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe second keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHSecondKeyhole,1; + break; + + case 2: + set @KHSecondKeyhole,2; + break; + + } + + if (@KHFirstKeyhole == 2) && (@KHSecondKeyhole == 1) { + mes "^3355FFThe safe opens with^000000"; + mes "^3355FFa click and you see^000000"; + mes "^3355FFa Grey Box inside.^000000"; + mes "^3355FFYou take the Grey Box^000000"; + mes "^3355FFwith you, hoping that^000000"; + mes "^3355FFwill come in handy later.^000000"; + delitem 7489,1; //Cottage Key + delitem 7516,1; //Green_Keycard + getitem 7491,1; //Iron_Box + close; + } + + else { + mes "^3355FFThe safe won't open.^000000"; + close; + } + + case 2: + mes "^3355FFIt's probably a better^000000"; + mes "^3355FFidea to investigate the^000000"; + mes "^3355FFcottage for the keys that^000000"; + mes "^3355FFwill open up this safe...^000000"; + close; + + } + + case 2: + mes "^3355FFYou place the books^000000"; + mes "^3355FFback on the bookchelf.^000000"; + close; + + } + + case 2: + mes "^3355FFYou can probably^000000"; + mes "^3355FFfind better clues^000000"; + mes "^3355FFsomewhere else^000000"; + mes "^3355FFaround here.^000000"; + close; + + } + } + + else { + end; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Desk +//---------------------------------------------------------------------------- +kh_vila,118,143,0 script Desk::DeskKHQ1 111,{ + if (KHCottagePoem2 < 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books stacked on top^000000"; + mes "^3355FFof the desk covering topics^000000"; + mes "^3355FFlike artificial power, Sage^000000"; + mes "^3355FFVarmundt's research, factory^000000"; + mes "^3355FFrobotization, and magic scrolls...^000000"; + next; + mes "^3355FFWhile rummaging around through^000000"; + mes "^3355FFthe books and paper, you^000000"; + mes "^3355FFfind a piece of paper with^000000"; + mes "^3355FFthe Kiel Hyre Foundation's^000000"; + mes "^3355FFofficial seal. You decide that^000000"; + mes "^3355FFit might come in handy someday.^000000"; + next; + mes "^3355FFYou've obtained^000000"; + mes "^3355FFa blank piece of^000000"; + mes "^3355FFpaper with the Kiel^000000"; + mes "^3355FFHyre Foundation seal.^000000"; + set KHCottagePoem2,1; + close; + } + + else if (KHCottagePoem2 >= 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books, covering various^000000"; + mes "^3355FFscientific and magic tomics,^000000"; + mes "^3355FFstacked on top of this desk.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Medicine Chest +//---------------------------------------------------------------------------- +kh_vila,123,170,0 script Medicine Chest 111,{ + if ((KHCottagePoem2 < 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + close; + } + + else if ((KHCottagePoem2 == 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + next; + mes "^3355FFWait, you have a blank piece^000000"; + mes "^3355FFof paper with the Kiel Hyre^000000"; + mes "^3355FFFoundation seal! It's strange^000000"; + mes "^3355FFthat the seal was put on a blank^000000"; + mes "^3355FFpiece of paper. Maybe something^000000"; + mes "^3355FFis written on it with special ink?^000000"; + next; + mes "^3355FFIt's a crazy hunch, but^000000"; + mes "^3355FFmaybe, just maybe, you can^000000"; + mes "^3355FFuse something inside this^000000"; + mes "^3355FFmedicine cabinet that will^000000"; + mes "^3355FFreveal any invisible ink^000000"; + mes "^3355FFwritten on this document!^000000"; + next; + + switch(select("What? That's crazy!","Of course! Let's try it!")) { + + case 1: + mes "^3355FFSorry.^000000"; + mes "^3355FFI thought it^000000"; + mes "^3355FFwas a good idea...^000000"; + close; + + case 2: + switch(select("Try Red Liquid","Try Blue Liquid","Try Yellow Liquid","Try Green Liquid","Cancel")) { + + case 1: + set @KHPotionColor$,"red"; + break; + + case 2: + mes "^3355FFIt works!^000000"; + mes "^3355FFThe blue liquid is^000000"; + mes "^3355FFrevealing small^000000"; + mes "^3355FFtext written on the paper.^000000"; + mes "^3355FFIt looks like some^000000"; + mes "^3355FFkind of long poem...^000000"; + next; + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle"; + mes "lost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + next; + mes "^3355FFThis is a very^000000"; + mes "^3355FFstrange poem. What^000000"; + mes "^3355FFcould it possibly mean?^000000"; + set KHCottagePoem2,2; + close; + + case 3: + set @KHPotionColor$,"yellow"; + break; + + case 4: + set @KHPotionColor$,"green"; + break; + + case 5: + mes "^3355FFNever mind.^000000"; + mes "^3355FFThis idea sounds^000000"; + mes "^3355FFtoo crazy to work...^000000"; + mes "^3355FFlike putting a man^000000"; + mes "^3355FFpn the moon. Can you^000000"; + mes "^3355FFbelieve that hogwash?^000000"; + close; + } + + mes "^3355FFYou tried sprinking^000000"; + mes "^3355FFthe "+@KHPotionColor$+" liquid from the^000000"; + mes "^3355FFmedicine cabinet onto^000000"; + mes "^3355FFthe blank paper with the^000000"; + mes "^3355FFKiel Hyre Foundation seal.^000000"; + mes "^3355FFHowever, nothing happened...^000000"; + close; + + } + } + + else if ((KHCottagePoem2 >= 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you poured^000000"; + mes "^3355FFsome blue liquid to read^000000"; + mes "^3355FFa poem written in invisible^000000"; + mes "^3355FFink on a blank poece of paper^000000"; + mes "^3355FFwith the Kiel Hyre Foundation^000000"; + mes "^3355FFseal. Would you like to read it?^000000"; + next; + + switch(select("No time!","Read")) { + + case 1: + mes "^3355FFYou're running out of^000000"; + mes "^3355FFtime! For now, it would^000000"; + mes "^3355FFbe best for you to seach^000000"; + mes "^3355FFevery inch of the cottage.^000000"; + close; + + case 2: + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle^000000"; + mes "^3355FFlost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + close; + + } + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, stair case; Sword hilt +//---------------------------------------------------------------------------- +kh_vila,136,68,0 script Sword Hilt 111,{ + if ((KHCottagePoem1 < 3) || (KHCottagePoem2 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures.^000000"; + close; + } + + else if ((KHCottagePoem1 <= 4) || (KHCottagePoem2 <= 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures. Wait!^000000"; + mes "^3355FFperhaps they're related to^000000"; + mes "^3355FFthat poem you read earlier...^000000"; + next; + + switch(select("No way!","Of course!")) { + + case 1: + mes "^3355FFImpossible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + mes "^3355FFOf course! And look!^000000"; + mes "^3355FFThere's a hole on top^000000"; + mes "^3355FFof the head of each snake^000000"; + mes "^3355FFsculpture. There holes seem^000000"; + mes "^3355FFbig enough to insert each of^000000"; + mes "^3355FFthe ornamental swords nearby...^000000"; + next; + + switch(select("Ignore","Insert Ornamental Swords")) { + + case 1: + mes "^3355FFImposible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + if (KHCottagePoem1 != 4) { + mes "^3355FFCan't... Pull out...^000000"; + mes "^3355FFSword! It must be^000000"; + mes "^3355FFlocked into place^000000"; + mes "^3355FFsomehow, or sealed^000000"; + mes "^3355FFby some strange force!^000000"; + close; + } + + else { + mes "^3355FFYou should probably^000000"; + mes "^3355FFtry to insert each sword^000000"; + mes "^3355FFinto the correct snake.^000000"; + mes "^3355FFFirst please select the^000000"; + mes "^3355FFsnake in which you will^000000"; + mes "^3355FFinsert the first sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHfirstSword,1; + break; + + case 2: + set @KHfirstSword,2; + break; + + case 3: + set @KHfirstSword,3; + break; + + case 4: + set @KHfirstSword,4; + break; + + } + + next; + mes "^3355FFNow, please choose^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the second sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHSecondSword,1; + break; + + case 2: + set @KHSecondSword,2; + break; + + case 3: + set @KHSecondSword,3; + break; + + case 4: + set @KHSecondSword,4; + break; + + } + + next; + + mes "^3355FFNext, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the third sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHThirdSword,1; + break; + + + case 2: + set @KHThirdSword,2; + break; + + case 3: + set @KHThirdSword,3; + break; + + case 4: + set @KHThirdSword,4; + break; + + } + + next; + mes "^3355FFLastly, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the fourth sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHFouthSword,1; + break; + + case 2: + set @KHFouthSword,2; + break; + + case 3: + set @KHFouthSword,3; + break; + + case 4: + set @KHFouthSword,4; + break; + + } + + if ((@KHFirstSword == 2) && (@KHSecondSword == 4) && (@KHThirdSword == 1) && (@KHFouthSword == 3)) { + mes "^3355FFYour ears are suddenly^000000"; + mes "^3355FFfilled with a low buzzing^000000"; + mes "^3355FFnoise, and your mind^000000"; + mes "^3355FFand body feel as if they^000000"; + mes "^3355FFare being swept away^000000"; + set KHCottagePoem1,5; + set KHCottagePoem2,3; + close2; + warp "kh_vila",178,72; + end; + } + + else { + mes "^3355FFNothing happened...^000000"; + mes "^3355FFYou probably didn't^000000"; + mes "^3355FFinsert the swords into^000000"; + mes "^3355FFthe correct snakes. For now,^000000"; + mes "^3355FFyou should return the swords,^000000"; + mes "^3355FFand then try this again later.^000000"; + close; + } + } + } + } + } + + else if ((KHCottagePoem1 == 5) && (KHCottagePoem2 == 3) || (KielHyreQuest >= 30)) { + mes "^3355FFHere is a hidden^000000"; + mes "^3355FFpath that leads to^000000"; + mes "^3355FFthe secret laboratory.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",178,72; + end; + + case 2: + close; + + } + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; left test tube +//---------------------------------------------------------------------------- +kh_vila,179,68,0 script Test Tube::TestTubeKHQ1 111,{ + mes "^3355FFThis test tube contains^000000"; + mes "^3355FFa young man dressed in^000000"; + mes "^3355FFa Kiel Hyre Academy^000000"; + mes "^3355FFuniform. Somehow, you^000000"; + mes "^3355FFget the feeling that you've^000000"; + mes "^3355FFseen him somewhere before.^000000"; + close; +} + + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; Right test tube +//---------------------------------------------------------------------------- +kh_vila,185,68,0 script Test Tube::TestTubeKHQ2 111,{ + if (KielHyreQuest == 28) { + mes "^3355FFA strange looking,^000000"; + mes "^3355FFwizend old man is^000000"; + mes "^3355FFheld within this test tube.^000000"; + mes "^3355FFThere is a small red button^000000"; + mes "^3355FFright underneath the test tube.^000000"; + next; + + switch(select("Press Button","Investigate Further")) { + + case 1: + + mes "[???]"; + mes "H-hello...? C-can you"; + mes "hear me? I don't recognize"; + mes "you... But... Maybe I forgot?"; + mes "Wait, wait. If you're my friend,"; + mes "then you know what to call me,"; + mes "right? Do you know what I am?"; + next; + + input @KHInput$; + + if (@KHInput$ == "little lost devil") { + mes "[???]"; + mes "Heh... Heh heh..."; + mes "He knows... Hey, you"; + mes "have to remember these"; + mes "numbers, okay? D-don't"; + mes "forget, they'll be important..."; + mes "^FF00004^000000, ^FF00007^000000, ^FF00002^000000, ^FF00009^000000, ^FF00006^000000, ^FF00001^000000. That's all..."; + next; + mes "^3355FF4772961^000000"; + mes "^3355FFWhat could^000000"; + mes "^3355FFthose numbers^000000"; + mes "^3355FFpossibly mean?^000000"; + //KHCottagePoem1 and KHCottagePoem2 no longer needed-- deleting + set KHCottagePoem1,0; + set KHCottagePoem2,0; + set KielHyreQuest,30; + close; + } + + else { + mes "[???]"; + mes "No... No..."; + mes "That's not right."; + mes "I don't think we"; + mes "were friends. No..."; + close; + } + + case 2: + mes "^3355FFLet's investigate^000000"; + mes "^3355FFthis area a little^000000"; + mes "^3355FFmore first.^000000"; + close; + + } + + } + + else if (KielHyreQuest >= 30) { + mes "^3355FFWhat could the^000000"; + mes "^3355FFnumber 4772961^000000"; + mes "^3355FFmean? For now, you've^000000"; + mes "^3355FFfound everything that^000000"; + mes "^3355FFyou need from this place,^000000"; + mes "^3355FFso you should return to Elly.^000000"; + close; + } + + else { + end; + } + +} + +//============================================================================ + +//============================================================================ +// Robot Factory NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door +//---------------------------------------------------------------------------- +kh_dun01,235,48,0 script Heavy Door::HeavyDoorKHQ1 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + if (@KHInput$ == "Blue Keycard") { + mes "^3355FFYou've successfully^000000"; + mes "^3355FFopened the door.^000000"; + close2; + warp "kh_school",119,144; + end; + } + + else { + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + } + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door (These doors don't seem to serve any purpose) +//---------------------------------------------------------------------------- +kh_dun01,76,233,0 script Heavy Door::HeavyDoorKHQ2 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } + +} + +kh_dun01,106,233,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ3 111 +kh_dun01,6,164,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ4 111 +kh_dun01,6,133,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ5 111 +kh_dun01,6,60,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ6 111 +kh_dun01,6,30,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ7 111 +kh_dun01,6,18,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ8 111 +kh_dun01,235,70,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ9 111 +kh_dun01,235,92,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ10 111 +kh_dun01,235,114,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ11 111 + +//---------------------------------------------------------------------------- +// Beautiful Lady and Beautiful Lady copies. +//---------------------------------------------------------------------------- +kh_school,119,149,4 script Beautiful lady::BeatifulLadyKHQ1 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest < 40) { + mes "[Allysia]"; + mes "Hm? I don't think"; + mes "I know you. Kiel Hyre"; + mes "has only authroized Elly,"; + mes "and a trusted friend that"; + mes "may be helping her, to"; + mes "be admitted to this area."; + next; + mes "[Allysia]"; + mes "I cannot see ^FF0000Elly^000000"; + mes "Has she been attacked as well?"; + mes "Are you ^FF0000Elly's friend^000000?"; + next; + mes "[Allysia]"; + mes "I don't see Elly anywhere"; + mes "around here. I can only let"; + mes "you enter if you can identify"; + mes "youtself as Elly's friend."; + mes "Is there anything that you"; + mes "can present to me as proof?"; + next; + + switch(select("Yellow Keycard","Blue Keycard","Golden Key","Carved Button","...?")) { + + case 1: + break; + + case 2: + break; + + case 3: + mes "Ah, isn't this the"; + mes "key that Kiel Hyre gave"; + mes "to Elly? Yes, I'm convinced"; + mes "that you've been helping her."; + mes "I've been waiting for you, so"; + mes "let me guide you to my room."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + + case 4: + mes "[Allysia]"; + mes "Th-that's Kiehl's"; + mes "heal! Did he send you"; + mes "here to get me?! I'm"; + mes "not taking any changes!"; + close2; + cutin "",255; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + end; + + case 5: + mes "[Allysia]"; + mes "......"; + mes "........"; + mes "..........."; + close2; + cutin "",255; + end; + + } + + mes "[Allysia]"; + mes "Hm? This doesn't prove"; + mes "that Elly really trusts you..."; + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 40) { + mes "[Allysia]"; + mes "Please follow me."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + } +} + + +kh_school,117,149,4 script Beautiful lady::BeatifulLadyKHQ2 894,{ + end; +} + +kh_school,118,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ3 894 + +kh_school,120,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ4 894 + +kh_school,121,149,4 duplicate(BeatifulLadyKHQ1) Beautiful lady::BeatifulLadyKHQ5 894 + +//---------------------------------------------------------------------------- +// Beautiful Lady "Allysia" +//---------------------------------------------------------------------------- +kh_school,122,186,4 script Beautiful lady 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 38) { + mes "[Allysia]"; + mes "Friend of prototype Elly,"; + mes "I welcome you. As you may"; + mes "have figured out, I need your"; + mes "help. Kiel Hyre is being help"; + mes "somewhere inside this factory."; + next; + mes "[Allysia]"; + mes "It is imperative that"; + mes "you search for Kiel Hyre"; + mes "and rescue him as soon"; + mes "as you possibly can!"; + next; + + switch(select("What is this factory?","What happened to ^FF0000Kiel Hyre^000000?")) { + + case 1: + mes "[Allysia]"; + mes "This factory is part of"; + mes "the Kiel Hyre Foundation's"; + mes "secret business where humanoid"; + mes "robots are manufactured. Myself,"; + mes "and all of the academy's students"; + mes "are actually robots, not humans."; + next; + mes "[Allysia]"; + mes "The Kiel Hyre Foundations's"; + mes "ultimate goal is to develop"; + mes "superior robots that will help"; + mes "human society. As robots, we"; + mes "can handle tasks that are too"; + mes "dangerous or difficult for humans."; + break; + + case 2: + mes "[Allysia]"; + mes "^3355FFKiehl^000000 has proceeded to"; + mes "proform abnormal modifications"; + mes "to the humanoid robots. This"; + mes "has been reported to Kiel Hyre,"; + mes "who has left to stop Kiehl."; + mes "However, Hyre hasn't returned."; + next; + mes "[Allysia]"; + mes "Fearing that Kiehl would"; + mes "break me, Kiel Hyre brought"; + mes "a copy of me instead. I can still"; + mes "detect Kiel Hyre's heartbeat,"; + mes "so he should be alright, but his"; + mes "own son might harm him soon."; + next; + mes "[Allysia]"; + mes "Take this Keycard"; + mes "which will enable you"; + mes "to enter the secret areas"; + mes "inside this factory. If you"; + mes "locate Kiel Hyre, please"; + mes "let me know right away."; + getitem 7496,1; //Red_Keycard + set KielHyreQuest,40; + break; + + } + + close2; + cutin "",255; + end; + + } + + else if (KielHyreQuest == 40) { + mes "[Allysia]"; + mes "I can still detect"; + mes "Kiel Hyre's heartbeat,"; + mes "but his sone Kiehl might"; + mes "do something desperate to"; + mes "him soon. Please locate Kiel"; + mes "Hyre before that can happen!"; + close2; + cutin "",255; + warp "kh_dun01",22,216; + end; + } + + else if (KielHyreQuest == 42) { + mes "[Allysia]"; + mes "Have you already"; + mes "located Kiel Hyre?"; + next; + mes "^3355FFYou tell Allysia where^000000"; + mes "^3355FFKiel Hyre has been locked^000000"; + mes "^3355FFup, and give her the metal^000000"; + mes "^3355FFfragment that Kiel Hyre handed^000000"; + mes "^3355FFto you. She took fragment^000000"; + mes "^3355FFand wore it around her wrist.^000000"; + next; + mes "[Allysia]"; + mes "...Kiel Hyre's secret code"; + mes "confirmed. B_2_3 area."; + mes "Vital signs are normal."; + mes "Envelope recieved. Sending"; + mes "Modified Puppet Designs..."; + next; + mes "[Allysia]"; + mes "Alright, I've recieved"; + mes "Kiel Hyre's orders, and"; + mes "must carry them out..."; + set KielHyreQuest,44; + delitem 7497,1; //Metal_Fragment + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest == 44) { + mes "[Allysia]"; + mes "Alright, I have a mission"; + mes "to carry out for Kiel Hyre,"; + mes "and I don't have much time."; + mes "Let me give you some specific"; + mes "instructions very quickly."; + next; + mes "[Allysia]"; + mes "Firstly, I need to take your"; + mes "keycards for security reasons."; + mes "Secondly, meet me at the Kiel"; + mes "Hyre Mansion in Lighthalzen."; + mes "Present the Golden Key to"; + mes "be admitted to the premises"; + delitem 7492,1; //Yellow_Keycard + delitem 7495,1; //Blue_Keycard + delitem 7496,1; //Red_Keycard + set KielHyreQuest,46; + next; + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 44) { + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + +} + +//---------------------------------------------------------------------------- +// Signboard (another useless NPC?) +//---------------------------------------------------------------------------- +kh_dun01,163,223,0 script Signboard 857,{ + mes "[Notice]"; + mes "Cute Pets are prohibited"; + mes "in this area. (Cute Pets that"; + mes "provide special assistance"; + mes "to the visually impaired are"; + mes "exempt from this rule.)"; + close; +} + +//---------------------------------------------------------------------------- +// Mechanical Devices for accessing restricted area +//---------------------------------------------------------------------------- +kh_dun01,166,223,0 script Mechanical Device::KHKeyardReader 111,{ + if ((KielHyreQuest <= 38) || (KielHyreQuest >= 44)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + close; + } + + else if ((KielHyreQuest == 40) && (countitem(7496) >= 1)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + next; + + + input @KHInput$; + if (@KHInput$ == "Red Keycard") { + mes "^3355FFThe door opens once^000000"; + mes "^3355FFyou insert the Red Keycard..^000000"; + close2; + warp "kh_dun01",170,227; + end; + } + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + +} + +kh_dun01,162,206,0 duplicate(KHKeyardReader) Mechanical Device 111 + +//---------------------------------------------------------------------------- +// Keep monsters out of the quest area. +// Silly really sinc ehte rest of it's a dungeon +//---------------------------------------------------------------------------- +//kh_dun01,180,220,0 script Monster Warp#kh1::KHMobWarp -1,5,20,{ +//OnTouchNPC: +// warp "kh_dun01",178,138; +// end; +//} + +//kh_dun01,190,220,0 duplicate(KHMobWarp) Monster Warp#kh2 -1,5,20 +//kh_dun01,200,250,0 duplicate(KHMobWarp) Monster Warp#kh3 -1,5,20 +//kh_dun01,210,220,0 duplicate(KHMobWarp) Monster Warp#kh4 -1,5,20 +//kh_dun01,220,220,0 duplicate(KHMobWarp) Monster Warp#kh5 -1,5,10 + +//---------------------------------------------------------------------------- +// Kiel Hyre - OnTouch +//---------------------------------------------------------------------------- +kh_dun01,224,233,0 script Kiel_Hyre_Door -1,5,5,{ +OnTouch: + if (KielHyreQuest == 40) { + mes "^3355FFyou can faintly hear^000000"; + mes "^3355FFa voice from the other^000000"; + mes "^3355FFside of this door.^000000"; + next; + mes "[????]"; + mes "...Kiehl..."; + mes "...How dare you...!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Mister Kiel Hyre?"; + mes "Is that you in there?"; + next; + mes "[Kiel Hyre]"; + mes "Wh-who's there?"; + mes "Identify yourself!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm... I'm..."; + next; + mes "You explain your story^000000"; + mes "to the voice behind the^000000"; + mes "door, and tell him what^000000"; + mes "happened to Elly and Allysia.^000000"; + next; + mes "[Kiel Hyre]"; + mes "...Yes... It's me."; + mes "I'm Kiel Hyre, trapped"; + mes "in here. He went so far"; + mes "as to modify Elly, eh?"; + mes ".................."; + next; + mes "[Kiel Hyre]"; + mes "Hurry, take this"; + mes "module to Allysia!"; + mes "She'll know what to do"; + mes "with it. If you're really"; + mes "helping us, then she'll have"; + mes "some instructions for you too."; + next; + mes "^3355FFKiel Hyre slides^000000"; + mes "^3355FFa strange metal^000000"; + mes "^3355FFfragment through^000000"; + mes "^3355FFthe gap between the^000000"; + mes "^3355FFdoor and the floor.^000000"; + getitem 7497,1; //Metal_Fragment + set KielHyreQuest,42; + close; + } + + + else if (KielHyreQuest >= 42) { + mes "[Kiel Hyre]"; + mes "......"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Robot Factory Second Floor Entrances +//---------------------------------------------------------------------------- +kh_dun01,44,203,0 script Entrance Device#KHEntry1::KHAccess 111,{ + if (countitem(7509) < 1) { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + close; + } + + else { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + next; + + input @KHInput$; + if (@KHInput$ == "Luxurious Keycard") { + mes "^3355FFAs you insert the"; + mes "Luxurious Keycard"; + mes "into the keycard slot,"; + mes "the door swings open"; + mes "to reveal a long flight"; + mes "of descending stairs.^000000"; + next; + + switch(select("Descend Stairs","Cancel")) { + + case 1: + warp "kh_dun02",41,198; + end; + + case 2: + mes "^3355FFIt looks like this door"; + mes "has automatically closed"; + mes "after the preprogrammed"; + mes "time limit has elapsed.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + } + +} + +kh_dun01,36,195,0 duplicate(KHAccess) Entrance Device#KHEntry2 111 + +//============================================================================ + +//============================================================================ +// Kiel Hyre Mansion NPCs, and Kiehl's Room NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiel's Steward +//---------------------------------------------------------------------------- +kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ + if (KielHyreQuest < 46) { + mes "[Steward]"; + mes "This is a private residence,"; + mes "please leave."; + close2; + warp "lighthalzen",188,201; + end; + } + + if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) { + mes "[Steward]"; + mes "Greetings."; + mes "Have you been invited"; + mes "by the master of"; + mes "this mansion?"; + next; + + switch(select("Present Golden Key","????")) { + + case 1: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "I've been expecting your"; + mes "arival. Please, this way."; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "If you have not been"; + mes "invited by the master of"; + mes "this mansion, then I'm"; + mes "afraid that I must insist on"; + mes "your immediate departure!"; + close2; + warp "lightalzen",188,201; + end; + + } + + } + + if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + L_SeeKielHyre: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Very well."; + mes "Please make"; + mes "yourself at home."; + close; + + } + + } + + if ((KielHyreQuest == 52) || (KielHyreQuest == 54) || (KielHyreQuest >= 64) && (KielHyreQuest <= 70)) { + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master, or...?"; + next; + + switch(select("^FF0000Kiel Hyre^000000","^3355FFMitchell^000000")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Oh...? You must."; + mes "be here to deliver"; + mes "good news. Excuse me..."; + next; + mes "^3355FFThe Steward furtively^000000"; + mes "^3355FFlooked around to check^000000"; + mes "^3355FFif anyone is watching him.^000000"; + next; + mes "[Steward]"; + mes "I believe it should"; + mes "be save enough to let"; + mes "you go see him now..."; + mes "Please, hurry this way."; + close2; + warp "kh_mansion",20,87; + end; + + } + + } + + if (KielHyreQuest >= 70) { + goto L_SeeKielHyre; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre +//---------------------------------------------------------------------------- +kh_mansion,22,28,4 script Kiel Hyre 903,{ + cutin "kh_kyel02",2; + if (KielHyreQuest < 46) { + mes "[Kiehl Hyre]"; + mes "........."; + close; + } + + else if (KielHyreQuest == 46) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Ah, you must be "+strcharinfo(0)+"."; + mes "I'd like to thank you for saving"; + mes "my life. You must have many"; + mes "questions to ask me, so I'll"; + mes "do my best to give you answers."; + next; + + L_Menu: + + switch(select("Robots?","^3355FFKiehl^000000?","^FF0000Elly^000000's button?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I've been researching"; + mes "robotics for thirty-two"; + mes "years now. I'm proud to"; + mes "say that I've succeeded"; + mes "where the great Sage"; + mes "Varmundt did not."; + next; + mes "[Kiel Hyre]"; + mes "It's been my dream to"; + mes "develop humanoid robots"; + mes "from humans. Those Guardians"; + mes "might be robots too, but they"; + mes "don't operate using free will."; + next; + mes "[Kiel Hyre]"; + mes "If you'd like to know more"; + mes "of the specifics concerning"; + mes "robotics, why don't you speak"; + mes "with ^3355FFAllysia^000000? She can explain"; + mes "everything much more succinctly"; + mes "than I can. I tend to ramble..."; + if (@KHQ1Read < 1) { set @KHQ1Read,1; } + break; + + case 2: + mes "[Kiel Hyre]"; + mes "^3355FFKiehl^000000 is my only son,"; + mes "but the love of my life"; + mes "died after giving birth to"; + mes "him. I'll admit that he's"; + mes "a genius in mechanical"; + mes "design and development."; + next; + mes "[Kiel Hyre]"; + mes "He's largely responsible"; + mes "for the creation of Third"; + mes "Generation robots like Elly."; + mes "Unfortunately, he's trying to"; + mes "modify his creations for"; + mes "some sinister purpose."; + next; + mes "[Kiel Hyre]"; + mes "I tried to stop him,"; + mes "but I ended up getting"; + mes "locked inside the factory."; + mes "I don't know why he wants"; + mes "to do this. I still have"; + mes "absolutely no clue..."; + if (@KHQ2Read < 1) { set @KHQ2Read,1; } + break; + + case 3: + mes "[Kiel Hyre]"; + mes "That button Elly was"; + mes "holding has ^3355FFKiehl's emblem^000000"; + mes "engraved on it. Ah, and that"; + mes "man in black menacing the"; + mes "students? That was probably"; + mes "^3355FFKaiser^000000, Kiehl's bodyguard."; + next; + mes "[Kiel Hyre]"; + mes "Kaiser..."; + mes "I don't know"; + mes "anything about him."; + mes "I've never even seen"; + mes "his face! Kiehl just hired"; + mes "him without letting me know..."; + if (@KHQ3Read < 1) { set @KHQ3Read,1; } + break; + + } + + if ((@KHQ1Read == 1) && (@KHQ2Read == 1) && (@KHQ3Read == 1)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + delitem 7493,1; //Golden_Key + delitem 7494,1; //Exquisite_Button + set KielHyreQuest,48; + } + + else { + next; + goto L_Menu; + } + + } + + else if (KielHyreQuest == 48) { + mes "Ah, I almost forgot."; + mes "Please, take this as"; + mes "a little reward for"; + mes "saving my life."; + set KielHyreQuest,50; + getitem 12105,1; //Taming_Gift_Set + getexp 700000,0; + } + + else if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + } + + else if (KielHyreQuest == 64) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Hm? Did you"; + mes "have something"; + mes "that you wanted"; + mes "to ask me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't have enough"; + mes "concrete evidence yet,"; + mes "but I might have some"; + mes "questions soon enough."; + } + + else if (KielHyreQuest == 68) { + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Ah, "+strcharinfo(0)+"."; + mes "It's you. So how can"; + mes "I help you today?"; + next; + + switch(select("About ^3355FFAllysia^000000...")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "You know, I was looking"; + mes "through this deserted house"; + mes "in Juno, and discovered"; + mes "an old portrait of a woman"; + mes "that looks just like Allysia."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Oh..."; + mes "Is that all?"; + mes "I thought you had"; + mes "a robotics question."; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Anyway, that's a"; + mes "strange coincidence."; + mes "Well, I suppose it's"; + mes "not so strange to find"; + mes "look-a-likes for other people..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't think it's just"; + mes "a coincidence. The woman"; + mes "in that thirty year old portrait"; + mes "was also named Allysia, and she"; + mes "worked at Orsimier street"; + mes "in Juno. Does that ring a bell?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Then I thought that this"; + mes "Allysia must have been the"; + mes "woman that you loved, and"; + mes "that you based your robot's"; + mes "apperance on her."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "I think this is what happened:"; + mes "when you were a young, poor"; + mes "man, you fell in love with"; + mes "Allysia. However, she was"; + mes "in love with Rosimier, who"; + mes "was rich and powerful."; + next; + mes "["+strcharinfo(0)+"]"; + mes "However, Rosimier was"; + mes "betrothed to some other"; + mes "woman, and he ended up"; + mes "marrying his fiancee, thus"; + mes "breaking Allysia's heart."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Feeling betrayed, her"; + mes "heart broken, Allysia jumped"; + mes "into a river. Then, you decided"; + mes "to get revenge on Rosimier, so"; + mes "you ended up joining"; + mes "Rekenber Corporation!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hahahahahahaha!"; + mes "Oh, what an imagination~"; + mes "That's bery ridiculous..."; + mes "Though, I admit, maybe"; + mes "I did design Allysia after"; + mes "seeing that woman long ago."; + next; + mes "[Kiel Hyre]"; + mes "I'd almost forgotten"; + mes "about her! I think we"; + mes "were friends... Though,"; + mes "where did you get the idea"; + mes "that I might have"; + mes "been in love with her?"; + next; + + switch(select("Reveal Kiel's Portrait from Hut")) { + + case 1: + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Wh-what..."; + mes "How did..."; + mes "Where did you...?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre, I found this"; + mes "portrait of you as a young"; + + mes "man from the house of the"; + mes "man that bought Allysia's ring."; + mes "I even spoke to the fisherman"; + mes "that discovered Allysia's body."; + next; + mes "["+strcharinfo(0)+"]"; + mes "You paid an awful lot"; + mes "of money to buy Allysia's"; + mes "ring. How can you not tell"; + mes "me that you didn't love her?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "*Sigh...*"; + mes "You got me, you got me."; + mes "I didn't want you to learn"; + mes "the truth. You are correct."; + mes "I loved Alysia, and designed"; + mes "my robot to look jus tlike her."; + next; + mes "[Kiel Hyre]"; + mes "I could never forget her."; + mes "Ever. But I would never"; + mes "do anything to harm the"; + mes "Rosimiers! I'm a scientist!"; + mes "I hated him when I was young,"; + mes "but things are different now!"; + next; + mes "[Kiel Hyre]"; + mes "I shed no tears when the"; + mes "Rosimiers fell, but I wasn't"; + mes "responsible. Besides, I didn't"; + mes "have the resources or the"; + mes "capability to cause it..."; + next; + cutin "kh_kyel02",2; + mes "["+strcharinfo(0)+"]"; + mes "I'm afraid that the"; + mes "evidence shows otherwise."; + next; + + switch(select("Reveal Portait of Rosimiers")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at this portrait that"; + mes "I found at the Rosimiers'"; + mes "old house. Do you see"; + mes "anything... incriminating?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "ASide from that"; + mes "James Rosimier, you"; + mes "mean? No! I don't see"; + mes "anything wrong with"; + mes "this picture at all."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at the pocketwatch"; + mes "in the portrait. That's"; + mes "the pocketwatch you"; + mes "wear today, isn't it?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "...!!!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "You might not have caused"; + mes "the downfall of the Rosimiers"; + mes "yourself, but with the aid of"; + mes "the Rekenber Corporation, I'd"; + mes "say it was entirely possible!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Well played, adventurer."; + mes "Well played. I don't regret"; + mes "what I did: they killed my"; + mes "Allysia! If James didn't betray"; + mes "her, if only he didn't drive"; + mes "her to commit suicide..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "That's where you're wrong!"; + mes "Allysia was killed, she didn't"; + mes "commit suicide. Take a good"; + mes "look at this note right here!"; + next; + mes "[Kiel Hyre]"; + mes "What?!"; + next; + + switch(select("Show James's Note")) { + + case 1: + mes "[Kiel Hyre]"; + mes "What does this prove?"; + mes "This doesn't show that"; + mes "James didn't betray Allysia."; + mes "How does this change anything?"; + mes "She's dead, nothing I can do"; + mes "will bring her back to me!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I never said James didn't"; + mes "betray her. Look at the date"; + mes "on the note. James made plans"; + mes "to run away with her on August"; + mes "20th. However, her body was"; + mes "found on the same day."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ergo, Allysia must have"; + mes "died on August 19th. If she"; + mes "was planning to run away with"; + mes "her love on the next day, then"; + mes "she had no reason to kill herself!"; + next; + mes "[Kiel Hyre]"; + mes "No, that's not right!"; + mes "She probably couldn't"; + mes "trust me! She must have"; + mes "realized she was nothing"; + mes "but another toy to him!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Oh yeah? I say she jumped"; + mes "into the river because you"; + mes "met her on that day. Now,"; + mes "take a good look at this!"; + next; + + switch(select("Show K.H.'s note")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "This note was written by"; + mes "a man with your initials,"; + mes "K.H. These initials were also"; + mes "signed on her portrait. You"; + mes "must have written this note:"; + mes "there's too many coincidences!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "According to this note,"; + mes "you told Allysia that you"; + mes "wanted to see her again"; + mes "at the place you first med."; + mes "I think you did see her again..."; + mes "on August 19th, the day she died!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm assuming the place you"; + mes "two first met was near the"; + mes "river. No more of your lies:"; + mes "well me what really happened!"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + mes "........."; + mes "......"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hah... Ha ha ha..."; + mes "Yes... That's right..."; + mes "That horrible night."; + mes "I remember it well..."; + mes "....................."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "That night, when she came"; + mes "to the river to meet me as"; + mes "I had asked, I begged her to"; + mes "run away with me, instead"; + mes "of waiting for that James."; + next; + mes "[Kiel Hyre]"; + mes "She insisted that James"; + mes "never betrayed her, and he"; + mes "promised to take her away"; + mes "with him the next day. Can"; + mes "you imagine how that made"; + mes "me feel? I was nothing to her."; + next; + mes "[Kiel Hyre]"; + mes "My feelings didn't matter to"; + mes "her at all! She kept fidgeting"; + mes "with that ring...I lost control"; + mes "and tried to take that damned"; + mes "thing away from her, and"; + mes "throw it into the river..."; + next; + mes "[Kiel Hyre]"; + mes "But you know what?"; + mes "She struggled, she actually"; + mes "fought me! It was just a small"; + mes "fight, but then, before I knew"; + mes "it, the ground underneath us"; + mes "collapsed and... the rains..."; + next; + + switch(select(".........")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I'm not sure what it"; + mes "was. The rain weakened"; + mes "the ground, something went"; + mes "wrong... and she just... just..."; + mes "The river swallowed her..."; + mes "I felt empty. She was gone. "; + set KielHyreQuest,70; + delitem 7498,1; //Losimier's_House_Key + delitem 7499,1; //Portrait_of_a_Family + delitem 7500,1; //Portrait_of_a_Lady + delitem 7501,1; //K.H's_Letter + delitem 7502,1; //James's_Memo + delitem 7503,1; //Portrait_of_a_Guy + close; + + } + + } + + } + + } + + } + + } + + } + + else if (KielHyreQuest == 70) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You already know that"; + mes "she was found dead the"; + mes "next day. But what really"; + mes "broke my heart was that"; + mes "she held that ring so tightly"; + mes "in her hand, even in death..."; + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "His family had everything"; + mes "while I had nothing. And"; + mes "he had the audacity to take"; + mes "Allysia away from me?!"; + mes "How could that be right?"; + next; + mes "[Kiel Hyre]"; + mes "Even though she had passed"; + mes "away, I still wanted to prove"; + mes "to Allysia what kind of ugly"; + mes "person James really was."; + mes "That was when I joined the"; + mes "Rekenber Corporation."; + next; + mes "[Kiel Hyre]"; + mes "I designed the very first"; + mes "First Generation Robot, which"; + mes "I named Allysia, and sold the"; + mes "designs to Rekenber. I gave them"; + mes "robots, and they gave me money,"; + mes "power, obedient subordinates."; + next; + mes "[Kiel Hyre]"; + mes "Of course I knew they'd use"; + mes "my robots for spying and killing!"; + mes "But you know what? It didn't"; + mes "matter so long as they gave me"; + mes "the means to my revenge. It was"; + mes "the perfect partnership, really."; + next; + mes "[Kiel Hyre]"; + mes "You've got me right"; + mes "where you want me."; + mes "Who are you working"; + mes "for, and what exactly"; + mes "do you want? My designs?"; + mes "My death? Everything...?"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Actually, I just want"; + mes "to ask about the nature"; + mes "of your professional"; + mes "relationship with the"; + mes "Rekenber Corporation."; + mes "And about Kiehl."; + next; + mes "[Kiel Hyre]"; + mes "Kiehl, eh? After hearing"; + mes "my crazy story, I'm guessing"; + mes "that you already suspect the"; + mes "truth about him... He's also"; + mes "a robot, specifically the first"; + mes "of the Second Generation models."; + next; + mes "[Kiel Hyre]"; + mes "His mind was developed using."; + mes "an experimental, and unstable,"; + mes "form of the Condensed Magic"; + mes "Spell Scrolls. He was the only"; + mes "Second Generation robot that"; + mes "I was allowed to keep."; + next; + mes "[Kiel Hyre]"; + mes "I've become very attached"; + mes "to Kiehl. It's not surprising,"; + mes "seeing that robotics have"; + mes "become my life. I even raised"; + mes "him as my own son, and taught"; + mes "him everything about robotics"; + next; + mes "[Kiel Hyre]"; + mes "Kiehl is now a genius,"; + mes "and has even developed the"; + mes "Third Generation of robots."; + mes "Unfortunately, I failed to"; + mes "properly raise him with"; + mes "human morals and ethics."; + next; + + switch(select("......")) { + + case 1: + mes "[Kiel Hyre]"; + mes "He's been transforming"; + mes "the Third Generation robots"; + mes "into killing machines. That's"; + mes "why I tried to put them all"; + mes "into the academy, so they"; + mes "could learn human behavior."; + next; + mes "[Kiel Hyre]"; + mes "Although the academy"; + mes "has delayed Kiehl's plans,"; + mes "he has succeeded into"; + mes "converting all of the robots"; + mes "into uncontrollable engines"; + mes "of mass destruction."; + next; + mes "[Kiel Hyre]"; + mes "Yes, he's been working"; + mes "closely with Rekenber."; + mes "Their true objective is to"; + mes "create killing machines"; + mes "for Rekenber's use."; + next; + mes "[Kiel Hyre]"; + mes "You know all the secrets"; + mes "of my past now. I'm not"; + mes "upset with you or anything,"; + mes "but I do have something"; + mes "that I want to ask of you."; + next; + mes "[Kiel Hyre]"; + mes "Please! Stop Kiehl!"; + mes "I don't want his madness"; + mes "to destroy any more robots!"; + mes "I see each and every one"; + mes "of them as one of my children!"; + next; + mes "[Kiel Hyre]"; + mes "I know that I must take"; + mes "full responsibility for all"; + mes "that has happened. I promise"; + mes "to take any punishment for"; + mes "my actions once everything"; + mes "has been resolved."; + + next; + + switch(select("Accept","Okay","Nod")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + } + + mes "[Kiel Hyre]"; + mes "Thank you so much!"; + mes "You can find Kiehl"; + mes "in the underground"; + mes "level in this mansion."; + set KielHyreQuest,72; + + } + + } + + else if (KielHyreQuest == 72) { + cutin "kh_kyel01",2; + //I believe this text goes here o_o + mes "[Kiel Hyre]"; + mes "He stays in the old room"; + mes "where he was created, but"; + mes "he reconstructed it as some"; + mes "kind of cave to keep everyone"; + mes "out, including me. Yes, he"; + mes "doesn't trust anyone anymore..."; + next; + mes "[Kiel Hyre]"; + mes "When you find him, I want"; + mes "you to take out Allysia's"; + mes "ring out of his heart. If you"; + mes "remove it, that should stop"; + mes "him from going berserk."; + next; + + switch(select("Allysia's Ring?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "Yes... Her ring is the"; + mes "beginning of everything"; + mes "I put that in his heart so"; + mes "that I'd never forget what"; + mes "the Rosimiers did to me."; + next; + mes "[Kiel Hyre]"; + mes "I think Kiehl's grown"; + mes "so powerful that normal"; + mes "weapons might not work"; + mes "on him anymore. Use this"; + mes "device that will cause his"; + mes "power supply to fluctuate."; + getitem 7504,1; //Power_Source + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "If you successfully attach"; + mes "this to Kiehl's body, then"; + mes "he won't be able to use his"; + mes "body's full power. While he's"; + mes "weakened, open up his chest"; + mes "and get the ring from his heart."; + next; + mes "[Kiel Hyre]"; + mes "Let me know once"; + mes "you're ready. Then, I'll"; + mes "guide you Kiehl's room."; + set KielHyreQuest,74; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 104)) { + mes "[Kiel Hyre]"; + mes "Are you ready"; + mes "to confront"; + mes "Kiehl now?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Kiel Hyre]"; + mes "There... the secret"; + mes "passage is open now."; + mes "Just go to the right of"; + mes "me, but be careful. Kiehl"; + mes "is extremely dangerous."; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + break; + + case 2: + mes "[Kiel Hyre]"; + mes "Please take your"; + mes "time. I imagine that"; + mes "it won't be easy."; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You're back...!"; + mes "So were you able"; + mes "to retrieve Allysia's"; + mes "Ring from Kiehl's heart?"; + next; + + if (countitem(7508) < 1) { + mes "[Kiel Hyre]"; + mes "You mean... You don't have it?"; + mes "Please, retrieve Allysia's Ring"; + mes "from Kiehl's heart!"; + next; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + close2; + cutin "",255; + } + + mes "[Kiel Hyre]"; + mes "Wh-what happened...?"; + mes "Kiehl developed a new"; + mes "body for himself? Th-that"; + mes "would make him a Fourth"; + mes "Generation robot. I had"; + mes "no idea he was this smart."; + next; + mes "[Kiel Hyre]"; + mes "Wait, now that I think about"; + mes "it, I did see robot bodies that"; + mes "looked like Kiehl when I was"; + mes "locked in the factory. So he"; + mes "was using those copies to"; + mes "develop personal upgrades."; + next; + mes "[Kiel Hyre]"; + mes "Here, please take this"; + mes "Keycard which will let you"; + mes "enter and investigate the"; + mes "deepest levels of the factory."; + mes "I'll investigate Kiehl's room."; + set KielHyreQuest,108; + getitem 7509,1; //Gorgeous_Keycard + next; + + if (sex == 0) { + if (getpartnerid() == 0) set @KHTitle$,"Miss"; + else set @KHSTitle$,"Mrs"; + } + else set @KHTitle$,"Mr"; + + mes "[Kiel Hyre]"; + mes "Kiehl is my responsibility..."; + mes "No matter what the cost may"; + mes "be, I've got to stop him! Oh,"; + mes "and here, please take this"; + mes "with my thanks for all of"; + mes "your help, "+@KHTitle+". "+strcharinfo(0)+"."; + getitem 616,1; //Old card Album + delitem 7508,1; //Elisia's_Ring + getexp 1000000,0; + } + + else if (KielHyreQuest >= 108) { + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + + +//---------------------------------------------------------------------------- +// Allysia +//---------------------------------------------------------------------------- +kh_mansion,18,30,4 script Allysia 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 68) { + mes "[Allysia]"; + mes "Who are you?"; + mes "How did you get here?"; + mes "Go away"; + close; + } + + else if (KielHyreQuest < 70) { + mes "[Allysia]"; + mes "You must be surprised"; + mes "by everything that's been"; + mes "happening. Maybe everything"; + mes "would be easier to understand"; + mes "if I explained about robots?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Allysia]"; + mes "The robots you've been"; + mes "encountering are automated"; + mes "mechanical puppets that can"; + mes "independantly think and operate."; + mes "Many sages have tried to develop"; + mes "their own robots, but have failed."; + next; + mes "[Allysia]"; + mes "My master, Kiel Hyre, has"; + mes "been studying robotics since"; + mes "he was twenty years old, and"; + mes "has developed three different"; + mes "generations of robots, the first,"; + mes "second, and third generations."; + next; + + switch(select("First Generation","Second Generation","Third Generation")) { + + case 1: + mes "[Allysia]"; + mes "I am a good example of one"; + mes "of Kiel Hyre's First Generation"; + mes "robots. I was constructed using"; + mes "a heavy mechanical framework,"; + mes "a robotic heart, and chemically"; + mes "synthesized skin covering."; + next; + mes "[Allysia]"; + mes "My central processing unit,"; + mes "equivilent to your brain, is"; + mes "essentially a Memory Scroll"; + mes "based on the design of the"; + mes "Magic Spell Scrolls that you"; + mes "adventurers use in battle."; + next; + mes "[Allysia]"; + mes "I'm the oldest type of"; + mes "humanoid robot, so I weigh"; + mes "a lot, and my mind can only"; + mes "process a limited amount of"; + mes "data. Therefore, I can't express"; + mes "emotion similarly to a human."; + break; + + case 2: + mes "[Allysia]"; + mes "The First Generation robots"; + mes "were developed from mostly"; + mes "mechanical parts, but the"; + mes "Second Generation robots"; + mes "incorporated Homunculus"; + mes "science and technology."; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "are more life-like since they"; + mes "have artifically created skin"; + mes "and flesh, although they still"; + mes "are constructed from a heavy"; + mes "mechanical framework."; + next; + mes "[Allysia]"; + mes "Sage elemental scroll"; + mes "technology was also used"; + mes "to develop the Condensed"; + mes "Memory Scroll, a central"; + mes "processing unit superior to that"; + mes "used in First Generation robots."; + next; + mes "[Allysia]"; + mes "Although Condensed Memory"; + mes "Scrolls were 100,000 times"; + mes "more powerful than ordinary"; + mes "Memory Scrolls, they were"; + mes "problematic and were prone"; + mes "to too many error problems"; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "were capable of expressing"; + mes "human-like emotion, but their"; + mes "production halted after six"; + mes "years because they were"; + mes "considered faulty."; + break; + + case 3: + mes "[Allysia]"; + mes "Third Generation robots"; + mes "were mostly designed by"; + mes "Kiel Hyre's son, Kiehl,"; + mes "and don't use a mechanical"; + mes "framework at all: the entire"; + mes "body is basically a homunculus."; + next; + mes "[Allysia]"; + mes "With their organic bodies"; + mes "and advanced artificial hearts"; + mes "make from imitation Ymir Heart"; + mes "Pieces, they can experience"; + mes "physiologic phenomena"; + mes "just like ordinary humans."; + next; + mes "[Allysia]"; + mes "Kiehl was able to develop"; + mes "a more stable form of the"; + mes "Condensed Memory Scroll"; + mes "which does not suffer from"; + mes "critical errors, and can be"; + mes "cheaply mass processed."; + next; + mes "[Allysia]"; + mes "Elly is actually a Third"; + mes "Generation prototype. Once"; + mes "we optimize the prototypes,"; + mes "we will begin mass production."; + mes "In fact, the academy is our"; + mes "prototype testing ground."; + next; + mes "[Allysia]"; + mes "The fact that out prototype"; + mes "robots can interact just like"; + mes "real humans is proof of our"; + mes "success in robotics."; + break; + + } + case 2: + mes "[Allysia]"; + mes "Please let me know if"; + mes "you'd like to learn more"; + mes "about Kiel Hyre's robots."; + break; + + } + + } + + else if (KielHyreQuest >= 70) { + mes "[Allysia]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Abduction triggering NPC +//---------------------------------------------------------------------------- +lighthalzen,188,200,0 script Abduction_trigger -1,3,1,{ +OnTouch: + if (KielHyreQuest == 50) { + mes "^3355FFAs you walked out of^000000"; + mes "^3355FFthe mansion, something^000000"; + mes "^3355FFsmashed the top of your^000000"; + mes "^3355FFhead, and you instnatly^000000"; + mes "^3355FFlose consiousness...^000000"; + close2; + percentheal -99,0; + warp "kh_mansion",30,75; + end; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Mysterious Woman "Mitchell Layla" +//---------------------------------------------------------------------------- +kh_mansion,25,79,4 script Mysterious Woman 727,3,3,{ +L_StartDialog: + if (KielHyreQuest == 50) { + mes "^3355FFYou awaken with your^000000"; + mes "^3355FFhead painfully throbbing,^000000"; + mes "^3355FFand a mysterious woman^000000"; + mes "^3355FFstanding infront of you.^000000"; + next; + mes "[??????]"; + mes "Hm? Oh, you're awake"; + mes "earlier than I though."; + mes "You must feel confused,"; + mes "but listen carefully. If you"; + mes "don't, then I can't guarantee"; + mes "your safety, okay? Alright."; + next; + mes "[??????]"; + mes "All you need to know it"; + mes "that I'm a secret agent for"; + mes "the Schwaltzvalt Republic"; + mes "government. We're investigating"; + mes "abnormal activity between Kiel"; + mes "Hyre and the Rekenber Corporation."; + next; + mes "[??????]"; + mes "We saw you enter the"; + mes "mansion and speak to"; + mes "Kiel Hyre, so basically"; + mes "you're here for questioning."; + mes "Now tell me the truth. How"; + mes "do you know Kiel Hyre?"; + next; + + switch(select("I'll tell you everything!","I don't know nuthin'!")) { + + case 1: + goto L_TellEverything; + break; + + case 2: + mes "[??????]"; + mes "Don't...know...nuthin'?"; + mes "You sure about that? Only"; + mes "a select few can even speak"; + mes "with Kiel Hyre in person. You"; + mes "must have some connection"; + mes "to him. I'm right, aren't it?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[??????]"; + mes "Are you trying to protect"; + mes "him? I think that you might"; + mes "not understand what kind of"; + mes "person you're really dealing"; + mes "with here. I'll tell you what"; + mes "I've learned about him..."; + next; + mes "[??????]"; + mes "Kiel Hyre. CEO of the"; + mes "Kiel Hyre Foundation,"; + mes "manufacturer of various"; + mes "machinery. His company started"; + mes "as a small Einbroch store whose"; + mes "technology slowly grew famous."; + next; + mes "[??????]"; + mes "Rekenber Corperation offered"; + mes "a merger with the Kiel Hyre"; + mes "Foundation. We're still not"; + mes "sure why they wanted Kiel"; + mes "Hyre in particular to repair"; + mes "and develop their Guardians..."; + next; + mes "[??????]"; + mes "We're also not sure why"; + mes "they wanted to suddenly"; + mes "focus more on Guardian"; + mes "development. Then, all"; + mes "of a sudden, Kiel Hyre's son"; + mes "appears from out of nowehre."; + next; + mes "[??????]"; + mes "It's very suspicious."; + mes "There's no records of his"; + mes "birth or anything. Still, maybe"; + mes "Kiel Hyre really did have him"; + mes "with his secretary, Allysia."; + mes "Well, no one is really sure."; + next; + mes "[??????]"; + mes "In any case, Kiel Hyre's"; + mes "son and heir, Kiehl, helped"; + mes "his father establish this"; + mes "special academy as their"; + mes "way of giving back t society."; + next; + mes "[??????]"; + mes "Almost every corporation and"; + mes "organization tried to get their"; + mes "spies to enter this academy,"; + mes "but all of them were rejected."; + mes "it's strange. At least one of"; + mes "them should have made it in."; + next; + mes "[??????]"; + mes "And recently, Kiehl Hyre"; + mes "has held a secret meeting with"; + mes "Rekenber executives to announce"; + mes "his new project. He intends to"; + mes "create advanced humanoid robots"; + mes "that will replace guardians!"; + next; + mes "[??????]"; + mes "Our spies reported that"; + mes "Kiel Hyre was nowhere to"; + mes "be seen at that meeting,"; + mes "as well as his trusted"; + mes "secretary, Allysia. He..."; + mes "He just disappeared!"; + next; + mes "[??????]"; + mes "Then, Kiel Hyre pops back"; + mes "in his mansion after all"; + mes "this time as if nothing"; + mes "happened! At the same time,"; + mes "Kiehl disappears, under the"; + mes "excuse of conducting research."; + next; + mes "[??????]"; + mes "Rekenber is sponsoring"; + mes "both Kiehl and Kiel, but"; + mes "there's some kind of conflict"; + mes "going on between father and"; + mes "son, I just know it! Now tell"; + mes "me, what's going on?"; + next; + mes "[??????]"; + mes "I'm not sure how well you"; + mes "know this country, but the"; + mes "fact that Rekenber is invoved"; + mes "must tell you that these aren't"; + mes "good people. Tell me what"; + mes "you know about them!"; + next; + L_TellEverything: + mes "^3355FFYou tell the woman^000000"; + mes "^3355FFeverything you know^000000"; + mes "^3355FFabout Kiel Hyre. Your^000000"; + mes "^3355FFvoice quivers with sadness^000000"; + mes "^3355FFwhenever you mention Elly.^000000"; + next; + mes "[??????]"; + mes "I see, I see..."; + mes "That poor girl... So..."; + mes "Your involvement in this"; + mes "is a coincidence? In that"; + mes "case, I want your help"; + mes "in our investigation."; + next; + + switch(select("OKay","......")) { + + case 1: + L_Help: + mes "[??????]"; + mes "Great."; + mes "I'm Agent Mitchell Layla."; + mes "From here on, you're working"; + mes "for the Schwaltzvalt Republic!"; + set KielHyreQuest,52; + close; + + case 2: + mes "[??????]"; + mes "If you don't cooperate,"; + mes "then I can't guarantee"; + mes "your safety, adventurer"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Huh? What...?"; + mes "What does that mean?"; + mes "Are you threatening me?"; + next; + + switch(select("Just do what she says.")) { + + case 1: + goto L_Help; + break; + + } + + } + + } + + } + + else if (KielHyreQuest == 52) { + mes "[Mitchell]"; + mes "I've got some new"; + mes "information for you."; + mes "There's an old lady in"; + mes "Juno that knew a woman"; + mes "named Allysia 30 years ago."; + next; + mes "[Mitchell]"; + mes "The clincher is that this"; + mes "Allysia from 30 years ago"; + mes "commited suicide, and is"; + mes "identical to Kiel Hyre's"; + mes "secretary, who is also"; + mes "named Allysia."; + next; + mes "[Mitchell]"; + mes "This is too much of a"; + mes "coincidense. I want you to"; + mes "go to Juno and investigate."; + mes "When you're done, talk to"; + mes "Kiel Hyre's steward, and"; + mes "he'll send you over to me."; + next; + mes "[Mitchell]"; + mes "Yeah, I know."; + mes "That guy actually"; + mes "works for me. Anyway,"; + mes "when you're ready to go"; + mes "to Juno, let me know, and you"; + mes "can board the federal airship."; + set KielHyreQuest,54; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Mitchell]"; + mes "Are you ready?"; + mes "I'll let you board"; + mes "the federal Airship so"; + mes "you can get to Juno, and"; + mes "finish your mission quickly."; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Mitchell]"; + mes "Good luck. Once you"; + mes "complete your mission,"; + mes "make sure that you report"; + mes "to Kiel Hyre's steward so"; + mes "that he can send you to me."; + close2; + warp "yuno",54,209; + end; + case 2: + mes "[Mitchell]"; + mes "Take your time..."; + mes "But keep in mind that"; + mes "I'm not a patient woman!"; + close; + + } + + } + + else if (KielHyreQuest == 64) { + mes "[Mitchell]"; + mes "Ah, you're back."; + mes "What do you have"; + mes "to report from your"; + mes "investigation?"; + next; + mes "[Mitchell]"; + mes "....................."; + mes "Ah, I see. Good work."; + mes "Why don't you go speak to Kiel"; + mes "Hyle and confront him with"; + mes "what you've learned about"; + mes "his past? Yeah, grill him."; + next; + mes "[Mitchell]"; + mes "Wear this hidden mic,"; + mes "so we can send help if"; + mes "you're endangered. I want"; + mes "you to find out who Kiel"; + mes "really is, and what's his"; + mes "relationship to Rekenber."; + set KielHyreQuest,68; + next; + warp "kh_mansion",83,50; + end; + } + + + else if (KielHyreQuest >= 68) { + mes "[Mitchell]"; + mes "Shouldn't you be"; + mes "leaving about now?"; + next; + warp "kh_mansion",83,50; + end; + } + +OnTouch: + if (KielHyreQuest <= 50) { + goto L_StartDialog; + } + end; +} + +//---------------------------------------------------------------------------- +// Warp portal into Kiehl's 'Room' +// - Anyone can enter +// - After 30-40 seonds this NPC should be disabled. +//---------------------------------------------------------------------------- +kh_mansion,29,27,0 script Kiehl_Room_Warp 45,2,2,{ +OnTouch: + warp "kh_kiehl01",10,31; + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Kiehl_Room_Warp"; + end; + +OnInit: + disablenpc "Kiehl_Room_Warp"; + end; +} + +//============================================================================ + +//============================================================================ +// Rosimier NPCs and other Related NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Odd Grandma +//---------------------------------------------------------------------------- +yuno,256,141,4 script Odd Grandma 846,{ + if (KielHyreQuest < 54) { + mes "[Grandma]"; + mes "Where did you go,"; + mes "my darling? Where"; + mes "are you, my little dear?"; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Grandma]"; + mes "Lullabye..."; + mes "Say goodnight..."; + mes "Hush little baby..."; + mes "Go to sleeeeep~"; + next; + + switch(select("What are you doing?","Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + mes "Oh? My baby won't stop"; + mes "crying and can't seem"; + mes "to sleep. She needs to"; + mes "rest, so I can go to work."; + mes "The house is so messy,"; + mes "and the boss is unhappy..."; + set KielHyreQuest,56; + next; + + switch(select("Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + //Missing text, needs another run through. + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + case 2: + //Missing text, needs another run through. + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + } + + else if ((KielHyreQuest >= 56) && (KielHyreQuest < 60)) { + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + + if (countitem(7500) < 1) { + close; + } + + else { + next; + + switch(select("Allysia? Isn't she...")) { + + case 1: + cutin "kh_ellisia_port",1; + mes "^3355FFYou show Allysia's"; + mes "portrait to the old woman.^000000"; + next; + cutin "",255; + mes "[Grandma]"; + mes "Oh, do you know"; + mes "Allysia? She's been"; + mes "missing! She left home"; + mes "yesterday and hasn't"; + mes "come back! C-can you"; + mes "tell me where she is?!"; + close; + } + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Grandma]"; + mes "Don't worry, Allysia..."; + mes "Mommy will always be"; + mes "here for you. There's no"; + mes "need to be sad..."; + close; + } + +} + +//---------------------------------------------------------------------------- +// Old Lady; gives you the key to the Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,250,132,2 script Old Lady 711,{ + if (KielHyreQuest < 56) { + mes "[Old Lady]"; + mes "Oooh, my legs and back"; + mes "are so sore. These old"; + mes "bones ache all over..."; + close; + } + + else if (KielHyreQuest == 56) { + mes "[Old Lady]"; + mes "Goodness, I hate this"; + mes "weather! Reminds me"; + mes "of how old I've gotten!"; + mes "It chills my bones, it does!"; + next; + + switch(select("......","Do you know that grandma?")) { + + case 1: + mes "[Old Lady]"; + mes "Damn it! If only I didn't"; + mes "have all those adventures"; + mes "in my youth! Then maybe"; + mes "I wouldn't suffer so in"; + mes "my advanced age!"; + close; + + case 2: + mes "[Old Lady]"; + mes "Oh... Yes. She was"; + mes "the mother of my best"; + mes "friend, ^3355FFAllysia^000000. Ever since"; + mes "she commited suicide, things"; + mes "haven't been the same. Her"; + mes "mother lost her sanity..."; + next; + + switch(select("Was ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, Allysia was such"; + mes "a beautiful girl. So many"; + mes "men wanted her, especially"; + mes "that dashing Games Rosimier."; + mes "I remember hearing that they"; + mes "were going to get married..."; + next; + mes "[Old Lady]"; + mes "I was so happy for her!"; + mes "But then, all of a sudden,"; + mes "she killed herself. Well,"; + mes "that's what they all say."; + mes "Even today, I'm still not"; + mes "sure what happened."; + next; + + switch(select("Wait, who's James Rosimier?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, James belonged to"; + mes "one of the oldest and richest"; + mes "families in Juno. Everything"; + mes "was going great for them, but"; + mes "some time after Allysia died,"; + mes "the family went bankrupt."; + next; + mes "[Old Lady]"; + mes "The city manages their"; + mes "old residence now. For"; + mes "some reason, they decided"; + mes "to entrust me with the master"; + mes "key to the Rosimier Mansion."; + next; + + switch(select("may I borrow the Master Key?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I'm really not"; + mes "supposed to give it to just"; + mes "anyone, but I can tell that"; + mes "you're working with Allysia's"; + mes "best interests at heart."; + next; + mes "[Old Lady]"; + mes "However, you've got to"; + mes "make sure that you return"; + mes "it to me before the people"; + mes "from City Hall ask me for it."; + mes "Alright then, I hope you find"; + mes "what you're looking for."; + set KielHyreQuest,58; + getitem 7498,1; //Losimier's_House_Key + close; + } + + } + + } + + } + + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) < 1) || + (countitem(7500) < 1) || + (countitem(7501) < 1) || + (countitem(7502) < 1)) { + mes "[Old Lady]"; + mes "Please hurry and find"; + mes "whatever you're searching"; + mes "for in the Rosimier Mansion."; + mes "I might get in trouble if"; + mes "the people from City Hall"; + mes "come and ask me for the key..."; + close; + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) == 1) && + (countitem(7500) == 1) && + (countitem(7501) == 1) && + (countitem(7502) == 1)) { + mes "[Old Lady]"; + mes "Oh, you're finished"; + mes "searching the mansion?"; + mes "Depressing, isn't it?"; + mes "The creditors basically"; + mes "ransacked everything"; + mes "a very long time ago."; + next; + + switch(select("Why did ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I know that James"; + mes "and Allysia were in love,"; + mes "and he promised to marry"; + mes "her. Now, supposedly his"; + mes "family already betrothed"; + mes "him to another woman."; + next; + mes "[Old Lady]"; + mes "Time went by, and he"; + mes "was forced to marry his"; + mes "fiancee. Allysia was pretty"; + mes "devistated. I htink maybe"; + mes "that's wht she... you know..."; + next; + mes "[Old Lady]"; + mes "Listen, if you want to learn"; + mes "more about what happened,"; + mes "then I think you should talk"; + mes "to the ^3355FFfisherman that lives^000000"; + mes "^3355FFsouth of the Kiel Hyre Academy.^000000"; + next; + mes "[Old Lady]"; + mes "He's the one that found"; + mes "Allysia's body in the river,"; + mes "so he might have a better"; + mes "idea of what had happened."; + set KielHyreQuest,60; + delitem 7498,1; //Losimier's_House_Key + close; + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Old Lady]"; + mes "Yep, Rain's coming."; + mes "Can feel it in my bones."; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Warp portal into Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,273,141,0 script Rosimmir_Entrance 45,2,2,{ +OnTouch: + if (countitem(7498) < 1) { + warp "yuno",270,141; + end; + } + + else { + warp "kh_rossi",20,92; + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Table +//---------------------------------------------------------------------------- +kh_rossi,23,23,0 script Table 111,{ + if (countitem(7499) < 1) { + cutin "kh_family_port",1; + mes "^3355FFYou examine the table,^000000"; + mes "^3355FFand find a frames portait^000000"; + mes "^3355FFinside the open drawer.^000000"; + getitem 7499,1; //Portrait_of_a_Family + } + + else { + mes "^3355FFThe open drawer of,^000000"; + mes "^3355FFthis desk is empty now.^000000"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Shelf +//---------------------------------------------------------------------------- +kh_rossi,92,40,0 script Shelf::ShelfKHQ1 111,{ + if (countitem(7500) < 1) { + mes "^3355FFThere are locked^000000"; + mes "^3355FFboxes on these bookshelves.^000000"; + mes "^3355FFPerhaps if you used this^000000"; + mes "^3355FFmansions's Master Key, you^000000"; + mes "^3355FFmight be able to open them.^000000"; + next; + + switch(select("Use Key","Pass")) { + + case 1: + mes "^3355FFWhich box do you^000000"; + mes "^3355FFwant to try to open?^000000"; + next; + + switch(select("First Box","Second Box")) { + + case 1: + mes "^3355FFYou use the Master Key to^000000"; + mes "^3355FFunlock the box, and obtain^000000"; + mes "^3355FFa portait of a woman that^000000"; + mes "^3355FFlooks just like Kiel Hyre's^000000"; + mes "^3355FFassistant, Allysia.^000000"; + next; + cutin "kh_ellisia_port",2; + mes "^3355FFThe message, ''To my love,^000000"; + mes "^3355FFAllysia. From James.'' is^000000"; + mes "^3355FFwritten on the back.^000000"; + getitem 7500,1; //Portrait_of_a_Lady + close2; + cutin "",255; + end; + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou've found a woman's^000000"; + mes "^3355FFportrait in one of the^000000"; + mes "^3355FFboxes on this shelf.^000000"; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Desk +//---------------------------------------------------------------------------- +kh_rossi,144,287,0 script Desk::DeskKHQ2 111,{ + mes "^3355FFThe desk has^000000"; + mes "^3355FFthree drawers^000000"; + next; + + switch(select("First Drawer","Second Drawer","Third Drawer","Cance;")) { + + case 1: + mes "^3355FFThe first drawer is locked.^000000"; + close; + + case 2: + if (countitem(7501) < 1) { + mes "^3355FFThere is a letter inside^000000"; + mes "^3355FFthis second drawer. it^000000"; + mes "^3355FFwas sent by a person^000000"; + mes "^3355FFwith the initials, K.H.,^000000"; + mes "^3355FFand addressed to Allysia.^000000"; + getitem 7501,1; //K.H's_Letter + close; + } + + else { + mes "^3355FFThis drawer is now empty.^000000"; + close; + + } + + case 3: + mes "^3355FFThere is a small note^000000"; + mes "^3355FFinside this third drawer.^000000"; + mes "^3355FFIt's written by James, and^000000"; + mes "^3355FFmentions that he wants to^000000"; + mes "^3355FFmarry Allysia, and that she^000000"; + mes "^3355FFrecieved an engagement ring.^000000"; + close; + + case 4: + mes "......"; + mes "........."; + mes "............"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Bookshelf +//---------------------------------------------------------------------------- +kh_rossi,149,288,0 script Bookshelf::BookshelfKHQ2 111,{ + if (countitem(7502) < 1) { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + mes "^3355FFfind a folded note between^000000"; + mes "^3355FFthe books as you examine them.^000000"; + getitem 7502,1; //James's_Memo + close; + } + + else { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Fisherman +//---------------------------------------------------------------------------- +yuno_fild12,232,222,0 script Old Fisherman 709,{ + if (KielHyreQuest < 60) { + mes "[Fisherman]"; + mes "These days, it's much"; + mes "harder to catch and fish."; + mes "Ever since they built"; + mes "this factory, the fish"; + mes "have started to change,"; + mes "and they look different too..."; + close; + } + + else if (KielHyreQuest == 60) { + mes "[Fisherman]"; + mes "Eh? You want something?"; + mes "Heh, youngsters! I know"; + mes "how much you love handouts,"; + mes "but you're not getting any."; + mes "Now, if you bring me some"; + mes "Raw Fish, I'd be more friendly~"; + + if (countitem(544) >= 10) { + next; + mes "[Fisherman]"; + mes "Oh, is all this fish"; + mes "for me? Heh, how very"; + mes "generous of you. If you're"; + mes "going to be so kind, then"; + mes "i suppose I have to repay"; + mes "the favor. Ask me anything~"; + next; + + switch(select("30 years ago, a woman killed herself...")) { + + case 1: + mes "[Fisherman]"; + mes "Oh? Ohh. Oh yeah."; + mes "I remember that. Yeah."; + mes "it was August 20th, my"; + mes "wife's birthday. That day,"; + mes "instead of catching fish,"; + mes "I caught a dead woman."; + next; + mes "[Fisherman]"; + mes "Of course, I reported it"; + mes "to the Juno Police! They told"; + mes "me she killed herself since"; + mes "she was betrayed by her lover,"; + mes "who also happened to be her"; + mes "employer. Really tragic stuff."; + next; + mes "[Fisherman]"; + mes "Anyway, when they were"; + mes "moving her body out of the"; + mes "river, her hand dropped"; + mes "some ring. I picked it up,"; + mes "hoping to sell it later for"; + mes "some zeny. I know, I know..."; + next; + mes "[Fisherman]"; + mes "I was pretty lucky the"; + mes "police didn't see me take"; + mes "it. Later that day, some guy"; + mes "came up to me and offered"; + mes "me a lot of money for it."; + mes "I guess it was my lucky day!"; + next; + mes "[Fisherman]"; + mes "I found out later that he was"; + mes "some mechanical repairman--"; + mes "something. He sold everything"; + mes "to buy that ring, so I guess"; + mes "he wanted it desperately."; + mes "Then he just dissapeared."; + next; + mes "[Fisherman]"; + mes "His name...?"; + mes "It was something like..."; + mes "Heil? Hyre? Anyway, it"; + mes "was a long time ago. Oh,"; + mes "his old house is still around."; + next; + mes "[Fisherman]"; + mes "If you're going to be"; + mes "that curious, you might"; + mes "as well check it out."; + mes "Let's see, he lived in"; + mes "a hut near the northeast"; + mes "forest guard camp."; + delitem 544,10; //Fish_Slice + set KielHyreQuest,62; + close; + } + + } + + else { + close; + } + + } + + else if (KielHyreQuest >= 62) { + mes "[Fisherman]"; + mes "Don't you remember"; + mes "what I told you? That"; + mes "guy lived in a hut near"; + mes "the northeast forest"; + mes "guard camp! Why don't"; + mes "you check that place out?"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre's hut; Wooden Board +//---------------------------------------------------------------------------- +yuno_fild09,158,217,0 script Wooden Board 111,{ + if ((KielHyreQuest < 62) || (KielHyreQuest >= 64)) { + mes "^3355FFIt's a useless^000000"; + mes "^3355FFwooden board^000000"; + mes "^3355FFin the bushes.^000000"; + close; + } + + else if (KielHyreQuest == 62) { + mes "^000oFFYou found a long^000000"; + mes "^3355FFwooden board carved^000000"; + mes "^3355FFwith the initials, 'K.H.'^000000"; + next; + cutin "kh_kyel_port",2; + mes "^3355FFYou find a portrait of^000000"; + mes "^3355FFa young man, that looks^000000"; + mes "^3355FFlike a younger version^000000"; + mes "^3355FFof Kiel Hyre, in a broken^000000"; + mes "^3355FFpicture frame underneath^000000"; + mes "^3355FFthe old wooden board.^000000"; + set KielHyreQuest,64; + getitem 7503,1; //Portrait_of_a_Guy + next; + cutin "",255; + mes "^3355FFYou have enough^000000"; + mes "^3355FFinformation by now,^000000"; + mes "^3355FFso you should report^000000"; + mes "^3355FFback to Mitchell.^000000"; + close; + } + +} + +//============================================================================ +// Kiehl Hyre's Room and Boss NPCs +//============================================================================ +// Beyond here the NPC for the final areas. +// Now, this area is not someplace you wanna slow down so +// you can pick up dialog. I used packet logging to pull +// what I could and for the sake of the two people with me, +// did not bother doing all the proper proper NPC positioning +// or some of the 'error/wrong option' dialogs. +// All the doors are kind of weird. +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiehl's Room; Receiver (Gives black keycards upon killing mobs) +//---------------------------------------------------------------------------- +kh_kiehl01,17,39,0 script Receiver 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^333333*BBBZZZ*^000000"; + if (KielHyreQuest == 74) { + next; + mes "[????]"; + mes "^333333*Bzzzz...*"; + mes "I've never seen you"; + mes "before. Did Father send"; + mes "you to kill me? We'll just"; + mes "see about that! Go ahead,"; + mes "try to find me, adventurer.^000000."; + set KielHyreQuest,76; + } + + close2; + monster "kh_kiehl01",16,32,"Alicel",1739,1,"Receiver::OnMyMobDead"; + monster "kh_kiehl01",18,31,"Aliot",1740,1,"Receiver::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 3) { + makeitem 7506,1,"this",19,36; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Flower Vase (Gives...password...for Box) +//---------------------------------------------------------------------------- +kh_kiehl01,13,40,0 script Flower Vase 111,{ + if (KielHyreQuest < 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + close; + } + + if (KielHyreQuest >= 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + next; + + switch(select("Pick Up Vase","Break Vase","Turn Vase Upside-down")) { + + case 1: + mes "^3355FFThe vase is empty.^000000"; + close; + + case 2: + mes "^3355FFYou can't destroy"; + mes "this vase, even by"; + mes "striking it with all your"; + mes "might. It must have been"; + mes "specially manufactured by"; + mes "the Rekenber Corporation.^000000"; + close; + + case 3: + mes "^3355FFThe following words"; + mes "are written at the"; + mes "bottom of the vase.^000000"; + next; + mes "[Vase Message]"; + mes "''The rabbit often"; + mes "observes the door"; + mes "The night eats the"; + mes "pickled orange.''"; + close; + } - else if (strcharinfo(0) != $@KHQuestBusy$) { - goto L_CannotOpen; + } + +} + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Box +//---------------------------------------------------------------------------- +kh_kiehl01,19,25,0 script Box::BoxKHQ3 111,{ + if (countitem(7505) < 1) { + mes "^3355FFYou found a box with"; + mes "a button for each letter"; + mes "of the alphabet on top of it.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "open the door") { + mes "^3355FFAs soon as you enter the"; + mes "password, the nearby door"; + mes "emits a pleasant chiming"; + mes "sound, and the box pops"; + mes "open to reveal a small key.^000000"; + getitem 7505,1; //Toy_Key + close; } + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + + else { + mes "^3355FFThis is where you"; + mes "found the Toy key^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (First) +// - Anyone can pass through this door +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,44,33,0 script Big Door#BigDoorKHQ1 111,{ + if (.KHDoor1Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_1_Warp::OnEnable"; + enablenpc"Big_Door_1_Warp"; + set .KHDoor1Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,43,33,0 script Big_Door_1_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_1_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_1_Warp"; + set getvariableofnpc(.KHDoor1Opened,"Big Door#BigDoorKHQ1"),0; + end; + +OnTouch: + warp "kh_kiehl01",55,33; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (second) +// - Consume Toy Key when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,174,40,0 script Big Door#BigDoorKHQ2 111,{ + if (.KHDoor2Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a small"; + mes "keyhole next to the knob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Toy Key") { + if (countitem(7505) >= 1) { + mes "^3355FFYou insert the key into"; + mes "the keyhole, and the door"; + mes "unlocks with a click as"; + mes "you turn the key.^000000"; + delitem 7505,1; //Toy_Key + donpcevent "Big_Door_2_Warp::OnEnable"; + enablenpc"Big_Door_2_Warp"; + set .KHDoor2Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,174,39,0 script Big_Door_2_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_2_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_2_Warp"; + set getvariableofnpc(.KHDoor2Opened,"Big Door#BigDoorKHQ2"),0; + end; + +OnTouch: + warp "kh_kiehl01",173,52; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Third) +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,77,108,0 script Big Door#BigDoorKHQ3 111,{ + if (.KHDoor3Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_3_Warp::OnEnable"; + enablenpc"Big_Door_3_Warp"; + set .KHDoor3Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,78,108,0 script Big_Door_3_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_3_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_3_Warp"; + set getvariableofnpc(.KHDoor3Opened,"Big Door#BigDoorKHQ3"),0; + end; + +OnTouch: + warp "kh_kiehl01",68,108; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fourth) +// - Consume TWO Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,42,177,0 script Big Door#BigDoorKHQ4 111,{ + if (.KHDoor4Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 2) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,2; //Black_Keycard + donpcevent "Big_Door_4_Warp::OnEnable"; + enablenpc"Big_Door_4_Warp"; + set .KHDoor4Opened,1; + close; + } + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,41,177,0 script Big_Door_4_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_4_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_4_Warp"; + set getvariableofnpc(.KHDoor4Opened,"Big Door#BigDoorKHQ4"),0; + end; + +OnTouch: + warp "kh_kiehl01",49,177; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,179,0 script Robots#kh1 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^3355FFAs soon as you"; + mes "touch the test tube,"; + mes "a bunch of robots"; + mes "suddenly appeared.^000000."; + close2; + monster "kh_kiehl01",18,181,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,180,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,179,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,178,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 4) { + makeitem 7506,1,"this",18,180; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Dummy Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,177,0 script Robots#kh2::RobotsKHQ 111,{ + end; +} +kh_kiehl01,15,180,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,15,182,0 duplicate(RobotsKHQ) Robots#kh4 111 +kh_kiehl01,35,187,0 duplicate(RobotsKHQ) Robots#kh1 111 +kh_kiehl01,37,187,0 duplicate(RobotsKHQ) Robots#kh2 111 +kh_kiehl01,39,187,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,41,187,0 duplicate(RobotsKHQ) Robots#kh4 111 + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fifth, and final) +// - Anyone can pass through this door +// - Consumes 4 Solid Iron Pieces +//---------------------------------------------------------------------------- +kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ + if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { if (KielHyreQuest < 86) { mes "^3355FFThis large door.."; mes "is closed shut."; @@ -6532,8 +14086,8 @@ kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ mes "kind of security device.^000000"; close2; set @KHDoorPushAttempt,@KHDoorPushAttempt+1; - monster "kh_kiehl01",162,183,"Alicel",1739,1; - monster "kh_kiehl01",162,179,"Aliot",1740,1; + monster "kh_kiehl01",163,183,"Alicel",1739,1; + monster "kh_kiehl01",163,179,"Aliot",1740,1; monster "kh_kiehl01",169,183,"Alicel",1739,1; monster "kh_kiehl01",169,179,"Aliot",1740,1; if (@KHDoorPushAttempt >= 3) { @@ -6671,7 +14225,6 @@ kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ } else { - L_CannotOpen: mes "^3355FFThis large door.."; mes "is closed shut."; mes "If you listen carefully,"; @@ -6680,13 +14233,11 @@ kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ close; } -OnTimer600000: - stopnpctimer; - set $@KHQuestBusy$,""; - end; } kh_kiehl01,166,186,0 script Big_Door_5_Warp 45,1,1,{ + end; + OnEnable: initnpctimer; misceffect 215; @@ -6704,14 +14255,12 @@ OnInit: end; OnTouch: - if ($@KH_DoorInvoker$ == strcharinfo(0)) { - addtimer 600000,"KiehlRoom::OnKHTimerEnd"; + + if (KielHyreQuest >= 46) { warp "kh_kiehl02",50,6; - disablenpc "Big_Door_5_Warp"; } - else { - warp "kh_kiehl02",50,6; + warp "kh_kiehl01",166,183; } end; @@ -6720,24 +14269,55 @@ OnTouch: //---------------------------------------------------------------------------- // Kiehl's Room; Kiehl_Room_Trap (Entry way trap) //---------------------------------------------------------------------------- -kh_kiehl02,49,15,0 script Kiehl_Room_Trap -1,4,4,{ +kh_kiehl02,49,10,0 script Kiehl_Room_Trap -1,5,3,{ end; OnTouch: if (.KHTrapSprung < 1) { set .KHTrapSprung,1; - monster "kh_kiehl02",46,13,"Alicel",1739,1; + set $@KHQuestBusy,1; + initnpctimer; monster "kh_kiehl02",47,13,"Aliot",1740,1; - monster "kh_kiehl02",48,13,"Alicel",1739,1; - monster "kh_kiehl02",49,13,"Aliot",1740,1; - monster "kh_kiehl02",50,13,"Alicel",1739,1; + monster "kh_kiehl02",54,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; monster "kh_kiehl02",51,13,"Aliot",1740,1; - monster "kh_kiehl02",52,13,"Alicel",1739,1; - monster "kh_kiehl02",53,13,"Aliot",1740,1; + monster "kh_kiehl02",53,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; end; } end; + + +OnTimer300000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer600000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer900000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer1200000: + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + end; + +OnGlobalTimerOff: + stopnpctimer; + end; } //---------------------------------------------------------------------------- @@ -6745,13 +14325,17 @@ OnTouch: // - Only the player who invoked the final door should progress this npc. // - Only the player who invoked the final door should be able to get ring. // - Timer will drop to 3 minutes once Kiehl is defeated. -// You probably "Die" once the 3 minutes are up, or are returned to -// lighthalzen, at 193,202, maybe add some flare too it and make them explode? //---------------------------------------------------------------------------- kh_kiehl02,50,52,4 script Kiehl#Original 902,{ cutin "kh_kiel01",2; + if (KielHyreQuest < 94) { + mes "[Kiehl]"; + mes "........."; + close; + } + if ($@KH_DoorInvoker$ == strcharinfo(0)) { - if (KielHyreQuest == 94) { + if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) { mes "[Kiehl]"; mes "I'm surprised you made"; mes "it this far, adventurer~"; @@ -6759,14 +14343,7476 @@ kh_kiehl02,50,52,4 script Kiehl#Original 902,{ mes "humble room. I assume that"; mes "you've come for the Condensed"; mes "Memory Scroll... my mind."; - set KielHyreQuest,96; + next; + mes "[Kiehl]"; + mes "You can understand"; + mes "why I can't let you have it,"; + mes "so if you really want the"; + mes "Condensed Memory Scroll,"; + mes "then show me what you've got!"; close2; cutin "",255; + set getvariableofnpc(.KHKilled,"KiehlRoom"),0; + monster "kh_kiehl02",49,48,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,50,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",53,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,55,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,53,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; end; } - else if ((KielHyreQuest == 96) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 6)) { - set getvariableofnpc(.KHKilled,"KiehlRoom"),0; + else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") == 5)) { + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Hmpf! You're pretty good."; + mes "Father must have spent"; + mes "a lot of money to hire"; + mes "you. So has he sent"; + mes "you to kill me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre sent me to ask"; + mes "you to stop turning all of"; + mes "the Third Generation robots"; + mes "into killing machines! How"; + mes "can do something like that"; + mes "to other robots like you?"; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Why not? It's said that man"; + mes "was made in the image of God."; + mes "Well, robots were made in the"; + mes "image of man. You humans kill"; + mes "each other as much as you"; + mes "like, as far as I can tell."; + next; + mes "[Kiehl]"; + mes "It might not be ethical"; + mes "for me to provide weapons"; + mes "to humans that need them..."; + mes "But that's what they are."; + mes "Weapons. It's more humane"; + mes "for robots to fight than humans."; + next; + mes "[Kiehl]"; + mes "Robots don't naturally"; + mes "feel pain or emotions."; + mes "Not unless they're specially"; + mes "programmed. Sorry, but I don't"; + mes "plans to stop what I'm doing."; + next; + cutin "kh_kiel04",2; + mes "["+strcharinfo(0)+"]"; + mes "Humankind may not be"; + mes "perfect, but think about"; + mes "who you're working with!"; + mes "Rekenber is the epitome of"; + mes "human evil! How can you"; + mes "support them like this?"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "I've had a long relationship"; + mes "with Rekenber. I'm fully aware"; + mes "of their capabilities. Do you"; + mes "remember the first room you"; + mes "passed on your way here, the"; + mes "one with all the toys?"; + next; + mes "[Kiehl]"; + mes "I bet you didn't know that there"; + mes "were 5 Second Generation"; + mes "robots. Me, and my four other"; + mes "brothers and sisters. Father"; + mes "built that room so that all"; + mes "five of us could live together."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "I was the only one to"; + mes "survive. I returned to"; + mes "Father and even got a"; + mes "name. But yes, I know"; + mes "how bad Rekenber really is."; + next; + mes "[Kiehl]"; + mes "I don't... I don't want"; + mes "to talk about this any more"; + mes "You've made me... Just leave."; + mes "I think I will let you live."; + next; + cutin "",255; + mes "[Mitchell]"; + mes "Freeze!"; + mes "Kiehl Hyre, you're"; + mes "under arrest for creating"; + mes "and trading illegal weapons!"; + set KielHyreQuest,100; + donpcevent "::OnKHAgent"; + enablenpc "Mitchell#KiehlRoom"; + enablenpc "Agent#KHAgent1"; + enablenpc "Agent#KHAgent2"; + enablenpc "Agent#KHAgent3"; + enablenpc "Agent#KHAgent4"; + close; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) { + set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Ah, Schwaltzvalt Republic"; + mes "agents. Heh. I haven't had"; + mes "this many guests before."; + mes "Well, I guess this means"; + mes "we'll have to fight after"; + mes "all, you and I. *Sigh* Pity..."; + next; + mes "[Kiehl]"; + mes "First, in all fairness,"; + mes "let me take care of these"; + mes "nuisances. They're just"; + mes "mindlessly doing their"; + mes "jobs--sort of like robots-- but"; + mes "don't worry, they won't be hurt."; + next; + donpcevent "::OnKHSpiderWeb"; + mes "[Mitchell]"; + mes "Nooooo!"; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "And now, you and I can"; + mes "have a proper duel, human"; + mes "I'm interested in seeing just"; + mes "how strong you really are~"; + close2; + cutin "",255; + monster "kh_kiehl02",50,52,"Kiehl",1733,1,"KiehlRoom::OnKiehlDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") == 1)) { + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "D-damn...!"; + mes "Well played, adventurer"; + mes "Well played. I should have"; + mes "known that Father would send"; + mes "the very best after me. Still,"; + mes "you've failed to truly defeat me."; + next; + mes "[Kiehl]"; + mes "I still have a few"; + mes "trump cards left"; + mes "I think... I'll take you"; + mes "to hell with me... Well"; + mes "if robots can go there~"; + announce "*Jeeeezzzgggg~ Geezzz~ Grrrr~ Clank~*",bc_map,0xFF0000; + next; + mes "[Mitchell]"; + mes "No...! We're locked"; + mes "in the room! We're"; + mes "We're trapped in here!"; + next; + mes "[Kiehl]"; + mes "Yay~ Let's burn"; + mes "everything down~"; + next; + mes "[Mitchell]"; + mes "Quick, "+strcharinfo(0)+","; + mes "use Kiel Hyre's power"; + mes "device, the one that's"; + mes "supposed to mess with"; + mes "Kiehl's power supply!"; + mes "Hurry, use it right now!"; + next; + delitem 7504,1; //Power_Source + announce "*Gzzzz~ Gzzzz~*",bc_map,0xFF0000; + next; + mes "[Kiehl]"; + mes "Wh-what? I c-can't"; + mes "move! This day is just"; + mes "full of surprises. Oh, well."; + mes "I guess it's time for me to"; + mes "use my other trump card."; + next; + mes "[Mitchell]"; + mes "What...?"; + mes "How many trump"; + mes "cards do you have?"; + next; + mes "[????]"; + mes "I'm so disappointed..."; + mes "I can't believe none"; + mes "of you thought of this..."; + next; + mes "[Mitchell]"; + mes "Who are you...?"; + mes "Show yourself!"; + next; + donpcevent "Kiehl#Copy::OnChangeState"; + enablenpc "Kiehl#Copy"; + mes "[????]"; + mes "Please."; + mes "Don't insult me."; + mes "You know this voice."; + mes "It's been talking to"; + mes "you this entire time~"; + next; + mes "[Mitchell]"; + mes "Impossible!"; + mes "How can there"; + mes "be two of you...?!"; + next; + cutin "kh_kiel01",0; + mes "[Kiehl]"; + mes "Hahahahaha!"; + mes "I'm a robot!"; + mes "I can make extra"; + mes "bodies, switch brains"; + mes "with them. It's awfully"; + mes "convenient, let me tell you."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Anyway, I don't mean to show"; + mes "off, but I suppose I better"; + mes "reveal to you my final trump"; + mes "card. First of all, I know all"; + mes "about you, Ms. Mitchell Layla~"; + next; + mes "[Mitchell]"; + mes "What? How do you"; + mes "know my name?"; + next; + mes "[Kiehl]"; + mes "Well, I have a few"; + mes "spies of my own..."; + mes "I'll allow him to explain."; + next; + mes "[Masked Man]"; + mes "Mitchell..."; + mes "I'm sorry that"; + mes "you had to get"; + mes "involved in all this."; + next; + mes "[Mitchell]"; + mes "Wolkeus? Wolkeus Kaiser?!"; + mes "You're the spy?! But you risked"; + mes "your life to save our president!"; + mes "No! Oh, God! How can this be"; + mes "happening?! Everything's just..."; + mes "This is all crazy! All of it!"; + next; + mes "[Wolkeus]"; + mes "This is just the result"; + mes "of elaborate plans that"; + mes "were made years ago. I didn't"; + mes "expect you to be this surprised,"; + mes "Mitchell. It's the way the game"; + mes "is played. You know that."; + next; + mes "[Mitchell]"; + mes "Mister President..."; + mes "I failed you... I'm sorry..."; + next; + mes "[Kiehl]"; + mes "Well, Kaiser, she took"; + mes "it pretty badly, but at least"; + mes "you're being gentlemanly"; + mes "about it. Well, I'd like for"; + mes "all of us to get better"; + mes "acquainted, but..."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "We'd better say our"; + mes "farewells here. This"; + mes "place will be gone in"; + mes "five minutes. Ah, and"; + mes "Ms. Layla, you're coming"; + mes "with us. We have questions~"; + next; + mes "[Kiehl]"; + mes "I'm curious as to what"; + mes "the president's plans are"; + mes "Mister Kaiser, if you'll"; + mes "escort Ms. Layla, please."; + next; + mes "[Wolkeus Kaiser]"; + mes "Sorry, Mitchell."; + mes "I gotta do it..."; + next; + mes "[Mitchell]"; + mes "No, get away! Let me go!"; + mes "Let go of me, Wolkeus!"; + donpcevent "::OnKHAgent"; + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "Great, we're done with"; + mes "that ugly business. Now,"; + mes "where was I? Ah, right."; + mes "Yes. I'm sorry. We don't"; + mes "have any more time to play."; + next; + mes "[Kiehl]"; + mes "Here, adventurer."; + mes "I'm aware that my father"; + mes "sent you here to get this."; + mes "Consider it my final gift"; + mes "to him. I'm surprised he left"; + mes "this ring inside me, though."; + next; + cutin "kh_kiel04",2; + mes "[Kiehl]"; + mes "I imagine that it must"; + mes "be precious to him. But"; + mes "I wonder why he placed"; + mes "it inside me? Well, anyway,"; + mes "I have a message I'd like"; + mes "for you to deliver to him."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "First... I guess we"; + mes "should get rid of this"; + mes "old thing. It was a good"; + mes "body, and it's served me"; + mes "well for 23 years. I'll miss"; + mes "it. Rest well, old Kiehl."; + next; + mes "[Kiehl]"; + mes "Now, this was the body"; + mes "that my father made."; + mes "Please tell him that"; + mes "this means that we're"; + mes "no longer related to"; + mes "each other at all."; + next; + mes "[Kiehl]"; + mes "The body I'm using right now?"; + mes "I made it myself with the most"; + mes "advanced technology. Consider"; + mes "it... a Fourth Generation robot"; + mes "body if you will. Father will"; + mes "understand what I mean."; + next; + mes "[Kiehl]"; + mes "Anyway, please tell him"; + mes "that, and get his old ring"; + mes "out of my old robot body,"; + mes "and then give it to him. For"; + mes "now, let's get out of here: we"; + mes "just have 3 minutes to evacuate."; + next; + mes "[Kiehl]"; + mes "You're a worthy opponent,"; + mes "and a human I respect."; + mes "I don't know if we'll meet"; + mes "again, but who knows?"; + mes "Anyway, I'll open up the"; + mes "exit for you. Farewell~"; + set KielHyreQuest,104; + donpcevent "Kiehl_Room_Exit::OnEnable"; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + donpcevent "Kiehl#Copy::OnChangeState"; + disablenpc "Kiehl#Copy"; + initnpctimer; + end; + } + + if (KielHyreQuest == 104) { + cutin "kh_kiel02",2; + mes "^3355FFYou retrieve the"; + mes "ring from the heart of"; + mes "Kiehl's old robotic body.^000000"; + getitem 7508,1; //Elisia's_Ring + set KielHyreQuest,106; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + end; + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + + + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + +OnTimer180000: + stopnpctimer; + mapannounce "kh_kiehl02","Beeeeeeeeeeeeep~",bc_npc,0xFF0000; + donpcevent "KiehlRoom::OnReset"; + end; + +OnTimer179000: + mapannounce "kh_kiehl02","1 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer178000: + mapannounce "kh_kiehl02","2 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer177000: + mapannounce "kh_kiehl02","3 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer176000: + mapannounce "kh_kiehl02","4 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer175000: + mapannounce "kh_kiehl02","5 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer170000: + mapannounce "kh_kiehl02","10 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer160000: + mapannounce "kh_kiehl02","20 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer150000: + mapannounce "kh_kiehl02","30 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer120000: + mapannounce "kh_kiehl02","1 minutes remaining until detonation.",bc_npc,0xFF0000; + misceffect 563; + end; + +OnTimer60000: + mapannounce "kh_kiehl02","2 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnTimer1000: + mapannounce "kh_kiehl02","3 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; NPC for mob control, timers, and other junk. +//---------------------------------------------------------------------------- +kh_kiehl02,1,1,0 script KiehlRoom -1,{ + end; + +OnKiehlMobDead: +debugmes "KLol: "+.KHKilled; + set .KHKilled,.KHKilled+1; + if (.KHKilled == 5) { + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + } + end; + +OnKiehlDead: + set .KHKilledBoss,1; + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + end; + +OnReset: + donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff"; + if (getmapusers("kh_kiehl02") > 0) { + mapwarp "kh_kiehl02","lighthalzen",192,200; + } + killmonsterall "kh_kiehl02"; + disablenpc "Kiehl_Room_Exit"; + set .KHKilledBoss,0; + set .KHKilled,0; + set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0; + set $@KHQuestBusy,0; + set $@KH_DoorInvoker$,""; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Mitchell and Agents. (Floating NPC + Duplicates) +//---------------------------------------------------------------------------- +- script Agent#KHAgent1::KHAgent -1,{ + end; + +OnKHAgent: + misceffect 215; + end; + +OnKHSpiderWeb: + misceffect 404; + end; +} + + +kh_kiehl02,49,55,7 duplicate(KHAgent) Mitchell#KiehlRoom 727 + +kh_kiehl02,53,52,4 duplicate(KHAgent) Agent#KHAgent1 880 + +kh_kiehl02,51,49,0 duplicate(KHAgent) Agent#KHAgent2 880 + +kh_kiehl02,47,50,0 duplicate(KHAgent) Agent#KHAgent3 880 + +kh_kiehl02,46,53,6 duplicate(KHAgent) Agent#KHAgent4 880 + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Copy of Kiehl. +//---------------------------------------------------------------------------- +kh_kiehl02,48,53,7 script Kiehl#Copy 902,{ + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl#Copy"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Exit +//---------------------------------------------------------------------------- +kh_kiehl02,50,59,0 script Kiehl_Room_Exit 45,1,1,{ +OnTouch: + if (getmapusers("kh_kiehl02") < 1) { + donpcevent "KiehlRoom::OnReset"; + warp "lighthalzen",193,202; + } + + else { + warp "lighthalzen",193,202; + } + + end; + +OnEnable: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl_Room_Exit"; + end; +} + +//============================================================================ + +//===== eAthena Script ======================================= +//= Kiel Hyre Quest +//===== By: ================================================== +//= L0ne_W0lf (Script), DZeroX (Timer) +//===== Current Version: ===================================== +//= 2.4 +//===== Compatible With: ===================================== +//= eAthena SVN +//===== Description: ========================================= +//= Quest for opening Robot Factory first and second floors. +//===== Comments: ============================================ +//= See below +//===== Additional Comments: ================================= +//= 1.0 First version, needs testing [Playtester] +//= 1.1 Copied over some changes made by -Tsuyuki- [L0ne_W0lf] +//= Reworked variables slightly so that the permenents ones aside from the +//= main tracking variable, are deleted when no longer needed. Renamed +//= several variables that handle strings to @KHInput$. [L0ne_W0lf] +//= 1.2 Removed duplicate NPCs. [Toms] +//= 1.3 More Bug fixes, fixed typo. Updated Additional comments. [L0ne_W0lf] +//= 1.4 Fixed doors not resetting in kh_kiehl01 after 30 second timer is up. [L0ne_W0lf] +//= 1.5 Another bug fixed (&& instead of ||). [L0ne_W0lf] +//= 1.6 More squashed bugs with if checking. [L0ne_W0lf] +//= 1.7 Corrected some spelling mistakes. [Balish] +// Corrected Exploit with the pub man, giving infinite wine and money. +// Corrected pool and map not showing text for some states of the quest. +// Corrected Elly showing cutin but not text for some states of the quest (causing players to log off to continue). +// Let fisherman talk to you when you have 10 fishes OR MORE. +// Corrected not letting you enter the tombstone after finishing the quest. +//= 1.8 Elly now deletes the Iron_Box, and Kiel Hyre deletes the Pin. [L0ne_W0lf] +//= More security on the 5th Big Door, now makes sure no one outside of who- +//= acticated it initially can use it. Resets after 10 minutes to make it. +//= Made it so that you need to be at least step 84 to activate the final door. +//= Corrected not deleting Allysia's Ring from inventory. +//= 1.9 Exit will now enable if you are just retrieving the Ring, keeps you from getting stuck. [L0ne_W0lf] +//= Corrected "KH_Kielh02", was setting off a debug, invalid map index. Should have been "kh_Kiehl02" +//= Made .KHQuestBusy$ into a temp global variable. $@KHQuestBusy$. +//= 2.0 Changed the labels on the "Big Doors" to "Identifier Names" to prevent an error with using getvariableofnpc [L0ne_W0lf] +//= 2.1 Fifth door now checks for a variable HIGHER or EQUAL to 74 not 84, as pointed out by Stollen. [L0ne_W0lf] +//= 2.2 Another fix for elly, no longer RESETS to 26 when you tak to her. [L0ne_W0lf] +//= 2.3 Should NOT have been setting .KHQuestBusy at all. It's not used or accessed anymore. Removed. [L0ne_W0lf] +//= 2.4 Lots of fixes (4ish) from Valandi. [L0ne_W0lf] +//= Added a getmapuser check to the mapwarp in KHTimerEnd so it's not trying to warp out 0 users. [L0ne_W0lf] +//= 2.5 FIxed several small issues (and large one) such as typos in cutins, typos in dialog, etc. [L0ne_W0lf] +//= Added some of the missing dialogs for several NPCs, and fixed a few NPC locations. +//= ALL books can now trigger the wall. +//= Allysia will now summon 4 (was 2) G_CONSTANTS instead of REGULAR constants. +//= Fixed where Golden_Key and Exquisite_Button are deleted. +//= Removed KHTimerEnd, and instead use OnReset. +//= Fixed typo in the second NPC that gives Black Keycards. +//= Added and Monster Warps. (Keeps monsters from being in dungeon quest area.) Non-functional though. +// +//============================================================ + + +//============================================================================ +// Kiel Hyre Quest/Robotic Lab Dungeon +// +// Script Dialog Obtained and Copied Down by L0ne_W0lf +// Timer work and some variable dances by DZeroX +// Based on [iRO Sakray] as of [03/29/2007] +//============================================================================ +//---------------------------------------------------------------------------- +// [Notes] +// - Let it be noted that ALL DIALOG IS OFFICIAL TO IRO UNLESS SPECIFIED. +// - I've fixed a few of iRO's mistakes, but I'm sure I made some of my own. +// - Will probably require a major optimizing. +// - Accidentally progressed Mills' dialog. Improvising. +// - Accidentally progressed Elly's dialog while reading 'Letter to Elly'. Improvising. +// - Possible missing dialog for all getitems when overweight. +// - Possible missing dialog for absense of Green Key item in "Bookshelf" NPC +// - Possible missing dialog for "Test Tube" if you haven't read the second poem. +// - Possible missing dialog for Elly in Dromitory if you don't have "Grey Box" +// - Possible missing dialog for "Grave" if you don't have "Yellow Keycard" +// - Not going to list ALL of the more usless NPCs. (Doors + Empty "Beautiful Ladies") +// - Accidently progressed Kiel Hyre's dialog. Improvising. +// - Improvising for getting back in to see Mitchell if you butterfly wing and need to get back in. +// - Possible missing dialog for "Odd Grandma" +// - Possible missing dialog for "Shelf" +// - Near the end I finshed the quest with some people. Used packet logging to get dialog. +// - Because of the above mentioned, NPC placement and dialog is a little sloppier. +// - Possible missing dialog for "Kiel Hyre" (Accept and Okay responses) +// - Parties are *NOT REQUIRED* as per Doddler's Wiki information. +// - Possible missing dialog for "Kiel Hyre" if you don't have Allysia's Ring. +// +//---------------------------------------------------------------------------- +// [Maps] [Use] +// yuno_in01 ........... Start quest in pub +// kh_school ........... Deliver Wine here, Meet Elly +// yuno ................ Get Delivery for/from "Little Kid" +// lighthalzen ......... Get Delivery package for "Little Kid" +// kh_vila ............. Kiel Hyre cottage. +// kh_dun01 ............ Robot Factory; Save Kiel Hyre +// kh_mansion .......... Kiel Hyre's Mansion in Lighthalzen +// kh_kiehl01 .......... Kiehl's room/Cave +// kh_kiehl02 .......... Kiehl's room/Boss Room +// +//---------------------------------------------------------------------------- +// [Variables in Use] +// KielHyreQuest - Main quest tracking variable +// +// KHPubMasterEnd - Finished with Pun Master if set to 1 +// - Deleted once no longer needed. +// +// KHToastGirlEnd - Pick up delivery if set to 1, +// - picked up delivery if set to 2 +// - finished if set to 3 +// - Deleted once no longer needed. +// +// KHCottagePoem1 - Tracks Poem 1 quest in cottage. (finished = 5) +// - Deleted once no longer needed. +// +// KHCottagePoem2 - Tracks Poem 2 quest in cottage. (finished = 3) +// - Deleted once no longer needed. +// +// @KHInput$ - Used with "Security Guard" +// - Used with "Test Tube" +// - Used when "Elly" (inputing string in attempt to wake her) +// - Used with "Grave", (twice) +// - Used with "Heavy Door" +// - Used with "Mechanical Device" +// - Used for opening various doors in Kiehl's area. +// +// @KHFirstKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// @KHSecondKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// +// @KHPotionColor$ - Holds 'red', 'green', or 'yellow' depending on what wrong potion is selected. +// +// @KHFirstSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHSecondSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHThirdSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHFourthSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// +// @KHClimbAttempt - Set to random (1-5) to determine if you fail at climbing the water pipe. +// +// @KHQ1Read - Make sure player has asked question 1 to Kiel Hyre +// @KHQ2Read - Make sure player has asked question 2 to Kiel Hyre +// @KHQ3Read - Make sure player has asked question 3 to Kiel Hyre +// +// @KHTitle$ - Holds "Mr", "Mrs", or "Miss" +// +// @KHDoorPushAttempt - Keeps track of how many times a person has attmepted pushed the door open. +// +// @KHPryingItem$ - Used for incorrect options when prying open last door. +// +// .KHKilled - Tracks how many monsters have been killed. Used with "Receiver", "Robots", and "Kiehl" NPCs +// +// .KHDoor1Open - 0/1 Depending on if the first door is opened. +// .KHDoor2Open - 0/1 Depending on if the second door is opened. +// .KHDoor3Open - 0/1 Depending on if the third door is opened. +// .KHDoor4Open - 0/1 Depending on if the fourth door is opened. +// .KHDoor5Open - 0/1 Depending on if the fifth door is opened. +// +// .KHKilledBoss - 0/1 depending on if the boss has been killed. +// +// $@KHQuestBusy$ - Holds strcharinfo(0) for "locking" reasons, so only that person can use the door. Variable is unset at boss room reset. +// +// $@KH_DoorInvoker$ - Holds character name, so only that person can use certain NPCs. +// +//---------------------------------------------------------------------------- +// [NPCs] [Location] +// Pub Master .................. yuno_in01 [ 35,178] +// Hanie ....................... yuno_fild08 [196,196] +// Security Guard .............. yuno_fild08 [158,194] +// Security Guard .............. yuno_fild08 [158,183] +// Student ..................... kh_school [ 57,142] +// Student ..................... kh_school [ 57,139] +// Lady ........................ kh_school [176, 60] +// Cute Student ................ kh_school [179, 39] +// Little Kid .................. yuno [217,114] +// Windmill Owner .............. lighthalzen [365,300] +// Cottage Keeper .............. yuno_fild02 [ 93,210] +// Door ........................ yuno_fild02 [ 75,218] +// Door ........................ yuno_fild02 [109,218] +// Wall ........................ kh_vila [191, 14] +// Book ........................ kh_vila [184, 20] +// Book ........................ kh_vila [181, 20] +// Book ........................ kh_vila [178, 20] +// Book ........................ kh_vila [175, 19] +// KH_Letter_Trigger ........... kh_vila [179, 11] +// Box ......................... kh_vila [ 16,175] +// Apple Box ................... kh_vila [ 30,184] +// Map ......................... kh_vila [ 44,125] +// Pot ......................... kh_vila [ 33,148] +// Calabash .................... kh_vila [ 14, 55] +// Pool ........................ kh_vila [ 39, 39] +// Vicious Dog ................. kh_vila [180,178] +// Drawer ...................... kh_vila [115,186] +// Box ......................... kh_vila [107,126] +// Bookshelf ................... kh_vila [181,138] +// Sword Hilt .................. kh_vila [136, 69] +// Test Tube ................... kh_vila [179, 69] +// Test Tube ................... kh_vila [185, 69] +// Window ...................... yuno_fild08 [ 69,185] +// Elly ........................ kh_school [178,180] +// Cookie Basket ............... kh_school [175,175] +// Window ...................... kh_school [188,185] +// Grave ....................... yuno_fild08 [ 72,170] +// Heavy Door .................. kh_dun01 [236, 48] +// Beautiful lady .............. kh_school [119,149] +// Beautiful lady .............. kh_school [122,186] +// Signboard ................... kh_dun01 [163,223] +// Mechanical Device ........... kh_dun01 [166,223] +// Mechanical Device ........... kh_dun01 [162,206] +// Kiel_Hyre_Door .............. kh_dun01 [224,232] +// Steward ..................... kh_mansion [ 78, 55] +// Kiel Hyre ................... kh_mansion [ 22, 27] +// Allysia ..................... kh_mansion [ 22, 27] +// Abduction_trigger ........... lighthalzen [188,200] +// Mysterious Woman ............ kh_mansion [ 25, 79] +// Odd Granma .................. yuno [250,132] +// Old Lady .................... yuno [250,132] +// Rosimmir_Entrance ........... yuno [273,141] +// Table ....................... kh_rossi [ 23, 23] +// Shelf ....................... kh_rossi [ 92, 40] +// Desk ........................ kh_rossi [144,146] +// Bookshelf ................... kh_rossi [144,146] +// Old Fisherman ............... yuno_fild12 [232,222] +// Wooden Board ................ yuno_fild09 [158,217] +// Kiehl_Room_Warp ............. kh_mansion [ 29, 27] +// Entrance Device#KHEntry1 .... kh_dun01 [ 44, 20] +// Entrance Device#KHEntry2 .... kh_dun01 [ 44,203] +// Security Guard .............. yuno_fild08 [158,194] +// Receiver .................... kh_kiehl01 [ 17, 39] +// Flower Vase ................. kh_kiehl01 [ 13, 40] +// Box ......................... kh_kiehl01 [ 19, 25] +// Big Door .................... kh_kiehl01 [ 44, 33] +// Big_Door_1_Warp ............. kh_kiehl01 [ 43, 33] +// Big Door .................... kh_kiehl01 [174, 40] +// Big_Door_2_Warp ............. kh_kiehl01 [174, 39] +// Big Door .................... kh_kiehl01 [ 77,108] +// Big_Door_3_Warp ............. kh_kiehl01 [ 68,108] +// Big Door .................... kh_kiehl01 [ 41,177] +// Big_Door_4_Warp ............. kh_kiehl01 [ 78,177] +// Robots ...................... kh_kiehl01 [ 15,181] +// Big Door .................... kh_kiehl01 [166,187] +// Big_Door_5_Warp ............. kh_kiehl01 [166,186] +// Kiehl_Room_Trap ............. kh_kiehl02 [ 49, 15] +// Kiehl#Original .............. kh_kiehl02 [ 50, 52] +// KiehlRoom ................... kh_kiehl02 [ 1, 1] +// Floating NPC (Agent#KHAgent0::KHAgent) +// Mitchell#KiehlRoom .......... kh_kiehl02 [ 49, 55] +// Agent#KHAgent1 .... ....... kh_kiehl02 [ 53, 52] +// Agent#KHAgent2 .............. kh_kiehl02 [ 51, 49] +// Agent#KHAgent3 .............. kh_kiehl02 [ 47, 50] +// Agent#KHAgent4 .............. kh_kiehl02 [ 46, 53] +// Kiehl#Copy .................. kh_kiehl02 [ 48, 53] +// Kiehl_Roomn_Exit ............ kh_kiehl01 [ 50, 59] +// +//---------------------------------------------------------------------------- +// [Functions] +// None +// +//---------------------------------------------------------------------------- +// [Conflicts] +// Resolved +// +//============================================================================ + + +//============================================================================ +// Affiliated NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Juno Pub Master/Starting point. +//---------------------------------------------------------------------------- +yuno_in01,35,179,1 script Pub Master 46,4,4,{ + if (checkweight(7487,1) == 1) { + mes "^3355FF- Wait!! -"; + mes "- You are carrying too many items-"; + mes "- so you can't receive any more items -"; + mes "- please take off some items -"; + mes "- and come for the challenge again -^000000"; + close; + } + + if (KielHyreQuest == 1) { + mes "[Vandt]"; + mes "Hi there, welcome"; + mes "to my pub. So what"; + mes "would you like to have?"; + next; + + switch(select("Beer, please","A coctail, please","Soju, please.","You look worried, what's up?","Cancel")) { + + case 1: + mes "[Vandt]"; + mes "Alright, let me get"; + mes "you a glass of beer on"; + mes "tap. There you are, this"; + mes "is out special Schwaltz Beer."; + next; + mes "^3355FF*Gulp gulp gulp*^000000"; + percentheal 5,-5; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ahhh, it's really"; + mes "good! That really"; + mes "hits the spot!"; + close; + + case 2: + mes "[Vandt]"; + mes "I'm sorry, but I have to"; + mes "deliver all of our cocktail"; + mes "ingredients to other customers."; + mes "Maybe I'll have enough to make"; + mes "you something next time, okay?"; + close; + + case 3: + mes "[Vandt]"; + mes "S-soju? I'm sorry,"; + mes "but we don't serve that"; + mes "here. It's too much of"; + mes "a tough guy drink for me..."; + close; + + case 4: + mes "[Vandt]"; + mes "Oh, did you overhear?"; + mes "I'm sorry, it's just that one"; + mes "of my employees had an"; + mes "accident and was pretty hurt,"; + mes "so I have nodoby that can"; + mes "deliver this merchandise."; + next; + mes "[Vandt]"; + mes "I have an urgent order"; + mes "that I need to send to"; + mes "the Kiel Hyre Academy,"; + mes "but I can't find anyone"; + mes "that's avaliable for this"; + mes "kind of temporaty job."; + next; + + switch(select("I'm sorry to hear that","Do you want me to help you?")) { + + case 1: + mes "[Vandt]"; + mes "Well, I'm sure that I'll"; + mes "figure something out."; + mes "Do you know anyone"; + mes "that'd be interested in"; + mes "some part time work?"; + close; + + case 2: + mes "[Vandt]"; + mes "Really? That's great!"; + mes "But first, I think it's fair to"; + mes "tell you that this job may not"; + mes "be as simple as you'd think."; + mes "I expect you to complete the"; + mes "delivery, no matter what."; + next; + + switch(select("Sure I'll do it", "Wait, let me think about it...")) { + + case 1: + mes "[Vandt]"; + mes "I'm glad to hear that."; + mes "Well then, please take this"; + mes "bottle of Culinary Wine to"; + mes "Mrs. ^ff0000Lecollane^000000 in the Kiel"; + mes "Hyre Academy. I'll pay you"; + mes "once you finish the job, okay?"; + getitem 7487,1; //Culinary_Wine + set KielHyreQuest,2; + close; + + case 2: + mes "[Vandt]"; + mes "Sure thing. I really need"; + mes "to get this done, so if you"; + mes "can't do it, but know any"; + mes "capable, responsible"; + mes "people that can, then please"; + mes "tell them about my situation."; + close; + + } + + } + + case 5: + mes "[Vandt]"; + mes "Sure, just take"; + mes "your time, relax,"; + mes "and order something"; + mes "when you're ready."; + close; + } + + } + + else if ((KielHyreQuest >= 2) && (KielHyreQuest < 6)) { + mes "[Vandt]"; + mes "Please deliver that bottle"; + mes "of Wine I gave you to Mrs."; + mes "Mrs. ^ff0000Lecollane^000000, who should be"; + mes "inside the Kiel Hyre Academy."; + mes "Hurry and get it to her before she"; + mes "can complain about the delivery."; + close; + } + + else if ((KielHyreQuest == 6) && (KHPubMasterEnd != 1)) { + mes "[Vandt]"; + mes "Oh, you're back."; + mes "Thanks for making that"; + mes "delivery. Just give me"; + mes "a moment, and then I can"; + mes "pay you in zeny, okay?"; + next; + switch(select("I need more wine...")) { + + case 1: + mes "[Vandt]"; + mes "Oh, you need to deliver"; + mes "another bottle? Alright,"; + mes "let me look around, and"; + mes "I'll give you the wine"; + mes "and your payment."; + next; + mes "^3355FFRummage Rummage^000000"; + mes "^3355FFRummage Rummage^000000"; + next; + mes "[Vandt]"; + mes "There you go!"; + mes "Thank you so much"; + mes "for helping me out~"; + getitem 7487,1; //Culinary_Wine + set zeny,zeny+1000; + set KHPubMasterEnd,1; + close; + } + } + + else if ((KielHyreQuest > 6) || (KHPubMasterEnd == 1)) { + mes "[Vandt]"; + mes "Hey, thanks a lot"; + mes "for helping me out that"; + mes "last time. I knew I asked"; + mes "you out of the blue, but"; + mes "you ended up being a life"; + mes "saver! I really appreicate it!"; + close; + } + +OnTouch: + if (KielHyreQuest < 1) { + mes "[Vandt]"; + mes "Arrrggghhh..."; + mes "This can't be good..."; + mes "This isn't good at all!"; + mes "What am I suposed to do?"; + set KielHyreQuest,1; + close; + } +} + +//---------------------------------------------------------------------------- +// Juno Toast Sales Girl. +//---------------------------------------------------------------------------- +yuno,217,114,4 script Little Kid 96,{ + if (KielHyreQuest < 6) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + close; + } + + else if ((KielHyreQuest == 6) && (KHToastGirlEnd != 3)) { + if (KHToastGirlEnd < 1) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + mes "Oh! Hi hi~ Did you want"; + mes "to buy some yummy toast?"; + next; + + switch(select("I'm here for Elly","No, thanks")) { + + case 1: + mes "[Cezu]"; + mes "Oh, I see. Elly must have"; + mes "wasted another batch of"; + mes "ingredients again. Well,"; + mes "she's a regular customer,"; + mes "so I really want to help, but"; + mes "I can't really do anything."; + next; + mes "[Cezu]"; + mes "You see, I just ran"; + mes "out of ingredients too!"; + mes "But I can't really leave"; + mes "to get some more. What if"; + mes "people need to buy toast?"; + mes "Listen, can you help me out?"; + next; + mes "[Cezu]"; + mes "would you please go get"; + mes "some flour and eggs for me"; + mes "from the ^3355FFLighthalzen Windmill^000000"; + mes "Then, when you come back, I can"; + mes "divide the ingredients, and you"; + mes "can deliver some to Elly."; + next; + mes "[Cezu]"; + mes "I know that I'm basically"; + mes "making you do everything"; + mes "on your own, but please try"; + mes "to understand that my hands"; + mes "are tied. D-don't ask me"; + mes "why, they just are!"; + set KHToastGirlEnd,1; + close; + + case 2: + mes "[Cezu]"; + mes "Okay okay~"; + mes "Please come again!"; + close; + } + } + + else if (KHToastGirlEnd == 1) { + mes "[Cezu]"; + mes "Would you please go to"; + mes "the Lighthalzen Windmill"; + mes "and tell them that Cezu needs"; + mes "lots of flour and lots of eggs!"; + mes "Then, bring all the stuff over"; + mes "to me as soon as you can~"; + close; + } + + else if (KHToastGirlEnd == 2) { + mes "[Cezu]"; + mes "Hey, you're back with the"; + mes "ingredients! Thank you so"; + mes "much, I really needed these!"; + mes "Now please give this flour"; + mes "and these eggs to Elly, and"; + mes "send her my regards. See you~"; + delitem 7488,1; //Delivery_Package + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,3; + close; + } + + } + + else if ((KielHyreQuest >= 6) || (KHToastGirlEnd == 3)) { + //KHToastGirlEnd no longer needed-- deleting. + set KHToastGirlEnd,0; + mes "[Cezu]"; + mes "Hot, fresh and"; + mes "cruuuunchy toast!"; + mes "Come and get some!"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Lighthalzen WindMill Owner. +//---------------------------------------------------------------------------- +lighthalzen,365,300,2 script Windmill Owner 46,{ + if (KHToastGirlEnd < 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "I'm pretty busy right"; + mes "now, so you mind coming"; + mes "back later? Then we'll talk."; + close; + } + + else if (KHToastGirlEnd == 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "You just happened to"; + mes "catch me at a good time,"; + mes "but if you need anything,"; + mes "you'd better spit it out quick"; + mes "before things get hectic again."; + next; + + switch(select("I'm here for Cezu","......")) { + + case 1: + mes "[Mills]"; + mes "Oh, Cezu from the"; + mes "toast stand? Okay,"; + mes "I've got everything"; + mes "here, let me just get"; + mes "it ready for you..."; + next; + mes "[Mills]"; + mes "Kid's one of my regular"; + mes "customers, so you don't"; + mes "have to pay me, or run any"; + mes "extra errands on my end. Yeah,"; + mes "I know how other people treat"; + mes "you adventurers. Well, see ya."; + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,2; + close; + + case 2: + mes "[Mills]"; + mes "......"; + mes "Um, okay, well, if"; + mes "you need something,"; + mes "just hollar, I guess."; + mes "Cuts, Cutz where are you?"; + mes "You'd better not be goofing off!"; + close; + + } + + } + + else if (KHToastGirlEnd >= 2) { + mes "[Mills]"; + mes "That Cutz is such"; + mes "a lazy rascal. The guy"; + mes "thinks he can fool around"; + mes "when he's on the clock...!"; + mes "Ah well, he knows I can't find"; + mes "a better assistant. He'll learn..."; + close; + } + +} + +//============================================================================ +//Kiel Hyre Academy NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Girl (Talks about the academy) +//---------------------------------------------------------------------------- +yuno_fild08,196,196,5 script Hanie 102,{ + mes "[Hanie]"; + mes "Oh, I wish I could study"; + mes "at the Kiel Hyre Academy..."; + mes "All of the graduates get"; + mes "really nice jobs! I'm almost"; + mes "jealous of the students!"; + next; + + switch(select("Kiel Hyre Academy?")) { + + case 1: + mes "[Hanie]"; + mes "Oh, the Kiel Hyre Academy"; + mes "is a school founded by Kiel"; + mes "Hyre, an inventor that became"; + mes "rich from his strange machines."; + mes "He decided to give back to society"; + mes "by building this private academy."; + next; + mes "[Hanie]"; + mes "However, the school will"; + mes "only accept orphans that are"; + mes "too poor to enroll in any other"; + mes "schools. Sometimes, it makes"; + mes "me wish that I was an orphan too!"; + mes "Well, not really, but you know..."; + close; + } +} + + +//---------------------------------------------------------------------------- +// Academy Security Guards +//---------------------------------------------------------------------------- +yuno_fild08,158,194,5 script Security Guard#1::KHAGuard 852,{ + if ((KielHyreQuest < 2) && (KielHyreQuest >= 30)) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + close; + } + + + else if (KielHyreQuest == 2) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + next; + switch(select("I'm here for a delivery.","......")) { + case 1: + mes "[Security Guard]"; + mes "You're here to deliver"; + mes "something? Okay, just give"; + mes "me the recipient's ^FF0000name^000000,"; + mes "followed by the ^FF0000item^000000 being"; + mes "delivered, and I'll verify it"; + mes "before letting you inside."; + next; + + input @KHDelivery$; + if (@KHDelivery$ != "Lecollane") { + mes "[Security Guard]"; + mes "You're here to deliver some"; + mes "Wine to...to who? What was"; + mes "the name? I...I don't think"; + mes "we have anybody in the"; + mes "academy named "+@KHDelivery$+""; + close; + } + + input @KHDelivery$ ; + if (@KHDelivery$ != "Culinary Wine") { + mes "[Security Guard]"; + mes "So you're here to make"; + mes "a delivery to Mrs. Lecollane?"; + mes "What is it you've brought for"; + mes "her? Some ^3355FF"+@KHDelivery$+"^000000?"; + next; + mes "[Security Guard]"; + mes "Let me buzz her first,"; + mes "and check to make sure"; + mes "that she's been expecting"; + mes "you. Let's see now..."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Huh. Mrs Lecollane"; + mes "is expecting a delivery,"; + mes "but not the item that you"; + mes "say that you've brought for"; + mes "her. You might want to check"; + mes "to see if there's been a mixup..."; + close; + } + + mes "[Security Guard]"; + mes "Alright...."; + mes "So you're here to"; + mes "deliver a bottle of"; + mes "Wine to Mrs. Lecollane?"; + mes "Let me buzz her, and get"; + mes "this confirmed real quickly."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Okay, everything looks"; + mes "good. Mrs. Lecollane"; + mes "has been expecting you."; + mes "I guess you can enter."; + close2; + warp "kh_school",71,155; + end; + + case 2: + mes "[Security Guard]"; + mes "If you don't have"; + mes "an appoointment, then"; + mes "don't loiter around in"; + mes "front of the academy!"; + close; + + } + + } + + else if (KielHyreQuest >= 4) { + mes "[Security Guard]"; + mes "Oh, did you have"; + mes "other business inside"; + mes "the academy? I remember"; + mes "you from before, so there"; + mes "shouldn't be any problems"; + mes "letting you back inside..."; + close2; + warp "kh_school",71,155; + end; + } + +} + +yuno_fild08,158,183,7 duplicate(KHAGuard) Security Guard#2 852 + +//---------------------------------------------------------------------------- +// Gossiping Teenagers/Story NPCs +//---------------------------------------------------------------------------- +kh_school,57,142,7 script Student::StudentKHQ1 893,3,3,{ + mes "[Laci]"; + mes "Oh, wow! We usually"; + mes "don't get visitors on"; + mes "campus! Um, you're not"; + mes "a new faculty member, are you?"; + close; + +OnTouch: + mes "[Laci]"; + mes "Hey, Nesha...!"; + mes "have you heard why"; + mes "Aaci hasn't been coming"; + mes "to class for awhile?"; + next; + mes "[Gui Nesha]"; + mes "That's right, I haven't"; + mes "seen Aaci in awhile."; + mes "Did something happen?"; + next; + mes "[Laci]"; + mes "It's because...."; + mes "Aaci saw a freakin' ghost!"; + mes "It's one hundred percent"; + mes "true! I heard about it from,"; + mes "well, you know, my sources."; + next; + mes "[Gui Nesha]"; + mes "...Wha...?"; + mes "Oh, come on,"; + mes "get outta town."; + close; +} + +kh_school,57,139,1 script Student::StudentKHQ2 893,{ + mes "[Gui Nesha]"; + mes "Aren't we a little"; + mes "old to be talking about"; + mes "this kind of stuff? You"; + mes "know, rumors and ghost"; + mes "stories that make no sense?"; + mes "C'mon, Laci, knock it off!"; + emotion e_swt2; + close; +} + +//---------------------------------------------------------------------------- +// Mrs. Lecollane +//---------------------------------------------------------------------------- +kh_school,176,60,4 script Lady::LadyKHQ 101,{ + if (KielHyreQuest < 2) { + mes "[Mrs. Lecollane]"; + mes "Is there a problem?"; + mes "Outsiders are not allowed to come"; + mes "in here, please leave."; + close; + } + + else if (KielHyreQuest == 2) { + mes "[Mrs. Lecollane]"; + mes "Oh, hello. Ah!"; + mes "have you come to"; + mes "deliver my wine? The"; + mes "security guard called and"; + mes "mentioned you were coming."; + next; + + switch(select("Yes, that's right!","Er, s-sorry!")) { + + case 1: + mes "[Mrs. Lecollane]"; + mes "Well, you've come a little"; + mes "later than I thought, but"; + mes "I suppose it can't be helped."; + mes "I guess the waiting has just"; + mes "heightened my anticipation"; + mes "for this bottle of wi--"; + next; + mes "^3355FF*Cling! Crrrack!*^000000"; + next; + mes "[Mrs. Lecollane]"; + mes "Elly? Elly did you"; + mes "break something again?!"; + mes "You've got to be more careful!"; + mes "If you don't finish baking those"; + mes "cookies by the end of today, your"; + mes "semester grades will suffer!"; + next; + mes "[Elly]"; + mes "B-but I just..."; + next; + mes "[Mrs. Lecollane]"; + mes "^FF0000Elly^000000!!"; + next; + mes "[Elly]"; + mes "......"; + mes "Yes, Mrs. Lecollane."; + next; + mes "[Mrs. Lecollane]"; + mes "*Ahem* Excuse me."; + mes "Would you please leave"; + mes "the wine over there? You"; + mes "may go now, and please"; + mes "don't wander needlessly"; + mes "around the academy."; + delitem 7487,1; + set KielHyreQuest,4; + close; + + case 2: + mes "[Mrs. Lecollane]"; + mes "Hm...?"; + mes "I guess I must"; + mes "be mistaken. I'm"; + mes "sorry, I thought you"; + mes "were somebody else."; + close; + } + return; + } + + else if (KielHyreQuest == 4) { + mes "[Mrs Lecollane]"; + mes "Well, our business is"; + mes "completed, so would you"; + mes "please leave the campus"; + mes "as soon as you can? *Sigh*"; + mes "I can't believe our future"; + mes "is in these girls' hands..."; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly (In school) +//---------------------------------------------------------------------------- +kh_school,179,39,1 script Cute Student 895,{ + cutin "kh_elly01",2; + if (KielHyreQuest < 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "W-wah! Oh...!"; + mes "*Phew* That was close,"; + mes "I almost dropped them"; + mes "again! Why do I have so much"; + mes "trouble handling ingredients?"; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh no, what should"; + mes "I do? *Sob* Wh-what"; + mes "am I going to do? *sniff*"; + next; + switch(select("What happened?","......")) { + + case 1: + mes "[Elly]"; + mes "I...I have to finish baking"; + mes "this batch of cookies by the"; + mes "end of today, but then I spilled"; + mes "all of the ingredients on the"; + mes "floor. I don't know how I can"; + mes "bake those cookies now..."; + next; + switch(select("What can I do to help you?","Oh, I'm so sorry.")) { + + case 1: + L_Accept: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "What was that...?"; + mes "You'll really help"; + mes "me? That's wonderful!"; + mes "Thank you! Thank you so much!"; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, I guess the only way"; + mes "I can bake these cookies is"; + mes "to get some new ingredients."; + mes "I'm sorry to be such a burden,"; + mes "but if you didn't offer to help"; + mes "me, then I'd have no one to ask!"; + next; + mes "[Elly]"; + mes "You don't understand how"; + mes "important it is that I bake"; + mes "these cookies...If I don't"; + mes "finish the assignment, then"; + mes "Mrs. Crank will fail me for"; + mes "the entire semester!"; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Okay, I need to calm"; + mes "down. I think I can do"; + mes "this with your help."; + mes "Would you please do me"; + mes "this huge favor and bring"; + mes "all these ingredients?"; + next; + cutin "kh_elly01",2; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + next; + mes "[Elly]"; + mes "Good luck, getting"; + mes "everything, and I hope"; + mes "you hurry back here with"; + mes "those cookie ingredients"; + mes "as quickly as you can, okay?"; + set KielHyreQuest,6; + goto KH_Elly_end; + + Case 2: + mes "What, you don't go"; + mes "to this school, don't"; + mes "you? Y-you're one of"; + mes "those adventurers, right?"; + next; + switch(select("Yeah, that's right.")) { + + mes "Listen, I know you"; + mes "probably have your own"; + mes "plans, but do you think"; + mes "you can help me with this"; + mes "huge problem that I have?"; + next; + switch(select("Accept","Decline")) { + + case 1: + //Missing text, needs another run through. + goto L_Accept; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "I'm outta here."; + next; + emotion e_sob; + mes "W-wait...!"; + mes "Come back, you"; + mes "d-don't...! I really"; + mes "need some help!"; + goto KH_Elly_end; + + } + + } + + } + + case 2: + mes "*Sob*..."; + goto KH_Elly_end; + } + + } + + else if (KielHyreQuest == 6) { + //519 - Milk; 548 - Cheese; 7182 - Cacao; 7487 - Culinary_Wine; 7488 - Delivery_Package + if ((countitem(519) < 7) || (countitem(548) < 2) || (countitem(7182) < 5) || (countitem(7487) < 1) || (countitem(7488) < 1)) { + mes "[Elly]"; + mes "Let's see, would you"; + mes "like me to remind you"; + mes "which ingredients I need?"; + mes "Please bring these things as"; + mes "soon as you can so that I can"; + mes "quickly bake some cookies~"; + next; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + goto KH_Elly_end; + } + else { + emotion e_ho; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Hooray! Finally, I have"; + mes "everything I need! This is"; + mes "great! Oh, would you please"; + mes "give me a moment while I bake"; + mes "these cookies? It shouldn't take"; + mes "long, so hold on just a bit."; + set KielHyreQuest,8; + //KHPubMasterEnd no longer needed-- deleting. + set KHPubMasterEnd,0; + delitem 519,7; //Milk + delitem 548,2; //Cheese + delitem 7182,5; //Cacao + delitem 7487,1; //Culinary_Wine + delitem 7488,1; //Delivery_Package + goto KH_Elly_end; + + } + + } + + else if (KielHyreQuest == 8) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "Tadah! I did it!"; + mes "They're finally done!"; + mes "''Elly's Special Cookies~''"; + mes "I'd like you to have some "; + mes "as a thanks for helping me out"; + next; + mes "[Elly]"; + mes "I'm sorry, but I was so"; + mes "preoccupied with baking"; + mes "these cookies that I didn't"; + mes "even ask for your name. I'm"; + mes "^FF0000Ellyja^000000, but everyone calls me,"; + mes "''Elly.'' What's your name?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "^3355FF"+strcharinfo(0)+"^000000."; + mes "It's ^3355FF"+strcharinfo(0)+"^000000."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes ""+strcharinfo(0)+"?"; + mes "...that name! It's wonderful!"; + set KielHyreQuest,10; + getitem 538,5; //Well_Baked_Cookie + goto KH_Elly_end; + } + + else if (KielHyreQuest == 10) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "I'm sorry, but I have"; + mes "another favor to ask you"; + mes "if you don't mind helping"; + mes "me out again. Don't worry,"; + mes "you won't have to hurry as"; + mes "quickly as you did last time."; + next; + + switch(select("What do you need?","Sorry, but I'm pretty busy...")) { + + case 1: + mes "[Elly]"; + mes "You know how you helped"; + mes "me bake those cookies?"; + mes "It's the first time I was able"; + mes "to do it without burning them!"; + mes "I just know Grandfather'd"; + mes "be so proud of me!"; + next; + mes "[Elly]"; + mes "I really want Grandfather"; + mes "to taste the cookies I baked,"; + mes "but the cookies will be stale"; + mes "by the time I'm able to leave"; + mes "campus. Would you deliver these"; + mes "cookies to my grandfather for me?"; + next; + + switch(select("Sure","I'm busy.")) { + + case 1: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Oh, "+strcharinfo(0)+"!"; + mes "Thank you so much, I knew"; + mes "you'd understand! Would you"; + mes "please bring the cookies to"; + mes "him at ^FF0000Kiel Hyre cottage^000000?"; + next; + mes "[Elly]"; + mes "Oh, right! They're really"; + mes "careful about visitors and"; + mes "keeping strangers off the"; + mes "property, but if you mention"; + mes "my name, they'll let you in."; + mes "Alright then, see you~"; + set KielHyreQuest,12; + goto KH_Elly_end; + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + } + + else if (KielHyreQuest == 12) { + mes "[Elly]"; + mes "Oh, you don't know where"; + mes "to find Kiel Hyre cottage?"; + mes "It's just north from this"; + mes "academy. Please deliver my"; + mes "cookies to grandfather, and"; + mes "let him know I really miss him."; + goto KH_Elly_end; + + } + + else if (KielHyreQuest == 14) { + mes "[Elly]"; + mes "Hm? Grandfather's not"; + mes "home? That's strange, he"; + mes "didn't mention anything about"; + mes "any business trips. I thought"; + mes "he'd be at home all day..."; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Would you go back to his"; + mes "cottage once more time? Here,"; + mes "you can use this Cottage Key."; + mes "That way, you can just go"; + mes "inside and talk to him~"; + getitem 7489,1; //Cottage Key + set KielHyreQuest,16; + goto KH_Elly_end; + } + + else if ((KielHyreQuest >= 14) && (KielHyreQuest < 20)) { + mes "[Elly]"; + mes "That's so weird..."; + mes "I thought Grandfather"; + mes "said that he'd be at"; + mes "home all day today..."; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 20) { + mes "[Elly]"; + mes "Hmmm...?"; + mes "What's this,"; + mes "a letter for me?"; + next; + mes "^3355FFElly opened the envelopre^000000"; + mes "^3355FFand started reading the letter^000000"; + next; + mes "Dearest Elly"; + mes "^FFFFFF_^000000"; + mes "I have something to discuss"; + mes "with my son Kiehl, so I am"; + mes "leaving to meet with him."; + mes "If you don't hear from me"; + mes "7 days after I've written"; + mes "it's possible I may be in"; + mes "trouble. Don't trust anyone"; + mes "at the Academy, Elly."; + mes "I've left something for you"; + mes "In the Study."; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "What? oh no, it's been"; + mes "ten days since he wrote"; + mes "this letter! Ah, does this"; + mes "mean that he's in danger?!"; + mes "Oh no, what should I do?"; + delitem 7490,1; //Letter_to_Elly + set KielHyreQuest,22; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 22) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + switch(select("About your grandpa","Tell me about Kiehl","What's with this academy?")) { + + case 1: + mes "[Elly]"; + mes "Oh! My grandfather is"; + mes "Kiel Hyre, founder and"; + mes "CEO of the Kiel Hyre"; + mes "foundation. He looks"; + mes "strict and cold hearted"; + mes "but he's actually very nice!"; + next; + mes "[Elly]"; + mes "We're not related by"; + mes "blood, but he's taken"; + mes "care of me ever since"; + mes "I lost my parents. Oh,"; + mes "Grandpa, where are you?"; + mes "I'm getting so worried!"; + goto KH_Elly_end; + + case 2: + mes "[Elly]"; + mes "Kiehl? That's my"; + mes "grandfather's son..."; + mes "I don't know him that"; + mes "well, and only saw him"; + mes "once at an academy event."; + next; + mes "[Elly]"; + mes "Mmm, he's a good looking"; + mes "guy with pale skin, silver"; + mes "hair, and this cold, fierce"; + mes "stare. A lot of my classmates"; + mes "worship Kiehl because he's"; + mes "also a business genius~"; + next; + mes "[Elly]"; + mes "It's weird though..."; + mes "I have no idea why my"; + mes "grandpa and Kiehl don't"; + mes "get along. They're both"; + mes "really good at what they do."; + goto KH_Elly_end; + + case 3: + mes "[Elly]"; + mes "Well, I know the security"; + mes "here is really tight, but"; + mes "that's because everything"; + mes "here is so luxurious and"; + mes "expensive, you know~"; + next; + mes "[Elly]"; + mes "We also have a very"; + mes "special curriculum where"; + mes "you learn more of what you"; + mes "want. Personally, I want to"; + mes "become a great career woman,"; + mes "like ^3355FFMs. Allysia^000000. Heh heh~"; + next; + mes "[Elly]"; + mes "This place certainly"; + mes "isn't like other schools."; + mes "You already know that only"; + mes "Yeah, everything is made to"; + mes "fit each of the student's needs."; + next; + mes "[Elly]"; + mes "Recently, though?"; + mes "Some really weird stuff"; + mes "has been happening. All of"; + mes "my classmates are afraid of"; + mes "going out alone by themselves."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "But I'll be okay!"; + mes "You'll be there to"; + mes "rescue me from danger"; + mes "right, "+strcharinfo(0)+"?"; + next; + switch(select("Who is Ms. Allysia?","Strange incidents?")) { + + case 1: + mes "[Elly]"; + mes "Oh, Ms. Allysia is"; + mes "Grandfather's secretary~"; + mes "She's so beautiful, and"; + mes "my grandfather really"; + mes "trusts her with everything!"; + goto KH_Elly_end; + + case 2: + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, "+strcharinfo(0)+"..."; + mes "I'm not supposed to tell"; + mes "anyone outside of the school,"; + mes "but I can trust you! You see..."; + mes "We're haunted by a ghost!"; + next; + mes "[Elly]"; + mes "I know it sounds crazy,"; + mes "but this ghost wanders the"; + mes "campus, and curses it's victims,"; + mes "making them so hold and lifeless."; + mes "It happened to my roommate,"; + mes "Mayo. It's like she's a statue."; + next; + mes "[Elly]"; + mes "I snuck into the medical"; + mes "office to see her, and she..."; + mes "She couldn't do anything!"; + mes "What would happen if the"; + mes "ghost decided to curse me?!"; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "You know what...?"; + mes "If I ever got cursed"; + mes "by that ghost, just yell"; + mes "''^FF0000Wake up, Elly!^000000''"; + mes "That'll wake me up for sure!"; + set KielHyreQuest,24; + goto KH_Elly_end; + + } + + } + + } + + else if (KielHyreQuest == 24) { + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Arg, I'm in a fix!"; + mes "I have to finish my"; + mes "homework before it's due!"; + mes "Yeah, I've got to go see"; + mes "Mrs. Lecollane now."; + next; + goto KH_Step26; + } + + else if (KielHyreQuest == 26) { + KH_Step26: + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + set KielHyreQuest,26; + goto KH_Elly_end; + } + + else if (KielHyreQuest > 26) { + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + goto KH_Elly_end; + } + + KH_Elly_end: + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Elly's Window +//---------------------------------------------------------------------------- +yuno_fild08,69,185,0 script Window::WindowKHQ1 111,{ + if ((KielHyreQuest <= 28) || (KielHyreQuest >= 46)){ + mes "^3355FFThis must be Elly's room.^000000"; + mes "^3355FFIt doesn't sound like anyone^000000"; + mes "^3355FFis inside, so the probably^000000"; + mes "^3355FFisn't back yet. For now, you^000000"; + mes "^3355FFshould try to find what her^000000"; + mes "^3355FFgrandfather left for her^000000"; + mes "^3355FFin their cottage's study.^000000"; + close; + } + + if (KielHyreQuest >= 30) { + mes "^3355FFThis slightly open window^000000"; + mes "^3355FFmust lead into Elly's room.^000000"; + mes "^3355FFAlthought she asked you to^000000"; + mes "^3355FFfind a ladder to enter her^000000"; + mes "^3355FFwindow, you probably won't^000000"; + mes "^3355FFfind one. You might be able^000000"; + mes "^3355FFto climb up that water pipe...^000000"; + next; + switch(select("Climb Water Pipe","Find Another Way")) { + + case 1: + set @KHClimbAttempt,rand(1,5); + if (@KHClimbAttempt == 1) { + mes "^3355FFYou climbed up the^000000"; + mes "^3355FFwater pipe, and sneaked^000000"; + mes "^3355FFinto Elly's room successfully.^000000"; + close2; + warp "kh_school",185,185; + end; + } + + else { + mes "^3355FFYou tried to climb^000000"; + mes "^3355FFthe water pope, but^000000"; + mes "^3355FFyou ended up failing^000000"; + mes "^3355FFand bumping your head^000000"; + percentheal -10,0; + close; + } + + case 2: + mes "^3355FFThere must be some^000000"; + mes "^3355FFother way to get into^000000"; + mes "^3355FFElly's room, aside from^000000"; + mes "^3355FFclimbing up this water pipe...^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Elly (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,178,180,5 script Elly 895,{ + if (KielHyreQuest <= 30) { + mes "[Elly]"; + mes "Oh~!"; + mes "Who are you!"; + mes "How did you get here? Please leave"; + close2; + percentheal -99,0; + warp "yuno_fild08",100,100; + end; + } + + else if (KielHyreQuest == 32) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly seems to have^000000"; + mes "^3355FFbeen cursed, and is^000000"; + mes "^3355FFcompletely still and^000000"; + mes "^3355FFlifeless. You've got to^000000"; + mes "^3355FFtry something, but what?^000000"; + next; + + switch(select("Wake her up by shaking.","Wake her up by yelling.","Ignore")) { + + case 1: + mes "^3355FFYou grab Elly by the^000000"; + mes "^3355FFshoulders and try to get^000000"; + mes "^3355FFher to respond by violently^000000"; + mes "^3355FFshaking her entire body.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Elly? Elly? no!"; + mes "Come back to us!"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + + case 2: + input @KHInput$; + if (@KHInput$ == "Wake up, Elly!") { + mes "[Elly]"; + mes "........."; + mes "^3355FFAs soon as you said those^000000"; + mes "^3355FFwords, a ^000000Small Golden Key^000000"; + mes "^3355FFand a ^000000Button^3355FF drop from Elly's^000000"; + mes "^3355FFhands. It looks like she woke^000000"; + mes "^3355FFup, but only for an instant.^000000"; + getitem 7493,1; //Golden_Key + getitem 7494,1; //Exquisite_Button + set KielHyreQuest,34; + close; + } + + else { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + } + + case 3: + mes "^3355FFAlright.^000000"; + mes "^3355FFBut sooner or later,^000000"; + mes "^3355FFyou should try to break^000000"; + mes "^3355FFthe curse placed on Elly.^000000"; + close; + + } + + } + + else if (KielHyreQuest == 34) { + if (countitem(7491) < 1) { + //Missing text, needs another run through. + mes "^3355FFMaybe the golden key^000000"; + mes "unlocks something in the^000000"; + mes "Cottage. Let's take another look.^000000"; + close; + } + + else { + mes "^3355FFIt looks like Elly's^000000"; + mes "^3355FFGolden Key might fit^000000"; + mes "^3355FFinto the keyhole on the^000000"; + mes "^3355FFGrey Box you found inside^000000"; + mes "^3355FFKiel Hyre's Cottage.^000000"; + next; + mes "^3355FFYou successfully open the^000000"; + mes "^3355FFGrey Box with the Golden Key,^000000"; + mes "^3355FFand find a Blue Keycard, along^000000"; + mes "^3355FFwith a folded note, inside the^000000"; + mes "^3355FFGrey Box. You quickly read^000000"; + mes "^3355FFthe note's contents...^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + getitem 7495,1; //Blue_Keycard + delitem 7491,1; //Iron_Box + set KielHyreQuest,36; + close; + } + + } + + else if (KielHyreQuest >= 36) { + mes "^3355FFThis is where you^000000"; + mes "^3355FFdiscovered the note^000000"; + mes "^3355FFlocked inside the Grey Box.^000000"; + mes "^3355FFThe following message was^000000"; + mes "^3355FFwritten in the note by Elly's^000000"; + mes "^3355FFgrandfather, Kiel Hyre.^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cookie Basket +//---------------------------------------------------------------------------- +kh_school,175,175,0 script Cookie Basket 111,{ + if (KielHyreQuest == 30) { + mes "^3355FFThis must be^000000"; + mes "^3355FFElly's cookie basket.^000000"; + mes "^3355FFThere appears to be^000000"; + mes "^3355FFa folded note wedged^000000"; + mes "^3355FFbetween the cookies.^000000"; + next; + + switch(select("Read Note","Ignore")) { + + case 1: + mes ""+strcharinfo(0)+", help!"; + mes "There's this guy dressed in"; + mes "black who;s walking around,"; + mes "and casting this weird spell!"; + mes "He's the one that's been making"; + mes "people cold and lifeless as"; + mes "puppets! I'm getting scared!"; + mes "^FFFFFF_^000000"; + mes "I hope you get this note..."; + mes "He ran after me, but I locked"; + mes "myself in my room. I'm going"; + mes "to leave my window open so that"; + mes "you can still find me. I hope he"; + mes "doesn't cast his curse on me!"; + set KielHyreQuest,32; + close; + + case 2: + mes "^3355FFThat note probably^000000"; + mes "^3355FFwasn't written just^000000"; + mes "^3355FFfor you, anyway.^000000"; + close; + + } + } + + else if (KielHyreQuest >= 32) { + mes "^3355FFThese cookies aren't^000000"; + mes "^3355FFstale yet, but they're no^000000"; + mes "^3355FFlonger warm. If they're^000000"; + mes "^3355FFnot room temperature,^000000"; + mes "^3355FFthen they're a little cold.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly's Window (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,188,185,0 script Window::WindowKHQ2 111,{ + warp "yuno_fild08",69,183; + end; +} + +//---------------------------------------------------------------------------- +// Grave/Kiel Hyre dungeon entry +//---------------------------------------------------------------------------- +yuno_fild08,72,170,0 script Grave 111,{ + if (KielHyreQuest < 36) { + //Missing text, needs another run through. + mes "^3355FFIt's just a grave.^000000"; + mes "^3355FFIt might be important^000000"; + mes "^3355FFto you later, but now^000000"; + mes "^3355FFit's not really all that^000000"; + mes "^3355FFhelpful to you.^000000"; + close; + } + + else if (KielHyreQuest == 36) { + if (countitem(7492) < 1) { + + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + close; + } + + else { + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + next; + mes "^3355FFWhat should you^000000"; + mes "^3355FFinsert into the slot?^000000"; + next; + + input @KHInput$; + + if (@KHInput$ == "Yellow Keycard") { + mes "^3355FFAn electronic confirmation^000000"; + mes "^3355FFchime sounds once you insert^000000"; + mes "^3355FFthe Yellow Keycard, followed by^000000"; + mes "^3355FFan automated voice that asks:^000000"; + next; + mes "[Security System]"; + mes "Please enter the password."; + next; + + input @KHInput$; + + next; + + if (@KHInput$ == "4772961") { + mes "[Security System]"; + mes "Password confirmed."; + mes "Welcome, Kiel Hyre."; + next; + mes "^3355FFYou hear another^000000"; + mes "^3355FFpleasant beep, and^000000"; + mes "^3355FFa secret path opens.^000000"; + set KielHyreQuest,38; + close; + } + + else { + mes "[Security System]"; + mes "Incorrect password."; + mes "Please try again."; + close; + } + } + + else { + mes "^3355FFWhatever you're trying^000000"; + mes "^3355FFto insert into the slot^000000"; + mes "^3355FFisn't working at all...^000000"; + close; + } + + } + + } + + else if ((KielHyreQuest >= 38) && (KielHyreQuest < 106)) { + mes "^3355FFThe door to the^000000"; + mes "^3355FFfactory is wide open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + + } + + else if (KielHyreQuest >= 106) { + if (countitem(7509) < 1) { + mes "^3355FFThe secret entrance"; + mes "has now been sealed.^000000"; + close; + } + + else { + mes "As you aproach the"; + mes "grave, it begins to"; + mes "emit flashes of light.^000000"; + next; + + switch(select("Use the ^0000FFLuxurious Keycard^000000","Ignore")) { + + case 1: + mes "Once you use the"; + mes "Luxurious Keycard,"; + mes "a secret path opens^000000"; + next; + + switch(select("Enter","cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + } + + } + +} + +//============================================================================ + +//============================================================================ +//Kiel Hyre Cottage NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Cottage Keeper +//---------------------------------------------------------------------------- +yuno_fild02,93,210,3 script Cottage Keeper 85,{ + if ((KielHyreQuest < 12) || (KielHyreQuest > 12)) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + close; + } + + else if (KielHyreQuest == 12) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + next; + + switch(select("I have an apointment with Kiel Hyre.","Alright.")) { + + case 1: + mes "[Cottage Keeper]"; + mes "You have an"; + mes "appointment with"; + mes "Master Kiel Hyre?"; + mes "Um, are you sure?"; + next; + switch(select("Yes","No")) { + + case 1: + mes "[Cottage Keeper]"; + mes "There must be some sort"; + mes "of mistake. Mister Hyre"; + mes "wouldn't have left if he"; + mes "was suposed to keep"; + mes "an appointment..."; + set KielHyreQuest,14; + close; + + case 2: + mes "[Cottage Keeper]"; + mes "Well unless you have"; + mes "an appointment, I don't"; + mes "think you'll be able to"; + mes "meet with Mister Hyre."; + close; + } + + case 2: + mes "[Cottage Keeper]"; + mes "Goodbye."; + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (left) +//---------------------------------------------------------------------------- +yuno_fild02,75,218,0 script Door::DoorKHQ1 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest == 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Unlock","Cancel")) { + + case 1: + mes "^3355FFYou unlock the door with the.^000000"; + mes "^3355FFkey that Elly gave you, and.^000000"; + mes "^3355FFas you push it open, a folded.^000000"; + mes "^3355FFnote dropped from the top of the.^000000"; + mes "^3355FFdoor. The following words.^000000"; + mes "^3355FFare written on this crude note.^000000"; + next; + mes "6 Forward,"; + mes "3 Left,"; + mes "3 Forward,"; + mes "4 Left"; + close2; + set KielHyreQuest,18; + warp "kh_vila",188,18; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } + + if (KielHyreQuest >= 18) { + mes "^3355FFThe door is open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",188,18; + end; + + case 2: + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (Right) +//---------------------------------------------------------------------------- +yuno_fild02,109,218,0 script Door::DoorKHQ2 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest >= 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Open","Cancel")) { + + case 1: + mes "^3355FFYou don't have^000000"; + mes "^3355FFthe key that can^000000"; + mes "^3355FFunlock this door.^000000"; + close; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } +} + + +//---------------------------------------------------------------------------- +// Store room interior; Wall +//---------------------------------------------------------------------------- +kh_vila,191,14,0 script Wall 111,{ + if (KielHyreQuest < 28) { + mes "^3355FFIt's just a wall.^000000"; + mes "^3355FFIt's not particularly^000000"; + mes "^3355FFstanding in your way.^000000"; + close; + } + + if (KielHyreQuest >= 28) { + mes "^3355FFThe wall is now^000000"; + mes "^3355FFopen, revealing^000000"; + mes "^3355FFa secret path.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",17,177; + end; + + case 2: + close; + } + + } + +OnOpenDoor: + misceffect 316; + end; +} + +//---------------------------------------------------------------------------- +// Store room interior; books +//---------------------------------------------------------------------------- +kh_vila,184,20,0 script Book#1::BookKHQ1 111,{ + if ((KielHyreQuest < 26) || (KielHyreQuest > 26)) { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + else if (KielHyreQuest == 26) { + if (rand(1,10) == 8) { + mes "^3355FFWithout thinking, you^000000"; + mes "^3355FFreach for a book from^000000"; + mes "^3355FFthe bookshelf. As you^000000"; + mes "^3355FFpull it toward you, the^000000"; + mes "^3355FFwall slides open to^000000"; + mes "^3355FFreveal a secret path.^000000"; + donpcevent "Wall::OnOpenDoor"; + set KielHyreQuest,28; + close; + } + + else { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + + } + +} + +kh_vila,181,20,0 duplicate(BookKHQ1) Book#2::BookKHQ2 111 + +kh_vila,178,20,0 duplicate(BookKHQ1) Book#3::BookKHQ3 111 + +kh_vila,175,19,0 duplicate(BookKHQ1) Book#4::BookKHQ4 111 + +//---------------------------------------------------------------------------- +// Store room interior; Letter to Elly on the floor. +//---------------------------------------------------------------------------- +kh_vila,179,11,0 script KH_Letter_Trigger -1,2,2,{ +OnTouch: + if (KielHyreQuest == 18) { + mes "^3355FFYou've found a letter^000000"; + mes "^3355FFon the floor. Naturally,^000000"; + mes "^3355FFyou pick i up, despite^000000"; + mes "^3355FFthe fact that it's not^000000"; + mes "^3355FFaddressed to you.^000000"; + getitem 7490,1; //Letter to Elly + set KielHyreQuest,20; + close; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Box (Pet Food vending machine) +//---------------------------------------------------------------------------- +kh_vila,16,175,0 script Box::BoxKHQ1 111,{ + mes "^FFFFFF##^000000*Tasty-Nutricious-Delicious*"; + mes "*Cute Pet Doof Vending Machine*"; + mes "The best food for your Cute Pets"; + mes "that is superior to the Pet Food"; + mes "you can buy in the market!"; + mes "^FFFFFF_^000000"; + mes "Price: 1,100 zeny (cheap!)"; + next; + + switch(select("Buy!","Cancel")) { + + case 1: + mes "^3355FF1,100 zeny seems kind"; + mes "^3355FFor expensive for Pet Food,"; + mes "^3355FFbut if it's better t han the"; + mes "^3355FFnormal stuff, it might"; + mes "^3355FFbe worth a shot."; + next; + if (zeny < 1100) { + //Adlibbed dialog. Need weight check, too. + mes "^3355FFYou don't have enough zeny...^000000"; + close; + } + else { + mes "^3355FFOh no...!^000000"; + mes "^3355FFThere's nothing^000000"; + mes "^3355FFspecial about it^000000"; + mes "^3355FFat all! It's just^000000"; + mes "^3355FFnormal Pet Food!^000000"; + set zeny,zeny-1100; + getitem 537,1; + close; + } + + case 2: + mes "^3355FFThis vending machine^000000"; + mes "^3355FFseems really shady and^000000"; + mes "^3355FFsuspicious for some reason^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Apple Box (Useless?) +//---------------------------------------------------------------------------- +kh_vila,30,184,0 script Apple Box 111,{ + mes "^3355FFYou find a box filled with^000000"; + mes "^3355FFripe, delicious apples.^000000"; + next; + + switch(select("Take the box","Leave it")) { + + case 1: + mes "^3355FFNo...! Wait!^000000"; + mes "^3355FFSomething's wrong!^000000"; + mes "^3355FFWhatever you do,^000000"; + mes "^3355FFdon't take this box!^000000"; + next; + mes "^3355FFAnd so, your inner^000000"; + mes "^3355FFvoice, your Jungian^000000"; + mes "^3355FFshadow if you will,^000000"; + mes "^3355FFprevented you from^000000"; + mes "^3355FFtaking the box.^000000"; + close; + + case 2: + mes "^3355FFSomething is wrong^000000"; + mes "^3355FFwith this box of apples.^000000"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, dining room; Map +//---------------------------------------------------------------------------- +kh_vila,44,126,0 script Map 111,{ + if ((KHCottagePoem1 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFA magnificent world map,^000000"; + mes "^3355FFdetailing the Rune-Midgarts^000000"; + mes "^3355FFKingdom, Schwaltzvalt Republic,^000000"; + mes "^3355FFas well as another country to the^000000"; + mes "^3355FFWest whose name is unfamiliar^000000"; + mes "^3355FFto you, is pasted to this wall.^000000"; + next; + mes "^3355FFAs you examine the^000000"; + mes "^3355FFworld map more closely,^000000"; + mes "^3355FFyou find that something has^000000"; + mes "^3355FFbeen hidden underneath it.^000000"; + next; + + switch(select("ignore","Examine")) { + + case 1: + mes "^3355FFWhatever might be^000000"; + mes "^3355FFhidden beneath this^000000"; + mes "^3355FFmap probably isn't^000000"; + mes "^3355FFimportant enough for^000000"; + mes "^3355FFyou to investigate.^000000"; + close; + + case 2: + mes "^3355FFUnfortunately, you can't^000000"; + mes "^3355FFsee what's under the map^000000"; + mes "^3355FFsince it's pasted to the wall.^000000"; + mes "^3355FFYou'll need to find some^000000"; + mes "^3355FFway to loosen the blue^000000"; + mes "^3355FFwithout damaging the map.^000000"; + set KHCottagePoem1,1; + close; + + } + + } + + else if ((KHCottagePoem1 == 2) && (KielHyreQuest < 30)) { + mes "^3355FFYou bring the pot of^000000"; + mes "^3355FFsteaming hot liquid^000000"; + mes "^3355FFclose to the world map.^000000"; + mes "^3355FFAs the paste on the wall^000000"; + mes "^3355FFmoistens, the map slowly^000000"; + mes "^3355FFbegins to peel back.^000000"; + next; + mes "^3355FFThe peelnig map revealed^000000"; + mes "^3355FFa folded piece of paper^000000"; + mes "^3355FFhidden beneath it. You^000000"; + mes "^3355FFtake the paper, and smooth^000000"; + mes "^3355FFthe map out to adhere it to^000000"; + mes "^3355FFthe wall once again. A message is^000000"; + mes "^3355FFwritten on the piece of paper.^000000"; + next; + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparent as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + set KHCottagePoem1,3; + close; + } + + else if ((KHCottagePoem1 > 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you found^000000"; + mes "^3355FFthe paper on which the^000000"; + mes "^3355FFpoem was written. Perhaps^000000"; + mes "^3355FFit would be a good idea to^000000"; + mes "^3355FFrefresh your memory and^000000"; + mes "^3355FFread that that poem again.^000000"; + next; + + switch(select("Read","Cancel")) { + + case 1: + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparant as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + close; + + case 2: + mes "^3355FFThere's no need for^000000"; + mes "^3355FFyou to reread this poem.^000000"; + mes "^3355FFYou're a freakin' genius!^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Pot +//---------------------------------------------------------------------------- +kh_vila,33,184,0 script Pot 111,{ + if (KHCottagePoem1 < 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + close; + } + + else if (KHCottagePoem1 == 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + mes "^3355FFSteam... That you could^000000"; + mes "^3355FFuse to loosen the glue on^000000"; + mes "^3355FFthe map... You're a genius!^000000"; + next; + + switch(select("Try it.","That? That won't work!")) { + + case 1: + mes "^3355FFYou picked up the^000000"; + mes "^3355FFboiling pot, but^000000"; + mes "^3355FFslightly burned your^000000"; + mes "^3355FFhands on accident.^000000"; + set KHCottagePoem1,2; + close; + + case 2: + mes "^3355FFNo, no...^000000"; + mes "^3355FFWe'd better try^000000"; + mes "^3355FFsomething else.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 1) || (KielHyreQuest >= 30)){ + mes "^3355FFThis is where you^000000"; + mes "^3355FFpicked up the pot filled^000000"; + mes "^3355FFwith steaming liquid.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, fire place; Calabash +//---------------------------------------------------------------------------- +kh_vila,14,55,0 script Calabash 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFIt's an expensive^000000"; + mes "^3355FFlooking calabash--^000000"; + mes "^3355FFor in less fancy^000000"; + mes "^3355FFwords, a 'gourd.'^000000"; + mes "^3355FFWhat do you do?^000000"; + next; + + switch(select("Break Open Calabash","Look Inside Calabash","ignore")) { + + case 1: + mes "^3355FFYou can't break^000000"; + mes "^3355FFopen that calabash...^000000"; + mes "^3355FFYou're a hero, not a vandal.^000000"; + mes "^3355FFNow, if this act of vandalisim^000000"; + mes "^3355FFcan be considered an act of^000000"; + mes "^3355FFheroisim, then it'd be okay.^000000"; + close; + + case 2: + mes "^3355FFYou tenderly place^000000"; + + mes "^3355FFyour hand into the^000000"; + mes "^3355FFcalabash, and gently^000000"; + mes "^3355FFfeel around with your^000000"; + mes "^3355FFfingers until you retrieve^000000"; + mes "^3355FFan Old Bronze Key^000000"; + getitem 7329,1; //Old_Bronze_Key + close; + + case 3: + mes "^3355FFThere's probably^000000"; + mes "^3355FFnothing inside anyway^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the expensive^000000"; + mes "^3355FFlooking calabash from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe Old Bronze Key.^000000"; + mes "^3355FFIt's useless to you now.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, garden; Pool +//---------------------------------------------------------------------------- +kh_vila,39,41,0 script pool 111,{ + if ((KHCottagePoem1 < 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + close; + } + + else if ((KHCottagePoem1 == 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + mes "^3355FFalong with a conscpicuous^000000"; + mes "^3355FFlion statue with two handles^000000"; + next; + + switch(select("Pull handles","cancel")) { + + case 1: + mes "Which handle would^000000"; + mes "you like to pull first?^000000"; + next; + + switch(select("Right Handle","Left Handle")) { + + case 1: + mes "^3355FFYou pull the right^000000"; + mes "^3355FFhandle, causing water^000000"; + mes "^3355FFto gush from the lion's^000000"; + mes "^3355FFmouth. It looks pretty cool~^000000"; + close; + + case 2: + mes "^3355FFAs soon as you pull the^000000"; + mes "^3355FFleft handle, the water in^000000"; + mes "^3355FFthe pool drains away. The^000000"; + mes "^3355FFpool empties, and you can^000000"; + mes "^3355FFsee a later of green moss^000000"; + mes "^3355FFcovering the pool's bottom.^000000"; + next; + + switch(select("Ignore","Investigate")) { + + case 1: + mes "^3355FFyou decide that^000000"; + mes "^3355FFa pool is little more^000000"; + mes "^3355FFthan a hole without^000000"; + mes "^3355FFany water to fill it.^000000"; + close; + + case 2: + mes "^3355FFAs you look through^000000"; + mes "^3355FFthe wet moss at the^000000"; + mes "^3355FFbottom of the pool,^000000"; + mes "^3355FFyou stumble upon a^000000"; + mes "^3355FFsmall, peculliar button.^000000"; + next; + + switch(select("Press button","Don't Press Button")) { + + case 1: + mes "^3355FFYou press the button^000000"; + mes "^3355FFwhich seems to trigger^000000"; + mes "^3355FFa strange sound coming^000000"; + mes "^3355FFfrom the stairs at the hallway.^000000"; + set KHCottagePoem1,4; + close; + + case 2: + mes "^3355FFYou'd better not push^000000"; + mes "^3355FFthis button. Your enemies^000000"; + mes "^3355FFmust have hidden it carefully^000000"; + mes "^3355FFfor you to find. It must be^000000"; + mes "^3355FFsome sort of nefarious trap.^000000"; + close; + + } + + } + + } + + case 2: + mes "^3355FFYou decided not^000000"; + mes "^3355FFto pull and handles.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 3) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you pressed^000000"; + mes "^3355FFthe small button that caused^000000"; + mes "^3355FFsome strange noise to come^000000"; + mes "^3355FFfrom the stairs near the wallway.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Vicious Dog +//---------------------------------------------------------------------------- +kh_vila,181,178,4 script Vicious Dog 81,7,3,{ +OnTouch: + mes "*Grrr~*"; + next; + mes "^3355FFAn extremely vicious^000000"; + mes "^3355FFlooking dog is glaring^000000"; + mes "^3355FFat you. Can you really^000000"; + mes "^3355FFpass by this creature^000000"; + mes "^3355FFwithout getting hurt?^000000"; + next; + + switch(select("March forward","Run away")) { + + case 1: + if (countitem(537) >= 1) { + mes "^3355FFWait! Perhaps you can^000000"; + mes "^3355FFuse food to soothe the^000000"; + mes "^3355FFsavage beast! Why don't^000000"; + mes "^3355FFyou feed it some of your Pet^000000"; + mes "^3355FFFood and see what happens?^000000"; + next; + + switch(select("Give pet Food","It won't work!")) { + + case 1: + mes "^3355FFYou gingerly throw the^000000"; + mes "^3355FFPet Food towards the dog.^000000"; + mes "^3355FFIts tail shakes violently as^000000"; + mes "^3355FFit devours the food. You'd^000000"; + mes "^3355FFbetter pass this dog now^000000"; + mes "^3355FFwhile you have the chance!^000000"; + delitem 537,1; //Pet_Food + close2; + warp "kh_vila",173,182; + end; + + case 2: + NoPetFood: + mes "^3355FFYou slowly approach^000000"; + mes "^3355FFthe dog, but it won't^000000"; + mes "^3355FFstop snarling at you.^000000"; + mes "^3355FFYou try to run past the^000000"; + mes "^3355FFdog, but it blocks all of^000000"; + mes "^3355FFyour moves. What to do?^000000"; + next; + mes "[Vicious Dog]"; + mes "BOW WOW!"; + mes "BOW WOW!"; + mes "BOW WOW WOW!"; + next; + mes "^3355FFThe dog chases you^000000"; + mes "^3355FFdownstairs like the^000000"; + mes "^3355FFsuckah chump you are^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + } + + else { + goto NoPetFood; + } + + case 2: + mes "^3355FFLet's get out of here!^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Drawer, first room nightstand +//---------------------------------------------------------------------------- +kh_vila,115,186,0 script Drawer::DrawerKHQ1 111,{ + if ((countitem(7492) < 1) && (KielHyreQuest < 36)) { + mes "^3355FFyou find an old drawer^000000"; + mes "^3355FFthat has been closed.^000000"; + mes "^3355FFIf you open it, then you^000000"; + mes "^3355FFmight find something^000000"; + mes "^3355FFinside. Or could it be^000000"; + mes "^3355FFempty. Who knows?^000000"; + next; + + switch(select("Open Drawer","Ignore")) { + + case 1: + mes "^3355FFYou obtain a Yellow^000000"; + mes "^3355FFKeycard from inside the^000000"; + mes "^3355FFdrawer. Opening that drawer^000000"; + mes "^3355FFturned out to be worthwhile.^000000"; + getitem 7492,1; //Yellow_Keycard + close; + + case 2: + mes "^3355FFForget opening that^000000"; + mes "^3355FFdrawer. I mean, come on,^000000"; + mes "^3355FFwhat would be the point?^000000"; + close; + } + } + + else { + mes "^3355FFThis is where you^000000"; + mes "^3355FFfound the Yellow Keycard.^000000"; + mes "^3355FFThis drawer is now empty.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Box +//---------------------------------------------------------------------------- +kh_vila,107,126,0 script Box::BoxKHQ2 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + close; + } + + else if ((countitem(7329) >= 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + mes "^3355FFperhaps you can use your^000000"; + mes "^3355FFOld Bronze Key to unlock it.^000000"; + next; + + switch(select("Use Old Bronze Key","No, it'll never work.")) { + + case 1: + mes "^3355FFYour hunch paid off!^000000"; + mes "^3355FFThe Old Bronze Key really^000000"; + mes "^3355FFdid unlock that box! You^000000"; + mes "^3355FFopen the inner box and^000000"; + mes "^3355FFobtain the Green Keycard^000000"; + mes "^3355FFthat was locked inside.^000000"; + getitem 7516,1; + delitem 7329,1; + close; + + + case 2: + mes "^3355FFWhat...?^000000"; + mes "^3355FFWhat? Using a key^000000"; + mes "^3355FFto unlock a lock?^000000"; + mes "^3355FFCome on, that's^000000"; + mes "^3355FFfreakin' crazy talk.^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the box from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe green keycard.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Bookshelf. +//---------------------------------------------------------------------------- +kh_vila,181,138,0 script Bookshelf::BookshelfKHQ1 111,{ + if ((countitem(7491) < 1) && (countitem(7516) >= 1)) { + mes "^3355FFOne of the books on^000000"; + mes "^3355FFthis crammed bookshell^000000"; + mes "^3355FFis labeled with the note,^000000"; + mes "^3355FF'To Elly.' It must have been^000000"; + mes "^3355FFleft behind by her grandfather^000000"; + next; + switch(select("Examine Book","Ignore")) { + + case 1: + mes "^3355FFYou skim through the^000000"; + mes "^3355FFbook's pages, and don't^000000"; + mes "^3355FFfind anything particularly^000000"; + mes "^3355FFinteresting. However, you^000000"; + mes "^3355FFnotice a steel surface behind the^000000"; + mes "^3355FFshelf as you place the book back.^000000"; + next; + + switch(select("Examine The steel surface","Ignore")) { + + case 1: + mes "^3355FFYou remove more of the^000000"; + mes "^3355FFself's books to reveal^000000"; + mes "^3355FFthat the steel surface is^000000"; + mes "^3355FFpart of a safe hidden behind^000000"; + mes "^3355FFthe bookshelf. There are two^000000"; + mes "^3355FFkeyholes on the steel safe.^000000"; + next; + + switch(select("Try all your keys","Cancel")) { + + case 1: + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe first keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHFirstKeyhole,1; + break; + + case 2: + set @KHFirstKeyhole,2; + break; + + } + + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe second keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHSecondKeyhole,1; + break; + + case 2: + set @KHSecondKeyhole,2; + break; + + } + + if (@KHFirstKeyhole == 2) && (@KHSecondKeyhole == 1) { + mes "^3355FFThe safe opens with^000000"; + mes "^3355FFa click and you see^000000"; + mes "^3355FFa Grey Box inside.^000000"; + mes "^3355FFYou take the Grey Box^000000"; + mes "^3355FFwith you, hoping that^000000"; + mes "^3355FFwill come in handy later.^000000"; + delitem 7489,1; //Cottage Key + delitem 7516,1; //Green_Keycard + getitem 7491,1; //Iron_Box + close; + } + + else { + mes "^3355FFThe safe won't open.^000000"; + close; + } + + case 2: + mes "^3355FFIt's probably a better^000000"; + mes "^3355FFidea to investigate the^000000"; + mes "^3355FFcottage for the keys that^000000"; + mes "^3355FFwill open up this safe...^000000"; + close; + + } + + case 2: + mes "^3355FFYou place the books^000000"; + mes "^3355FFback on the bookchelf.^000000"; + close; + + } + + case 2: + mes "^3355FFYou can probably^000000"; + mes "^3355FFfind better clues^000000"; + mes "^3355FFsomewhere else^000000"; + mes "^3355FFaround here.^000000"; + close; + + } + } + + else { + end; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Desk +//---------------------------------------------------------------------------- +kh_vila,118,143,0 script Desk::DeskKHQ1 111,{ + if (KHCottagePoem2 < 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books stacked on top^000000"; + mes "^3355FFof the desk covering topics^000000"; + mes "^3355FFlike artificial power, Sage^000000"; + mes "^3355FFVarmundt's research, factory^000000"; + mes "^3355FFrobotization, and magic scrolls...^000000"; + next; + mes "^3355FFWhile rummaging around through^000000"; + mes "^3355FFthe books and paper, you^000000"; + mes "^3355FFfind a piece of paper with^000000"; + mes "^3355FFthe Kiel Hyre Foundation's^000000"; + mes "^3355FFofficial seal. You decide that^000000"; + mes "^3355FFit might come in handy someday.^000000"; + next; + mes "^3355FFYou've obtained^000000"; + mes "^3355FFa blank piece of^000000"; + mes "^3355FFpaper with the Kiel^000000"; + mes "^3355FFHyre Foundation seal.^000000"; + set KHCottagePoem2,1; + close; + } + + else if (KHCottagePoem2 >= 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books, covering various^000000"; + mes "^3355FFscientific and magic tomics,^000000"; + mes "^3355FFstacked on top of this desk.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Medicine Chest +//---------------------------------------------------------------------------- +kh_vila,123,170,0 script Medicine Chest 111,{ + if ((KHCottagePoem2 < 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + close; + } + + else if ((KHCottagePoem2 == 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + next; + mes "^3355FFWait, you have a blank piece^000000"; + mes "^3355FFof paper with the Kiel Hyre^000000"; + mes "^3355FFFoundation seal! It's strange^000000"; + mes "^3355FFthat the seal was put on a blank^000000"; + mes "^3355FFpiece of paper. Maybe something^000000"; + mes "^3355FFis written on it with special ink?^000000"; + next; + mes "^3355FFIt's a crazy hunch, but^000000"; + mes "^3355FFmaybe, just maybe, you can^000000"; + mes "^3355FFuse something inside this^000000"; + mes "^3355FFmedicine cabinet that will^000000"; + mes "^3355FFreveal any invisible ink^000000"; + mes "^3355FFwritten on this document!^000000"; + next; + + switch(select("What? That's crazy!","Of course! Let's try it!")) { + + case 1: + mes "^3355FFSorry.^000000"; + mes "^3355FFI thought it^000000"; + mes "^3355FFwas a good idea...^000000"; + close; + + case 2: + switch(select("Try Red Liquid","Try Blue Liquid","Try Yellow Liquid","Try Green Liquid","Cancel")) { + + case 1: + set @KHPotionColor$,"red"; + break; + + case 2: + mes "^3355FFIt works!^000000"; + mes "^3355FFThe blue liquid is^000000"; + mes "^3355FFrevealing small^000000"; + mes "^3355FFtext written on the paper.^000000"; + mes "^3355FFIt looks like some^000000"; + mes "^3355FFkind of long poem...^000000"; + next; + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle"; + mes "lost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + next; + mes "^3355FFThis is a very^000000"; + mes "^3355FFstrange poem. What^000000"; + mes "^3355FFcould it possibly mean?^000000"; + set KHCottagePoem2,2; + close; + + case 3: + set @KHPotionColor$,"yellow"; + break; + + case 4: + set @KHPotionColor$,"green"; + break; + + case 5: + mes "^3355FFNever mind.^000000"; + mes "^3355FFThis idea sounds^000000"; + mes "^3355FFtoo crazy to work...^000000"; + mes "^3355FFlike putting a man^000000"; + mes "^3355FFpn the moon. Can you^000000"; + mes "^3355FFbelieve that hogwash?^000000"; + close; + } + + mes "^3355FFYou tried sprinking^000000"; + mes "^3355FFthe "+@KHPotionColor$+" liquid from the^000000"; + mes "^3355FFmedicine cabinet onto^000000"; + mes "^3355FFthe blank paper with the^000000"; + mes "^3355FFKiel Hyre Foundation seal.^000000"; + mes "^3355FFHowever, nothing happened...^000000"; + close; + + } + } + + else if ((KHCottagePoem2 >= 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you poured^000000"; + mes "^3355FFsome blue liquid to read^000000"; + mes "^3355FFa poem written in invisible^000000"; + mes "^3355FFink on a blank poece of paper^000000"; + mes "^3355FFwith the Kiel Hyre Foundation^000000"; + mes "^3355FFseal. Would you like to read it?^000000"; + next; + + switch(select("No time!","Read")) { + + case 1: + mes "^3355FFYou're running out of^000000"; + mes "^3355FFtime! For now, it would^000000"; + mes "^3355FFbe best for you to seach^000000"; + mes "^3355FFevery inch of the cottage.^000000"; + close; + + case 2: + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle^000000"; + mes "^3355FFlost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + close; + + } + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, stair case; Sword hilt +//---------------------------------------------------------------------------- +kh_vila,136,68,0 script Sword Hilt 111,{ + if ((KHCottagePoem1 < 3) || (KHCottagePoem2 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures.^000000"; + close; + } + + else if ((KHCottagePoem1 <= 4) || (KHCottagePoem2 <= 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures. Wait!^000000"; + mes "^3355FFperhaps they're related to^000000"; + mes "^3355FFthat poem you read earlier...^000000"; + next; + + switch(select("No way!","Of course!")) { + + case 1: + mes "^3355FFImpossible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + mes "^3355FFOf course! And look!^000000"; + mes "^3355FFThere's a hole on top^000000"; + mes "^3355FFof the head of each snake^000000"; + mes "^3355FFsculpture. There holes seem^000000"; + mes "^3355FFbig enough to insert each of^000000"; + mes "^3355FFthe ornamental swords nearby...^000000"; + next; + + switch(select("Ignore","Insert Ornamental Swords")) { + + case 1: + mes "^3355FFImposible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + if (KHCottagePoem1 != 4) { + mes "^3355FFCan't... Pull out...^000000"; + mes "^3355FFSword! It must be^000000"; + mes "^3355FFlocked into place^000000"; + mes "^3355FFsomehow, or sealed^000000"; + mes "^3355FFby some strange force!^000000"; + close; + } + + else { + mes "^3355FFYou should probably^000000"; + mes "^3355FFtry to insert each sword^000000"; + mes "^3355FFinto the correct snake.^000000"; + mes "^3355FFFirst please select the^000000"; + mes "^3355FFsnake in which you will^000000"; + mes "^3355FFinsert the first sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHfirstSword,1; + break; + + case 2: + set @KHfirstSword,2; + break; + + case 3: + set @KHfirstSword,3; + break; + + case 4: + set @KHfirstSword,4; + break; + + } + + next; + mes "^3355FFNow, please choose^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the second sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHSecondSword,1; + break; + + case 2: + set @KHSecondSword,2; + break; + + case 3: + set @KHSecondSword,3; + break; + + case 4: + set @KHSecondSword,4; + break; + + } + + next; + + mes "^3355FFNext, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the third sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHThirdSword,1; + break; + + + case 2: + set @KHThirdSword,2; + break; + + case 3: + set @KHThirdSword,3; + break; + + case 4: + set @KHThirdSword,4; + break; + + } + + next; + mes "^3355FFLastly, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the fourth sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHFouthSword,1; + break; + + case 2: + set @KHFouthSword,2; + break; + + case 3: + set @KHFouthSword,3; + break; + + case 4: + set @KHFouthSword,4; + break; + + } + + if ((@KHFirstSword == 2) && (@KHSecondSword == 4) && (@KHThirdSword == 1) && (@KHFouthSword == 3)) { + mes "^3355FFYour ears are suddenly^000000"; + mes "^3355FFfilled with a low buzzing^000000"; + mes "^3355FFnoise, and your mind^000000"; + mes "^3355FFand body feel as if they^000000"; + mes "^3355FFare being swept away^000000"; + set KHCottagePoem1,5; + set KHCottagePoem2,3; + close2; + warp "kh_vila",178,72; + end; + } + + else { + mes "^3355FFNothing happened...^000000"; + mes "^3355FFYou probably didn't^000000"; + mes "^3355FFinsert the swords into^000000"; + mes "^3355FFthe correct snakes. For now,^000000"; + mes "^3355FFyou should return the swords,^000000"; + mes "^3355FFand then try this again later.^000000"; + close; + } + } + } + } + } + + else if ((KHCottagePoem1 == 5) && (KHCottagePoem2 == 3) || (KielHyreQuest >= 30)) { + mes "^3355FFHere is a hidden^000000"; + mes "^3355FFpath that leads to^000000"; + mes "^3355FFthe secret laboratory.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",178,72; + end; + + case 2: + close; + + } + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; left test tube +//---------------------------------------------------------------------------- +kh_vila,179,68,0 script Test Tube::TestTubeKHQ1 111,{ + mes "^3355FFThis test tube contains^000000"; + mes "^3355FFa young man dressed in^000000"; + mes "^3355FFa Kiel Hyre Academy^000000"; + mes "^3355FFuniform. Somehow, you^000000"; + mes "^3355FFget the feeling that you've^000000"; + mes "^3355FFseen him somewhere before.^000000"; + close; +} + + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; Right test tube +//---------------------------------------------------------------------------- +kh_vila,185,68,0 script Test Tube::TestTubeKHQ2 111,{ + if (KielHyreQuest == 28) { + mes "^3355FFA strange looking,^000000"; + mes "^3355FFwizend old man is^000000"; + mes "^3355FFheld within this test tube.^000000"; + mes "^3355FFThere is a small red button^000000"; + mes "^3355FFright underneath the test tube.^000000"; + next; + + switch(select("Press Button","Investigate Further")) { + + case 1: + + mes "[???]"; + mes "H-hello...? C-can you"; + mes "hear me? I don't recognize"; + mes "you... But... Maybe I forgot?"; + mes "Wait, wait. If you're my friend,"; + mes "then you know what to call me,"; + mes "right? Do you know what I am?"; + next; + + input @KHInput$; + + if (@KHInput$ == "little lost devil") { + mes "[???]"; + mes "Heh... Heh heh..."; + mes "He knows... Hey, you"; + mes "have to remember these"; + mes "numbers, okay? D-don't"; + mes "forget, they'll be important..."; + mes "^FF00004^000000, ^FF00007^000000, ^FF00002^000000, ^FF00009^000000, ^FF00006^000000, ^FF00001^000000. That's all..."; + next; + mes "^3355FF4772961^000000"; + mes "^3355FFWhat could^000000"; + mes "^3355FFthose numbers^000000"; + mes "^3355FFpossibly mean?^000000"; + //KHCottagePoem1 and KHCottagePoem2 no longer needed-- deleting + set KHCottagePoem1,0; + set KHCottagePoem2,0; + set KielHyreQuest,30; + close; + } + + else { + mes "[???]"; + mes "No... No..."; + mes "That's not right."; + mes "I don't think we"; + mes "were friends. No..."; + close; + } + + case 2: + mes "^3355FFLet's investigate^000000"; + mes "^3355FFthis area a little^000000"; + mes "^3355FFmore first.^000000"; + close; + + } + + } + + else if (KielHyreQuest >= 30) { + mes "^3355FFWhat could the^000000"; + mes "^3355FFnumber 4772961^000000"; + mes "^3355FFmean? For now, you've^000000"; + mes "^3355FFfound everything that^000000"; + mes "^3355FFyou need from this place,^000000"; + mes "^3355FFso you should return to Elly.^000000"; + close; + } + + else { + end; + } + +} + +//============================================================================ + +//============================================================================ +// Robot Factory NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door +//---------------------------------------------------------------------------- +kh_dun01,235,48,0 script Heavy Door::HeavyDoorKHQ1 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + if (@KHInput$ == "Blue Keycard") { + mes "^3355FFYou've successfully^000000"; + mes "^3355FFopened the door.^000000"; + close2; + warp "kh_school",119,144; + end; + } + + else { + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + } + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door (These doors don't seem to serve any purpose) +//---------------------------------------------------------------------------- +kh_dun01,76,233,0 script Heavy Door::HeavyDoorKHQ2 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } + +} + +kh_dun01,106,233,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ3 111 +kh_dun01,6,164,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ4 111 +kh_dun01,6,133,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ5 111 +kh_dun01,6,60,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ6 111 +kh_dun01,6,30,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ7 111 +kh_dun01,6,18,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ8 111 +kh_dun01,235,70,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ9 111 +kh_dun01,235,92,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ10 111 +kh_dun01,235,114,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ11 111 + +//---------------------------------------------------------------------------- +// Beautiful Lady and Beautiful Lady copies. +//---------------------------------------------------------------------------- +kh_school,119,149,4 script Beautiful lady::BeatifulLadyKHQ1 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest < 40) { + mes "[Allysia]"; + mes "Hm? I don't think"; + mes "I know you. Kiel Hyre"; + mes "has only authroized Elly,"; + mes "and a trusted friend that"; + mes "may be helping her, to"; + mes "be admitted to this area."; + next; + mes "[Allysia]"; + mes "I cannot see ^FF0000Elly^000000"; + mes "Has she been attacked as well?"; + mes "Are you ^FF0000Elly's friend^000000?"; + next; + mes "[Allysia]"; + mes "I don't see Elly anywhere"; + mes "around here. I can only let"; + mes "you enter if you can identify"; + mes "youtself as Elly's friend."; + mes "Is there anything that you"; + mes "can present to me as proof?"; + next; + + switch(select("Yellow Keycard","Blue Keycard","Golden Key","Carved Button","...?")) { + + case 1: + break; + + case 2: + break; + + case 3: + mes "Ah, isn't this the"; + mes "key that Kiel Hyre gave"; + mes "to Elly? Yes, I'm convinced"; + mes "that you've been helping her."; + mes "I've been waiting for you, so"; + mes "let me guide you to my room."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + + case 4: + mes "[Allysia]"; + mes "Th-that's Kiehl's"; + mes "heal! Did he send you"; + mes "here to get me?! I'm"; + mes "not taking any changes!"; + close2; + cutin "",255; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + end; + + case 5: + mes "[Allysia]"; + mes "......"; + mes "........"; + mes "..........."; + close2; + cutin "",255; + end; + + } + + mes "[Allysia]"; + mes "Hm? This doesn't prove"; + mes "that Elly really trusts you..."; + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 40) { + mes "[Allysia]"; + mes "Please follow me."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + } +} + + +kh_school,117,149,4 script Beautiful lady::BeatifulLadyKHQ2 894,{ + end; +} + +kh_school,118,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ3 894 + +kh_school,120,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ4 894 + +kh_school,121,149,4 duplicate(BeatifulLadyKHQ1) Beautiful lady::BeatifulLadyKHQ5 894 + +//---------------------------------------------------------------------------- +// Beautiful Lady "Allysia" +//---------------------------------------------------------------------------- +kh_school,122,186,4 script Beautiful lady 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 38) { + mes "[Allysia]"; + mes "Friend of prototype Elly,"; + mes "I welcome you. As you may"; + mes "have figured out, I need your"; + mes "help. Kiel Hyre is being help"; + mes "somewhere inside this factory."; + next; + mes "[Allysia]"; + mes "It is imperative that"; + mes "you search for Kiel Hyre"; + mes "and rescue him as soon"; + mes "as you possibly can!"; + next; + + switch(select("What is this factory?","What happened to ^FF0000Kiel Hyre^000000?")) { + + case 1: + mes "[Allysia]"; + mes "This factory is part of"; + mes "the Kiel Hyre Foundation's"; + mes "secret business where humanoid"; + mes "robots are manufactured. Myself,"; + mes "and all of the academy's students"; + mes "are actually robots, not humans."; + next; + mes "[Allysia]"; + mes "The Kiel Hyre Foundations's"; + mes "ultimate goal is to develop"; + mes "superior robots that will help"; + mes "human society. As robots, we"; + mes "can handle tasks that are too"; + mes "dangerous or difficult for humans."; + break; + + case 2: + mes "[Allysia]"; + mes "^3355FFKiehl^000000 has proceeded to"; + mes "proform abnormal modifications"; + mes "to the humanoid robots. This"; + mes "has been reported to Kiel Hyre,"; + mes "who has left to stop Kiehl."; + mes "However, Hyre hasn't returned."; + next; + mes "[Allysia]"; + mes "Fearing that Kiehl would"; + mes "break me, Kiel Hyre brought"; + mes "a copy of me instead. I can still"; + mes "detect Kiel Hyre's heartbeat,"; + mes "so he should be alright, but his"; + mes "own son might harm him soon."; + next; + mes "[Allysia]"; + mes "Take this Keycard"; + mes "which will enable you"; + mes "to enter the secret areas"; + mes "inside this factory. If you"; + mes "locate Kiel Hyre, please"; + mes "let me know right away."; + getitem 7496,1; //Red_Keycard + set KielHyreQuest,40; + break; + + } + + close2; + cutin "",255; + end; + + } + + else if (KielHyreQuest == 40) { + mes "[Allysia]"; + mes "I can still detect"; + mes "Kiel Hyre's heartbeat,"; + mes "but his sone Kiehl might"; + mes "do something desperate to"; + mes "him soon. Please locate Kiel"; + mes "Hyre before that can happen!"; + close2; + cutin "",255; + warp "kh_dun01",22,216; + end; + } + + else if (KielHyreQuest == 42) { + mes "[Allysia]"; + mes "Have you already"; + mes "located Kiel Hyre?"; + next; + mes "^3355FFYou tell Allysia where^000000"; + mes "^3355FFKiel Hyre has been locked^000000"; + mes "^3355FFup, and give her the metal^000000"; + mes "^3355FFfragment that Kiel Hyre handed^000000"; + mes "^3355FFto you. She took fragment^000000"; + mes "^3355FFand wore it around her wrist.^000000"; + next; + mes "[Allysia]"; + mes "...Kiel Hyre's secret code"; + mes "confirmed. B_2_3 area."; + mes "Vital signs are normal."; + mes "Envelope recieved. Sending"; + mes "Modified Puppet Designs..."; + next; + mes "[Allysia]"; + mes "Alright, I've recieved"; + mes "Kiel Hyre's orders, and"; + mes "must carry them out..."; + set KielHyreQuest,44; + delitem 7497,1; //Metal_Fragment + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest == 44) { + mes "[Allysia]"; + mes "Alright, I have a mission"; + mes "to carry out for Kiel Hyre,"; + mes "and I don't have much time."; + mes "Let me give you some specific"; + mes "instructions very quickly."; + next; + mes "[Allysia]"; + mes "Firstly, I need to take your"; + mes "keycards for security reasons."; + mes "Secondly, meet me at the Kiel"; + mes "Hyre Mansion in Lighthalzen."; + mes "Present the Golden Key to"; + mes "be admitted to the premises"; + delitem 7492,1; //Yellow_Keycard + delitem 7495,1; //Blue_Keycard + delitem 7496,1; //Red_Keycard + set KielHyreQuest,46; + next; + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 44) { + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + +} + +//---------------------------------------------------------------------------- +// Signboard (another useless NPC?) +//---------------------------------------------------------------------------- +kh_dun01,163,223,0 script Signboard 857,{ + mes "[Notice]"; + mes "Cute Pets are prohibited"; + mes "in this area. (Cute Pets that"; + mes "provide special assistance"; + mes "to the visually impaired are"; + mes "exempt from this rule.)"; + close; +} + +//---------------------------------------------------------------------------- +// Mechanical Devices for accessing restricted area +//---------------------------------------------------------------------------- +kh_dun01,166,223,0 script Mechanical Device::KHKeyardReader 111,{ + if ((KielHyreQuest <= 38) || (KielHyreQuest >= 44)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + close; + } + + else if ((KielHyreQuest == 40) && (countitem(7496) >= 1)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + next; + + + input @KHInput$; + if (@KHInput$ == "Red Keycard") { + mes "^3355FFThe door opens once^000000"; + mes "^3355FFyou insert the Red Keycard..^000000"; + close2; + warp "kh_dun01",170,227; + end; + } + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + +} + +kh_dun01,162,206,0 duplicate(KHKeyardReader) Mechanical Device 111 + +//---------------------------------------------------------------------------- +// Keep monsters out of the quest area. +// Silly really sinc ehte rest of it's a dungeon +//---------------------------------------------------------------------------- +//kh_dun01,180,220,0 script Monster Warp#kh1::KHMobWarp -1,5,20,{ +//OnTouchNPC: +// warp "kh_dun01",178,138; +// end; +//} + +//kh_dun01,190,220,0 duplicate(KHMobWarp) Monster Warp#kh2 -1,5,20 +//kh_dun01,200,250,0 duplicate(KHMobWarp) Monster Warp#kh3 -1,5,20 +//kh_dun01,210,220,0 duplicate(KHMobWarp) Monster Warp#kh4 -1,5,20 +//kh_dun01,220,220,0 duplicate(KHMobWarp) Monster Warp#kh5 -1,5,10 + +//---------------------------------------------------------------------------- +// Kiel Hyre - OnTouch +//---------------------------------------------------------------------------- +kh_dun01,224,233,0 script Kiel_Hyre_Door -1,5,5,{ +OnTouch: + if (KielHyreQuest == 40) { + mes "^3355FFyou can faintly hear^000000"; + mes "^3355FFa voice from the other^000000"; + mes "^3355FFside of this door.^000000"; + next; + mes "[????]"; + mes "...Kiehl..."; + mes "...How dare you...!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Mister Kiel Hyre?"; + mes "Is that you in there?"; + next; + mes "[Kiel Hyre]"; + mes "Wh-who's there?"; + mes "Identify yourself!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm... I'm..."; + next; + mes "You explain your story^000000"; + mes "to the voice behind the^000000"; + mes "door, and tell him what^000000"; + mes "happened to Elly and Allysia.^000000"; + next; + mes "[Kiel Hyre]"; + mes "...Yes... It's me."; + mes "I'm Kiel Hyre, trapped"; + mes "in here. He went so far"; + mes "as to modify Elly, eh?"; + mes ".................."; + next; + mes "[Kiel Hyre]"; + mes "Hurry, take this"; + mes "module to Allysia!"; + mes "She'll know what to do"; + mes "with it. If you're really"; + mes "helping us, then she'll have"; + mes "some instructions for you too."; + next; + mes "^3355FFKiel Hyre slides^000000"; + mes "^3355FFa strange metal^000000"; + mes "^3355FFfragment through^000000"; + mes "^3355FFthe gap between the^000000"; + mes "^3355FFdoor and the floor.^000000"; + getitem 7497,1; //Metal_Fragment + set KielHyreQuest,42; + close; + } + + + else if (KielHyreQuest >= 42) { + mes "[Kiel Hyre]"; + mes "......"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Robot Factory Second Floor Entrances +//---------------------------------------------------------------------------- +kh_dun01,44,203,0 script Entrance Device#KHEntry1::KHAccess 111,{ + if (countitem(7509) < 1) { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + close; + } + + else { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + next; + + input @KHInput$; + if (@KHInput$ == "Luxurious Keycard") { + mes "^3355FFAs you insert the"; + mes "Luxurious Keycard"; + mes "into the keycard slot,"; + mes "the door swings open"; + mes "to reveal a long flight"; + mes "of descending stairs.^000000"; + next; + + switch(select("Descend Stairs","Cancel")) { + + case 1: + warp "kh_dun02",41,198; + end; + + case 2: + mes "^3355FFIt looks like this door"; + mes "has automatically closed"; + mes "after the preprogrammed"; + mes "time limit has elapsed.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + } + +} + +kh_dun01,36,195,0 duplicate(KHAccess) Entrance Device#KHEntry2 111 + +//============================================================================ + +//============================================================================ +// Kiel Hyre Mansion NPCs, and Kiehl's Room NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiel's Steward +//---------------------------------------------------------------------------- +kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ + if (KielHyreQuest < 46) { + mes "[Steward]"; + mes "This is a private residence,"; + mes "please leave."; + close2; + warp "lighthalzen",188,201; + end; + } + + if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) { + mes "[Steward]"; + mes "Greetings."; + mes "Have you been invited"; + mes "by the master of"; + mes "this mansion?"; + next; + + switch(select("Present Golden Key","????")) { + + case 1: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "I've been expecting your"; + mes "arival. Please, this way."; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "If you have not been"; + mes "invited by the master of"; + mes "this mansion, then I'm"; + mes "afraid that I must insist on"; + mes "your immediate departure!"; + close2; + warp "lightalzen",188,201; + end; + + } + + } + + if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + L_SeeKielHyre: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Very well."; + mes "Please make"; + mes "yourself at home."; + close; + + } + + } + + if ((KielHyreQuest == 52) || (KielHyreQuest == 54) || (KielHyreQuest >= 64) && (KielHyreQuest <= 70)) { + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master, or...?"; + next; + + switch(select("^FF0000Kiel Hyre^000000","^3355FFMitchell^000000")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Oh...? You must."; + mes "be here to deliver"; + mes "good news. Excuse me..."; + next; + mes "^3355FFThe Steward furtively^000000"; + mes "^3355FFlooked around to check^000000"; + mes "^3355FFif anyone is watching him.^000000"; + next; + mes "[Steward]"; + mes "I believe it should"; + mes "be save enough to let"; + mes "you go see him now..."; + mes "Please, hurry this way."; + close2; + warp "kh_mansion",20,87; + end; + + } + + } + + if (KielHyreQuest >= 70) { + goto L_SeeKielHyre; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre +//---------------------------------------------------------------------------- +kh_mansion,22,28,4 script Kiel Hyre 903,{ + cutin "kh_kyel02",2; + if (KielHyreQuest < 46) { + mes "[Kiehl Hyre]"; + mes "........."; + close; + } + + else if (KielHyreQuest == 46) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Ah, you must be "+strcharinfo(0)+"."; + mes "I'd like to thank you for saving"; + mes "my life. You must have many"; + mes "questions to ask me, so I'll"; + mes "do my best to give you answers."; + next; + + L_Menu: + + switch(select("Robots?","^3355FFKiehl^000000?","^FF0000Elly^000000's button?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I've been researching"; + mes "robotics for thirty-two"; + mes "years now. I'm proud to"; + mes "say that I've succeeded"; + mes "where the great Sage"; + mes "Varmundt did not."; + next; + mes "[Kiel Hyre]"; + mes "It's been my dream to"; + mes "develop humanoid robots"; + mes "from humans. Those Guardians"; + mes "might be robots too, but they"; + mes "don't operate using free will."; + next; + mes "[Kiel Hyre]"; + mes "If you'd like to know more"; + mes "of the specifics concerning"; + mes "robotics, why don't you speak"; + mes "with ^3355FFAllysia^000000? She can explain"; + mes "everything much more succinctly"; + mes "than I can. I tend to ramble..."; + if (@KHQ1Read < 1) { set @KHQ1Read,1; } + break; + + case 2: + mes "[Kiel Hyre]"; + mes "^3355FFKiehl^000000 is my only son,"; + mes "but the love of my life"; + mes "died after giving birth to"; + mes "him. I'll admit that he's"; + mes "a genius in mechanical"; + mes "design and development."; + next; + mes "[Kiel Hyre]"; + mes "He's largely responsible"; + mes "for the creation of Third"; + mes "Generation robots like Elly."; + mes "Unfortunately, he's trying to"; + mes "modify his creations for"; + mes "some sinister purpose."; + next; + mes "[Kiel Hyre]"; + mes "I tried to stop him,"; + mes "but I ended up getting"; + mes "locked inside the factory."; + mes "I don't know why he wants"; + mes "to do this. I still have"; + mes "absolutely no clue..."; + if (@KHQ2Read < 1) { set @KHQ2Read,1; } + break; + + case 3: + mes "[Kiel Hyre]"; + mes "That button Elly was"; + mes "holding has ^3355FFKiehl's emblem^000000"; + mes "engraved on it. Ah, and that"; + mes "man in black menacing the"; + mes "students? That was probably"; + mes "^3355FFKaiser^000000, Kiehl's bodyguard."; + next; + mes "[Kiel Hyre]"; + mes "Kaiser..."; + mes "I don't know"; + mes "anything about him."; + mes "I've never even seen"; + mes "his face! Kiehl just hired"; + mes "him without letting me know..."; + if (@KHQ3Read < 1) { set @KHQ3Read,1; } + break; + + } + + if ((@KHQ1Read == 1) && (@KHQ2Read == 1) && (@KHQ3Read == 1)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + delitem 7493,1; //Golden_Key + delitem 7494,1; //Exquisite_Button + set KielHyreQuest,48; + } + + else { + next; + goto L_Menu; + } + + } + + else if (KielHyreQuest == 48) { + mes "Ah, I almost forgot."; + mes "Please, take this as"; + mes "a little reward for"; + mes "saving my life."; + set KielHyreQuest,50; + getitem 12105,1; //Taming_Gift_Set + getexp 700000,0; + } + + else if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + } + + else if (KielHyreQuest == 64) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Hm? Did you"; + mes "have something"; + mes "that you wanted"; + mes "to ask me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't have enough"; + mes "concrete evidence yet,"; + mes "but I might have some"; + mes "questions soon enough."; + } + + else if (KielHyreQuest == 68) { + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Ah, "+strcharinfo(0)+"."; + mes "It's you. So how can"; + mes "I help you today?"; + next; + + switch(select("About ^3355FFAllysia^000000...")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "You know, I was looking"; + mes "through this deserted house"; + mes "in Juno, and discovered"; + mes "an old portrait of a woman"; + mes "that looks just like Allysia."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Oh..."; + mes "Is that all?"; + mes "I thought you had"; + mes "a robotics question."; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Anyway, that's a"; + mes "strange coincidence."; + mes "Well, I suppose it's"; + mes "not so strange to find"; + mes "look-a-likes for other people..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't think it's just"; + mes "a coincidence. The woman"; + mes "in that thirty year old portrait"; + mes "was also named Allysia, and she"; + mes "worked at Orsimier street"; + mes "in Juno. Does that ring a bell?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Then I thought that this"; + mes "Allysia must have been the"; + mes "woman that you loved, and"; + mes "that you based your robot's"; + mes "apperance on her."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "I think this is what happened:"; + mes "when you were a young, poor"; + mes "man, you fell in love with"; + mes "Allysia. However, she was"; + mes "in love with Rosimier, who"; + mes "was rich and powerful."; + next; + mes "["+strcharinfo(0)+"]"; + mes "However, Rosimier was"; + mes "betrothed to some other"; + mes "woman, and he ended up"; + mes "marrying his fiancee, thus"; + mes "breaking Allysia's heart."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Feeling betrayed, her"; + mes "heart broken, Allysia jumped"; + mes "into a river. Then, you decided"; + mes "to get revenge on Rosimier, so"; + mes "you ended up joining"; + mes "Rekenber Corporation!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hahahahahahaha!"; + mes "Oh, what an imagination~"; + mes "That's bery ridiculous..."; + mes "Though, I admit, maybe"; + mes "I did design Allysia after"; + mes "seeing that woman long ago."; + next; + mes "[Kiel Hyre]"; + mes "I'd almost forgotten"; + mes "about her! I think we"; + mes "were friends... Though,"; + mes "where did you get the idea"; + mes "that I might have"; + mes "been in love with her?"; + next; + + switch(select("Reveal Kiel's Portrait from Hut")) { + + case 1: + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Wh-what..."; + mes "How did..."; + mes "Where did you...?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre, I found this"; + mes "portrait of you as a young"; + + mes "man from the house of the"; + mes "man that bought Allysia's ring."; + mes "I even spoke to the fisherman"; + mes "that discovered Allysia's body."; + next; + mes "["+strcharinfo(0)+"]"; + mes "You paid an awful lot"; + mes "of money to buy Allysia's"; + mes "ring. How can you not tell"; + mes "me that you didn't love her?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "*Sigh...*"; + mes "You got me, you got me."; + mes "I didn't want you to learn"; + mes "the truth. You are correct."; + mes "I loved Alysia, and designed"; + mes "my robot to look jus tlike her."; + next; + mes "[Kiel Hyre]"; + mes "I could never forget her."; + mes "Ever. But I would never"; + mes "do anything to harm the"; + mes "Rosimiers! I'm a scientist!"; + mes "I hated him when I was young,"; + mes "but things are different now!"; + next; + mes "[Kiel Hyre]"; + mes "I shed no tears when the"; + mes "Rosimiers fell, but I wasn't"; + mes "responsible. Besides, I didn't"; + mes "have the resources or the"; + mes "capability to cause it..."; + next; + cutin "kh_kyel02",2; + mes "["+strcharinfo(0)+"]"; + mes "I'm afraid that the"; + mes "evidence shows otherwise."; + next; + + switch(select("Reveal Portait of Rosimiers")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at this portrait that"; + mes "I found at the Rosimiers'"; + mes "old house. Do you see"; + mes "anything... incriminating?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "ASide from that"; + mes "James Rosimier, you"; + mes "mean? No! I don't see"; + mes "anything wrong with"; + mes "this picture at all."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at the pocketwatch"; + mes "in the portrait. That's"; + mes "the pocketwatch you"; + mes "wear today, isn't it?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "...!!!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "You might not have caused"; + mes "the downfall of the Rosimiers"; + mes "yourself, but with the aid of"; + mes "the Rekenber Corporation, I'd"; + mes "say it was entirely possible!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Well played, adventurer."; + mes "Well played. I don't regret"; + mes "what I did: they killed my"; + mes "Allysia! If James didn't betray"; + mes "her, if only he didn't drive"; + mes "her to commit suicide..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "That's where you're wrong!"; + mes "Allysia was killed, she didn't"; + mes "commit suicide. Take a good"; + mes "look at this note right here!"; + next; + mes "[Kiel Hyre]"; + mes "What?!"; + next; + + switch(select("Show James's Note")) { + + case 1: + mes "[Kiel Hyre]"; + mes "What does this prove?"; + mes "This doesn't show that"; + mes "James didn't betray Allysia."; + mes "How does this change anything?"; + mes "She's dead, nothing I can do"; + mes "will bring her back to me!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I never said James didn't"; + mes "betray her. Look at the date"; + mes "on the note. James made plans"; + mes "to run away with her on August"; + mes "20th. However, her body was"; + mes "found on the same day."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ergo, Allysia must have"; + mes "died on August 19th. If she"; + mes "was planning to run away with"; + mes "her love on the next day, then"; + mes "she had no reason to kill herself!"; + next; + mes "[Kiel Hyre]"; + mes "No, that's not right!"; + mes "She probably couldn't"; + mes "trust me! She must have"; + mes "realized she was nothing"; + mes "but another toy to him!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Oh yeah? I say she jumped"; + mes "into the river because you"; + mes "met her on that day. Now,"; + mes "take a good look at this!"; + next; + + switch(select("Show K.H.'s note")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "This note was written by"; + mes "a man with your initials,"; + mes "K.H. These initials were also"; + mes "signed on her portrait. You"; + mes "must have written this note:"; + mes "there's too many coincidences!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "According to this note,"; + mes "you told Allysia that you"; + mes "wanted to see her again"; + mes "at the place you first med."; + mes "I think you did see her again..."; + mes "on August 19th, the day she died!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm assuming the place you"; + mes "two first met was near the"; + mes "river. No more of your lies:"; + mes "well me what really happened!"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + mes "........."; + mes "......"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hah... Ha ha ha..."; + mes "Yes... That's right..."; + mes "That horrible night."; + mes "I remember it well..."; + mes "....................."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "That night, when she came"; + mes "to the river to meet me as"; + mes "I had asked, I begged her to"; + mes "run away with me, instead"; + mes "of waiting for that James."; + next; + mes "[Kiel Hyre]"; + mes "She insisted that James"; + mes "never betrayed her, and he"; + mes "promised to take her away"; + mes "with him the next day. Can"; + mes "you imagine how that made"; + mes "me feel? I was nothing to her."; + next; + mes "[Kiel Hyre]"; + mes "My feelings didn't matter to"; + mes "her at all! She kept fidgeting"; + mes "with that ring...I lost control"; + mes "and tried to take that damned"; + mes "thing away from her, and"; + mes "throw it into the river..."; + next; + mes "[Kiel Hyre]"; + mes "But you know what?"; + mes "She struggled, she actually"; + mes "fought me! It was just a small"; + mes "fight, but then, before I knew"; + mes "it, the ground underneath us"; + mes "collapsed and... the rains..."; + next; + + switch(select(".........")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I'm not sure what it"; + mes "was. The rain weakened"; + mes "the ground, something went"; + mes "wrong... and she just... just..."; + mes "The river swallowed her..."; + mes "I felt empty. She was gone. "; + set KielHyreQuest,70; + delitem 7498,1; //Losimier's_House_Key + delitem 7499,1; //Portrait_of_a_Family + delitem 7500,1; //Portrait_of_a_Lady + delitem 7501,1; //K.H's_Letter + delitem 7502,1; //James's_Memo + delitem 7503,1; //Portrait_of_a_Guy + close; + + } + + } + + } + + } + + } + + } + + } + + else if (KielHyreQuest == 70) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You already know that"; + mes "she was found dead the"; + mes "next day. But what really"; + mes "broke my heart was that"; + mes "she held that ring so tightly"; + mes "in her hand, even in death..."; + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "His family had everything"; + mes "while I had nothing. And"; + mes "he had the audacity to take"; + mes "Allysia away from me?!"; + mes "How could that be right?"; + next; + mes "[Kiel Hyre]"; + mes "Even though she had passed"; + mes "away, I still wanted to prove"; + mes "to Allysia what kind of ugly"; + mes "person James really was."; + mes "That was when I joined the"; + mes "Rekenber Corporation."; + next; + mes "[Kiel Hyre]"; + mes "I designed the very first"; + mes "First Generation Robot, which"; + mes "I named Allysia, and sold the"; + mes "designs to Rekenber. I gave them"; + mes "robots, and they gave me money,"; + mes "power, obedient subordinates."; + next; + mes "[Kiel Hyre]"; + mes "Of course I knew they'd use"; + mes "my robots for spying and killing!"; + mes "But you know what? It didn't"; + mes "matter so long as they gave me"; + mes "the means to my revenge. It was"; + mes "the perfect partnership, really."; + next; + mes "[Kiel Hyre]"; + mes "You've got me right"; + mes "where you want me."; + mes "Who are you working"; + mes "for, and what exactly"; + mes "do you want? My designs?"; + mes "My death? Everything...?"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Actually, I just want"; + mes "to ask about the nature"; + mes "of your professional"; + mes "relationship with the"; + mes "Rekenber Corporation."; + mes "And about Kiehl."; + next; + mes "[Kiel Hyre]"; + mes "Kiehl, eh? After hearing"; + mes "my crazy story, I'm guessing"; + mes "that you already suspect the"; + mes "truth about him... He's also"; + mes "a robot, specifically the first"; + mes "of the Second Generation models."; + next; + mes "[Kiel Hyre]"; + mes "His mind was developed using."; + mes "an experimental, and unstable,"; + mes "form of the Condensed Magic"; + mes "Spell Scrolls. He was the only"; + mes "Second Generation robot that"; + mes "I was allowed to keep."; + next; + mes "[Kiel Hyre]"; + mes "I've become very attached"; + mes "to Kiehl. It's not surprising,"; + mes "seeing that robotics have"; + mes "become my life. I even raised"; + mes "him as my own son, and taught"; + mes "him everything about robotics"; + next; + mes "[Kiel Hyre]"; + mes "Kiehl is now a genius,"; + mes "and has even developed the"; + mes "Third Generation of robots."; + mes "Unfortunately, I failed to"; + mes "properly raise him with"; + mes "human morals and ethics."; + next; + + switch(select("......")) { + + case 1: + mes "[Kiel Hyre]"; + mes "He's been transforming"; + mes "the Third Generation robots"; + mes "into killing machines. That's"; + mes "why I tried to put them all"; + mes "into the academy, so they"; + mes "could learn human behavior."; + next; + mes "[Kiel Hyre]"; + mes "Although the academy"; + mes "has delayed Kiehl's plans,"; + mes "he has succeeded into"; + mes "converting all of the robots"; + mes "into uncontrollable engines"; + mes "of mass destruction."; + next; + mes "[Kiel Hyre]"; + mes "Yes, he's been working"; + mes "closely with Rekenber."; + mes "Their true objective is to"; + mes "create killing machines"; + mes "for Rekenber's use."; + next; + mes "[Kiel Hyre]"; + mes "You know all the secrets"; + mes "of my past now. I'm not"; + mes "upset with you or anything,"; + mes "but I do have something"; + mes "that I want to ask of you."; + next; + mes "[Kiel Hyre]"; + mes "Please! Stop Kiehl!"; + mes "I don't want his madness"; + mes "to destroy any more robots!"; + mes "I see each and every one"; + mes "of them as one of my children!"; + next; + mes "[Kiel Hyre]"; + mes "I know that I must take"; + mes "full responsibility for all"; + mes "that has happened. I promise"; + mes "to take any punishment for"; + mes "my actions once everything"; + mes "has been resolved."; + + next; + + switch(select("Accept","Okay","Nod")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + } + + mes "[Kiel Hyre]"; + mes "Thank you so much!"; + mes "You can find Kiehl"; + mes "in the underground"; + mes "level in this mansion."; + set KielHyreQuest,72; + + } + + } + + else if (KielHyreQuest == 72) { + cutin "kh_kyel01",2; + //I believe this text goes here o_o + mes "[Kiel Hyre]"; + mes "He stays in the old room"; + mes "where he was created, but"; + mes "he reconstructed it as some"; + mes "kind of cave to keep everyone"; + mes "out, including me. Yes, he"; + mes "doesn't trust anyone anymore..."; + next; + mes "[Kiel Hyre]"; + mes "When you find him, I want"; + mes "you to take out Allysia's"; + mes "ring out of his heart. If you"; + mes "remove it, that should stop"; + mes "him from going berserk."; + next; + + switch(select("Allysia's Ring?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "Yes... Her ring is the"; + mes "beginning of everything"; + mes "I put that in his heart so"; + mes "that I'd never forget what"; + mes "the Rosimiers did to me."; + next; + mes "[Kiel Hyre]"; + mes "I think Kiehl's grown"; + mes "so powerful that normal"; + mes "weapons might not work"; + mes "on him anymore. Use this"; + mes "device that will cause his"; + mes "power supply to fluctuate."; + getitem 7504,1; //Power_Source + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "If you successfully attach"; + mes "this to Kiehl's body, then"; + mes "he won't be able to use his"; + mes "body's full power. While he's"; + mes "weakened, open up his chest"; + mes "and get the ring from his heart."; + next; + mes "[Kiel Hyre]"; + mes "Let me know once"; + mes "you're ready. Then, I'll"; + mes "guide you Kiehl's room."; + set KielHyreQuest,74; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 104)) { + mes "[Kiel Hyre]"; + mes "Are you ready"; + mes "to confront"; + mes "Kiehl now?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Kiel Hyre]"; + mes "There... the secret"; + mes "passage is open now."; + mes "Just go to the right of"; + mes "me, but be careful. Kiehl"; + mes "is extremely dangerous."; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + break; + + case 2: + mes "[Kiel Hyre]"; + mes "Please take your"; + mes "time. I imagine that"; + mes "it won't be easy."; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You're back...!"; + mes "So were you able"; + mes "to retrieve Allysia's"; + mes "Ring from Kiehl's heart?"; + next; + + if (countitem(7508) < 1) { + mes "[Kiel Hyre]"; + mes "You mean... You don't have it?"; + mes "Please, retrieve Allysia's Ring"; + mes "from Kiehl's heart!"; + next; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + close2; + cutin "",255; + } + + mes "[Kiel Hyre]"; + mes "Wh-what happened...?"; + mes "Kiehl developed a new"; + mes "body for himself? Th-that"; + mes "would make him a Fourth"; + mes "Generation robot. I had"; + mes "no idea he was this smart."; + next; + mes "[Kiel Hyre]"; + mes "Wait, now that I think about"; + mes "it, I did see robot bodies that"; + mes "looked like Kiehl when I was"; + mes "locked in the factory. So he"; + mes "was using those copies to"; + mes "develop personal upgrades."; + next; + mes "[Kiel Hyre]"; + mes "Here, please take this"; + mes "Keycard which will let you"; + mes "enter and investigate the"; + mes "deepest levels of the factory."; + mes "I'll investigate Kiehl's room."; + set KielHyreQuest,108; + getitem 7509,1; //Gorgeous_Keycard + next; + + if (sex == 0) { + if (getpartnerid() == 0) set @KHTitle$,"Miss"; + else set @KHSTitle$,"Mrs"; + } + else set @KHTitle$,"Mr"; + + mes "[Kiel Hyre]"; + mes "Kiehl is my responsibility..."; + mes "No matter what the cost may"; + mes "be, I've got to stop him! Oh,"; + mes "and here, please take this"; + mes "with my thanks for all of"; + mes "your help, "+@KHTitle+". "+strcharinfo(0)+"."; + getitem 616,1; //Old card Album + delitem 7508,1; //Elisia's_Ring + getexp 1000000,0; + } + + else if (KielHyreQuest >= 108) { + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + + +//---------------------------------------------------------------------------- +// Allysia +//---------------------------------------------------------------------------- +kh_mansion,18,30,4 script Allysia 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 68) { + mes "[Allysia]"; + mes "Who are you?"; + mes "How did you get here?"; + mes "Go away"; + close; + } + + else if (KielHyreQuest < 70) { + mes "[Allysia]"; + mes "You must be surprised"; + mes "by everything that's been"; + mes "happening. Maybe everything"; + mes "would be easier to understand"; + mes "if I explained about robots?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Allysia]"; + mes "The robots you've been"; + mes "encountering are automated"; + mes "mechanical puppets that can"; + mes "independantly think and operate."; + mes "Many sages have tried to develop"; + mes "their own robots, but have failed."; + next; + mes "[Allysia]"; + mes "My master, Kiel Hyre, has"; + mes "been studying robotics since"; + mes "he was twenty years old, and"; + mes "has developed three different"; + mes "generations of robots, the first,"; + mes "second, and third generations."; + next; + + switch(select("First Generation","Second Generation","Third Generation")) { + + case 1: + mes "[Allysia]"; + mes "I am a good example of one"; + mes "of Kiel Hyre's First Generation"; + mes "robots. I was constructed using"; + mes "a heavy mechanical framework,"; + mes "a robotic heart, and chemically"; + mes "synthesized skin covering."; + next; + mes "[Allysia]"; + mes "My central processing unit,"; + mes "equivilent to your brain, is"; + mes "essentially a Memory Scroll"; + mes "based on the design of the"; + mes "Magic Spell Scrolls that you"; + mes "adventurers use in battle."; + next; + mes "[Allysia]"; + mes "I'm the oldest type of"; + mes "humanoid robot, so I weigh"; + mes "a lot, and my mind can only"; + mes "process a limited amount of"; + mes "data. Therefore, I can't express"; + mes "emotion similarly to a human."; + break; + + case 2: + mes "[Allysia]"; + mes "The First Generation robots"; + mes "were developed from mostly"; + mes "mechanical parts, but the"; + mes "Second Generation robots"; + mes "incorporated Homunculus"; + mes "science and technology."; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "are more life-like since they"; + mes "have artifically created skin"; + mes "and flesh, although they still"; + mes "are constructed from a heavy"; + mes "mechanical framework."; + next; + mes "[Allysia]"; + mes "Sage elemental scroll"; + mes "technology was also used"; + mes "to develop the Condensed"; + mes "Memory Scroll, a central"; + mes "processing unit superior to that"; + mes "used in First Generation robots."; + next; + mes "[Allysia]"; + mes "Although Condensed Memory"; + mes "Scrolls were 100,000 times"; + mes "more powerful than ordinary"; + mes "Memory Scrolls, they were"; + mes "problematic and were prone"; + mes "to too many error problems"; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "were capable of expressing"; + mes "human-like emotion, but their"; + mes "production halted after six"; + mes "years because they were"; + mes "considered faulty."; + break; + + case 3: + mes "[Allysia]"; + mes "Third Generation robots"; + mes "were mostly designed by"; + mes "Kiel Hyre's son, Kiehl,"; + mes "and don't use a mechanical"; + mes "framework at all: the entire"; + mes "body is basically a homunculus."; + next; + mes "[Allysia]"; + mes "With their organic bodies"; + mes "and advanced artificial hearts"; + mes "make from imitation Ymir Heart"; + mes "Pieces, they can experience"; + mes "physiologic phenomena"; + mes "just like ordinary humans."; + next; + mes "[Allysia]"; + mes "Kiehl was able to develop"; + mes "a more stable form of the"; + mes "Condensed Memory Scroll"; + mes "which does not suffer from"; + mes "critical errors, and can be"; + mes "cheaply mass processed."; + next; + mes "[Allysia]"; + mes "Elly is actually a Third"; + mes "Generation prototype. Once"; + mes "we optimize the prototypes,"; + mes "we will begin mass production."; + mes "In fact, the academy is our"; + mes "prototype testing ground."; + next; + mes "[Allysia]"; + mes "The fact that out prototype"; + mes "robots can interact just like"; + mes "real humans is proof of our"; + mes "success in robotics."; + break; + + } + case 2: + mes "[Allysia]"; + mes "Please let me know if"; + mes "you'd like to learn more"; + mes "about Kiel Hyre's robots."; + break; + + } + + } + + else if (KielHyreQuest >= 70) { + mes "[Allysia]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Abduction triggering NPC +//---------------------------------------------------------------------------- +lighthalzen,188,200,0 script Abduction_trigger -1,3,1,{ +OnTouch: + if (KielHyreQuest == 50) { + mes "^3355FFAs you walked out of^000000"; + mes "^3355FFthe mansion, something^000000"; + mes "^3355FFsmashed the top of your^000000"; + mes "^3355FFhead, and you instnatly^000000"; + mes "^3355FFlose consiousness...^000000"; + close2; + percentheal -99,0; + warp "kh_mansion",30,75; + end; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Mysterious Woman "Mitchell Layla" +//---------------------------------------------------------------------------- +kh_mansion,25,79,4 script Mysterious Woman 727,3,3,{ +L_StartDialog: + if (KielHyreQuest == 50) { + mes "^3355FFYou awaken with your^000000"; + mes "^3355FFhead painfully throbbing,^000000"; + mes "^3355FFand a mysterious woman^000000"; + mes "^3355FFstanding infront of you.^000000"; + next; + mes "[??????]"; + mes "Hm? Oh, you're awake"; + mes "earlier than I though."; + mes "You must feel confused,"; + mes "but listen carefully. If you"; + mes "don't, then I can't guarantee"; + mes "your safety, okay? Alright."; + next; + mes "[??????]"; + mes "All you need to know it"; + mes "that I'm a secret agent for"; + mes "the Schwaltzvalt Republic"; + mes "government. We're investigating"; + mes "abnormal activity between Kiel"; + mes "Hyre and the Rekenber Corporation."; + next; + mes "[??????]"; + mes "We saw you enter the"; + mes "mansion and speak to"; + mes "Kiel Hyre, so basically"; + mes "you're here for questioning."; + mes "Now tell me the truth. How"; + mes "do you know Kiel Hyre?"; + next; + + switch(select("I'll tell you everything!","I don't know nuthin'!")) { + + case 1: + goto L_TellEverything; + break; + + case 2: + mes "[??????]"; + mes "Don't...know...nuthin'?"; + mes "You sure about that? Only"; + mes "a select few can even speak"; + mes "with Kiel Hyre in person. You"; + mes "must have some connection"; + mes "to him. I'm right, aren't it?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[??????]"; + mes "Are you trying to protect"; + mes "him? I think that you might"; + mes "not understand what kind of"; + mes "person you're really dealing"; + mes "with here. I'll tell you what"; + mes "I've learned about him..."; + next; + mes "[??????]"; + mes "Kiel Hyre. CEO of the"; + mes "Kiel Hyre Foundation,"; + mes "manufacturer of various"; + mes "machinery. His company started"; + mes "as a small Einbroch store whose"; + mes "technology slowly grew famous."; + next; + mes "[??????]"; + mes "Rekenber Corperation offered"; + mes "a merger with the Kiel Hyre"; + mes "Foundation. We're still not"; + mes "sure why they wanted Kiel"; + mes "Hyre in particular to repair"; + mes "and develop their Guardians..."; + next; + mes "[??????]"; + mes "We're also not sure why"; + mes "they wanted to suddenly"; + mes "focus more on Guardian"; + mes "development. Then, all"; + mes "of a sudden, Kiel Hyre's son"; + mes "appears from out of nowehre."; + next; + mes "[??????]"; + mes "It's very suspicious."; + mes "There's no records of his"; + mes "birth or anything. Still, maybe"; + mes "Kiel Hyre really did have him"; + mes "with his secretary, Allysia."; + mes "Well, no one is really sure."; + next; + mes "[??????]"; + mes "In any case, Kiel Hyre's"; + mes "son and heir, Kiehl, helped"; + mes "his father establish this"; + mes "special academy as their"; + mes "way of giving back t society."; + next; + mes "[??????]"; + mes "Almost every corporation and"; + mes "organization tried to get their"; + mes "spies to enter this academy,"; + mes "but all of them were rejected."; + mes "it's strange. At least one of"; + mes "them should have made it in."; + next; + mes "[??????]"; + mes "And recently, Kiehl Hyre"; + mes "has held a secret meeting with"; + mes "Rekenber executives to announce"; + mes "his new project. He intends to"; + mes "create advanced humanoid robots"; + mes "that will replace guardians!"; + next; + mes "[??????]"; + mes "Our spies reported that"; + mes "Kiel Hyre was nowhere to"; + mes "be seen at that meeting,"; + mes "as well as his trusted"; + mes "secretary, Allysia. He..."; + mes "He just disappeared!"; + next; + mes "[??????]"; + mes "Then, Kiel Hyre pops back"; + mes "in his mansion after all"; + mes "this time as if nothing"; + mes "happened! At the same time,"; + mes "Kiehl disappears, under the"; + mes "excuse of conducting research."; + next; + mes "[??????]"; + mes "Rekenber is sponsoring"; + mes "both Kiehl and Kiel, but"; + mes "there's some kind of conflict"; + mes "going on between father and"; + mes "son, I just know it! Now tell"; + mes "me, what's going on?"; + next; + mes "[??????]"; + mes "I'm not sure how well you"; + mes "know this country, but the"; + mes "fact that Rekenber is invoved"; + mes "must tell you that these aren't"; + mes "good people. Tell me what"; + mes "you know about them!"; + next; + L_TellEverything: + mes "^3355FFYou tell the woman^000000"; + mes "^3355FFeverything you know^000000"; + mes "^3355FFabout Kiel Hyre. Your^000000"; + mes "^3355FFvoice quivers with sadness^000000"; + mes "^3355FFwhenever you mention Elly.^000000"; + next; + mes "[??????]"; + mes "I see, I see..."; + mes "That poor girl... So..."; + mes "Your involvement in this"; + mes "is a coincidence? In that"; + mes "case, I want your help"; + mes "in our investigation."; + next; + + switch(select("OKay","......")) { + + case 1: + L_Help: + mes "[??????]"; + mes "Great."; + mes "I'm Agent Mitchell Layla."; + mes "From here on, you're working"; + mes "for the Schwaltzvalt Republic!"; + set KielHyreQuest,52; + close; + + case 2: + mes "[??????]"; + mes "If you don't cooperate,"; + mes "then I can't guarantee"; + mes "your safety, adventurer"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Huh? What...?"; + mes "What does that mean?"; + mes "Are you threatening me?"; + next; + + switch(select("Just do what she says.")) { + + case 1: + goto L_Help; + break; + + } + + } + + } + + } + + else if (KielHyreQuest == 52) { + mes "[Mitchell]"; + mes "I've got some new"; + mes "information for you."; + mes "There's an old lady in"; + mes "Juno that knew a woman"; + mes "named Allysia 30 years ago."; + next; + mes "[Mitchell]"; + mes "The clincher is that this"; + mes "Allysia from 30 years ago"; + mes "commited suicide, and is"; + mes "identical to Kiel Hyre's"; + mes "secretary, who is also"; + mes "named Allysia."; + next; + mes "[Mitchell]"; + mes "This is too much of a"; + mes "coincidense. I want you to"; + mes "go to Juno and investigate."; + mes "When you're done, talk to"; + mes "Kiel Hyre's steward, and"; + mes "he'll send you over to me."; + next; + mes "[Mitchell]"; + mes "Yeah, I know."; + mes "That guy actually"; + mes "works for me. Anyway,"; + mes "when you're ready to go"; + mes "to Juno, let me know, and you"; + mes "can board the federal airship."; + set KielHyreQuest,54; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Mitchell]"; + mes "Are you ready?"; + mes "I'll let you board"; + mes "the federal Airship so"; + mes "you can get to Juno, and"; + mes "finish your mission quickly."; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Mitchell]"; + mes "Good luck. Once you"; + mes "complete your mission,"; + mes "make sure that you report"; + mes "to Kiel Hyre's steward so"; + mes "that he can send you to me."; + close2; + warp "yuno",54,209; + end; + case 2: + mes "[Mitchell]"; + mes "Take your time..."; + mes "But keep in mind that"; + mes "I'm not a patient woman!"; + close; + + } + + } + + else if (KielHyreQuest == 64) { + mes "[Mitchell]"; + mes "Ah, you're back."; + mes "What do you have"; + mes "to report from your"; + mes "investigation?"; + next; + mes "[Mitchell]"; + mes "....................."; + mes "Ah, I see. Good work."; + mes "Why don't you go speak to Kiel"; + mes "Hyle and confront him with"; + mes "what you've learned about"; + mes "his past? Yeah, grill him."; + next; + mes "[Mitchell]"; + mes "Wear this hidden mic,"; + mes "so we can send help if"; + mes "you're endangered. I want"; + mes "you to find out who Kiel"; + mes "really is, and what's his"; + mes "relationship to Rekenber."; + set KielHyreQuest,68; + next; + warp "kh_mansion",83,50; + end; + } + + + else if (KielHyreQuest >= 68) { + mes "[Mitchell]"; + mes "Shouldn't you be"; + mes "leaving about now?"; + next; + warp "kh_mansion",83,50; + end; + } + +OnTouch: + if (KielHyreQuest <= 50) { + goto L_StartDialog; + } + end; +} + +//---------------------------------------------------------------------------- +// Warp portal into Kiehl's 'Room' +// - Anyone can enter +// - After 30-40 seonds this NPC should be disabled. +//---------------------------------------------------------------------------- +kh_mansion,29,27,0 script Kiehl_Room_Warp 45,2,2,{ +OnTouch: + warp "kh_kiehl01",10,31; + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Kiehl_Room_Warp"; + end; + +OnInit: + disablenpc "Kiehl_Room_Warp"; + end; +} + +//============================================================================ + +//============================================================================ +// Rosimier NPCs and other Related NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Odd Grandma +//---------------------------------------------------------------------------- +yuno,256,141,4 script Odd Grandma 846,{ + if (KielHyreQuest < 54) { + mes "[Grandma]"; + mes "Where did you go,"; + mes "my darling? Where"; + mes "are you, my little dear?"; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Grandma]"; + mes "Lullabye..."; + mes "Say goodnight..."; + mes "Hush little baby..."; + mes "Go to sleeeeep~"; + next; + + switch(select("What are you doing?","Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + mes "Oh? My baby won't stop"; + mes "crying and can't seem"; + mes "to sleep. She needs to"; + mes "rest, so I can go to work."; + mes "The house is so messy,"; + mes "and the boss is unhappy..."; + set KielHyreQuest,56; + next; + + switch(select("Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + //Missing text, needs another run through. + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + case 2: + //Missing text, needs another run through. + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + } + + else if ((KielHyreQuest >= 56) && (KielHyreQuest < 60)) { + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + + if (countitem(7500) < 1) { + close; + } + + else { + next; + + switch(select("Allysia? Isn't she...")) { + + case 1: + cutin "kh_ellisia_port",1; + mes "^3355FFYou show Allysia's"; + mes "portrait to the old woman.^000000"; + next; + cutin "",255; + mes "[Grandma]"; + mes "Oh, do you know"; + mes "Allysia? She's been"; + mes "missing! She left home"; + mes "yesterday and hasn't"; + mes "come back! C-can you"; + mes "tell me where she is?!"; + close; + } + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Grandma]"; + mes "Don't worry, Allysia..."; + mes "Mommy will always be"; + mes "here for you. There's no"; + mes "need to be sad..."; + close; + } + +} + +//---------------------------------------------------------------------------- +// Old Lady; gives you the key to the Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,250,132,2 script Old Lady 711,{ + if (KielHyreQuest < 56) { + mes "[Old Lady]"; + mes "Oooh, my legs and back"; + mes "are so sore. These old"; + mes "bones ache all over..."; + close; + } + + else if (KielHyreQuest == 56) { + mes "[Old Lady]"; + mes "Goodness, I hate this"; + mes "weather! Reminds me"; + mes "of how old I've gotten!"; + mes "It chills my bones, it does!"; + next; + + switch(select("......","Do you know that grandma?")) { + + case 1: + mes "[Old Lady]"; + mes "Damn it! If only I didn't"; + mes "have all those adventures"; + mes "in my youth! Then maybe"; + mes "I wouldn't suffer so in"; + mes "my advanced age!"; + close; + + case 2: + mes "[Old Lady]"; + mes "Oh... Yes. She was"; + mes "the mother of my best"; + mes "friend, ^3355FFAllysia^000000. Ever since"; + mes "she commited suicide, things"; + mes "haven't been the same. Her"; + mes "mother lost her sanity..."; + next; + + switch(select("Was ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, Allysia was such"; + mes "a beautiful girl. So many"; + mes "men wanted her, especially"; + mes "that dashing Games Rosimier."; + mes "I remember hearing that they"; + mes "were going to get married..."; + next; + mes "[Old Lady]"; + mes "I was so happy for her!"; + mes "But then, all of a sudden,"; + mes "she killed herself. Well,"; + mes "that's what they all say."; + mes "Even today, I'm still not"; + mes "sure what happened."; + next; + + switch(select("Wait, who's James Rosimier?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, James belonged to"; + mes "one of the oldest and richest"; + mes "families in Juno. Everything"; + mes "was going great for them, but"; + mes "some time after Allysia died,"; + mes "the family went bankrupt."; + next; + mes "[Old Lady]"; + mes "The city manages their"; + mes "old residence now. For"; + mes "some reason, they decided"; + mes "to entrust me with the master"; + mes "key to the Rosimier Mansion."; + next; + + switch(select("may I borrow the Master Key?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I'm really not"; + mes "supposed to give it to just"; + mes "anyone, but I can tell that"; + mes "you're working with Allysia's"; + mes "best interests at heart."; + next; + mes "[Old Lady]"; + mes "However, you've got to"; + mes "make sure that you return"; + mes "it to me before the people"; + mes "from City Hall ask me for it."; + mes "Alright then, I hope you find"; + mes "what you're looking for."; + set KielHyreQuest,58; + getitem 7498,1; //Losimier's_House_Key + close; + } + + } + + } + + } + + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) < 1) || + (countitem(7500) < 1) || + (countitem(7501) < 1) || + (countitem(7502) < 1)) { + mes "[Old Lady]"; + mes "Please hurry and find"; + mes "whatever you're searching"; + mes "for in the Rosimier Mansion."; + mes "I might get in trouble if"; + mes "the people from City Hall"; + mes "come and ask me for the key..."; + close; + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) == 1) && + (countitem(7500) == 1) && + (countitem(7501) == 1) && + (countitem(7502) == 1)) { + mes "[Old Lady]"; + mes "Oh, you're finished"; + mes "searching the mansion?"; + mes "Depressing, isn't it?"; + mes "The creditors basically"; + mes "ransacked everything"; + mes "a very long time ago."; + next; + + switch(select("Why did ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I know that James"; + mes "and Allysia were in love,"; + mes "and he promised to marry"; + mes "her. Now, supposedly his"; + mes "family already betrothed"; + mes "him to another woman."; + next; + mes "[Old Lady]"; + mes "Time went by, and he"; + mes "was forced to marry his"; + mes "fiancee. Allysia was pretty"; + mes "devistated. I htink maybe"; + mes "that's wht she... you know..."; + next; + mes "[Old Lady]"; + mes "Listen, if you want to learn"; + mes "more about what happened,"; + mes "then I think you should talk"; + mes "to the ^3355FFfisherman that lives^000000"; + mes "^3355FFsouth of the Kiel Hyre Academy.^000000"; + next; + mes "[Old Lady]"; + mes "He's the one that found"; + mes "Allysia's body in the river,"; + mes "so he might have a better"; + mes "idea of what had happened."; + set KielHyreQuest,60; + delitem 7498,1; //Losimier's_House_Key + close; + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Old Lady]"; + mes "Yep, Rain's coming."; + mes "Can feel it in my bones."; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Warp portal into Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,273,141,0 script Rosimmir_Entrance 45,2,2,{ +OnTouch: + if (countitem(7498) < 1) { + warp "yuno",270,141; + end; + } + + else { + warp "kh_rossi",20,92; + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Table +//---------------------------------------------------------------------------- +kh_rossi,23,23,0 script Table 111,{ + if (countitem(7499) < 1) { + cutin "kh_family_port",1; + mes "^3355FFYou examine the table,^000000"; + mes "^3355FFand find a frames portait^000000"; + mes "^3355FFinside the open drawer.^000000"; + getitem 7499,1; //Portrait_of_a_Family + } + + else { + mes "^3355FFThe open drawer of,^000000"; + mes "^3355FFthis desk is empty now.^000000"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Shelf +//---------------------------------------------------------------------------- +kh_rossi,92,40,0 script Shelf::ShelfKHQ1 111,{ + if (countitem(7500) < 1) { + mes "^3355FFThere are locked^000000"; + mes "^3355FFboxes on these bookshelves.^000000"; + mes "^3355FFPerhaps if you used this^000000"; + mes "^3355FFmansions's Master Key, you^000000"; + mes "^3355FFmight be able to open them.^000000"; + next; + + switch(select("Use Key","Pass")) { + + case 1: + mes "^3355FFWhich box do you^000000"; + mes "^3355FFwant to try to open?^000000"; + next; + + switch(select("First Box","Second Box")) { + + case 1: + mes "^3355FFYou use the Master Key to^000000"; + mes "^3355FFunlock the box, and obtain^000000"; + mes "^3355FFa portait of a woman that^000000"; + mes "^3355FFlooks just like Kiel Hyre's^000000"; + mes "^3355FFassistant, Allysia.^000000"; + next; + cutin "kh_ellisia_port",2; + mes "^3355FFThe message, ''To my love,^000000"; + mes "^3355FFAllysia. From James.'' is^000000"; + mes "^3355FFwritten on the back.^000000"; + getitem 7500,1; //Portrait_of_a_Lady + close2; + cutin "",255; + end; + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou've found a woman's^000000"; + mes "^3355FFportrait in one of the^000000"; + mes "^3355FFboxes on this shelf.^000000"; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Desk +//---------------------------------------------------------------------------- +kh_rossi,144,287,0 script Desk::DeskKHQ2 111,{ + mes "^3355FFThe desk has^000000"; + mes "^3355FFthree drawers^000000"; + next; + + switch(select("First Drawer","Second Drawer","Third Drawer","Cance;")) { + + case 1: + mes "^3355FFThe first drawer is locked.^000000"; + close; + + case 2: + if (countitem(7501) < 1) { + mes "^3355FFThere is a letter inside^000000"; + mes "^3355FFthis second drawer. it^000000"; + mes "^3355FFwas sent by a person^000000"; + mes "^3355FFwith the initials, K.H.,^000000"; + mes "^3355FFand addressed to Allysia.^000000"; + getitem 7501,1; //K.H's_Letter + close; + } + + else { + mes "^3355FFThis drawer is now empty.^000000"; + close; + + } + + case 3: + mes "^3355FFThere is a small note^000000"; + mes "^3355FFinside this third drawer.^000000"; + mes "^3355FFIt's written by James, and^000000"; + mes "^3355FFmentions that he wants to^000000"; + mes "^3355FFmarry Allysia, and that she^000000"; + mes "^3355FFrecieved an engagement ring.^000000"; + close; + + case 4: + mes "......"; + mes "........."; + mes "............"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Bookshelf +//---------------------------------------------------------------------------- +kh_rossi,149,288,0 script Bookshelf::BookshelfKHQ2 111,{ + if (countitem(7502) < 1) { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + mes "^3355FFfind a folded note between^000000"; + mes "^3355FFthe books as you examine them.^000000"; + getitem 7502,1; //James's_Memo + close; + } + + else { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Fisherman +//---------------------------------------------------------------------------- +yuno_fild12,232,222,0 script Old Fisherman 709,{ + if (KielHyreQuest < 60) { + mes "[Fisherman]"; + mes "These days, it's much"; + mes "harder to catch and fish."; + mes "Ever since they built"; + mes "this factory, the fish"; + mes "have started to change,"; + mes "and they look different too..."; + close; + } + + else if (KielHyreQuest == 60) { + mes "[Fisherman]"; + mes "Eh? You want something?"; + mes "Heh, youngsters! I know"; + mes "how much you love handouts,"; + mes "but you're not getting any."; + mes "Now, if you bring me some"; + mes "Raw Fish, I'd be more friendly~"; + + if (countitem(544) >= 10) { + next; + mes "[Fisherman]"; + mes "Oh, is all this fish"; + mes "for me? Heh, how very"; + mes "generous of you. If you're"; + mes "going to be so kind, then"; + mes "i suppose I have to repay"; + mes "the favor. Ask me anything~"; + next; + + switch(select("30 years ago, a woman killed herself...")) { + + case 1: + mes "[Fisherman]"; + mes "Oh? Ohh. Oh yeah."; + mes "I remember that. Yeah."; + mes "it was August 20th, my"; + mes "wife's birthday. That day,"; + mes "instead of catching fish,"; + mes "I caught a dead woman."; + next; + mes "[Fisherman]"; + mes "Of course, I reported it"; + mes "to the Juno Police! They told"; + mes "me she killed herself since"; + mes "she was betrayed by her lover,"; + mes "who also happened to be her"; + mes "employer. Really tragic stuff."; + next; + mes "[Fisherman]"; + mes "Anyway, when they were"; + mes "moving her body out of the"; + mes "river, her hand dropped"; + mes "some ring. I picked it up,"; + mes "hoping to sell it later for"; + mes "some zeny. I know, I know..."; + next; + mes "[Fisherman]"; + mes "I was pretty lucky the"; + mes "police didn't see me take"; + mes "it. Later that day, some guy"; + mes "came up to me and offered"; + mes "me a lot of money for it."; + mes "I guess it was my lucky day!"; + next; + mes "[Fisherman]"; + mes "I found out later that he was"; + mes "some mechanical repairman--"; + mes "something. He sold everything"; + mes "to buy that ring, so I guess"; + mes "he wanted it desperately."; + mes "Then he just dissapeared."; + next; + mes "[Fisherman]"; + mes "His name...?"; + mes "It was something like..."; + mes "Heil? Hyre? Anyway, it"; + mes "was a long time ago. Oh,"; + mes "his old house is still around."; + next; + mes "[Fisherman]"; + mes "If you're going to be"; + mes "that curious, you might"; + mes "as well check it out."; + mes "Let's see, he lived in"; + mes "a hut near the northeast"; + mes "forest guard camp."; + delitem 544,10; //Fish_Slice + set KielHyreQuest,62; + close; + } + + } + + else { + close; + } + + } + + else if (KielHyreQuest >= 62) { + mes "[Fisherman]"; + mes "Don't you remember"; + mes "what I told you? That"; + mes "guy lived in a hut near"; + mes "the northeast forest"; + mes "guard camp! Why don't"; + mes "you check that place out?"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre's hut; Wooden Board +//---------------------------------------------------------------------------- +yuno_fild09,158,217,0 script Wooden Board 111,{ + if ((KielHyreQuest < 62) || (KielHyreQuest >= 64)) { + mes "^3355FFIt's a useless^000000"; + mes "^3355FFwooden board^000000"; + mes "^3355FFin the bushes.^000000"; + close; + } + + else if (KielHyreQuest == 62) { + mes "^000oFFYou found a long^000000"; + mes "^3355FFwooden board carved^000000"; + mes "^3355FFwith the initials, 'K.H.'^000000"; + next; + cutin "kh_kyel_port",2; + mes "^3355FFYou find a portrait of^000000"; + mes "^3355FFa young man, that looks^000000"; + mes "^3355FFlike a younger version^000000"; + mes "^3355FFof Kiel Hyre, in a broken^000000"; + mes "^3355FFpicture frame underneath^000000"; + mes "^3355FFthe old wooden board.^000000"; + set KielHyreQuest,64; + getitem 7503,1; //Portrait_of_a_Guy + next; + cutin "",255; + mes "^3355FFYou have enough^000000"; + mes "^3355FFinformation by now,^000000"; + mes "^3355FFso you should report^000000"; + mes "^3355FFback to Mitchell.^000000"; + close; + } + +} + +//============================================================================ +// Kiehl Hyre's Room and Boss NPCs +//============================================================================ +// Beyond here the NPC for the final areas. +// Now, this area is not someplace you wanna slow down so +// you can pick up dialog. I used packet logging to pull +// what I could and for the sake of the two people with me, +// did not bother doing all the proper proper NPC positioning +// or some of the 'error/wrong option' dialogs. +// All the doors are kind of weird. +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiehl's Room; Receiver (Gives black keycards upon killing mobs) +//---------------------------------------------------------------------------- +kh_kiehl01,17,39,0 script Receiver 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^333333*BBBZZZ*^000000"; + if (KielHyreQuest == 74) { + next; + mes "[????]"; + mes "^333333*Bzzzz...*"; + mes "I've never seen you"; + mes "before. Did Father send"; + mes "you to kill me? We'll just"; + mes "see about that! Go ahead,"; + mes "try to find me, adventurer.^000000."; + set KielHyreQuest,76; + } + + close2; + monster "kh_kiehl01",16,32,"Alicel",1739,1,"Receiver::OnMyMobDead"; + monster "kh_kiehl01",18,31,"Aliot",1740,1,"Receiver::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 3) { + makeitem 7506,1,"this",19,36; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Flower Vase (Gives...password...for Box) +//---------------------------------------------------------------------------- +kh_kiehl01,13,40,0 script Flower Vase 111,{ + if (KielHyreQuest < 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + close; + } + + if (KielHyreQuest >= 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + next; + + switch(select("Pick Up Vase","Break Vase","Turn Vase Upside-down")) { + + case 1: + mes "^3355FFThe vase is empty.^000000"; + close; + + case 2: + mes "^3355FFYou can't destroy"; + mes "this vase, even by"; + mes "striking it with all your"; + mes "might. It must have been"; + mes "specially manufactured by"; + mes "the Rekenber Corporation.^000000"; + close; + + case 3: + mes "^3355FFThe following words"; + mes "are written at the"; + mes "bottom of the vase.^000000"; + next; + mes "[Vase Message]"; + mes "''The rabbit often"; + mes "observes the door"; + mes "The night eats the"; + mes "pickled orange.''"; + close; + + } + + } + +} + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Box +//---------------------------------------------------------------------------- +kh_kiehl01,19,25,0 script Box::BoxKHQ3 111,{ + if (countitem(7505) < 1) { + mes "^3355FFYou found a box with"; + mes "a button for each letter"; + mes "of the alphabet on top of it.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "open the door") { + mes "^3355FFAs soon as you enter the"; + mes "password, the nearby door"; + mes "emits a pleasant chiming"; + mes "sound, and the box pops"; + mes "open to reveal a small key.^000000"; + getitem 7505,1; //Toy_Key + close; + } + + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + + else { + mes "^3355FFThis is where you"; + mes "found the Toy key^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (First) +// - Anyone can pass through this door +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,44,33,0 script Big Door#BigDoorKHQ1 111,{ + if (.KHDoor1Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_1_Warp::OnEnable"; + enablenpc"Big_Door_1_Warp"; + set .KHDoor1Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,43,33,0 script Big_Door_1_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_1_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_1_Warp"; + set getvariableofnpc(.KHDoor1Opened,"Big Door#BigDoorKHQ1"),0; + end; + +OnTouch: + warp "kh_kiehl01",55,33; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (second) +// - Consume Toy Key when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,174,40,0 script Big Door#BigDoorKHQ2 111,{ + if (.KHDoor2Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a small"; + mes "keyhole next to the knob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Toy Key") { + if (countitem(7505) >= 1) { + mes "^3355FFYou insert the key into"; + mes "the keyhole, and the door"; + mes "unlocks with a click as"; + mes "you turn the key.^000000"; + delitem 7505,1; //Toy_Key + donpcevent "Big_Door_2_Warp::OnEnable"; + enablenpc"Big_Door_2_Warp"; + set .KHDoor2Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,174,39,0 script Big_Door_2_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_2_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_2_Warp"; + set getvariableofnpc(.KHDoor2Opened,"Big Door#BigDoorKHQ2"),0; + end; + +OnTouch: + warp "kh_kiehl01",173,52; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Third) +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,77,108,0 script Big Door#BigDoorKHQ3 111,{ + if (.KHDoor3Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_3_Warp::OnEnable"; + enablenpc"Big_Door_3_Warp"; + set .KHDoor3Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,78,108,0 script Big_Door_3_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_3_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_3_Warp"; + set getvariableofnpc(.KHDoor3Opened,"Big Door#BigDoorKHQ3"),0; + end; + +OnTouch: + warp "kh_kiehl01",68,108; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fourth) +// - Consume TWO Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,42,177,0 script Big Door#BigDoorKHQ4 111,{ + if (.KHDoor4Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 2) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,2; //Black_Keycard + donpcevent "Big_Door_4_Warp::OnEnable"; + enablenpc"Big_Door_4_Warp"; + set .KHDoor4Opened,1; + close; + } + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,41,177,0 script Big_Door_4_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_4_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_4_Warp"; + set getvariableofnpc(.KHDoor4Opened,"Big Door#BigDoorKHQ4"),0; + end; + +OnTouch: + warp "kh_kiehl01",49,177; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,179,0 script Robots#kh1 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^3355FFAs soon as you"; + mes "touch the test tube,"; + mes "a bunch of robots"; + mes "suddenly appeared.^000000."; + close2; + monster "kh_kiehl01",18,181,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,180,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,179,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,178,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 4) { + makeitem 7506,1,"this",18,180; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Dummy Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,177,0 script Robots#kh2::RobotsKHQ 111,{ + end; +} +kh_kiehl01,15,180,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,15,182,0 duplicate(RobotsKHQ) Robots#kh4 111 +kh_kiehl01,35,187,0 duplicate(RobotsKHQ) Robots#kh1 111 +kh_kiehl01,37,187,0 duplicate(RobotsKHQ) Robots#kh2 111 +kh_kiehl01,39,187,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,41,187,0 duplicate(RobotsKHQ) Robots#kh4 111 + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fifth, and final) +// - Anyone can pass through this door +// - Consumes 4 Solid Iron Pieces +//---------------------------------------------------------------------------- +kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ + if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + if (KielHyreQuest < 86) { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + next; + + switch(select("Push Door","Kick Door","Shake Door","Pull Door","Lift Door")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + case 4: + break; + + case 5: + break; + + } + + mes "^3355FFA group of monsters"; + mes "suddenly appeared as"; + mes "soon as you applied"; + mes "pressure to the door."; + mes "This must be some"; + mes "kind of security device.^000000"; + close2; + set @KHDoorPushAttempt,@KHDoorPushAttempt+1; + monster "kh_kiehl01",163,183,"Alicel",1739,1; + monster "kh_kiehl01",163,179,"Aliot",1740,1; + monster "kh_kiehl01",169,183,"Alicel",1739,1; + monster "kh_kiehl01",169,179,"Aliot",1740,1; + if (@KHDoorPushAttempt >= 3) { + set KielHyreQuest,86; + } + end; + } + + else if ((KielHyreQuest > 84) && (KielHyreQuest < 94)) { + mes "^3355FFYou apply some"; + mes "pressure to the door,"; + mes "and find that you can"; + mes "budge it slightly, but"; + mes "you can't fully open it.^000000"; + next; + mes "^3355FFIf you wedged something"; + mes "into the gap between the"; + mes "door and its frame, and"; + mes "fully leveraged it, then you"; + mes "should be able to open it.^000000"; + next; + + switch(select("Steel","Rusty Iron Piece","Solid Iron Piece","Iron Piece","Screw","Cancel")) { + + case 1: + set @KHPryingItem$,"Steel"; + break; + + case 2: + set @KHPryingItem$,"Rusty Iron Piece"; + break; + + case 3: + if (countitem(7507) >= 1) { + if (KielHyreQuest < 92) { + mes "^3355FFYou insert one end of"; + mes "a Solid Iron Piece into the"; + mes "door's gap in a strenuous"; + mes "effort to pry the door open"; + mes "The gap widens a little bit,"; + mes "but you break one of your"; + mes "Solid Iron Pieces.^000000"; + set KielHyreQuest,KielHyreQuest+2; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + else if (KielHyreQuest == 92) { + mes "^3355FFWith a mighty heave,"; + mes "you pry a Solid Iron"; + mes "Piece into the door jamb,"; + mes "and fling the door wide open"; + mes "Unable the withstand the"; + mes "awesome force, this Solid"; + mes "Iron Piece shatters into dust.^000000"; + set KielHyreQuest,94; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + } + + else { + mes "^3355FFIf only you had a Solid"; + mes "Iron Piece you could use to"; + mes "pry open this door.^000000"; + close; + } + + case 4: + set @KHPryingItem$,"Iron Piece"; + break; + + case 5: + set @KHPryingItem$,"Screw"; + break; + + case 6: + mes "^3355FFLet's look for something"; + mes "heavy we can use to pry"; + mes "open this door.^000000"; + close; + + } + + mes "^3355FFThis "+@KHPryingItem$+" is far"; + mes "to weak for what you're using it for"; + mes "and breaks.^000000"; + close; + + } + + else if ((KielHyreQuest >= 94) && (KielHyreQuest <= 104)) { + if (.KHDoor5Opened == 0) { + mes "^3355FFThe large door"; + mes "is wide open, and."; + mes "you may now enter.^000000"; + next; + + switch(select("Yes","No")) { + + case 1: + close2; + set $@KH_DoorInvoker$,strcharinfo(0); + donpcevent "Big_Door_5_Warp::OnEnable"; + enablenpc"Big_Door_5_Warp"; + set .KHDoor5Opened,1; + end; + + case 2: + mes "^3355FFWho knows what is on the"; + mes "other side of this door. Let's"; + mes "think about it before barging in..^000000"; + close; + + } + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + +} + +kh_kiehl01,166,186,0 script Big_Door_5_Warp 45,1,1,{ + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_5_Warp"; + set getvariableofnpc(.KHDoor5Opened,"Big Door#BigDoorKHQ5"),0; + end; + +OnInit: + disablenpc "Big_Door_5_Warp"; + end; + +OnTouch: + + if (KielHyreQuest >= 46) { + warp "kh_kiehl02",50,6; + } + else { + warp "kh_kiehl01",166,183; + } + + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Trap (Entry way trap) +//---------------------------------------------------------------------------- +kh_kiehl02,49,10,0 script Kiehl_Room_Trap -1,5,3,{ + end; + +OnTouch: + if (.KHTrapSprung < 1) { + set .KHTrapSprung,1; + set $@KHQuestBusy,1; + initnpctimer; + monster "kh_kiehl02",47,13,"Aliot",1740,1; + monster "kh_kiehl02",54,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + monster "kh_kiehl02",51,13,"Aliot",1740,1; + monster "kh_kiehl02",53,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + end; + } + + end; + + +OnTimer300000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer600000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer900000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer1200000: + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + end; + +OnGlobalTimerOff: + stopnpctimer; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl +// - Only the player who invoked the final door should progress this npc. +// - Only the player who invoked the final door should be able to get ring. +// - Timer will drop to 3 minutes once Kiehl is defeated. +//---------------------------------------------------------------------------- +kh_kiehl02,50,52,4 script Kiehl#Original 902,{ + cutin "kh_kiel01",2; + if (KielHyreQuest < 94) { + mes "[Kiehl]"; + mes "........."; + close; + } + + if ($@KH_DoorInvoker$ == strcharinfo(0)) { + if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) { + mes "[Kiehl]"; + mes "I'm surprised you made"; + mes "it this far, adventurer~"; + mes "I bid you welcome to my"; + mes "humble room. I assume that"; + mes "you've come for the Condensed"; + mes "Memory Scroll... my mind."; + next; mes "[Kiehl]"; mes "You can understand"; mes "why I can't let you have it,"; @@ -6775,18 +21821,20 @@ kh_kiehl02,50,52,4 script Kiehl#Original 902,{ mes "then show me what you've got!"; close2; cutin "",255; - monster "kh_kiehl02",46,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + set getvariableofnpc(.KHKilled,"KiehlRoom"),0; monster "kh_kiehl02",49,48,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; - monster "kh_kiehl02",53,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,50,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; monster "kh_kiehl02",53,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; monster "kh_kiehl02",49,55,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,53,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; monster "kh_kiehl02",46,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; donpcevent "Kiehl#Original::OnChangeState"; disablenpc "Kiehl#Original"; end; } - else if ((KielHyreQuest == 96) && (getvariableofnpc(.KHKilled,"KiehlRoom") == 6)) { + else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") == 5)) { cutin "kh_kiel03",2; mes "[Kiehl]"; mes "Hmpf! You're pretty good."; @@ -6885,7 +21933,7 @@ kh_kiehl02,50,52,4 script Kiehl#Original 902,{ else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) { set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0; - cutin "kh_keil01",2; + cutin "kh_kiel01",2; mes "[Kiehl]"; mes "Ah, Schwaltzvalt Republic"; mes "agents. Heh. I haven't had"; @@ -6979,7 +22027,7 @@ kh_kiehl02,50,52,4 script Kiehl#Original 902,{ mes "Who are you...?"; mes "Show yourself!"; next; - donpcevent "Kiehl#Copy::OnEnable"; + donpcevent "Kiehl#Copy::OnChangeState"; enablenpc "Kiehl#Copy"; mes "[????]"; mes "Please."; @@ -7152,11 +22200,9 @@ kh_kiehl02,50,52,4 script Kiehl#Original 902,{ enablenpc "Kiehl_Room_Exit"; close2; cutin "",255; - donpcevent "Kiehl#Copy::OnDisable"; + donpcevent "Kiehl#Copy::OnChangeState"; disablenpc "Kiehl#Copy"; - deltimer "KiehlRoom::OnKHTimerEnd"; initnpctimer; - announce "3 minutes remaining until detonation.",bc_map,0xFF0000; end; } @@ -7190,21 +22236,45 @@ kh_kiehl02,50,52,4 script Kiehl#Original 902,{ end; } -OnTimer180050: +OnTimer180000: stopnpctimer; - mapwarp "kh_kiehl02","lighthalzen",193,202; + mapannounce "kh_kiehl02","Beeeeeeeeeeeeep~",bc_npc,0xFF0000; donpcevent "KiehlRoom::OnReset"; end; -OnTimer180000: - //Originally this was going to kill all players in the map, but that seemed far too mean. - //So instead it just sends people to lighthalzen regardless, and plays the NPC_SELFDESTRUCTION - //animation. - misceffect 183; - misceffect 563; +OnTimer179000: + mapannounce "kh_kiehl02","1 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer178000: + mapannounce "kh_kiehl02","2 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer177000: + mapannounce "kh_kiehl02","3 seconds to detonation",bc_npc,0xFF0000; end; -OnTimer90000: +OnTimer176000: + mapannounce "kh_kiehl02","4 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer175000: + mapannounce "kh_kiehl02","5 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer170000: + mapannounce "kh_kiehl02","10 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer160000: + mapannounce "kh_kiehl02","20 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer150000: + mapannounce "kh_kiehl02","30 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer120000: mapannounce "kh_kiehl02","1 minutes remaining until detonation.",bc_npc,0xFF0000; misceffect 563; end; @@ -7213,6 +22283,10 @@ OnTimer60000: mapannounce "kh_kiehl02","2 minutes remaining until detonation.",bc_npc,0xFF0000; end; +OnTimer1000: + mapannounce "kh_kiehl02","3 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + OnChangeState: misceffect 215; end; @@ -7230,10 +22304,12 @@ OnInit: // Kiehl's Room; NPC for mob control, timers, and other junk. //---------------------------------------------------------------------------- kh_kiehl02,1,1,0 script KiehlRoom -1,{ + end; OnKiehlMobDead: +debugmes "KLol: "+.KHKilled; set .KHKilled,.KHKilled+1; - if (.KHKilled == 6) { + if (.KHKilled == 5) { donpcevent "Kiehl#Original::OnChangeState"; enablenpc "Kiehl#Original"; } @@ -7245,22 +22321,7488 @@ OnKiehlDead: enablenpc "Kiehl#Original"; end; -OnKHTimerEnd: - set $@KH_DoorInvoker$,""; +OnReset: + donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff"; if (getmapusers("kh_kiehl02") > 0) { - mapwarp "kh_kiehl02","lighthalzen",193,202; + mapwarp "kh_kiehl02","lighthalzen",192,200; + } + killmonsterall "kh_kiehl02"; + disablenpc "Kiehl_Room_Exit"; + set .KHKilledBoss,0; + set .KHKilled,0; + set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0; + set $@KHQuestBusy,0; + set $@KH_DoorInvoker$,""; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Mitchell and Agents. (Floating NPC + Duplicates) +//---------------------------------------------------------------------------- +- script Agent#KHAgent1::KHAgent -1,{ + end; + +OnKHAgent: + misceffect 215; + end; + +OnKHSpiderWeb: + misceffect 404; + end; +} + + +kh_kiehl02,49,55,7 duplicate(KHAgent) Mitchell#KiehlRoom 727 + +kh_kiehl02,53,52,4 duplicate(KHAgent) Agent#KHAgent1 880 + +kh_kiehl02,51,49,0 duplicate(KHAgent) Agent#KHAgent2 880 + +kh_kiehl02,47,50,0 duplicate(KHAgent) Agent#KHAgent3 880 + +kh_kiehl02,46,53,6 duplicate(KHAgent) Agent#KHAgent4 880 + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Copy of Kiehl. +//---------------------------------------------------------------------------- +kh_kiehl02,48,53,7 script Kiehl#Copy 902,{ + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl#Copy"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Exit +//---------------------------------------------------------------------------- +kh_kiehl02,50,59,0 script Kiehl_Room_Exit 45,1,1,{ +OnTouch: + if (getmapusers("kh_kiehl02") < 1) { + donpcevent "KiehlRoom::OnReset"; + warp "lighthalzen",193,202; + } + + else { + warp "lighthalzen",193,202; + } + + end; + +OnEnable: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl_Room_Exit"; + end; +} + +//============================================================================ + +//===== eAthena Script ======================================= +//= Kiel Hyre Quest +//===== By: ================================================== +//= L0ne_W0lf (Script), DZeroX (Timer) +//===== Current Version: ===================================== +//= 2.4 +//===== Compatible With: ===================================== +//= eAthena SVN +//===== Description: ========================================= +//= Quest for opening Robot Factory first and second floors. +//===== Comments: ============================================ +//= See below +//===== Additional Comments: ================================= +//= 1.0 First version, needs testing [Playtester] +//= 1.1 Copied over some changes made by -Tsuyuki- [L0ne_W0lf] +//= Reworked variables slightly so that the permenents ones aside from the +//= main tracking variable, are deleted when no longer needed. Renamed +//= several variables that handle strings to @KHInput$. [L0ne_W0lf] +//= 1.2 Removed duplicate NPCs. [Toms] +//= 1.3 More Bug fixes, fixed typo. Updated Additional comments. [L0ne_W0lf] +//= 1.4 Fixed doors not resetting in kh_kiehl01 after 30 second timer is up. [L0ne_W0lf] +//= 1.5 Another bug fixed (&& instead of ||). [L0ne_W0lf] +//= 1.6 More squashed bugs with if checking. [L0ne_W0lf] +//= 1.7 Corrected some spelling mistakes. [Balish] +// Corrected Exploit with the pub man, giving infinite wine and money. +// Corrected pool and map not showing text for some states of the quest. +// Corrected Elly showing cutin but not text for some states of the quest (causing players to log off to continue). +// Let fisherman talk to you when you have 10 fishes OR MORE. +// Corrected not letting you enter the tombstone after finishing the quest. +//= 1.8 Elly now deletes the Iron_Box, and Kiel Hyre deletes the Pin. [L0ne_W0lf] +//= More security on the 5th Big Door, now makes sure no one outside of who- +//= acticated it initially can use it. Resets after 10 minutes to make it. +//= Made it so that you need to be at least step 84 to activate the final door. +//= Corrected not deleting Allysia's Ring from inventory. +//= 1.9 Exit will now enable if you are just retrieving the Ring, keeps you from getting stuck. [L0ne_W0lf] +//= Corrected "KH_Kielh02", was setting off a debug, invalid map index. Should have been "kh_Kiehl02" +//= Made .KHQuestBusy$ into a temp global variable. $@KHQuestBusy$. +//= 2.0 Changed the labels on the "Big Doors" to "Identifier Names" to prevent an error with using getvariableofnpc [L0ne_W0lf] +//= 2.1 Fifth door now checks for a variable HIGHER or EQUAL to 74 not 84, as pointed out by Stollen. [L0ne_W0lf] +//= 2.2 Another fix for elly, no longer RESETS to 26 when you tak to her. [L0ne_W0lf] +//= 2.3 Should NOT have been setting .KHQuestBusy at all. It's not used or accessed anymore. Removed. [L0ne_W0lf] +//= 2.4 Lots of fixes (4ish) from Valandi. [L0ne_W0lf] +//= Added a getmapuser check to the mapwarp in KHTimerEnd so it's not trying to warp out 0 users. [L0ne_W0lf] +//= 2.5 FIxed several small issues (and large one) such as typos in cutins, typos in dialog, etc. [L0ne_W0lf] +//= Added some of the missing dialogs for several NPCs, and fixed a few NPC locations. +//= ALL books can now trigger the wall. +//= Allysia will now summon 4 (was 2) G_CONSTANTS instead of REGULAR constants. +//= Fixed where Golden_Key and Exquisite_Button are deleted. +//= Removed KHTimerEnd, and instead use OnReset. +//= Fixed typo in the second NPC that gives Black Keycards. +//= Added and Monster Warps. (Keeps monsters from being in dungeon quest area.) Non-functional though. +// +//============================================================ + + +//============================================================================ +// Kiel Hyre Quest/Robotic Lab Dungeon +// +// Script Dialog Obtained and Copied Down by L0ne_W0lf +// Timer work and some variable dances by DZeroX +// Based on [iRO Sakray] as of [03/29/2007] +//============================================================================ +//---------------------------------------------------------------------------- +// [Notes] +// - Let it be noted that ALL DIALOG IS OFFICIAL TO IRO UNLESS SPECIFIED. +// - I've fixed a few of iRO's mistakes, but I'm sure I made some of my own. +// - Will probably require a major optimizing. +// - Accidentally progressed Mills' dialog. Improvising. +// - Accidentally progressed Elly's dialog while reading 'Letter to Elly'. Improvising. +// - Possible missing dialog for all getitems when overweight. +// - Possible missing dialog for absense of Green Key item in "Bookshelf" NPC +// - Possible missing dialog for "Test Tube" if you haven't read the second poem. +// - Possible missing dialog for Elly in Dromitory if you don't have "Grey Box" +// - Possible missing dialog for "Grave" if you don't have "Yellow Keycard" +// - Not going to list ALL of the more usless NPCs. (Doors + Empty "Beautiful Ladies") +// - Accidently progressed Kiel Hyre's dialog. Improvising. +// - Improvising for getting back in to see Mitchell if you butterfly wing and need to get back in. +// - Possible missing dialog for "Odd Grandma" +// - Possible missing dialog for "Shelf" +// - Near the end I finshed the quest with some people. Used packet logging to get dialog. +// - Because of the above mentioned, NPC placement and dialog is a little sloppier. +// - Possible missing dialog for "Kiel Hyre" (Accept and Okay responses) +// - Parties are *NOT REQUIRED* as per Doddler's Wiki information. +// - Possible missing dialog for "Kiel Hyre" if you don't have Allysia's Ring. +// +//---------------------------------------------------------------------------- +// [Maps] [Use] +// yuno_in01 ........... Start quest in pub +// kh_school ........... Deliver Wine here, Meet Elly +// yuno ................ Get Delivery for/from "Little Kid" +// lighthalzen ......... Get Delivery package for "Little Kid" +// kh_vila ............. Kiel Hyre cottage. +// kh_dun01 ............ Robot Factory; Save Kiel Hyre +// kh_mansion .......... Kiel Hyre's Mansion in Lighthalzen +// kh_kiehl01 .......... Kiehl's room/Cave +// kh_kiehl02 .......... Kiehl's room/Boss Room +// +//---------------------------------------------------------------------------- +// [Variables in Use] +// KielHyreQuest - Main quest tracking variable +// +// KHPubMasterEnd - Finished with Pun Master if set to 1 +// - Deleted once no longer needed. +// +// KHToastGirlEnd - Pick up delivery if set to 1, +// - picked up delivery if set to 2 +// - finished if set to 3 +// - Deleted once no longer needed. +// +// KHCottagePoem1 - Tracks Poem 1 quest in cottage. (finished = 5) +// - Deleted once no longer needed. +// +// KHCottagePoem2 - Tracks Poem 2 quest in cottage. (finished = 3) +// - Deleted once no longer needed. +// +// @KHInput$ - Used with "Security Guard" +// - Used with "Test Tube" +// - Used when "Elly" (inputing string in attempt to wake her) +// - Used with "Grave", (twice) +// - Used with "Heavy Door" +// - Used with "Mechanical Device" +// - Used for opening various doors in Kiehl's area. +// +// @KHFirstKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// @KHSecondKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// +// @KHPotionColor$ - Holds 'red', 'green', or 'yellow' depending on what wrong potion is selected. +// +// @KHFirstSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHSecondSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHThirdSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHFourthSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// +// @KHClimbAttempt - Set to random (1-5) to determine if you fail at climbing the water pipe. +// +// @KHQ1Read - Make sure player has asked question 1 to Kiel Hyre +// @KHQ2Read - Make sure player has asked question 2 to Kiel Hyre +// @KHQ3Read - Make sure player has asked question 3 to Kiel Hyre +// +// @KHTitle$ - Holds "Mr", "Mrs", or "Miss" +// +// @KHDoorPushAttempt - Keeps track of how many times a person has attmepted pushed the door open. +// +// @KHPryingItem$ - Used for incorrect options when prying open last door. +// +// .KHKilled - Tracks how many monsters have been killed. Used with "Receiver", "Robots", and "Kiehl" NPCs +// +// .KHDoor1Open - 0/1 Depending on if the first door is opened. +// .KHDoor2Open - 0/1 Depending on if the second door is opened. +// .KHDoor3Open - 0/1 Depending on if the third door is opened. +// .KHDoor4Open - 0/1 Depending on if the fourth door is opened. +// .KHDoor5Open - 0/1 Depending on if the fifth door is opened. +// +// .KHKilledBoss - 0/1 depending on if the boss has been killed. +// +// $@KHQuestBusy$ - Holds strcharinfo(0) for "locking" reasons, so only that person can use the door. Variable is unset at boss room reset. +// +// $@KH_DoorInvoker$ - Holds character name, so only that person can use certain NPCs. +// +//---------------------------------------------------------------------------- +// [NPCs] [Location] +// Pub Master .................. yuno_in01 [ 35,178] +// Hanie ....................... yuno_fild08 [196,196] +// Security Guard .............. yuno_fild08 [158,194] +// Security Guard .............. yuno_fild08 [158,183] +// Student ..................... kh_school [ 57,142] +// Student ..................... kh_school [ 57,139] +// Lady ........................ kh_school [176, 60] +// Cute Student ................ kh_school [179, 39] +// Little Kid .................. yuno [217,114] +// Windmill Owner .............. lighthalzen [365,300] +// Cottage Keeper .............. yuno_fild02 [ 93,210] +// Door ........................ yuno_fild02 [ 75,218] +// Door ........................ yuno_fild02 [109,218] +// Wall ........................ kh_vila [191, 14] +// Book ........................ kh_vila [184, 20] +// Book ........................ kh_vila [181, 20] +// Book ........................ kh_vila [178, 20] +// Book ........................ kh_vila [175, 19] +// KH_Letter_Trigger ........... kh_vila [179, 11] +// Box ......................... kh_vila [ 16,175] +// Apple Box ................... kh_vila [ 30,184] +// Map ......................... kh_vila [ 44,125] +// Pot ......................... kh_vila [ 33,148] +// Calabash .................... kh_vila [ 14, 55] +// Pool ........................ kh_vila [ 39, 39] +// Vicious Dog ................. kh_vila [180,178] +// Drawer ...................... kh_vila [115,186] +// Box ......................... kh_vila [107,126] +// Bookshelf ................... kh_vila [181,138] +// Sword Hilt .................. kh_vila [136, 69] +// Test Tube ................... kh_vila [179, 69] +// Test Tube ................... kh_vila [185, 69] +// Window ...................... yuno_fild08 [ 69,185] +// Elly ........................ kh_school [178,180] +// Cookie Basket ............... kh_school [175,175] +// Window ...................... kh_school [188,185] +// Grave ....................... yuno_fild08 [ 72,170] +// Heavy Door .................. kh_dun01 [236, 48] +// Beautiful lady .............. kh_school [119,149] +// Beautiful lady .............. kh_school [122,186] +// Signboard ................... kh_dun01 [163,223] +// Mechanical Device ........... kh_dun01 [166,223] +// Mechanical Device ........... kh_dun01 [162,206] +// Kiel_Hyre_Door .............. kh_dun01 [224,232] +// Steward ..................... kh_mansion [ 78, 55] +// Kiel Hyre ................... kh_mansion [ 22, 27] +// Allysia ..................... kh_mansion [ 22, 27] +// Abduction_trigger ........... lighthalzen [188,200] +// Mysterious Woman ............ kh_mansion [ 25, 79] +// Odd Granma .................. yuno [250,132] +// Old Lady .................... yuno [250,132] +// Rosimmir_Entrance ........... yuno [273,141] +// Table ....................... kh_rossi [ 23, 23] +// Shelf ....................... kh_rossi [ 92, 40] +// Desk ........................ kh_rossi [144,146] +// Bookshelf ................... kh_rossi [144,146] +// Old Fisherman ............... yuno_fild12 [232,222] +// Wooden Board ................ yuno_fild09 [158,217] +// Kiehl_Room_Warp ............. kh_mansion [ 29, 27] +// Entrance Device#KHEntry1 .... kh_dun01 [ 44, 20] +// Entrance Device#KHEntry2 .... kh_dun01 [ 44,203] +// Security Guard .............. yuno_fild08 [158,194] +// Receiver .................... kh_kiehl01 [ 17, 39] +// Flower Vase ................. kh_kiehl01 [ 13, 40] +// Box ......................... kh_kiehl01 [ 19, 25] +// Big Door .................... kh_kiehl01 [ 44, 33] +// Big_Door_1_Warp ............. kh_kiehl01 [ 43, 33] +// Big Door .................... kh_kiehl01 [174, 40] +// Big_Door_2_Warp ............. kh_kiehl01 [174, 39] +// Big Door .................... kh_kiehl01 [ 77,108] +// Big_Door_3_Warp ............. kh_kiehl01 [ 68,108] +// Big Door .................... kh_kiehl01 [ 41,177] +// Big_Door_4_Warp ............. kh_kiehl01 [ 78,177] +// Robots ...................... kh_kiehl01 [ 15,181] +// Big Door .................... kh_kiehl01 [166,187] +// Big_Door_5_Warp ............. kh_kiehl01 [166,186] +// Kiehl_Room_Trap ............. kh_kiehl02 [ 49, 15] +// Kiehl#Original .............. kh_kiehl02 [ 50, 52] +// KiehlRoom ................... kh_kiehl02 [ 1, 1] +// Floating NPC (Agent#KHAgent0::KHAgent) +// Mitchell#KiehlRoom .......... kh_kiehl02 [ 49, 55] +// Agent#KHAgent1 .... ....... kh_kiehl02 [ 53, 52] +// Agent#KHAgent2 .............. kh_kiehl02 [ 51, 49] +// Agent#KHAgent3 .............. kh_kiehl02 [ 47, 50] +// Agent#KHAgent4 .............. kh_kiehl02 [ 46, 53] +// Kiehl#Copy .................. kh_kiehl02 [ 48, 53] +// Kiehl_Roomn_Exit ............ kh_kiehl01 [ 50, 59] +// +//---------------------------------------------------------------------------- +// [Functions] +// None +// +//---------------------------------------------------------------------------- +// [Conflicts] +// Resolved +// +//============================================================================ + + +//============================================================================ +// Affiliated NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Juno Pub Master/Starting point. +//---------------------------------------------------------------------------- +yuno_in01,35,179,1 script Pub Master 46,4,4,{ + if (checkweight(7487,1) == 1) { + mes "^3355FF- Wait!! -"; + mes "- You are carrying too many items-"; + mes "- so you can't receive any more items -"; + mes "- please take off some items -"; + mes "- and come for the challenge again -^000000"; + close; + } + + if (KielHyreQuest == 1) { + mes "[Vandt]"; + mes "Hi there, welcome"; + mes "to my pub. So what"; + mes "would you like to have?"; + next; + + switch(select("Beer, please","A coctail, please","Soju, please.","You look worried, what's up?","Cancel")) { + + case 1: + mes "[Vandt]"; + mes "Alright, let me get"; + mes "you a glass of beer on"; + mes "tap. There you are, this"; + mes "is out special Schwaltz Beer."; + next; + mes "^3355FF*Gulp gulp gulp*^000000"; + percentheal 5,-5; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ahhh, it's really"; + mes "good! That really"; + mes "hits the spot!"; + close; + + case 2: + mes "[Vandt]"; + mes "I'm sorry, but I have to"; + mes "deliver all of our cocktail"; + mes "ingredients to other customers."; + mes "Maybe I'll have enough to make"; + mes "you something next time, okay?"; + close; + + case 3: + mes "[Vandt]"; + mes "S-soju? I'm sorry,"; + mes "but we don't serve that"; + mes "here. It's too much of"; + mes "a tough guy drink for me..."; + close; + + case 4: + mes "[Vandt]"; + mes "Oh, did you overhear?"; + mes "I'm sorry, it's just that one"; + mes "of my employees had an"; + mes "accident and was pretty hurt,"; + mes "so I have nodoby that can"; + mes "deliver this merchandise."; + next; + mes "[Vandt]"; + mes "I have an urgent order"; + mes "that I need to send to"; + mes "the Kiel Hyre Academy,"; + mes "but I can't find anyone"; + mes "that's avaliable for this"; + mes "kind of temporaty job."; + next; + + switch(select("I'm sorry to hear that","Do you want me to help you?")) { + + case 1: + mes "[Vandt]"; + mes "Well, I'm sure that I'll"; + mes "figure something out."; + mes "Do you know anyone"; + mes "that'd be interested in"; + mes "some part time work?"; + close; + + case 2: + mes "[Vandt]"; + mes "Really? That's great!"; + mes "But first, I think it's fair to"; + mes "tell you that this job may not"; + mes "be as simple as you'd think."; + mes "I expect you to complete the"; + mes "delivery, no matter what."; + next; + + switch(select("Sure I'll do it", "Wait, let me think about it...")) { + + case 1: + mes "[Vandt]"; + mes "I'm glad to hear that."; + mes "Well then, please take this"; + mes "bottle of Culinary Wine to"; + mes "Mrs. ^ff0000Lecollane^000000 in the Kiel"; + mes "Hyre Academy. I'll pay you"; + mes "once you finish the job, okay?"; + getitem 7487,1; //Culinary_Wine + set KielHyreQuest,2; + close; + + case 2: + mes "[Vandt]"; + mes "Sure thing. I really need"; + mes "to get this done, so if you"; + mes "can't do it, but know any"; + mes "capable, responsible"; + mes "people that can, then please"; + mes "tell them about my situation."; + close; + + } + + } + + case 5: + mes "[Vandt]"; + mes "Sure, just take"; + mes "your time, relax,"; + mes "and order something"; + mes "when you're ready."; + close; + } + + } + + else if ((KielHyreQuest >= 2) && (KielHyreQuest < 6)) { + mes "[Vandt]"; + mes "Please deliver that bottle"; + mes "of Wine I gave you to Mrs."; + mes "Mrs. ^ff0000Lecollane^000000, who should be"; + mes "inside the Kiel Hyre Academy."; + mes "Hurry and get it to her before she"; + mes "can complain about the delivery."; + close; + } + + else if ((KielHyreQuest == 6) && (KHPubMasterEnd != 1)) { + mes "[Vandt]"; + mes "Oh, you're back."; + mes "Thanks for making that"; + mes "delivery. Just give me"; + mes "a moment, and then I can"; + mes "pay you in zeny, okay?"; + next; + switch(select("I need more wine...")) { + + case 1: + mes "[Vandt]"; + mes "Oh, you need to deliver"; + mes "another bottle? Alright,"; + mes "let me look around, and"; + mes "I'll give you the wine"; + mes "and your payment."; + next; + mes "^3355FFRummage Rummage^000000"; + mes "^3355FFRummage Rummage^000000"; + next; + mes "[Vandt]"; + mes "There you go!"; + mes "Thank you so much"; + mes "for helping me out~"; + getitem 7487,1; //Culinary_Wine + set zeny,zeny+1000; + set KHPubMasterEnd,1; + close; + } + } + + else if ((KielHyreQuest > 6) || (KHPubMasterEnd == 1)) { + mes "[Vandt]"; + mes "Hey, thanks a lot"; + mes "for helping me out that"; + mes "last time. I knew I asked"; + mes "you out of the blue, but"; + mes "you ended up being a life"; + mes "saver! I really appreicate it!"; + close; + } + +OnTouch: + if (KielHyreQuest < 1) { + mes "[Vandt]"; + mes "Arrrggghhh..."; + mes "This can't be good..."; + mes "This isn't good at all!"; + mes "What am I suposed to do?"; + set KielHyreQuest,1; + close; + } +} + +//---------------------------------------------------------------------------- +// Juno Toast Sales Girl. +//---------------------------------------------------------------------------- +yuno,217,114,4 script Little Kid 96,{ + if (KielHyreQuest < 6) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + close; + } + + else if ((KielHyreQuest == 6) && (KHToastGirlEnd != 3)) { + if (KHToastGirlEnd < 1) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + mes "Oh! Hi hi~ Did you want"; + mes "to buy some yummy toast?"; + next; + + switch(select("I'm here for Elly","No, thanks")) { + + case 1: + mes "[Cezu]"; + mes "Oh, I see. Elly must have"; + mes "wasted another batch of"; + mes "ingredients again. Well,"; + mes "she's a regular customer,"; + mes "so I really want to help, but"; + mes "I can't really do anything."; + next; + mes "[Cezu]"; + mes "You see, I just ran"; + mes "out of ingredients too!"; + mes "But I can't really leave"; + mes "to get some more. What if"; + mes "people need to buy toast?"; + mes "Listen, can you help me out?"; + next; + mes "[Cezu]"; + mes "would you please go get"; + mes "some flour and eggs for me"; + mes "from the ^3355FFLighthalzen Windmill^000000"; + mes "Then, when you come back, I can"; + mes "divide the ingredients, and you"; + mes "can deliver some to Elly."; + next; + mes "[Cezu]"; + mes "I know that I'm basically"; + mes "making you do everything"; + mes "on your own, but please try"; + mes "to understand that my hands"; + mes "are tied. D-don't ask me"; + mes "why, they just are!"; + set KHToastGirlEnd,1; + close; + + case 2: + mes "[Cezu]"; + mes "Okay okay~"; + mes "Please come again!"; + close; + } + } + + else if (KHToastGirlEnd == 1) { + mes "[Cezu]"; + mes "Would you please go to"; + mes "the Lighthalzen Windmill"; + mes "and tell them that Cezu needs"; + mes "lots of flour and lots of eggs!"; + mes "Then, bring all the stuff over"; + mes "to me as soon as you can~"; + close; + } + + else if (KHToastGirlEnd == 2) { + mes "[Cezu]"; + mes "Hey, you're back with the"; + mes "ingredients! Thank you so"; + mes "much, I really needed these!"; + mes "Now please give this flour"; + mes "and these eggs to Elly, and"; + mes "send her my regards. See you~"; + delitem 7488,1; //Delivery_Package + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,3; + close; + } + + } + + else if ((KielHyreQuest >= 6) || (KHToastGirlEnd == 3)) { + //KHToastGirlEnd no longer needed-- deleting. + set KHToastGirlEnd,0; + mes "[Cezu]"; + mes "Hot, fresh and"; + mes "cruuuunchy toast!"; + mes "Come and get some!"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Lighthalzen WindMill Owner. +//---------------------------------------------------------------------------- +lighthalzen,365,300,2 script Windmill Owner 46,{ + if (KHToastGirlEnd < 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "I'm pretty busy right"; + mes "now, so you mind coming"; + mes "back later? Then we'll talk."; + close; + } + + else if (KHToastGirlEnd == 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "You just happened to"; + mes "catch me at a good time,"; + mes "but if you need anything,"; + mes "you'd better spit it out quick"; + mes "before things get hectic again."; + next; + + switch(select("I'm here for Cezu","......")) { + + case 1: + mes "[Mills]"; + mes "Oh, Cezu from the"; + mes "toast stand? Okay,"; + mes "I've got everything"; + mes "here, let me just get"; + mes "it ready for you..."; + next; + mes "[Mills]"; + mes "Kid's one of my regular"; + mes "customers, so you don't"; + mes "have to pay me, or run any"; + mes "extra errands on my end. Yeah,"; + mes "I know how other people treat"; + mes "you adventurers. Well, see ya."; + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,2; + close; + + case 2: + mes "[Mills]"; + mes "......"; + mes "Um, okay, well, if"; + mes "you need something,"; + mes "just hollar, I guess."; + mes "Cuts, Cutz where are you?"; + mes "You'd better not be goofing off!"; + close; + + } + + } + + else if (KHToastGirlEnd >= 2) { + mes "[Mills]"; + mes "That Cutz is such"; + mes "a lazy rascal. The guy"; + mes "thinks he can fool around"; + mes "when he's on the clock...!"; + mes "Ah well, he knows I can't find"; + mes "a better assistant. He'll learn..."; + close; + } + +} + +//============================================================================ +//Kiel Hyre Academy NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Girl (Talks about the academy) +//---------------------------------------------------------------------------- +yuno_fild08,196,196,5 script Hanie 102,{ + mes "[Hanie]"; + mes "Oh, I wish I could study"; + mes "at the Kiel Hyre Academy..."; + mes "All of the graduates get"; + mes "really nice jobs! I'm almost"; + mes "jealous of the students!"; + next; + + switch(select("Kiel Hyre Academy?")) { + + case 1: + mes "[Hanie]"; + mes "Oh, the Kiel Hyre Academy"; + mes "is a school founded by Kiel"; + mes "Hyre, an inventor that became"; + mes "rich from his strange machines."; + mes "He decided to give back to society"; + mes "by building this private academy."; + next; + mes "[Hanie]"; + mes "However, the school will"; + mes "only accept orphans that are"; + mes "too poor to enroll in any other"; + mes "schools. Sometimes, it makes"; + mes "me wish that I was an orphan too!"; + mes "Well, not really, but you know..."; + close; + } +} + + +//---------------------------------------------------------------------------- +// Academy Security Guards +//---------------------------------------------------------------------------- +yuno_fild08,158,194,5 script Security Guard#1::KHAGuard 852,{ + if ((KielHyreQuest < 2) && (KielHyreQuest >= 30)) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + close; + } + + + else if (KielHyreQuest == 2) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + next; + switch(select("I'm here for a delivery.","......")) { + case 1: + mes "[Security Guard]"; + mes "You're here to deliver"; + mes "something? Okay, just give"; + mes "me the recipient's ^FF0000name^000000,"; + mes "followed by the ^FF0000item^000000 being"; + mes "delivered, and I'll verify it"; + mes "before letting you inside."; + next; + + input @KHDelivery$; + if (@KHDelivery$ != "Lecollane") { + mes "[Security Guard]"; + mes "You're here to deliver some"; + mes "Wine to...to who? What was"; + mes "the name? I...I don't think"; + mes "we have anybody in the"; + mes "academy named "+@KHDelivery$+""; + close; + } + + input @KHDelivery$ ; + if (@KHDelivery$ != "Culinary Wine") { + mes "[Security Guard]"; + mes "So you're here to make"; + mes "a delivery to Mrs. Lecollane?"; + mes "What is it you've brought for"; + mes "her? Some ^3355FF"+@KHDelivery$+"^000000?"; + next; + mes "[Security Guard]"; + mes "Let me buzz her first,"; + mes "and check to make sure"; + mes "that she's been expecting"; + mes "you. Let's see now..."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Huh. Mrs Lecollane"; + mes "is expecting a delivery,"; + mes "but not the item that you"; + mes "say that you've brought for"; + mes "her. You might want to check"; + mes "to see if there's been a mixup..."; + close; + } + + mes "[Security Guard]"; + mes "Alright...."; + mes "So you're here to"; + mes "deliver a bottle of"; + mes "Wine to Mrs. Lecollane?"; + mes "Let me buzz her, and get"; + mes "this confirmed real quickly."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Okay, everything looks"; + mes "good. Mrs. Lecollane"; + mes "has been expecting you."; + mes "I guess you can enter."; + close2; + warp "kh_school",71,155; + end; + + case 2: + mes "[Security Guard]"; + mes "If you don't have"; + mes "an appoointment, then"; + mes "don't loiter around in"; + mes "front of the academy!"; + close; + + } + + } + + else if (KielHyreQuest >= 4) { + mes "[Security Guard]"; + mes "Oh, did you have"; + mes "other business inside"; + mes "the academy? I remember"; + mes "you from before, so there"; + mes "shouldn't be any problems"; + mes "letting you back inside..."; + close2; + warp "kh_school",71,155; + end; + } + +} + +yuno_fild08,158,183,7 duplicate(KHAGuard) Security Guard#2 852 + +//---------------------------------------------------------------------------- +// Gossiping Teenagers/Story NPCs +//---------------------------------------------------------------------------- +kh_school,57,142,7 script Student::StudentKHQ1 893,3,3,{ + mes "[Laci]"; + mes "Oh, wow! We usually"; + mes "don't get visitors on"; + mes "campus! Um, you're not"; + mes "a new faculty member, are you?"; + close; + +OnTouch: + mes "[Laci]"; + mes "Hey, Nesha...!"; + mes "have you heard why"; + mes "Aaci hasn't been coming"; + mes "to class for awhile?"; + next; + mes "[Gui Nesha]"; + mes "That's right, I haven't"; + mes "seen Aaci in awhile."; + mes "Did something happen?"; + next; + mes "[Laci]"; + mes "It's because...."; + mes "Aaci saw a freakin' ghost!"; + mes "It's one hundred percent"; + mes "true! I heard about it from,"; + mes "well, you know, my sources."; + next; + mes "[Gui Nesha]"; + mes "...Wha...?"; + mes "Oh, come on,"; + mes "get outta town."; + close; +} + +kh_school,57,139,1 script Student::StudentKHQ2 893,{ + mes "[Gui Nesha]"; + mes "Aren't we a little"; + mes "old to be talking about"; + mes "this kind of stuff? You"; + mes "know, rumors and ghost"; + mes "stories that make no sense?"; + mes "C'mon, Laci, knock it off!"; + emotion e_swt2; + close; +} + +//---------------------------------------------------------------------------- +// Mrs. Lecollane +//---------------------------------------------------------------------------- +kh_school,176,60,4 script Lady::LadyKHQ 101,{ + if (KielHyreQuest < 2) { + mes "[Mrs. Lecollane]"; + mes "Is there a problem?"; + mes "Outsiders are not allowed to come"; + mes "in here, please leave."; + close; + } + + else if (KielHyreQuest == 2) { + mes "[Mrs. Lecollane]"; + mes "Oh, hello. Ah!"; + mes "have you come to"; + mes "deliver my wine? The"; + mes "security guard called and"; + mes "mentioned you were coming."; + next; + + switch(select("Yes, that's right!","Er, s-sorry!")) { + + case 1: + mes "[Mrs. Lecollane]"; + mes "Well, you've come a little"; + mes "later than I thought, but"; + mes "I suppose it can't be helped."; + mes "I guess the waiting has just"; + mes "heightened my anticipation"; + mes "for this bottle of wi--"; + next; + mes "^3355FF*Cling! Crrrack!*^000000"; + next; + mes "[Mrs. Lecollane]"; + mes "Elly? Elly did you"; + mes "break something again?!"; + mes "You've got to be more careful!"; + mes "If you don't finish baking those"; + mes "cookies by the end of today, your"; + mes "semester grades will suffer!"; + next; + mes "[Elly]"; + mes "B-but I just..."; + next; + mes "[Mrs. Lecollane]"; + mes "^FF0000Elly^000000!!"; + next; + mes "[Elly]"; + mes "......"; + mes "Yes, Mrs. Lecollane."; + next; + mes "[Mrs. Lecollane]"; + mes "*Ahem* Excuse me."; + mes "Would you please leave"; + mes "the wine over there? You"; + mes "may go now, and please"; + mes "don't wander needlessly"; + mes "around the academy."; + delitem 7487,1; + set KielHyreQuest,4; + close; + + case 2: + mes "[Mrs. Lecollane]"; + mes "Hm...?"; + mes "I guess I must"; + mes "be mistaken. I'm"; + mes "sorry, I thought you"; + mes "were somebody else."; + close; + } + return; + } + + else if (KielHyreQuest == 4) { + mes "[Mrs Lecollane]"; + mes "Well, our business is"; + mes "completed, so would you"; + mes "please leave the campus"; + mes "as soon as you can? *Sigh*"; + mes "I can't believe our future"; + mes "is in these girls' hands..."; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly (In school) +//---------------------------------------------------------------------------- +kh_school,179,39,1 script Cute Student 895,{ + cutin "kh_elly01",2; + if (KielHyreQuest < 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "W-wah! Oh...!"; + mes "*Phew* That was close,"; + mes "I almost dropped them"; + mes "again! Why do I have so much"; + mes "trouble handling ingredients?"; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh no, what should"; + mes "I do? *Sob* Wh-what"; + mes "am I going to do? *sniff*"; + next; + switch(select("What happened?","......")) { + + case 1: + mes "[Elly]"; + mes "I...I have to finish baking"; + mes "this batch of cookies by the"; + mes "end of today, but then I spilled"; + mes "all of the ingredients on the"; + mes "floor. I don't know how I can"; + mes "bake those cookies now..."; + next; + switch(select("What can I do to help you?","Oh, I'm so sorry.")) { + + case 1: + L_Accept: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "What was that...?"; + mes "You'll really help"; + mes "me? That's wonderful!"; + mes "Thank you! Thank you so much!"; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, I guess the only way"; + mes "I can bake these cookies is"; + mes "to get some new ingredients."; + mes "I'm sorry to be such a burden,"; + mes "but if you didn't offer to help"; + mes "me, then I'd have no one to ask!"; + next; + mes "[Elly]"; + mes "You don't understand how"; + mes "important it is that I bake"; + mes "these cookies...If I don't"; + mes "finish the assignment, then"; + mes "Mrs. Crank will fail me for"; + mes "the entire semester!"; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Okay, I need to calm"; + mes "down. I think I can do"; + mes "this with your help."; + mes "Would you please do me"; + mes "this huge favor and bring"; + mes "all these ingredients?"; + next; + cutin "kh_elly01",2; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + next; + mes "[Elly]"; + mes "Good luck, getting"; + mes "everything, and I hope"; + mes "you hurry back here with"; + mes "those cookie ingredients"; + mes "as quickly as you can, okay?"; + set KielHyreQuest,6; + goto KH_Elly_end; + + Case 2: + mes "What, you don't go"; + mes "to this school, don't"; + mes "you? Y-you're one of"; + mes "those adventurers, right?"; + next; + switch(select("Yeah, that's right.")) { + + mes "Listen, I know you"; + mes "probably have your own"; + mes "plans, but do you think"; + mes "you can help me with this"; + mes "huge problem that I have?"; + next; + switch(select("Accept","Decline")) { + + case 1: + //Missing text, needs another run through. + goto L_Accept; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "I'm outta here."; + next; + emotion e_sob; + mes "W-wait...!"; + mes "Come back, you"; + mes "d-don't...! I really"; + mes "need some help!"; + goto KH_Elly_end; + + } + + } + + } + + case 2: + mes "*Sob*..."; + goto KH_Elly_end; + } + + } + + else if (KielHyreQuest == 6) { + //519 - Milk; 548 - Cheese; 7182 - Cacao; 7487 - Culinary_Wine; 7488 - Delivery_Package + if ((countitem(519) < 7) || (countitem(548) < 2) || (countitem(7182) < 5) || (countitem(7487) < 1) || (countitem(7488) < 1)) { + mes "[Elly]"; + mes "Let's see, would you"; + mes "like me to remind you"; + mes "which ingredients I need?"; + mes "Please bring these things as"; + mes "soon as you can so that I can"; + mes "quickly bake some cookies~"; + next; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + goto KH_Elly_end; + } + else { + emotion e_ho; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Hooray! Finally, I have"; + mes "everything I need! This is"; + mes "great! Oh, would you please"; + mes "give me a moment while I bake"; + mes "these cookies? It shouldn't take"; + mes "long, so hold on just a bit."; + set KielHyreQuest,8; + //KHPubMasterEnd no longer needed-- deleting. + set KHPubMasterEnd,0; + delitem 519,7; //Milk + delitem 548,2; //Cheese + delitem 7182,5; //Cacao + delitem 7487,1; //Culinary_Wine + delitem 7488,1; //Delivery_Package + goto KH_Elly_end; + + } + + } + + else if (KielHyreQuest == 8) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "Tadah! I did it!"; + mes "They're finally done!"; + mes "''Elly's Special Cookies~''"; + mes "I'd like you to have some "; + mes "as a thanks for helping me out"; + next; + mes "[Elly]"; + mes "I'm sorry, but I was so"; + mes "preoccupied with baking"; + mes "these cookies that I didn't"; + mes "even ask for your name. I'm"; + mes "^FF0000Ellyja^000000, but everyone calls me,"; + mes "''Elly.'' What's your name?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "^3355FF"+strcharinfo(0)+"^000000."; + mes "It's ^3355FF"+strcharinfo(0)+"^000000."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes ""+strcharinfo(0)+"?"; + mes "...that name! It's wonderful!"; + set KielHyreQuest,10; + getitem 538,5; //Well_Baked_Cookie + goto KH_Elly_end; + } + + else if (KielHyreQuest == 10) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "I'm sorry, but I have"; + mes "another favor to ask you"; + mes "if you don't mind helping"; + mes "me out again. Don't worry,"; + mes "you won't have to hurry as"; + mes "quickly as you did last time."; + next; + + switch(select("What do you need?","Sorry, but I'm pretty busy...")) { + + case 1: + mes "[Elly]"; + mes "You know how you helped"; + mes "me bake those cookies?"; + mes "It's the first time I was able"; + mes "to do it without burning them!"; + mes "I just know Grandfather'd"; + mes "be so proud of me!"; + next; + mes "[Elly]"; + mes "I really want Grandfather"; + mes "to taste the cookies I baked,"; + mes "but the cookies will be stale"; + mes "by the time I'm able to leave"; + mes "campus. Would you deliver these"; + mes "cookies to my grandfather for me?"; + next; + + switch(select("Sure","I'm busy.")) { + + case 1: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Oh, "+strcharinfo(0)+"!"; + mes "Thank you so much, I knew"; + mes "you'd understand! Would you"; + mes "please bring the cookies to"; + mes "him at ^FF0000Kiel Hyre cottage^000000?"; + next; + mes "[Elly]"; + mes "Oh, right! They're really"; + mes "careful about visitors and"; + mes "keeping strangers off the"; + mes "property, but if you mention"; + mes "my name, they'll let you in."; + mes "Alright then, see you~"; + set KielHyreQuest,12; + goto KH_Elly_end; + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + } + + else if (KielHyreQuest == 12) { + mes "[Elly]"; + mes "Oh, you don't know where"; + mes "to find Kiel Hyre cottage?"; + mes "It's just north from this"; + mes "academy. Please deliver my"; + mes "cookies to grandfather, and"; + mes "let him know I really miss him."; + goto KH_Elly_end; + + } + + else if (KielHyreQuest == 14) { + mes "[Elly]"; + mes "Hm? Grandfather's not"; + mes "home? That's strange, he"; + mes "didn't mention anything about"; + mes "any business trips. I thought"; + mes "he'd be at home all day..."; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Would you go back to his"; + mes "cottage once more time? Here,"; + mes "you can use this Cottage Key."; + mes "That way, you can just go"; + mes "inside and talk to him~"; + getitem 7489,1; //Cottage Key + set KielHyreQuest,16; + goto KH_Elly_end; + } + + else if ((KielHyreQuest >= 14) && (KielHyreQuest < 20)) { + mes "[Elly]"; + mes "That's so weird..."; + mes "I thought Grandfather"; + mes "said that he'd be at"; + mes "home all day today..."; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 20) { + mes "[Elly]"; + mes "Hmmm...?"; + mes "What's this,"; + mes "a letter for me?"; + next; + mes "^3355FFElly opened the envelopre^000000"; + mes "^3355FFand started reading the letter^000000"; + next; + mes "Dearest Elly"; + mes "^FFFFFF_^000000"; + mes "I have something to discuss"; + mes "with my son Kiehl, so I am"; + mes "leaving to meet with him."; + mes "If you don't hear from me"; + mes "7 days after I've written"; + mes "it's possible I may be in"; + mes "trouble. Don't trust anyone"; + mes "at the Academy, Elly."; + mes "I've left something for you"; + mes "In the Study."; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "What? oh no, it's been"; + mes "ten days since he wrote"; + mes "this letter! Ah, does this"; + mes "mean that he's in danger?!"; + mes "Oh no, what should I do?"; + delitem 7490,1; //Letter_to_Elly + set KielHyreQuest,22; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 22) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + switch(select("About your grandpa","Tell me about Kiehl","What's with this academy?")) { + + case 1: + mes "[Elly]"; + mes "Oh! My grandfather is"; + mes "Kiel Hyre, founder and"; + mes "CEO of the Kiel Hyre"; + mes "foundation. He looks"; + mes "strict and cold hearted"; + mes "but he's actually very nice!"; + next; + mes "[Elly]"; + mes "We're not related by"; + mes "blood, but he's taken"; + mes "care of me ever since"; + mes "I lost my parents. Oh,"; + mes "Grandpa, where are you?"; + mes "I'm getting so worried!"; + goto KH_Elly_end; + + case 2: + mes "[Elly]"; + mes "Kiehl? That's my"; + mes "grandfather's son..."; + mes "I don't know him that"; + mes "well, and only saw him"; + mes "once at an academy event."; + next; + mes "[Elly]"; + mes "Mmm, he's a good looking"; + mes "guy with pale skin, silver"; + mes "hair, and this cold, fierce"; + mes "stare. A lot of my classmates"; + mes "worship Kiehl because he's"; + mes "also a business genius~"; + next; + mes "[Elly]"; + mes "It's weird though..."; + mes "I have no idea why my"; + mes "grandpa and Kiehl don't"; + mes "get along. They're both"; + mes "really good at what they do."; + goto KH_Elly_end; + + case 3: + mes "[Elly]"; + mes "Well, I know the security"; + mes "here is really tight, but"; + mes "that's because everything"; + mes "here is so luxurious and"; + mes "expensive, you know~"; + next; + mes "[Elly]"; + mes "We also have a very"; + mes "special curriculum where"; + mes "you learn more of what you"; + mes "want. Personally, I want to"; + mes "become a great career woman,"; + mes "like ^3355FFMs. Allysia^000000. Heh heh~"; + next; + mes "[Elly]"; + mes "This place certainly"; + mes "isn't like other schools."; + mes "You already know that only"; + mes "Yeah, everything is made to"; + mes "fit each of the student's needs."; + next; + mes "[Elly]"; + mes "Recently, though?"; + mes "Some really weird stuff"; + mes "has been happening. All of"; + mes "my classmates are afraid of"; + mes "going out alone by themselves."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "But I'll be okay!"; + mes "You'll be there to"; + mes "rescue me from danger"; + mes "right, "+strcharinfo(0)+"?"; + next; + switch(select("Who is Ms. Allysia?","Strange incidents?")) { + + case 1: + mes "[Elly]"; + mes "Oh, Ms. Allysia is"; + mes "Grandfather's secretary~"; + mes "She's so beautiful, and"; + mes "my grandfather really"; + mes "trusts her with everything!"; + goto KH_Elly_end; + + case 2: + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, "+strcharinfo(0)+"..."; + mes "I'm not supposed to tell"; + mes "anyone outside of the school,"; + mes "but I can trust you! You see..."; + mes "We're haunted by a ghost!"; + next; + mes "[Elly]"; + mes "I know it sounds crazy,"; + mes "but this ghost wanders the"; + mes "campus, and curses it's victims,"; + mes "making them so hold and lifeless."; + mes "It happened to my roommate,"; + mes "Mayo. It's like she's a statue."; + next; + mes "[Elly]"; + mes "I snuck into the medical"; + mes "office to see her, and she..."; + mes "She couldn't do anything!"; + mes "What would happen if the"; + mes "ghost decided to curse me?!"; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "You know what...?"; + mes "If I ever got cursed"; + mes "by that ghost, just yell"; + mes "''^FF0000Wake up, Elly!^000000''"; + mes "That'll wake me up for sure!"; + set KielHyreQuest,24; + goto KH_Elly_end; + + } + + } + + } + + else if (KielHyreQuest == 24) { + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Arg, I'm in a fix!"; + mes "I have to finish my"; + mes "homework before it's due!"; + mes "Yeah, I've got to go see"; + mes "Mrs. Lecollane now."; + next; + goto KH_Step26; + } + + else if (KielHyreQuest == 26) { + KH_Step26: + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + set KielHyreQuest,26; + goto KH_Elly_end; + } + + else if (KielHyreQuest > 26) { + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + goto KH_Elly_end; + } + + KH_Elly_end: + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Elly's Window +//---------------------------------------------------------------------------- +yuno_fild08,69,185,0 script Window::WindowKHQ1 111,{ + if ((KielHyreQuest <= 28) || (KielHyreQuest >= 46)){ + mes "^3355FFThis must be Elly's room.^000000"; + mes "^3355FFIt doesn't sound like anyone^000000"; + mes "^3355FFis inside, so the probably^000000"; + mes "^3355FFisn't back yet. For now, you^000000"; + mes "^3355FFshould try to find what her^000000"; + mes "^3355FFgrandfather left for her^000000"; + mes "^3355FFin their cottage's study.^000000"; + close; + } + + if (KielHyreQuest >= 30) { + mes "^3355FFThis slightly open window^000000"; + mes "^3355FFmust lead into Elly's room.^000000"; + mes "^3355FFAlthought she asked you to^000000"; + mes "^3355FFfind a ladder to enter her^000000"; + mes "^3355FFwindow, you probably won't^000000"; + mes "^3355FFfind one. You might be able^000000"; + mes "^3355FFto climb up that water pipe...^000000"; + next; + switch(select("Climb Water Pipe","Find Another Way")) { + + case 1: + set @KHClimbAttempt,rand(1,5); + if (@KHClimbAttempt == 1) { + mes "^3355FFYou climbed up the^000000"; + mes "^3355FFwater pipe, and sneaked^000000"; + mes "^3355FFinto Elly's room successfully.^000000"; + close2; + warp "kh_school",185,185; + end; + } + + else { + mes "^3355FFYou tried to climb^000000"; + mes "^3355FFthe water pope, but^000000"; + mes "^3355FFyou ended up failing^000000"; + mes "^3355FFand bumping your head^000000"; + percentheal -10,0; + close; + } + + case 2: + mes "^3355FFThere must be some^000000"; + mes "^3355FFother way to get into^000000"; + mes "^3355FFElly's room, aside from^000000"; + mes "^3355FFclimbing up this water pipe...^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Elly (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,178,180,5 script Elly 895,{ + if (KielHyreQuest <= 30) { + mes "[Elly]"; + mes "Oh~!"; + mes "Who are you!"; + mes "How did you get here? Please leave"; + close2; + percentheal -99,0; + warp "yuno_fild08",100,100; + end; + } + + else if (KielHyreQuest == 32) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly seems to have^000000"; + mes "^3355FFbeen cursed, and is^000000"; + mes "^3355FFcompletely still and^000000"; + mes "^3355FFlifeless. You've got to^000000"; + mes "^3355FFtry something, but what?^000000"; + next; + + switch(select("Wake her up by shaking.","Wake her up by yelling.","Ignore")) { + + case 1: + mes "^3355FFYou grab Elly by the^000000"; + mes "^3355FFshoulders and try to get^000000"; + mes "^3355FFher to respond by violently^000000"; + mes "^3355FFshaking her entire body.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Elly? Elly? no!"; + mes "Come back to us!"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + + case 2: + input @KHInput$; + if (@KHInput$ == "Wake up, Elly!") { + mes "[Elly]"; + mes "........."; + mes "^3355FFAs soon as you said those^000000"; + mes "^3355FFwords, a ^000000Small Golden Key^000000"; + mes "^3355FFand a ^000000Button^3355FF drop from Elly's^000000"; + mes "^3355FFhands. It looks like she woke^000000"; + mes "^3355FFup, but only for an instant.^000000"; + getitem 7493,1; //Golden_Key + getitem 7494,1; //Exquisite_Button + set KielHyreQuest,34; + close; + } + + else { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + } + + case 3: + mes "^3355FFAlright.^000000"; + mes "^3355FFBut sooner or later,^000000"; + mes "^3355FFyou should try to break^000000"; + mes "^3355FFthe curse placed on Elly.^000000"; + close; + + } + + } + + else if (KielHyreQuest == 34) { + if (countitem(7491) < 1) { + //Missing text, needs another run through. + mes "^3355FFMaybe the golden key^000000"; + mes "unlocks something in the^000000"; + mes "Cottage. Let's take another look.^000000"; + close; + } + + else { + mes "^3355FFIt looks like Elly's^000000"; + mes "^3355FFGolden Key might fit^000000"; + mes "^3355FFinto the keyhole on the^000000"; + mes "^3355FFGrey Box you found inside^000000"; + mes "^3355FFKiel Hyre's Cottage.^000000"; + next; + mes "^3355FFYou successfully open the^000000"; + mes "^3355FFGrey Box with the Golden Key,^000000"; + mes "^3355FFand find a Blue Keycard, along^000000"; + mes "^3355FFwith a folded note, inside the^000000"; + mes "^3355FFGrey Box. You quickly read^000000"; + mes "^3355FFthe note's contents...^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + getitem 7495,1; //Blue_Keycard + delitem 7491,1; //Iron_Box + set KielHyreQuest,36; + close; + } + + } + + else if (KielHyreQuest >= 36) { + mes "^3355FFThis is where you^000000"; + mes "^3355FFdiscovered the note^000000"; + mes "^3355FFlocked inside the Grey Box.^000000"; + mes "^3355FFThe following message was^000000"; + mes "^3355FFwritten in the note by Elly's^000000"; + mes "^3355FFgrandfather, Kiel Hyre.^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cookie Basket +//---------------------------------------------------------------------------- +kh_school,175,175,0 script Cookie Basket 111,{ + if (KielHyreQuest == 30) { + mes "^3355FFThis must be^000000"; + mes "^3355FFElly's cookie basket.^000000"; + mes "^3355FFThere appears to be^000000"; + mes "^3355FFa folded note wedged^000000"; + mes "^3355FFbetween the cookies.^000000"; + next; + + switch(select("Read Note","Ignore")) { + + case 1: + mes ""+strcharinfo(0)+", help!"; + mes "There's this guy dressed in"; + mes "black who;s walking around,"; + mes "and casting this weird spell!"; + mes "He's the one that's been making"; + mes "people cold and lifeless as"; + mes "puppets! I'm getting scared!"; + mes "^FFFFFF_^000000"; + mes "I hope you get this note..."; + mes "He ran after me, but I locked"; + mes "myself in my room. I'm going"; + mes "to leave my window open so that"; + mes "you can still find me. I hope he"; + mes "doesn't cast his curse on me!"; + set KielHyreQuest,32; + close; + + case 2: + mes "^3355FFThat note probably^000000"; + mes "^3355FFwasn't written just^000000"; + mes "^3355FFfor you, anyway.^000000"; + close; + + } + } + + else if (KielHyreQuest >= 32) { + mes "^3355FFThese cookies aren't^000000"; + mes "^3355FFstale yet, but they're no^000000"; + mes "^3355FFlonger warm. If they're^000000"; + mes "^3355FFnot room temperature,^000000"; + mes "^3355FFthen they're a little cold.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly's Window (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,188,185,0 script Window::WindowKHQ2 111,{ + warp "yuno_fild08",69,183; + end; +} + +//---------------------------------------------------------------------------- +// Grave/Kiel Hyre dungeon entry +//---------------------------------------------------------------------------- +yuno_fild08,72,170,0 script Grave 111,{ + if (KielHyreQuest < 36) { + //Missing text, needs another run through. + mes "^3355FFIt's just a grave.^000000"; + mes "^3355FFIt might be important^000000"; + mes "^3355FFto you later, but now^000000"; + mes "^3355FFit's not really all that^000000"; + mes "^3355FFhelpful to you.^000000"; + close; + } + + else if (KielHyreQuest == 36) { + if (countitem(7492) < 1) { + + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + close; + } + + else { + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + next; + mes "^3355FFWhat should you^000000"; + mes "^3355FFinsert into the slot?^000000"; + next; + + input @KHInput$; + + if (@KHInput$ == "Yellow Keycard") { + mes "^3355FFAn electronic confirmation^000000"; + mes "^3355FFchime sounds once you insert^000000"; + mes "^3355FFthe Yellow Keycard, followed by^000000"; + mes "^3355FFan automated voice that asks:^000000"; + next; + mes "[Security System]"; + mes "Please enter the password."; + next; + + input @KHInput$; + + next; + + if (@KHInput$ == "4772961") { + mes "[Security System]"; + mes "Password confirmed."; + mes "Welcome, Kiel Hyre."; + next; + mes "^3355FFYou hear another^000000"; + mes "^3355FFpleasant beep, and^000000"; + mes "^3355FFa secret path opens.^000000"; + set KielHyreQuest,38; + close; + } + + else { + mes "[Security System]"; + mes "Incorrect password."; + mes "Please try again."; + close; + } + } + + else { + mes "^3355FFWhatever you're trying^000000"; + mes "^3355FFto insert into the slot^000000"; + mes "^3355FFisn't working at all...^000000"; + close; + } + + } + + } + + else if ((KielHyreQuest >= 38) && (KielHyreQuest < 106)) { + mes "^3355FFThe door to the^000000"; + mes "^3355FFfactory is wide open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + + } + + else if (KielHyreQuest >= 106) { + if (countitem(7509) < 1) { + mes "^3355FFThe secret entrance"; + mes "has now been sealed.^000000"; + close; + } + + else { + mes "As you aproach the"; + mes "grave, it begins to"; + mes "emit flashes of light.^000000"; + next; + + switch(select("Use the ^0000FFLuxurious Keycard^000000","Ignore")) { + + case 1: + mes "Once you use the"; + mes "Luxurious Keycard,"; + mes "a secret path opens^000000"; + next; + + switch(select("Enter","cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + } + + } + +} + +//============================================================================ + +//============================================================================ +//Kiel Hyre Cottage NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Cottage Keeper +//---------------------------------------------------------------------------- +yuno_fild02,93,210,3 script Cottage Keeper 85,{ + if ((KielHyreQuest < 12) || (KielHyreQuest > 12)) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + close; + } + + else if (KielHyreQuest == 12) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + next; + + switch(select("I have an apointment with Kiel Hyre.","Alright.")) { + + case 1: + mes "[Cottage Keeper]"; + mes "You have an"; + mes "appointment with"; + mes "Master Kiel Hyre?"; + mes "Um, are you sure?"; + next; + switch(select("Yes","No")) { + + case 1: + mes "[Cottage Keeper]"; + mes "There must be some sort"; + mes "of mistake. Mister Hyre"; + mes "wouldn't have left if he"; + mes "was suposed to keep"; + mes "an appointment..."; + set KielHyreQuest,14; + close; + + case 2: + mes "[Cottage Keeper]"; + mes "Well unless you have"; + mes "an appointment, I don't"; + mes "think you'll be able to"; + mes "meet with Mister Hyre."; + close; + } + + case 2: + mes "[Cottage Keeper]"; + mes "Goodbye."; + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (left) +//---------------------------------------------------------------------------- +yuno_fild02,75,218,0 script Door::DoorKHQ1 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest == 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Unlock","Cancel")) { + + case 1: + mes "^3355FFYou unlock the door with the.^000000"; + mes "^3355FFkey that Elly gave you, and.^000000"; + mes "^3355FFas you push it open, a folded.^000000"; + mes "^3355FFnote dropped from the top of the.^000000"; + mes "^3355FFdoor. The following words.^000000"; + mes "^3355FFare written on this crude note.^000000"; + next; + mes "6 Forward,"; + mes "3 Left,"; + mes "3 Forward,"; + mes "4 Left"; + close2; + set KielHyreQuest,18; + warp "kh_vila",188,18; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } + + if (KielHyreQuest >= 18) { + mes "^3355FFThe door is open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",188,18; + end; + + case 2: + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (Right) +//---------------------------------------------------------------------------- +yuno_fild02,109,218,0 script Door::DoorKHQ2 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest >= 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Open","Cancel")) { + + case 1: + mes "^3355FFYou don't have^000000"; + mes "^3355FFthe key that can^000000"; + mes "^3355FFunlock this door.^000000"; + close; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } +} + + +//---------------------------------------------------------------------------- +// Store room interior; Wall +//---------------------------------------------------------------------------- +kh_vila,191,14,0 script Wall 111,{ + if (KielHyreQuest < 28) { + mes "^3355FFIt's just a wall.^000000"; + mes "^3355FFIt's not particularly^000000"; + mes "^3355FFstanding in your way.^000000"; + close; + } + + if (KielHyreQuest >= 28) { + mes "^3355FFThe wall is now^000000"; + mes "^3355FFopen, revealing^000000"; + mes "^3355FFa secret path.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",17,177; + end; + + case 2: + close; + } + + } + +OnOpenDoor: + misceffect 316; + end; +} + +//---------------------------------------------------------------------------- +// Store room interior; books +//---------------------------------------------------------------------------- +kh_vila,184,20,0 script Book#1::BookKHQ1 111,{ + if ((KielHyreQuest < 26) || (KielHyreQuest > 26)) { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + else if (KielHyreQuest == 26) { + if (rand(1,10) == 8) { + mes "^3355FFWithout thinking, you^000000"; + mes "^3355FFreach for a book from^000000"; + mes "^3355FFthe bookshelf. As you^000000"; + mes "^3355FFpull it toward you, the^000000"; + mes "^3355FFwall slides open to^000000"; + mes "^3355FFreveal a secret path.^000000"; + donpcevent "Wall::OnOpenDoor"; + set KielHyreQuest,28; + close; + } + + else { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + + } + +} + +kh_vila,181,20,0 duplicate(BookKHQ1) Book#2::BookKHQ2 111 + +kh_vila,178,20,0 duplicate(BookKHQ1) Book#3::BookKHQ3 111 + +kh_vila,175,19,0 duplicate(BookKHQ1) Book#4::BookKHQ4 111 + +//---------------------------------------------------------------------------- +// Store room interior; Letter to Elly on the floor. +//---------------------------------------------------------------------------- +kh_vila,179,11,0 script KH_Letter_Trigger -1,2,2,{ +OnTouch: + if (KielHyreQuest == 18) { + mes "^3355FFYou've found a letter^000000"; + mes "^3355FFon the floor. Naturally,^000000"; + mes "^3355FFyou pick i up, despite^000000"; + mes "^3355FFthe fact that it's not^000000"; + mes "^3355FFaddressed to you.^000000"; + getitem 7490,1; //Letter to Elly + set KielHyreQuest,20; + close; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Box (Pet Food vending machine) +//---------------------------------------------------------------------------- +kh_vila,16,175,0 script Box::BoxKHQ1 111,{ + mes "^FFFFFF##^000000*Tasty-Nutricious-Delicious*"; + mes "*Cute Pet Doof Vending Machine*"; + mes "The best food for your Cute Pets"; + mes "that is superior to the Pet Food"; + mes "you can buy in the market!"; + mes "^FFFFFF_^000000"; + mes "Price: 1,100 zeny (cheap!)"; + next; + + switch(select("Buy!","Cancel")) { + + case 1: + mes "^3355FF1,100 zeny seems kind"; + mes "^3355FFor expensive for Pet Food,"; + mes "^3355FFbut if it's better t han the"; + mes "^3355FFnormal stuff, it might"; + mes "^3355FFbe worth a shot."; + next; + if (zeny < 1100) { + //Adlibbed dialog. Need weight check, too. + mes "^3355FFYou don't have enough zeny...^000000"; + close; + } + else { + mes "^3355FFOh no...!^000000"; + mes "^3355FFThere's nothing^000000"; + mes "^3355FFspecial about it^000000"; + mes "^3355FFat all! It's just^000000"; + mes "^3355FFnormal Pet Food!^000000"; + set zeny,zeny-1100; + getitem 537,1; + close; + } + + case 2: + mes "^3355FFThis vending machine^000000"; + mes "^3355FFseems really shady and^000000"; + mes "^3355FFsuspicious for some reason^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Apple Box (Useless?) +//---------------------------------------------------------------------------- +kh_vila,30,184,0 script Apple Box 111,{ + mes "^3355FFYou find a box filled with^000000"; + mes "^3355FFripe, delicious apples.^000000"; + next; + + switch(select("Take the box","Leave it")) { + + case 1: + mes "^3355FFNo...! Wait!^000000"; + mes "^3355FFSomething's wrong!^000000"; + mes "^3355FFWhatever you do,^000000"; + mes "^3355FFdon't take this box!^000000"; + next; + mes "^3355FFAnd so, your inner^000000"; + mes "^3355FFvoice, your Jungian^000000"; + mes "^3355FFshadow if you will,^000000"; + mes "^3355FFprevented you from^000000"; + mes "^3355FFtaking the box.^000000"; + close; + + case 2: + mes "^3355FFSomething is wrong^000000"; + mes "^3355FFwith this box of apples.^000000"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, dining room; Map +//---------------------------------------------------------------------------- +kh_vila,44,126,0 script Map 111,{ + if ((KHCottagePoem1 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFA magnificent world map,^000000"; + mes "^3355FFdetailing the Rune-Midgarts^000000"; + mes "^3355FFKingdom, Schwaltzvalt Republic,^000000"; + mes "^3355FFas well as another country to the^000000"; + mes "^3355FFWest whose name is unfamiliar^000000"; + mes "^3355FFto you, is pasted to this wall.^000000"; + next; + mes "^3355FFAs you examine the^000000"; + mes "^3355FFworld map more closely,^000000"; + mes "^3355FFyou find that something has^000000"; + mes "^3355FFbeen hidden underneath it.^000000"; + next; + + switch(select("ignore","Examine")) { + + case 1: + mes "^3355FFWhatever might be^000000"; + mes "^3355FFhidden beneath this^000000"; + mes "^3355FFmap probably isn't^000000"; + mes "^3355FFimportant enough for^000000"; + mes "^3355FFyou to investigate.^000000"; + close; + + case 2: + mes "^3355FFUnfortunately, you can't^000000"; + mes "^3355FFsee what's under the map^000000"; + mes "^3355FFsince it's pasted to the wall.^000000"; + mes "^3355FFYou'll need to find some^000000"; + mes "^3355FFway to loosen the blue^000000"; + mes "^3355FFwithout damaging the map.^000000"; + set KHCottagePoem1,1; + close; + + } + + } + + else if ((KHCottagePoem1 == 2) && (KielHyreQuest < 30)) { + mes "^3355FFYou bring the pot of^000000"; + mes "^3355FFsteaming hot liquid^000000"; + mes "^3355FFclose to the world map.^000000"; + mes "^3355FFAs the paste on the wall^000000"; + mes "^3355FFmoistens, the map slowly^000000"; + mes "^3355FFbegins to peel back.^000000"; + next; + mes "^3355FFThe peelnig map revealed^000000"; + mes "^3355FFa folded piece of paper^000000"; + mes "^3355FFhidden beneath it. You^000000"; + mes "^3355FFtake the paper, and smooth^000000"; + mes "^3355FFthe map out to adhere it to^000000"; + mes "^3355FFthe wall once again. A message is^000000"; + mes "^3355FFwritten on the piece of paper.^000000"; + next; + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparent as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + set KHCottagePoem1,3; + close; + } + + else if ((KHCottagePoem1 > 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you found^000000"; + mes "^3355FFthe paper on which the^000000"; + mes "^3355FFpoem was written. Perhaps^000000"; + mes "^3355FFit would be a good idea to^000000"; + mes "^3355FFrefresh your memory and^000000"; + mes "^3355FFread that that poem again.^000000"; + next; + + switch(select("Read","Cancel")) { + + case 1: + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparant as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + close; + + case 2: + mes "^3355FFThere's no need for^000000"; + mes "^3355FFyou to reread this poem.^000000"; + mes "^3355FFYou're a freakin' genius!^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Pot +//---------------------------------------------------------------------------- +kh_vila,33,184,0 script Pot 111,{ + if (KHCottagePoem1 < 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + close; + } + + else if (KHCottagePoem1 == 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + mes "^3355FFSteam... That you could^000000"; + mes "^3355FFuse to loosen the glue on^000000"; + mes "^3355FFthe map... You're a genius!^000000"; + next; + + switch(select("Try it.","That? That won't work!")) { + + case 1: + mes "^3355FFYou picked up the^000000"; + mes "^3355FFboiling pot, but^000000"; + mes "^3355FFslightly burned your^000000"; + mes "^3355FFhands on accident.^000000"; + set KHCottagePoem1,2; + close; + + case 2: + mes "^3355FFNo, no...^000000"; + mes "^3355FFWe'd better try^000000"; + mes "^3355FFsomething else.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 1) || (KielHyreQuest >= 30)){ + mes "^3355FFThis is where you^000000"; + mes "^3355FFpicked up the pot filled^000000"; + mes "^3355FFwith steaming liquid.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, fire place; Calabash +//---------------------------------------------------------------------------- +kh_vila,14,55,0 script Calabash 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFIt's an expensive^000000"; + mes "^3355FFlooking calabash--^000000"; + mes "^3355FFor in less fancy^000000"; + mes "^3355FFwords, a 'gourd.'^000000"; + mes "^3355FFWhat do you do?^000000"; + next; + + switch(select("Break Open Calabash","Look Inside Calabash","ignore")) { + + case 1: + mes "^3355FFYou can't break^000000"; + mes "^3355FFopen that calabash...^000000"; + mes "^3355FFYou're a hero, not a vandal.^000000"; + mes "^3355FFNow, if this act of vandalisim^000000"; + mes "^3355FFcan be considered an act of^000000"; + mes "^3355FFheroisim, then it'd be okay.^000000"; + close; + + case 2: + mes "^3355FFYou tenderly place^000000"; + + mes "^3355FFyour hand into the^000000"; + mes "^3355FFcalabash, and gently^000000"; + mes "^3355FFfeel around with your^000000"; + mes "^3355FFfingers until you retrieve^000000"; + mes "^3355FFan Old Bronze Key^000000"; + getitem 7329,1; //Old_Bronze_Key + close; + + case 3: + mes "^3355FFThere's probably^000000"; + mes "^3355FFnothing inside anyway^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the expensive^000000"; + mes "^3355FFlooking calabash from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe Old Bronze Key.^000000"; + mes "^3355FFIt's useless to you now.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, garden; Pool +//---------------------------------------------------------------------------- +kh_vila,39,41,0 script pool 111,{ + if ((KHCottagePoem1 < 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + close; + } + + else if ((KHCottagePoem1 == 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + mes "^3355FFalong with a conscpicuous^000000"; + mes "^3355FFlion statue with two handles^000000"; + next; + + switch(select("Pull handles","cancel")) { + + case 1: + mes "Which handle would^000000"; + mes "you like to pull first?^000000"; + next; + + switch(select("Right Handle","Left Handle")) { + + case 1: + mes "^3355FFYou pull the right^000000"; + mes "^3355FFhandle, causing water^000000"; + mes "^3355FFto gush from the lion's^000000"; + mes "^3355FFmouth. It looks pretty cool~^000000"; + close; + + case 2: + mes "^3355FFAs soon as you pull the^000000"; + mes "^3355FFleft handle, the water in^000000"; + mes "^3355FFthe pool drains away. The^000000"; + mes "^3355FFpool empties, and you can^000000"; + mes "^3355FFsee a later of green moss^000000"; + mes "^3355FFcovering the pool's bottom.^000000"; + next; + + switch(select("Ignore","Investigate")) { + + case 1: + mes "^3355FFyou decide that^000000"; + mes "^3355FFa pool is little more^000000"; + mes "^3355FFthan a hole without^000000"; + mes "^3355FFany water to fill it.^000000"; + close; + + case 2: + mes "^3355FFAs you look through^000000"; + mes "^3355FFthe wet moss at the^000000"; + mes "^3355FFbottom of the pool,^000000"; + mes "^3355FFyou stumble upon a^000000"; + mes "^3355FFsmall, peculliar button.^000000"; + next; + + switch(select("Press button","Don't Press Button")) { + + case 1: + mes "^3355FFYou press the button^000000"; + mes "^3355FFwhich seems to trigger^000000"; + mes "^3355FFa strange sound coming^000000"; + mes "^3355FFfrom the stairs at the hallway.^000000"; + set KHCottagePoem1,4; + close; + + case 2: + mes "^3355FFYou'd better not push^000000"; + mes "^3355FFthis button. Your enemies^000000"; + mes "^3355FFmust have hidden it carefully^000000"; + mes "^3355FFfor you to find. It must be^000000"; + mes "^3355FFsome sort of nefarious trap.^000000"; + close; + + } + + } + + } + + case 2: + mes "^3355FFYou decided not^000000"; + mes "^3355FFto pull and handles.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 3) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you pressed^000000"; + mes "^3355FFthe small button that caused^000000"; + mes "^3355FFsome strange noise to come^000000"; + mes "^3355FFfrom the stairs near the wallway.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Vicious Dog +//---------------------------------------------------------------------------- +kh_vila,181,178,4 script Vicious Dog 81,7,3,{ +OnTouch: + mes "*Grrr~*"; + next; + mes "^3355FFAn extremely vicious^000000"; + mes "^3355FFlooking dog is glaring^000000"; + mes "^3355FFat you. Can you really^000000"; + mes "^3355FFpass by this creature^000000"; + mes "^3355FFwithout getting hurt?^000000"; + next; + + switch(select("March forward","Run away")) { + + case 1: + if (countitem(537) >= 1) { + mes "^3355FFWait! Perhaps you can^000000"; + mes "^3355FFuse food to soothe the^000000"; + mes "^3355FFsavage beast! Why don't^000000"; + mes "^3355FFyou feed it some of your Pet^000000"; + mes "^3355FFFood and see what happens?^000000"; + next; + + switch(select("Give pet Food","It won't work!")) { + + case 1: + mes "^3355FFYou gingerly throw the^000000"; + mes "^3355FFPet Food towards the dog.^000000"; + mes "^3355FFIts tail shakes violently as^000000"; + mes "^3355FFit devours the food. You'd^000000"; + mes "^3355FFbetter pass this dog now^000000"; + mes "^3355FFwhile you have the chance!^000000"; + delitem 537,1; //Pet_Food + close2; + warp "kh_vila",173,182; + end; + + case 2: + NoPetFood: + mes "^3355FFYou slowly approach^000000"; + mes "^3355FFthe dog, but it won't^000000"; + mes "^3355FFstop snarling at you.^000000"; + mes "^3355FFYou try to run past the^000000"; + mes "^3355FFdog, but it blocks all of^000000"; + mes "^3355FFyour moves. What to do?^000000"; + next; + mes "[Vicious Dog]"; + mes "BOW WOW!"; + mes "BOW WOW!"; + mes "BOW WOW WOW!"; + next; + mes "^3355FFThe dog chases you^000000"; + mes "^3355FFdownstairs like the^000000"; + mes "^3355FFsuckah chump you are^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + } + + else { + goto NoPetFood; + } + + case 2: + mes "^3355FFLet's get out of here!^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Drawer, first room nightstand +//---------------------------------------------------------------------------- +kh_vila,115,186,0 script Drawer::DrawerKHQ1 111,{ + if ((countitem(7492) < 1) && (KielHyreQuest < 36)) { + mes "^3355FFyou find an old drawer^000000"; + mes "^3355FFthat has been closed.^000000"; + mes "^3355FFIf you open it, then you^000000"; + mes "^3355FFmight find something^000000"; + mes "^3355FFinside. Or could it be^000000"; + mes "^3355FFempty. Who knows?^000000"; + next; + + switch(select("Open Drawer","Ignore")) { + + case 1: + mes "^3355FFYou obtain a Yellow^000000"; + mes "^3355FFKeycard from inside the^000000"; + mes "^3355FFdrawer. Opening that drawer^000000"; + mes "^3355FFturned out to be worthwhile.^000000"; + getitem 7492,1; //Yellow_Keycard + close; + + case 2: + mes "^3355FFForget opening that^000000"; + mes "^3355FFdrawer. I mean, come on,^000000"; + mes "^3355FFwhat would be the point?^000000"; + close; + } + } + + else { + mes "^3355FFThis is where you^000000"; + mes "^3355FFfound the Yellow Keycard.^000000"; + mes "^3355FFThis drawer is now empty.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Box +//---------------------------------------------------------------------------- +kh_vila,107,126,0 script Box::BoxKHQ2 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + close; + } + + else if ((countitem(7329) >= 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + mes "^3355FFperhaps you can use your^000000"; + mes "^3355FFOld Bronze Key to unlock it.^000000"; + next; + + switch(select("Use Old Bronze Key","No, it'll never work.")) { + + case 1: + mes "^3355FFYour hunch paid off!^000000"; + mes "^3355FFThe Old Bronze Key really^000000"; + mes "^3355FFdid unlock that box! You^000000"; + mes "^3355FFopen the inner box and^000000"; + mes "^3355FFobtain the Green Keycard^000000"; + mes "^3355FFthat was locked inside.^000000"; + getitem 7516,1; + delitem 7329,1; + close; + + + case 2: + mes "^3355FFWhat...?^000000"; + mes "^3355FFWhat? Using a key^000000"; + mes "^3355FFto unlock a lock?^000000"; + mes "^3355FFCome on, that's^000000"; + mes "^3355FFfreakin' crazy talk.^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the box from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe green keycard.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Bookshelf. +//---------------------------------------------------------------------------- +kh_vila,181,138,0 script Bookshelf::BookshelfKHQ1 111,{ + if ((countitem(7491) < 1) && (countitem(7516) >= 1)) { + mes "^3355FFOne of the books on^000000"; + mes "^3355FFthis crammed bookshell^000000"; + mes "^3355FFis labeled with the note,^000000"; + mes "^3355FF'To Elly.' It must have been^000000"; + mes "^3355FFleft behind by her grandfather^000000"; + next; + switch(select("Examine Book","Ignore")) { + + case 1: + mes "^3355FFYou skim through the^000000"; + mes "^3355FFbook's pages, and don't^000000"; + mes "^3355FFfind anything particularly^000000"; + mes "^3355FFinteresting. However, you^000000"; + mes "^3355FFnotice a steel surface behind the^000000"; + mes "^3355FFshelf as you place the book back.^000000"; + next; + + switch(select("Examine The steel surface","Ignore")) { + + case 1: + mes "^3355FFYou remove more of the^000000"; + mes "^3355FFself's books to reveal^000000"; + mes "^3355FFthat the steel surface is^000000"; + mes "^3355FFpart of a safe hidden behind^000000"; + mes "^3355FFthe bookshelf. There are two^000000"; + mes "^3355FFkeyholes on the steel safe.^000000"; + next; + + switch(select("Try all your keys","Cancel")) { + + case 1: + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe first keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHFirstKeyhole,1; + break; + + case 2: + set @KHFirstKeyhole,2; + break; + + } + + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe second keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHSecondKeyhole,1; + break; + + case 2: + set @KHSecondKeyhole,2; + break; + + } + + if (@KHFirstKeyhole == 2) && (@KHSecondKeyhole == 1) { + mes "^3355FFThe safe opens with^000000"; + mes "^3355FFa click and you see^000000"; + mes "^3355FFa Grey Box inside.^000000"; + mes "^3355FFYou take the Grey Box^000000"; + mes "^3355FFwith you, hoping that^000000"; + mes "^3355FFwill come in handy later.^000000"; + delitem 7489,1; //Cottage Key + delitem 7516,1; //Green_Keycard + getitem 7491,1; //Iron_Box + close; + } + + else { + mes "^3355FFThe safe won't open.^000000"; + close; + } + + case 2: + mes "^3355FFIt's probably a better^000000"; + mes "^3355FFidea to investigate the^000000"; + mes "^3355FFcottage for the keys that^000000"; + mes "^3355FFwill open up this safe...^000000"; + close; + + } + + case 2: + mes "^3355FFYou place the books^000000"; + mes "^3355FFback on the bookchelf.^000000"; + close; + + } + + case 2: + mes "^3355FFYou can probably^000000"; + mes "^3355FFfind better clues^000000"; + mes "^3355FFsomewhere else^000000"; + mes "^3355FFaround here.^000000"; + close; + + } + } + + else { + end; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Desk +//---------------------------------------------------------------------------- +kh_vila,118,143,0 script Desk::DeskKHQ1 111,{ + if (KHCottagePoem2 < 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books stacked on top^000000"; + mes "^3355FFof the desk covering topics^000000"; + mes "^3355FFlike artificial power, Sage^000000"; + mes "^3355FFVarmundt's research, factory^000000"; + mes "^3355FFrobotization, and magic scrolls...^000000"; + next; + mes "^3355FFWhile rummaging around through^000000"; + mes "^3355FFthe books and paper, you^000000"; + mes "^3355FFfind a piece of paper with^000000"; + mes "^3355FFthe Kiel Hyre Foundation's^000000"; + mes "^3355FFofficial seal. You decide that^000000"; + mes "^3355FFit might come in handy someday.^000000"; + next; + mes "^3355FFYou've obtained^000000"; + mes "^3355FFa blank piece of^000000"; + mes "^3355FFpaper with the Kiel^000000"; + mes "^3355FFHyre Foundation seal.^000000"; + set KHCottagePoem2,1; + close; + } + + else if (KHCottagePoem2 >= 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books, covering various^000000"; + mes "^3355FFscientific and magic tomics,^000000"; + mes "^3355FFstacked on top of this desk.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Medicine Chest +//---------------------------------------------------------------------------- +kh_vila,123,170,0 script Medicine Chest 111,{ + if ((KHCottagePoem2 < 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + close; + } + + else if ((KHCottagePoem2 == 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + next; + mes "^3355FFWait, you have a blank piece^000000"; + mes "^3355FFof paper with the Kiel Hyre^000000"; + mes "^3355FFFoundation seal! It's strange^000000"; + mes "^3355FFthat the seal was put on a blank^000000"; + mes "^3355FFpiece of paper. Maybe something^000000"; + mes "^3355FFis written on it with special ink?^000000"; + next; + mes "^3355FFIt's a crazy hunch, but^000000"; + mes "^3355FFmaybe, just maybe, you can^000000"; + mes "^3355FFuse something inside this^000000"; + mes "^3355FFmedicine cabinet that will^000000"; + mes "^3355FFreveal any invisible ink^000000"; + mes "^3355FFwritten on this document!^000000"; + next; + + switch(select("What? That's crazy!","Of course! Let's try it!")) { + + case 1: + mes "^3355FFSorry.^000000"; + mes "^3355FFI thought it^000000"; + mes "^3355FFwas a good idea...^000000"; + close; + + case 2: + switch(select("Try Red Liquid","Try Blue Liquid","Try Yellow Liquid","Try Green Liquid","Cancel")) { + + case 1: + set @KHPotionColor$,"red"; + break; + + case 2: + mes "^3355FFIt works!^000000"; + mes "^3355FFThe blue liquid is^000000"; + mes "^3355FFrevealing small^000000"; + mes "^3355FFtext written on the paper.^000000"; + mes "^3355FFIt looks like some^000000"; + mes "^3355FFkind of long poem...^000000"; + next; + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle"; + mes "lost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + next; + mes "^3355FFThis is a very^000000"; + mes "^3355FFstrange poem. What^000000"; + mes "^3355FFcould it possibly mean?^000000"; + set KHCottagePoem2,2; + close; + + case 3: + set @KHPotionColor$,"yellow"; + break; + + case 4: + set @KHPotionColor$,"green"; + break; + + case 5: + mes "^3355FFNever mind.^000000"; + mes "^3355FFThis idea sounds^000000"; + mes "^3355FFtoo crazy to work...^000000"; + mes "^3355FFlike putting a man^000000"; + mes "^3355FFpn the moon. Can you^000000"; + mes "^3355FFbelieve that hogwash?^000000"; + close; + } + + mes "^3355FFYou tried sprinking^000000"; + mes "^3355FFthe "+@KHPotionColor$+" liquid from the^000000"; + mes "^3355FFmedicine cabinet onto^000000"; + mes "^3355FFthe blank paper with the^000000"; + mes "^3355FFKiel Hyre Foundation seal.^000000"; + mes "^3355FFHowever, nothing happened...^000000"; + close; + + } + } + + else if ((KHCottagePoem2 >= 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you poured^000000"; + mes "^3355FFsome blue liquid to read^000000"; + mes "^3355FFa poem written in invisible^000000"; + mes "^3355FFink on a blank poece of paper^000000"; + mes "^3355FFwith the Kiel Hyre Foundation^000000"; + mes "^3355FFseal. Would you like to read it?^000000"; + next; + + switch(select("No time!","Read")) { + + case 1: + mes "^3355FFYou're running out of^000000"; + mes "^3355FFtime! For now, it would^000000"; + mes "^3355FFbe best for you to seach^000000"; + mes "^3355FFevery inch of the cottage.^000000"; + close; + + case 2: + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle^000000"; + mes "^3355FFlost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + close; + + } } +} + +//---------------------------------------------------------------------------- +// Cottage interior, stair case; Sword hilt +//---------------------------------------------------------------------------- +kh_vila,136,68,0 script Sword Hilt 111,{ + if ((KHCottagePoem1 < 3) || (KHCottagePoem2 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures.^000000"; + close; + } + + else if ((KHCottagePoem1 <= 4) || (KHCottagePoem2 <= 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures. Wait!^000000"; + mes "^3355FFperhaps they're related to^000000"; + mes "^3355FFthat poem you read earlier...^000000"; + next; + + switch(select("No way!","Of course!")) { + + case 1: + mes "^3355FFImpossible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + mes "^3355FFOf course! And look!^000000"; + mes "^3355FFThere's a hole on top^000000"; + mes "^3355FFof the head of each snake^000000"; + mes "^3355FFsculpture. There holes seem^000000"; + mes "^3355FFbig enough to insert each of^000000"; + mes "^3355FFthe ornamental swords nearby...^000000"; + next; + + switch(select("Ignore","Insert Ornamental Swords")) { + + case 1: + mes "^3355FFImposible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + if (KHCottagePoem1 != 4) { + mes "^3355FFCan't... Pull out...^000000"; + mes "^3355FFSword! It must be^000000"; + mes "^3355FFlocked into place^000000"; + mes "^3355FFsomehow, or sealed^000000"; + mes "^3355FFby some strange force!^000000"; + close; + } + + else { + mes "^3355FFYou should probably^000000"; + mes "^3355FFtry to insert each sword^000000"; + mes "^3355FFinto the correct snake.^000000"; + mes "^3355FFFirst please select the^000000"; + mes "^3355FFsnake in which you will^000000"; + mes "^3355FFinsert the first sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHfirstSword,1; + break; + + case 2: + set @KHfirstSword,2; + break; + + case 3: + set @KHfirstSword,3; + break; + + case 4: + set @KHfirstSword,4; + break; + + } + + next; + mes "^3355FFNow, please choose^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the second sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHSecondSword,1; + break; + + case 2: + set @KHSecondSword,2; + break; + + case 3: + set @KHSecondSword,3; + break; + + case 4: + set @KHSecondSword,4; + break; + + } + + next; + + mes "^3355FFNext, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the third sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHThirdSword,1; + break; + + + case 2: + set @KHThirdSword,2; + break; + + case 3: + set @KHThirdSword,3; + break; + + case 4: + set @KHThirdSword,4; + break; + + } + + next; + mes "^3355FFLastly, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the fourth sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHFouthSword,1; + break; + + case 2: + set @KHFouthSword,2; + break; + + case 3: + set @KHFouthSword,3; + break; + + case 4: + set @KHFouthSword,4; + break; + + } + + if ((@KHFirstSword == 2) && (@KHSecondSword == 4) && (@KHThirdSword == 1) && (@KHFouthSword == 3)) { + mes "^3355FFYour ears are suddenly^000000"; + mes "^3355FFfilled with a low buzzing^000000"; + mes "^3355FFnoise, and your mind^000000"; + mes "^3355FFand body feel as if they^000000"; + mes "^3355FFare being swept away^000000"; + set KHCottagePoem1,5; + set KHCottagePoem2,3; + close2; + warp "kh_vila",178,72; + end; + } + + else { + mes "^3355FFNothing happened...^000000"; + mes "^3355FFYou probably didn't^000000"; + mes "^3355FFinsert the swords into^000000"; + mes "^3355FFthe correct snakes. For now,^000000"; + mes "^3355FFyou should return the swords,^000000"; + mes "^3355FFand then try this again later.^000000"; + close; + } + } + } + } + } + + else if ((KHCottagePoem1 == 5) && (KHCottagePoem2 == 3) || (KielHyreQuest >= 30)) { + mes "^3355FFHere is a hidden^000000"; + mes "^3355FFpath that leads to^000000"; + mes "^3355FFthe secret laboratory.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",178,72; + end; + + case 2: + close; + + } + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; left test tube +//---------------------------------------------------------------------------- +kh_vila,179,68,0 script Test Tube::TestTubeKHQ1 111,{ + mes "^3355FFThis test tube contains^000000"; + mes "^3355FFa young man dressed in^000000"; + mes "^3355FFa Kiel Hyre Academy^000000"; + mes "^3355FFuniform. Somehow, you^000000"; + mes "^3355FFget the feeling that you've^000000"; + mes "^3355FFseen him somewhere before.^000000"; + close; +} + + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; Right test tube +//---------------------------------------------------------------------------- +kh_vila,185,68,0 script Test Tube::TestTubeKHQ2 111,{ + if (KielHyreQuest == 28) { + mes "^3355FFA strange looking,^000000"; + mes "^3355FFwizend old man is^000000"; + mes "^3355FFheld within this test tube.^000000"; + mes "^3355FFThere is a small red button^000000"; + mes "^3355FFright underneath the test tube.^000000"; + next; + + switch(select("Press Button","Investigate Further")) { + + case 1: + + mes "[???]"; + mes "H-hello...? C-can you"; + mes "hear me? I don't recognize"; + mes "you... But... Maybe I forgot?"; + mes "Wait, wait. If you're my friend,"; + mes "then you know what to call me,"; + mes "right? Do you know what I am?"; + next; + + input @KHInput$; + + if (@KHInput$ == "little lost devil") { + mes "[???]"; + mes "Heh... Heh heh..."; + mes "He knows... Hey, you"; + mes "have to remember these"; + mes "numbers, okay? D-don't"; + mes "forget, they'll be important..."; + mes "^FF00004^000000, ^FF00007^000000, ^FF00002^000000, ^FF00009^000000, ^FF00006^000000, ^FF00001^000000. That's all..."; + next; + mes "^3355FF4772961^000000"; + mes "^3355FFWhat could^000000"; + mes "^3355FFthose numbers^000000"; + mes "^3355FFpossibly mean?^000000"; + //KHCottagePoem1 and KHCottagePoem2 no longer needed-- deleting + set KHCottagePoem1,0; + set KHCottagePoem2,0; + set KielHyreQuest,30; + close; + } + + else { + mes "[???]"; + mes "No... No..."; + mes "That's not right."; + mes "I don't think we"; + mes "were friends. No..."; + close; + } + + case 2: + mes "^3355FFLet's investigate^000000"; + mes "^3355FFthis area a little^000000"; + mes "^3355FFmore first.^000000"; + close; + + } + + } + + else if (KielHyreQuest >= 30) { + mes "^3355FFWhat could the^000000"; + mes "^3355FFnumber 4772961^000000"; + mes "^3355FFmean? For now, you've^000000"; + mes "^3355FFfound everything that^000000"; + mes "^3355FFyou need from this place,^000000"; + mes "^3355FFso you should return to Elly.^000000"; + close; + } + + else { + end; + } + +} + +//============================================================================ + +//============================================================================ +// Robot Factory NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door +//---------------------------------------------------------------------------- +kh_dun01,235,48,0 script Heavy Door::HeavyDoorKHQ1 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + if (@KHInput$ == "Blue Keycard") { + mes "^3355FFYou've successfully^000000"; + mes "^3355FFopened the door.^000000"; + close2; + warp "kh_school",119,144; + end; + } + + else { + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + } + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door (These doors don't seem to serve any purpose) +//---------------------------------------------------------------------------- +kh_dun01,76,233,0 script Heavy Door::HeavyDoorKHQ2 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } + +} + +kh_dun01,106,233,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ3 111 +kh_dun01,6,164,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ4 111 +kh_dun01,6,133,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ5 111 +kh_dun01,6,60,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ6 111 +kh_dun01,6,30,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ7 111 +kh_dun01,6,18,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ8 111 +kh_dun01,235,70,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ9 111 +kh_dun01,235,92,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ10 111 +kh_dun01,235,114,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ11 111 + +//---------------------------------------------------------------------------- +// Beautiful Lady and Beautiful Lady copies. +//---------------------------------------------------------------------------- +kh_school,119,149,4 script Beautiful lady::BeatifulLadyKHQ1 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest < 40) { + mes "[Allysia]"; + mes "Hm? I don't think"; + mes "I know you. Kiel Hyre"; + mes "has only authroized Elly,"; + mes "and a trusted friend that"; + mes "may be helping her, to"; + mes "be admitted to this area."; + next; + mes "[Allysia]"; + mes "I cannot see ^FF0000Elly^000000"; + mes "Has she been attacked as well?"; + mes "Are you ^FF0000Elly's friend^000000?"; + next; + mes "[Allysia]"; + mes "I don't see Elly anywhere"; + mes "around here. I can only let"; + mes "you enter if you can identify"; + mes "youtself as Elly's friend."; + mes "Is there anything that you"; + mes "can present to me as proof?"; + next; + + switch(select("Yellow Keycard","Blue Keycard","Golden Key","Carved Button","...?")) { + + case 1: + break; + + case 2: + break; + + case 3: + mes "Ah, isn't this the"; + mes "key that Kiel Hyre gave"; + mes "to Elly? Yes, I'm convinced"; + mes "that you've been helping her."; + mes "I've been waiting for you, so"; + mes "let me guide you to my room."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + + case 4: + mes "[Allysia]"; + mes "Th-that's Kiehl's"; + mes "heal! Did he send you"; + mes "here to get me?! I'm"; + mes "not taking any changes!"; + close2; + cutin "",255; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + end; + + case 5: + mes "[Allysia]"; + mes "......"; + mes "........"; + mes "..........."; + close2; + cutin "",255; + end; + + } + + mes "[Allysia]"; + mes "Hm? This doesn't prove"; + mes "that Elly really trusts you..."; + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 40) { + mes "[Allysia]"; + mes "Please follow me."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + } +} + + +kh_school,117,149,4 script Beautiful lady::BeatifulLadyKHQ2 894,{ + end; +} + +kh_school,118,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ3 894 + +kh_school,120,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ4 894 + +kh_school,121,149,4 duplicate(BeatifulLadyKHQ1) Beautiful lady::BeatifulLadyKHQ5 894 + +//---------------------------------------------------------------------------- +// Beautiful Lady "Allysia" +//---------------------------------------------------------------------------- +kh_school,122,186,4 script Beautiful lady 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 38) { + mes "[Allysia]"; + mes "Friend of prototype Elly,"; + mes "I welcome you. As you may"; + mes "have figured out, I need your"; + mes "help. Kiel Hyre is being help"; + mes "somewhere inside this factory."; + next; + mes "[Allysia]"; + mes "It is imperative that"; + mes "you search for Kiel Hyre"; + mes "and rescue him as soon"; + mes "as you possibly can!"; + next; + + switch(select("What is this factory?","What happened to ^FF0000Kiel Hyre^000000?")) { + + case 1: + mes "[Allysia]"; + mes "This factory is part of"; + mes "the Kiel Hyre Foundation's"; + mes "secret business where humanoid"; + mes "robots are manufactured. Myself,"; + mes "and all of the academy's students"; + mes "are actually robots, not humans."; + next; + mes "[Allysia]"; + mes "The Kiel Hyre Foundations's"; + mes "ultimate goal is to develop"; + mes "superior robots that will help"; + mes "human society. As robots, we"; + mes "can handle tasks that are too"; + mes "dangerous or difficult for humans."; + break; + + case 2: + mes "[Allysia]"; + mes "^3355FFKiehl^000000 has proceeded to"; + mes "proform abnormal modifications"; + mes "to the humanoid robots. This"; + mes "has been reported to Kiel Hyre,"; + mes "who has left to stop Kiehl."; + mes "However, Hyre hasn't returned."; + next; + mes "[Allysia]"; + mes "Fearing that Kiehl would"; + mes "break me, Kiel Hyre brought"; + mes "a copy of me instead. I can still"; + mes "detect Kiel Hyre's heartbeat,"; + mes "so he should be alright, but his"; + mes "own son might harm him soon."; + next; + mes "[Allysia]"; + mes "Take this Keycard"; + mes "which will enable you"; + mes "to enter the secret areas"; + mes "inside this factory. If you"; + mes "locate Kiel Hyre, please"; + mes "let me know right away."; + getitem 7496,1; //Red_Keycard + set KielHyreQuest,40; + break; + + } + + close2; + cutin "",255; + end; + + } + + else if (KielHyreQuest == 40) { + mes "[Allysia]"; + mes "I can still detect"; + mes "Kiel Hyre's heartbeat,"; + mes "but his sone Kiehl might"; + mes "do something desperate to"; + mes "him soon. Please locate Kiel"; + mes "Hyre before that can happen!"; + close2; + cutin "",255; + warp "kh_dun01",22,216; + end; + } + + else if (KielHyreQuest == 42) { + mes "[Allysia]"; + mes "Have you already"; + mes "located Kiel Hyre?"; + next; + mes "^3355FFYou tell Allysia where^000000"; + mes "^3355FFKiel Hyre has been locked^000000"; + mes "^3355FFup, and give her the metal^000000"; + mes "^3355FFfragment that Kiel Hyre handed^000000"; + mes "^3355FFto you. She took fragment^000000"; + mes "^3355FFand wore it around her wrist.^000000"; + next; + mes "[Allysia]"; + mes "...Kiel Hyre's secret code"; + mes "confirmed. B_2_3 area."; + mes "Vital signs are normal."; + mes "Envelope recieved. Sending"; + mes "Modified Puppet Designs..."; + next; + mes "[Allysia]"; + mes "Alright, I've recieved"; + mes "Kiel Hyre's orders, and"; + mes "must carry them out..."; + set KielHyreQuest,44; + delitem 7497,1; //Metal_Fragment + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest == 44) { + mes "[Allysia]"; + mes "Alright, I have a mission"; + mes "to carry out for Kiel Hyre,"; + mes "and I don't have much time."; + mes "Let me give you some specific"; + mes "instructions very quickly."; + next; + mes "[Allysia]"; + mes "Firstly, I need to take your"; + mes "keycards for security reasons."; + mes "Secondly, meet me at the Kiel"; + mes "Hyre Mansion in Lighthalzen."; + mes "Present the Golden Key to"; + mes "be admitted to the premises"; + delitem 7492,1; //Yellow_Keycard + delitem 7495,1; //Blue_Keycard + delitem 7496,1; //Red_Keycard + set KielHyreQuest,46; + next; + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 44) { + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + +} + +//---------------------------------------------------------------------------- +// Signboard (another useless NPC?) +//---------------------------------------------------------------------------- +kh_dun01,163,223,0 script Signboard 857,{ + mes "[Notice]"; + mes "Cute Pets are prohibited"; + mes "in this area. (Cute Pets that"; + mes "provide special assistance"; + mes "to the visually impaired are"; + mes "exempt from this rule.)"; + close; +} + +//---------------------------------------------------------------------------- +// Mechanical Devices for accessing restricted area +//---------------------------------------------------------------------------- +kh_dun01,166,223,0 script Mechanical Device::KHKeyardReader 111,{ + if ((KielHyreQuest <= 38) || (KielHyreQuest >= 44)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + close; + } + + else if ((KielHyreQuest == 40) && (countitem(7496) >= 1)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + next; + + + input @KHInput$; + if (@KHInput$ == "Red Keycard") { + mes "^3355FFThe door opens once^000000"; + mes "^3355FFyou insert the Red Keycard..^000000"; + close2; + warp "kh_dun01",170,227; + end; + } + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + +} + +kh_dun01,162,206,0 duplicate(KHKeyardReader) Mechanical Device 111 + +//---------------------------------------------------------------------------- +// Keep monsters out of the quest area. +// Silly really sinc ehte rest of it's a dungeon +//---------------------------------------------------------------------------- +//kh_dun01,180,220,0 script Monster Warp#kh1::KHMobWarp -1,5,20,{ +//OnTouchNPC: +// warp "kh_dun01",178,138; +// end; +//} + +//kh_dun01,190,220,0 duplicate(KHMobWarp) Monster Warp#kh2 -1,5,20 +//kh_dun01,200,250,0 duplicate(KHMobWarp) Monster Warp#kh3 -1,5,20 +//kh_dun01,210,220,0 duplicate(KHMobWarp) Monster Warp#kh4 -1,5,20 +//kh_dun01,220,220,0 duplicate(KHMobWarp) Monster Warp#kh5 -1,5,10 + +//---------------------------------------------------------------------------- +// Kiel Hyre - OnTouch +//---------------------------------------------------------------------------- +kh_dun01,224,233,0 script Kiel_Hyre_Door -1,5,5,{ +OnTouch: + if (KielHyreQuest == 40) { + mes "^3355FFyou can faintly hear^000000"; + mes "^3355FFa voice from the other^000000"; + mes "^3355FFside of this door.^000000"; + next; + mes "[????]"; + mes "...Kiehl..."; + mes "...How dare you...!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Mister Kiel Hyre?"; + mes "Is that you in there?"; + next; + mes "[Kiel Hyre]"; + mes "Wh-who's there?"; + mes "Identify yourself!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm... I'm..."; + next; + mes "You explain your story^000000"; + mes "to the voice behind the^000000"; + mes "door, and tell him what^000000"; + mes "happened to Elly and Allysia.^000000"; + next; + mes "[Kiel Hyre]"; + mes "...Yes... It's me."; + mes "I'm Kiel Hyre, trapped"; + mes "in here. He went so far"; + mes "as to modify Elly, eh?"; + mes ".................."; + next; + mes "[Kiel Hyre]"; + mes "Hurry, take this"; + mes "module to Allysia!"; + mes "She'll know what to do"; + mes "with it. If you're really"; + mes "helping us, then she'll have"; + mes "some instructions for you too."; + next; + mes "^3355FFKiel Hyre slides^000000"; + mes "^3355FFa strange metal^000000"; + mes "^3355FFfragment through^000000"; + mes "^3355FFthe gap between the^000000"; + mes "^3355FFdoor and the floor.^000000"; + getitem 7497,1; //Metal_Fragment + set KielHyreQuest,42; + close; + } + + + else if (KielHyreQuest >= 42) { + mes "[Kiel Hyre]"; + mes "......"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Robot Factory Second Floor Entrances +//---------------------------------------------------------------------------- +kh_dun01,44,203,0 script Entrance Device#KHEntry1::KHAccess 111,{ + if (countitem(7509) < 1) { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + close; + } + + else { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + next; + + input @KHInput$; + if (@KHInput$ == "Luxurious Keycard") { + mes "^3355FFAs you insert the"; + mes "Luxurious Keycard"; + mes "into the keycard slot,"; + mes "the door swings open"; + mes "to reveal a long flight"; + mes "of descending stairs.^000000"; + next; + + switch(select("Descend Stairs","Cancel")) { + + case 1: + warp "kh_dun02",41,198; + end; + + case 2: + mes "^3355FFIt looks like this door"; + mes "has automatically closed"; + mes "after the preprogrammed"; + mes "time limit has elapsed.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + } + +} + +kh_dun01,36,195,0 duplicate(KHAccess) Entrance Device#KHEntry2 111 + +//============================================================================ + +//============================================================================ +// Kiel Hyre Mansion NPCs, and Kiehl's Room NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiel's Steward +//---------------------------------------------------------------------------- +kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ + if (KielHyreQuest < 46) { + mes "[Steward]"; + mes "This is a private residence,"; + mes "please leave."; + close2; + warp "lighthalzen",188,201; + end; + } + + if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) { + mes "[Steward]"; + mes "Greetings."; + mes "Have you been invited"; + mes "by the master of"; + mes "this mansion?"; + next; + + switch(select("Present Golden Key","????")) { + + case 1: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "I've been expecting your"; + mes "arival. Please, this way."; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "If you have not been"; + mes "invited by the master of"; + mes "this mansion, then I'm"; + mes "afraid that I must insist on"; + mes "your immediate departure!"; + close2; + warp "lightalzen",188,201; + end; + + } + + } + + if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + L_SeeKielHyre: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Very well."; + mes "Please make"; + mes "yourself at home."; + close; + + } + + } + + if ((KielHyreQuest == 52) || (KielHyreQuest == 54) || (KielHyreQuest >= 64) && (KielHyreQuest <= 70)) { + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master, or...?"; + next; + + switch(select("^FF0000Kiel Hyre^000000","^3355FFMitchell^000000")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Oh...? You must."; + mes "be here to deliver"; + mes "good news. Excuse me..."; + next; + mes "^3355FFThe Steward furtively^000000"; + mes "^3355FFlooked around to check^000000"; + mes "^3355FFif anyone is watching him.^000000"; + next; + mes "[Steward]"; + mes "I believe it should"; + mes "be save enough to let"; + mes "you go see him now..."; + mes "Please, hurry this way."; + close2; + warp "kh_mansion",20,87; + end; + + } + + } + + if (KielHyreQuest >= 70) { + goto L_SeeKielHyre; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre +//---------------------------------------------------------------------------- +kh_mansion,22,28,4 script Kiel Hyre 903,{ + cutin "kh_kyel02",2; + if (KielHyreQuest < 46) { + mes "[Kiehl Hyre]"; + mes "........."; + close; + } + + else if (KielHyreQuest == 46) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Ah, you must be "+strcharinfo(0)+"."; + mes "I'd like to thank you for saving"; + mes "my life. You must have many"; + mes "questions to ask me, so I'll"; + mes "do my best to give you answers."; + next; + + L_Menu: + + switch(select("Robots?","^3355FFKiehl^000000?","^FF0000Elly^000000's button?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I've been researching"; + mes "robotics for thirty-two"; + mes "years now. I'm proud to"; + mes "say that I've succeeded"; + mes "where the great Sage"; + mes "Varmundt did not."; + next; + mes "[Kiel Hyre]"; + mes "It's been my dream to"; + mes "develop humanoid robots"; + mes "from humans. Those Guardians"; + mes "might be robots too, but they"; + mes "don't operate using free will."; + next; + mes "[Kiel Hyre]"; + mes "If you'd like to know more"; + mes "of the specifics concerning"; + mes "robotics, why don't you speak"; + mes "with ^3355FFAllysia^000000? She can explain"; + mes "everything much more succinctly"; + mes "than I can. I tend to ramble..."; + if (@KHQ1Read < 1) { set @KHQ1Read,1; } + break; + + case 2: + mes "[Kiel Hyre]"; + mes "^3355FFKiehl^000000 is my only son,"; + mes "but the love of my life"; + mes "died after giving birth to"; + mes "him. I'll admit that he's"; + mes "a genius in mechanical"; + mes "design and development."; + next; + mes "[Kiel Hyre]"; + mes "He's largely responsible"; + mes "for the creation of Third"; + mes "Generation robots like Elly."; + mes "Unfortunately, he's trying to"; + mes "modify his creations for"; + mes "some sinister purpose."; + next; + mes "[Kiel Hyre]"; + mes "I tried to stop him,"; + mes "but I ended up getting"; + mes "locked inside the factory."; + mes "I don't know why he wants"; + mes "to do this. I still have"; + mes "absolutely no clue..."; + if (@KHQ2Read < 1) { set @KHQ2Read,1; } + break; + + case 3: + mes "[Kiel Hyre]"; + mes "That button Elly was"; + mes "holding has ^3355FFKiehl's emblem^000000"; + mes "engraved on it. Ah, and that"; + mes "man in black menacing the"; + mes "students? That was probably"; + mes "^3355FFKaiser^000000, Kiehl's bodyguard."; + next; + mes "[Kiel Hyre]"; + mes "Kaiser..."; + mes "I don't know"; + mes "anything about him."; + mes "I've never even seen"; + mes "his face! Kiehl just hired"; + mes "him without letting me know..."; + if (@KHQ3Read < 1) { set @KHQ3Read,1; } + break; + + } + + if ((@KHQ1Read == 1) && (@KHQ2Read == 1) && (@KHQ3Read == 1)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + delitem 7493,1; //Golden_Key + delitem 7494,1; //Exquisite_Button + set KielHyreQuest,48; + } + + else { + next; + goto L_Menu; + } + + } + + else if (KielHyreQuest == 48) { + mes "Ah, I almost forgot."; + mes "Please, take this as"; + mes "a little reward for"; + mes "saving my life."; + set KielHyreQuest,50; + getitem 12105,1; //Taming_Gift_Set + getexp 700000,0; + } + + else if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + } + + else if (KielHyreQuest == 64) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Hm? Did you"; + mes "have something"; + mes "that you wanted"; + mes "to ask me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't have enough"; + mes "concrete evidence yet,"; + mes "but I might have some"; + mes "questions soon enough."; + } + + else if (KielHyreQuest == 68) { + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Ah, "+strcharinfo(0)+"."; + mes "It's you. So how can"; + mes "I help you today?"; + next; + + switch(select("About ^3355FFAllysia^000000...")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "You know, I was looking"; + mes "through this deserted house"; + mes "in Juno, and discovered"; + mes "an old portrait of a woman"; + mes "that looks just like Allysia."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Oh..."; + mes "Is that all?"; + mes "I thought you had"; + mes "a robotics question."; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Anyway, that's a"; + mes "strange coincidence."; + mes "Well, I suppose it's"; + mes "not so strange to find"; + mes "look-a-likes for other people..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't think it's just"; + mes "a coincidence. The woman"; + mes "in that thirty year old portrait"; + mes "was also named Allysia, and she"; + mes "worked at Orsimier street"; + mes "in Juno. Does that ring a bell?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Then I thought that this"; + mes "Allysia must have been the"; + mes "woman that you loved, and"; + mes "that you based your robot's"; + mes "apperance on her."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "I think this is what happened:"; + mes "when you were a young, poor"; + mes "man, you fell in love with"; + mes "Allysia. However, she was"; + mes "in love with Rosimier, who"; + mes "was rich and powerful."; + next; + mes "["+strcharinfo(0)+"]"; + mes "However, Rosimier was"; + mes "betrothed to some other"; + mes "woman, and he ended up"; + mes "marrying his fiancee, thus"; + mes "breaking Allysia's heart."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Feeling betrayed, her"; + mes "heart broken, Allysia jumped"; + mes "into a river. Then, you decided"; + mes "to get revenge on Rosimier, so"; + mes "you ended up joining"; + mes "Rekenber Corporation!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hahahahahahaha!"; + mes "Oh, what an imagination~"; + mes "That's bery ridiculous..."; + mes "Though, I admit, maybe"; + mes "I did design Allysia after"; + mes "seeing that woman long ago."; + next; + mes "[Kiel Hyre]"; + mes "I'd almost forgotten"; + mes "about her! I think we"; + mes "were friends... Though,"; + mes "where did you get the idea"; + mes "that I might have"; + mes "been in love with her?"; + next; + + switch(select("Reveal Kiel's Portrait from Hut")) { + + case 1: + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Wh-what..."; + mes "How did..."; + mes "Where did you...?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre, I found this"; + mes "portrait of you as a young"; + + mes "man from the house of the"; + mes "man that bought Allysia's ring."; + mes "I even spoke to the fisherman"; + mes "that discovered Allysia's body."; + next; + mes "["+strcharinfo(0)+"]"; + mes "You paid an awful lot"; + mes "of money to buy Allysia's"; + mes "ring. How can you not tell"; + mes "me that you didn't love her?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "*Sigh...*"; + mes "You got me, you got me."; + mes "I didn't want you to learn"; + mes "the truth. You are correct."; + mes "I loved Alysia, and designed"; + mes "my robot to look jus tlike her."; + next; + mes "[Kiel Hyre]"; + mes "I could never forget her."; + mes "Ever. But I would never"; + mes "do anything to harm the"; + mes "Rosimiers! I'm a scientist!"; + mes "I hated him when I was young,"; + mes "but things are different now!"; + next; + mes "[Kiel Hyre]"; + mes "I shed no tears when the"; + mes "Rosimiers fell, but I wasn't"; + mes "responsible. Besides, I didn't"; + mes "have the resources or the"; + mes "capability to cause it..."; + next; + cutin "kh_kyel02",2; + mes "["+strcharinfo(0)+"]"; + mes "I'm afraid that the"; + mes "evidence shows otherwise."; + next; + + switch(select("Reveal Portait of Rosimiers")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at this portrait that"; + mes "I found at the Rosimiers'"; + mes "old house. Do you see"; + mes "anything... incriminating?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "ASide from that"; + mes "James Rosimier, you"; + mes "mean? No! I don't see"; + mes "anything wrong with"; + mes "this picture at all."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at the pocketwatch"; + mes "in the portrait. That's"; + mes "the pocketwatch you"; + mes "wear today, isn't it?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "...!!!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "You might not have caused"; + mes "the downfall of the Rosimiers"; + mes "yourself, but with the aid of"; + mes "the Rekenber Corporation, I'd"; + mes "say it was entirely possible!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Well played, adventurer."; + mes "Well played. I don't regret"; + mes "what I did: they killed my"; + mes "Allysia! If James didn't betray"; + mes "her, if only he didn't drive"; + mes "her to commit suicide..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "That's where you're wrong!"; + mes "Allysia was killed, she didn't"; + mes "commit suicide. Take a good"; + mes "look at this note right here!"; + next; + mes "[Kiel Hyre]"; + mes "What?!"; + next; + + switch(select("Show James's Note")) { + + case 1: + mes "[Kiel Hyre]"; + mes "What does this prove?"; + mes "This doesn't show that"; + mes "James didn't betray Allysia."; + mes "How does this change anything?"; + mes "She's dead, nothing I can do"; + mes "will bring her back to me!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I never said James didn't"; + mes "betray her. Look at the date"; + mes "on the note. James made plans"; + mes "to run away with her on August"; + mes "20th. However, her body was"; + mes "found on the same day."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ergo, Allysia must have"; + mes "died on August 19th. If she"; + mes "was planning to run away with"; + mes "her love on the next day, then"; + mes "she had no reason to kill herself!"; + next; + mes "[Kiel Hyre]"; + mes "No, that's not right!"; + mes "She probably couldn't"; + mes "trust me! She must have"; + mes "realized she was nothing"; + mes "but another toy to him!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Oh yeah? I say she jumped"; + mes "into the river because you"; + mes "met her on that day. Now,"; + mes "take a good look at this!"; + next; + + switch(select("Show K.H.'s note")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "This note was written by"; + mes "a man with your initials,"; + mes "K.H. These initials were also"; + mes "signed on her portrait. You"; + mes "must have written this note:"; + mes "there's too many coincidences!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "According to this note,"; + mes "you told Allysia that you"; + mes "wanted to see her again"; + mes "at the place you first med."; + mes "I think you did see her again..."; + mes "on August 19th, the day she died!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm assuming the place you"; + mes "two first met was near the"; + mes "river. No more of your lies:"; + mes "well me what really happened!"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + mes "........."; + mes "......"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hah... Ha ha ha..."; + mes "Yes... That's right..."; + mes "That horrible night."; + mes "I remember it well..."; + mes "....................."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "That night, when she came"; + mes "to the river to meet me as"; + mes "I had asked, I begged her to"; + mes "run away with me, instead"; + mes "of waiting for that James."; + next; + mes "[Kiel Hyre]"; + mes "She insisted that James"; + mes "never betrayed her, and he"; + mes "promised to take her away"; + mes "with him the next day. Can"; + mes "you imagine how that made"; + mes "me feel? I was nothing to her."; + next; + mes "[Kiel Hyre]"; + mes "My feelings didn't matter to"; + mes "her at all! She kept fidgeting"; + mes "with that ring...I lost control"; + mes "and tried to take that damned"; + mes "thing away from her, and"; + mes "throw it into the river..."; + next; + mes "[Kiel Hyre]"; + mes "But you know what?"; + mes "She struggled, she actually"; + mes "fought me! It was just a small"; + mes "fight, but then, before I knew"; + mes "it, the ground underneath us"; + mes "collapsed and... the rains..."; + next; + + switch(select(".........")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I'm not sure what it"; + mes "was. The rain weakened"; + mes "the ground, something went"; + mes "wrong... and she just... just..."; + mes "The river swallowed her..."; + mes "I felt empty. She was gone. "; + set KielHyreQuest,70; + delitem 7498,1; //Losimier's_House_Key + delitem 7499,1; //Portrait_of_a_Family + delitem 7500,1; //Portrait_of_a_Lady + delitem 7501,1; //K.H's_Letter + delitem 7502,1; //James's_Memo + delitem 7503,1; //Portrait_of_a_Guy + close; + + } + + } + + } + + } + + } + + } + + } + + else if (KielHyreQuest == 70) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You already know that"; + mes "she was found dead the"; + mes "next day. But what really"; + mes "broke my heart was that"; + mes "she held that ring so tightly"; + mes "in her hand, even in death..."; + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "His family had everything"; + mes "while I had nothing. And"; + mes "he had the audacity to take"; + mes "Allysia away from me?!"; + mes "How could that be right?"; + next; + mes "[Kiel Hyre]"; + mes "Even though she had passed"; + mes "away, I still wanted to prove"; + mes "to Allysia what kind of ugly"; + mes "person James really was."; + mes "That was when I joined the"; + mes "Rekenber Corporation."; + next; + mes "[Kiel Hyre]"; + mes "I designed the very first"; + mes "First Generation Robot, which"; + mes "I named Allysia, and sold the"; + mes "designs to Rekenber. I gave them"; + mes "robots, and they gave me money,"; + mes "power, obedient subordinates."; + next; + mes "[Kiel Hyre]"; + mes "Of course I knew they'd use"; + mes "my robots for spying and killing!"; + mes "But you know what? It didn't"; + mes "matter so long as they gave me"; + mes "the means to my revenge. It was"; + mes "the perfect partnership, really."; + next; + mes "[Kiel Hyre]"; + mes "You've got me right"; + mes "where you want me."; + mes "Who are you working"; + mes "for, and what exactly"; + mes "do you want? My designs?"; + mes "My death? Everything...?"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Actually, I just want"; + mes "to ask about the nature"; + mes "of your professional"; + mes "relationship with the"; + mes "Rekenber Corporation."; + mes "And about Kiehl."; + next; + mes "[Kiel Hyre]"; + mes "Kiehl, eh? After hearing"; + mes "my crazy story, I'm guessing"; + mes "that you already suspect the"; + mes "truth about him... He's also"; + mes "a robot, specifically the first"; + mes "of the Second Generation models."; + next; + mes "[Kiel Hyre]"; + mes "His mind was developed using."; + mes "an experimental, and unstable,"; + mes "form of the Condensed Magic"; + mes "Spell Scrolls. He was the only"; + mes "Second Generation robot that"; + mes "I was allowed to keep."; + next; + mes "[Kiel Hyre]"; + mes "I've become very attached"; + mes "to Kiehl. It's not surprising,"; + mes "seeing that robotics have"; + mes "become my life. I even raised"; + mes "him as my own son, and taught"; + mes "him everything about robotics"; + next; + mes "[Kiel Hyre]"; + mes "Kiehl is now a genius,"; + mes "and has even developed the"; + mes "Third Generation of robots."; + mes "Unfortunately, I failed to"; + mes "properly raise him with"; + mes "human morals and ethics."; + next; + + switch(select("......")) { + + case 1: + mes "[Kiel Hyre]"; + mes "He's been transforming"; + mes "the Third Generation robots"; + mes "into killing machines. That's"; + mes "why I tried to put them all"; + mes "into the academy, so they"; + mes "could learn human behavior."; + next; + mes "[Kiel Hyre]"; + mes "Although the academy"; + mes "has delayed Kiehl's plans,"; + mes "he has succeeded into"; + mes "converting all of the robots"; + mes "into uncontrollable engines"; + mes "of mass destruction."; + next; + mes "[Kiel Hyre]"; + mes "Yes, he's been working"; + mes "closely with Rekenber."; + mes "Their true objective is to"; + mes "create killing machines"; + mes "for Rekenber's use."; + next; + mes "[Kiel Hyre]"; + mes "You know all the secrets"; + mes "of my past now. I'm not"; + mes "upset with you or anything,"; + mes "but I do have something"; + mes "that I want to ask of you."; + next; + mes "[Kiel Hyre]"; + mes "Please! Stop Kiehl!"; + mes "I don't want his madness"; + mes "to destroy any more robots!"; + mes "I see each and every one"; + mes "of them as one of my children!"; + next; + mes "[Kiel Hyre]"; + mes "I know that I must take"; + mes "full responsibility for all"; + mes "that has happened. I promise"; + mes "to take any punishment for"; + mes "my actions once everything"; + mes "has been resolved."; + + next; + + switch(select("Accept","Okay","Nod")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + } + + mes "[Kiel Hyre]"; + mes "Thank you so much!"; + mes "You can find Kiehl"; + mes "in the underground"; + mes "level in this mansion."; + set KielHyreQuest,72; + + } + + } + + else if (KielHyreQuest == 72) { + cutin "kh_kyel01",2; + //I believe this text goes here o_o + mes "[Kiel Hyre]"; + mes "He stays in the old room"; + mes "where he was created, but"; + mes "he reconstructed it as some"; + mes "kind of cave to keep everyone"; + mes "out, including me. Yes, he"; + mes "doesn't trust anyone anymore..."; + next; + mes "[Kiel Hyre]"; + mes "When you find him, I want"; + mes "you to take out Allysia's"; + mes "ring out of his heart. If you"; + mes "remove it, that should stop"; + mes "him from going berserk."; + next; + + switch(select("Allysia's Ring?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "Yes... Her ring is the"; + mes "beginning of everything"; + mes "I put that in his heart so"; + mes "that I'd never forget what"; + mes "the Rosimiers did to me."; + next; + mes "[Kiel Hyre]"; + mes "I think Kiehl's grown"; + mes "so powerful that normal"; + mes "weapons might not work"; + mes "on him anymore. Use this"; + mes "device that will cause his"; + mes "power supply to fluctuate."; + getitem 7504,1; //Power_Source + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "If you successfully attach"; + mes "this to Kiehl's body, then"; + mes "he won't be able to use his"; + mes "body's full power. While he's"; + mes "weakened, open up his chest"; + mes "and get the ring from his heart."; + next; + mes "[Kiel Hyre]"; + mes "Let me know once"; + mes "you're ready. Then, I'll"; + mes "guide you Kiehl's room."; + set KielHyreQuest,74; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 104)) { + mes "[Kiel Hyre]"; + mes "Are you ready"; + mes "to confront"; + mes "Kiehl now?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Kiel Hyre]"; + mes "There... the secret"; + mes "passage is open now."; + mes "Just go to the right of"; + mes "me, but be careful. Kiehl"; + mes "is extremely dangerous."; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + break; + + case 2: + mes "[Kiel Hyre]"; + mes "Please take your"; + mes "time. I imagine that"; + mes "it won't be easy."; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You're back...!"; + mes "So were you able"; + mes "to retrieve Allysia's"; + mes "Ring from Kiehl's heart?"; + next; + + if (countitem(7508) < 1) { + mes "[Kiel Hyre]"; + mes "You mean... You don't have it?"; + mes "Please, retrieve Allysia's Ring"; + mes "from Kiehl's heart!"; + next; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + close2; + cutin "",255; + } + + mes "[Kiel Hyre]"; + mes "Wh-what happened...?"; + mes "Kiehl developed a new"; + mes "body for himself? Th-that"; + mes "would make him a Fourth"; + mes "Generation robot. I had"; + mes "no idea he was this smart."; + next; + mes "[Kiel Hyre]"; + mes "Wait, now that I think about"; + mes "it, I did see robot bodies that"; + mes "looked like Kiehl when I was"; + mes "locked in the factory. So he"; + mes "was using those copies to"; + mes "develop personal upgrades."; + next; + mes "[Kiel Hyre]"; + mes "Here, please take this"; + mes "Keycard which will let you"; + mes "enter and investigate the"; + mes "deepest levels of the factory."; + mes "I'll investigate Kiehl's room."; + set KielHyreQuest,108; + getitem 7509,1; //Gorgeous_Keycard + next; + + if (sex == 0) { + if (getpartnerid() == 0) set @KHTitle$,"Miss"; + else set @KHSTitle$,"Mrs"; + } + else set @KHTitle$,"Mr"; + + mes "[Kiel Hyre]"; + mes "Kiehl is my responsibility..."; + mes "No matter what the cost may"; + mes "be, I've got to stop him! Oh,"; + mes "and here, please take this"; + mes "with my thanks for all of"; + mes "your help, "+@KHTitle+". "+strcharinfo(0)+"."; + getitem 616,1; //Old card Album + delitem 7508,1; //Elisia's_Ring + getexp 1000000,0; + } + + else if (KielHyreQuest >= 108) { + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + + +//---------------------------------------------------------------------------- +// Allysia +//---------------------------------------------------------------------------- +kh_mansion,18,30,4 script Allysia 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 68) { + mes "[Allysia]"; + mes "Who are you?"; + mes "How did you get here?"; + mes "Go away"; + close; + } + + else if (KielHyreQuest < 70) { + mes "[Allysia]"; + mes "You must be surprised"; + mes "by everything that's been"; + mes "happening. Maybe everything"; + mes "would be easier to understand"; + mes "if I explained about robots?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Allysia]"; + mes "The robots you've been"; + mes "encountering are automated"; + mes "mechanical puppets that can"; + mes "independantly think and operate."; + mes "Many sages have tried to develop"; + mes "their own robots, but have failed."; + next; + mes "[Allysia]"; + mes "My master, Kiel Hyre, has"; + mes "been studying robotics since"; + mes "he was twenty years old, and"; + mes "has developed three different"; + mes "generations of robots, the first,"; + mes "second, and third generations."; + next; + + switch(select("First Generation","Second Generation","Third Generation")) { + + case 1: + mes "[Allysia]"; + mes "I am a good example of one"; + mes "of Kiel Hyre's First Generation"; + mes "robots. I was constructed using"; + mes "a heavy mechanical framework,"; + mes "a robotic heart, and chemically"; + mes "synthesized skin covering."; + next; + mes "[Allysia]"; + mes "My central processing unit,"; + mes "equivilent to your brain, is"; + mes "essentially a Memory Scroll"; + mes "based on the design of the"; + mes "Magic Spell Scrolls that you"; + mes "adventurers use in battle."; + next; + mes "[Allysia]"; + mes "I'm the oldest type of"; + mes "humanoid robot, so I weigh"; + mes "a lot, and my mind can only"; + mes "process a limited amount of"; + mes "data. Therefore, I can't express"; + mes "emotion similarly to a human."; + break; + + case 2: + mes "[Allysia]"; + mes "The First Generation robots"; + mes "were developed from mostly"; + mes "mechanical parts, but the"; + mes "Second Generation robots"; + mes "incorporated Homunculus"; + mes "science and technology."; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "are more life-like since they"; + mes "have artifically created skin"; + mes "and flesh, although they still"; + mes "are constructed from a heavy"; + mes "mechanical framework."; + next; + mes "[Allysia]"; + mes "Sage elemental scroll"; + mes "technology was also used"; + mes "to develop the Condensed"; + mes "Memory Scroll, a central"; + mes "processing unit superior to that"; + mes "used in First Generation robots."; + next; + mes "[Allysia]"; + mes "Although Condensed Memory"; + mes "Scrolls were 100,000 times"; + mes "more powerful than ordinary"; + mes "Memory Scrolls, they were"; + mes "problematic and were prone"; + mes "to too many error problems"; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "were capable of expressing"; + mes "human-like emotion, but their"; + mes "production halted after six"; + mes "years because they were"; + mes "considered faulty."; + break; + + case 3: + mes "[Allysia]"; + mes "Third Generation robots"; + mes "were mostly designed by"; + mes "Kiel Hyre's son, Kiehl,"; + mes "and don't use a mechanical"; + mes "framework at all: the entire"; + mes "body is basically a homunculus."; + next; + mes "[Allysia]"; + mes "With their organic bodies"; + mes "and advanced artificial hearts"; + mes "make from imitation Ymir Heart"; + mes "Pieces, they can experience"; + mes "physiologic phenomena"; + mes "just like ordinary humans."; + next; + mes "[Allysia]"; + mes "Kiehl was able to develop"; + mes "a more stable form of the"; + mes "Condensed Memory Scroll"; + mes "which does not suffer from"; + mes "critical errors, and can be"; + mes "cheaply mass processed."; + next; + mes "[Allysia]"; + mes "Elly is actually a Third"; + mes "Generation prototype. Once"; + mes "we optimize the prototypes,"; + mes "we will begin mass production."; + mes "In fact, the academy is our"; + mes "prototype testing ground."; + next; + mes "[Allysia]"; + mes "The fact that out prototype"; + mes "robots can interact just like"; + mes "real humans is proof of our"; + mes "success in robotics."; + break; + + } + case 2: + mes "[Allysia]"; + mes "Please let me know if"; + mes "you'd like to learn more"; + mes "about Kiel Hyre's robots."; + break; + + } + + } + + else if (KielHyreQuest >= 70) { + mes "[Allysia]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Abduction triggering NPC +//---------------------------------------------------------------------------- +lighthalzen,188,200,0 script Abduction_trigger -1,3,1,{ +OnTouch: + if (KielHyreQuest == 50) { + mes "^3355FFAs you walked out of^000000"; + mes "^3355FFthe mansion, something^000000"; + mes "^3355FFsmashed the top of your^000000"; + mes "^3355FFhead, and you instnatly^000000"; + mes "^3355FFlose consiousness...^000000"; + close2; + percentheal -99,0; + warp "kh_mansion",30,75; + end; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Mysterious Woman "Mitchell Layla" +//---------------------------------------------------------------------------- +kh_mansion,25,79,4 script Mysterious Woman 727,3,3,{ +L_StartDialog: + if (KielHyreQuest == 50) { + mes "^3355FFYou awaken with your^000000"; + mes "^3355FFhead painfully throbbing,^000000"; + mes "^3355FFand a mysterious woman^000000"; + mes "^3355FFstanding infront of you.^000000"; + next; + mes "[??????]"; + mes "Hm? Oh, you're awake"; + mes "earlier than I though."; + mes "You must feel confused,"; + mes "but listen carefully. If you"; + mes "don't, then I can't guarantee"; + mes "your safety, okay? Alright."; + next; + mes "[??????]"; + mes "All you need to know it"; + mes "that I'm a secret agent for"; + mes "the Schwaltzvalt Republic"; + mes "government. We're investigating"; + mes "abnormal activity between Kiel"; + mes "Hyre and the Rekenber Corporation."; + next; + mes "[??????]"; + mes "We saw you enter the"; + mes "mansion and speak to"; + mes "Kiel Hyre, so basically"; + mes "you're here for questioning."; + mes "Now tell me the truth. How"; + mes "do you know Kiel Hyre?"; + next; + + switch(select("I'll tell you everything!","I don't know nuthin'!")) { + + case 1: + goto L_TellEverything; + break; + + case 2: + mes "[??????]"; + mes "Don't...know...nuthin'?"; + mes "You sure about that? Only"; + mes "a select few can even speak"; + mes "with Kiel Hyre in person. You"; + mes "must have some connection"; + mes "to him. I'm right, aren't it?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[??????]"; + mes "Are you trying to protect"; + mes "him? I think that you might"; + mes "not understand what kind of"; + mes "person you're really dealing"; + mes "with here. I'll tell you what"; + mes "I've learned about him..."; + next; + mes "[??????]"; + mes "Kiel Hyre. CEO of the"; + mes "Kiel Hyre Foundation,"; + mes "manufacturer of various"; + mes "machinery. His company started"; + mes "as a small Einbroch store whose"; + mes "technology slowly grew famous."; + next; + mes "[??????]"; + mes "Rekenber Corperation offered"; + mes "a merger with the Kiel Hyre"; + mes "Foundation. We're still not"; + mes "sure why they wanted Kiel"; + mes "Hyre in particular to repair"; + mes "and develop their Guardians..."; + next; + mes "[??????]"; + mes "We're also not sure why"; + mes "they wanted to suddenly"; + mes "focus more on Guardian"; + mes "development. Then, all"; + mes "of a sudden, Kiel Hyre's son"; + mes "appears from out of nowehre."; + next; + mes "[??????]"; + mes "It's very suspicious."; + mes "There's no records of his"; + mes "birth or anything. Still, maybe"; + mes "Kiel Hyre really did have him"; + mes "with his secretary, Allysia."; + mes "Well, no one is really sure."; + next; + mes "[??????]"; + mes "In any case, Kiel Hyre's"; + mes "son and heir, Kiehl, helped"; + mes "his father establish this"; + mes "special academy as their"; + mes "way of giving back t society."; + next; + mes "[??????]"; + mes "Almost every corporation and"; + mes "organization tried to get their"; + mes "spies to enter this academy,"; + mes "but all of them were rejected."; + mes "it's strange. At least one of"; + mes "them should have made it in."; + next; + mes "[??????]"; + mes "And recently, Kiehl Hyre"; + mes "has held a secret meeting with"; + mes "Rekenber executives to announce"; + mes "his new project. He intends to"; + mes "create advanced humanoid robots"; + mes "that will replace guardians!"; + next; + mes "[??????]"; + mes "Our spies reported that"; + mes "Kiel Hyre was nowhere to"; + mes "be seen at that meeting,"; + mes "as well as his trusted"; + mes "secretary, Allysia. He..."; + mes "He just disappeared!"; + next; + mes "[??????]"; + mes "Then, Kiel Hyre pops back"; + mes "in his mansion after all"; + mes "this time as if nothing"; + mes "happened! At the same time,"; + mes "Kiehl disappears, under the"; + mes "excuse of conducting research."; + next; + mes "[??????]"; + mes "Rekenber is sponsoring"; + mes "both Kiehl and Kiel, but"; + mes "there's some kind of conflict"; + mes "going on between father and"; + mes "son, I just know it! Now tell"; + mes "me, what's going on?"; + next; + mes "[??????]"; + mes "I'm not sure how well you"; + mes "know this country, but the"; + mes "fact that Rekenber is invoved"; + mes "must tell you that these aren't"; + mes "good people. Tell me what"; + mes "you know about them!"; + next; + L_TellEverything: + mes "^3355FFYou tell the woman^000000"; + mes "^3355FFeverything you know^000000"; + mes "^3355FFabout Kiel Hyre. Your^000000"; + mes "^3355FFvoice quivers with sadness^000000"; + mes "^3355FFwhenever you mention Elly.^000000"; + next; + mes "[??????]"; + mes "I see, I see..."; + mes "That poor girl... So..."; + mes "Your involvement in this"; + mes "is a coincidence? In that"; + mes "case, I want your help"; + mes "in our investigation."; + next; + + switch(select("OKay","......")) { + + case 1: + L_Help: + mes "[??????]"; + mes "Great."; + mes "I'm Agent Mitchell Layla."; + mes "From here on, you're working"; + mes "for the Schwaltzvalt Republic!"; + set KielHyreQuest,52; + close; + + case 2: + mes "[??????]"; + mes "If you don't cooperate,"; + mes "then I can't guarantee"; + mes "your safety, adventurer"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Huh? What...?"; + mes "What does that mean?"; + mes "Are you threatening me?"; + next; + + switch(select("Just do what she says.")) { + + case 1: + goto L_Help; + break; + + } + + } + + } + + } + + else if (KielHyreQuest == 52) { + mes "[Mitchell]"; + mes "I've got some new"; + mes "information for you."; + mes "There's an old lady in"; + mes "Juno that knew a woman"; + mes "named Allysia 30 years ago."; + next; + mes "[Mitchell]"; + mes "The clincher is that this"; + mes "Allysia from 30 years ago"; + mes "commited suicide, and is"; + mes "identical to Kiel Hyre's"; + mes "secretary, who is also"; + mes "named Allysia."; + next; + mes "[Mitchell]"; + mes "This is too much of a"; + mes "coincidense. I want you to"; + mes "go to Juno and investigate."; + mes "When you're done, talk to"; + mes "Kiel Hyre's steward, and"; + mes "he'll send you over to me."; + next; + mes "[Mitchell]"; + mes "Yeah, I know."; + mes "That guy actually"; + mes "works for me. Anyway,"; + mes "when you're ready to go"; + mes "to Juno, let me know, and you"; + mes "can board the federal airship."; + set KielHyreQuest,54; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Mitchell]"; + mes "Are you ready?"; + mes "I'll let you board"; + mes "the federal Airship so"; + mes "you can get to Juno, and"; + mes "finish your mission quickly."; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Mitchell]"; + mes "Good luck. Once you"; + mes "complete your mission,"; + mes "make sure that you report"; + mes "to Kiel Hyre's steward so"; + mes "that he can send you to me."; + close2; + warp "yuno",54,209; + end; + case 2: + mes "[Mitchell]"; + mes "Take your time..."; + mes "But keep in mind that"; + mes "I'm not a patient woman!"; + close; + + } + + } + + else if (KielHyreQuest == 64) { + mes "[Mitchell]"; + mes "Ah, you're back."; + mes "What do you have"; + mes "to report from your"; + mes "investigation?"; + next; + mes "[Mitchell]"; + mes "....................."; + mes "Ah, I see. Good work."; + mes "Why don't you go speak to Kiel"; + mes "Hyle and confront him with"; + mes "what you've learned about"; + mes "his past? Yeah, grill him."; + next; + mes "[Mitchell]"; + mes "Wear this hidden mic,"; + mes "so we can send help if"; + mes "you're endangered. I want"; + mes "you to find out who Kiel"; + mes "really is, and what's his"; + mes "relationship to Rekenber."; + set KielHyreQuest,68; + next; + warp "kh_mansion",83,50; + end; + } + + + else if (KielHyreQuest >= 68) { + mes "[Mitchell]"; + mes "Shouldn't you be"; + mes "leaving about now?"; + next; + warp "kh_mansion",83,50; + end; + } + +OnTouch: + if (KielHyreQuest <= 50) { + goto L_StartDialog; + } + end; +} + +//---------------------------------------------------------------------------- +// Warp portal into Kiehl's 'Room' +// - Anyone can enter +// - After 30-40 seonds this NPC should be disabled. +//---------------------------------------------------------------------------- +kh_mansion,29,27,0 script Kiehl_Room_Warp 45,2,2,{ +OnTouch: + warp "kh_kiehl01",10,31; + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Kiehl_Room_Warp"; + end; + +OnInit: + disablenpc "Kiehl_Room_Warp"; + end; +} + +//============================================================================ + +//============================================================================ +// Rosimier NPCs and other Related NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Odd Grandma +//---------------------------------------------------------------------------- +yuno,256,141,4 script Odd Grandma 846,{ + if (KielHyreQuest < 54) { + mes "[Grandma]"; + mes "Where did you go,"; + mes "my darling? Where"; + mes "are you, my little dear?"; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Grandma]"; + mes "Lullabye..."; + mes "Say goodnight..."; + mes "Hush little baby..."; + mes "Go to sleeeeep~"; + next; + + switch(select("What are you doing?","Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + mes "Oh? My baby won't stop"; + mes "crying and can't seem"; + mes "to sleep. She needs to"; + mes "rest, so I can go to work."; + mes "The house is so messy,"; + mes "and the boss is unhappy..."; + set KielHyreQuest,56; + next; + + switch(select("Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + //Missing text, needs another run through. + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + case 2: + //Missing text, needs another run through. + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + } + + else if ((KielHyreQuest >= 56) && (KielHyreQuest < 60)) { + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + + if (countitem(7500) < 1) { + close; + } + + else { + next; + + switch(select("Allysia? Isn't she...")) { + + case 1: + cutin "kh_ellisia_port",1; + mes "^3355FFYou show Allysia's"; + mes "portrait to the old woman.^000000"; + next; + cutin "",255; + mes "[Grandma]"; + mes "Oh, do you know"; + mes "Allysia? She's been"; + mes "missing! She left home"; + mes "yesterday and hasn't"; + mes "come back! C-can you"; + mes "tell me where she is?!"; + close; + } + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Grandma]"; + mes "Don't worry, Allysia..."; + mes "Mommy will always be"; + mes "here for you. There's no"; + mes "need to be sad..."; + close; + } + +} + +//---------------------------------------------------------------------------- +// Old Lady; gives you the key to the Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,250,132,2 script Old Lady 711,{ + if (KielHyreQuest < 56) { + mes "[Old Lady]"; + mes "Oooh, my legs and back"; + mes "are so sore. These old"; + mes "bones ache all over..."; + close; + } + + else if (KielHyreQuest == 56) { + mes "[Old Lady]"; + mes "Goodness, I hate this"; + mes "weather! Reminds me"; + mes "of how old I've gotten!"; + mes "It chills my bones, it does!"; + next; + + switch(select("......","Do you know that grandma?")) { + + case 1: + mes "[Old Lady]"; + mes "Damn it! If only I didn't"; + mes "have all those adventures"; + mes "in my youth! Then maybe"; + mes "I wouldn't suffer so in"; + mes "my advanced age!"; + close; + + case 2: + mes "[Old Lady]"; + mes "Oh... Yes. She was"; + mes "the mother of my best"; + mes "friend, ^3355FFAllysia^000000. Ever since"; + mes "she commited suicide, things"; + mes "haven't been the same. Her"; + mes "mother lost her sanity..."; + next; + + switch(select("Was ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, Allysia was such"; + mes "a beautiful girl. So many"; + mes "men wanted her, especially"; + mes "that dashing Games Rosimier."; + mes "I remember hearing that they"; + mes "were going to get married..."; + next; + mes "[Old Lady]"; + mes "I was so happy for her!"; + mes "But then, all of a sudden,"; + mes "she killed herself. Well,"; + mes "that's what they all say."; + mes "Even today, I'm still not"; + mes "sure what happened."; + next; + + switch(select("Wait, who's James Rosimier?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, James belonged to"; + mes "one of the oldest and richest"; + mes "families in Juno. Everything"; + mes "was going great for them, but"; + mes "some time after Allysia died,"; + mes "the family went bankrupt."; + next; + mes "[Old Lady]"; + mes "The city manages their"; + mes "old residence now. For"; + mes "some reason, they decided"; + mes "to entrust me with the master"; + mes "key to the Rosimier Mansion."; + next; + + switch(select("may I borrow the Master Key?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I'm really not"; + mes "supposed to give it to just"; + mes "anyone, but I can tell that"; + mes "you're working with Allysia's"; + mes "best interests at heart."; + next; + mes "[Old Lady]"; + mes "However, you've got to"; + mes "make sure that you return"; + mes "it to me before the people"; + mes "from City Hall ask me for it."; + mes "Alright then, I hope you find"; + mes "what you're looking for."; + set KielHyreQuest,58; + getitem 7498,1; //Losimier's_House_Key + close; + } + + } + + } + + } + + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) < 1) || + (countitem(7500) < 1) || + (countitem(7501) < 1) || + (countitem(7502) < 1)) { + mes "[Old Lady]"; + mes "Please hurry and find"; + mes "whatever you're searching"; + mes "for in the Rosimier Mansion."; + mes "I might get in trouble if"; + mes "the people from City Hall"; + mes "come and ask me for the key..."; + close; + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) == 1) && + (countitem(7500) == 1) && + (countitem(7501) == 1) && + (countitem(7502) == 1)) { + mes "[Old Lady]"; + mes "Oh, you're finished"; + mes "searching the mansion?"; + mes "Depressing, isn't it?"; + mes "The creditors basically"; + mes "ransacked everything"; + mes "a very long time ago."; + next; + + switch(select("Why did ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I know that James"; + mes "and Allysia were in love,"; + mes "and he promised to marry"; + mes "her. Now, supposedly his"; + mes "family already betrothed"; + mes "him to another woman."; + next; + mes "[Old Lady]"; + mes "Time went by, and he"; + mes "was forced to marry his"; + mes "fiancee. Allysia was pretty"; + mes "devistated. I htink maybe"; + mes "that's wht she... you know..."; + next; + mes "[Old Lady]"; + mes "Listen, if you want to learn"; + mes "more about what happened,"; + mes "then I think you should talk"; + mes "to the ^3355FFfisherman that lives^000000"; + mes "^3355FFsouth of the Kiel Hyre Academy.^000000"; + next; + mes "[Old Lady]"; + mes "He's the one that found"; + mes "Allysia's body in the river,"; + mes "so he might have a better"; + mes "idea of what had happened."; + set KielHyreQuest,60; + delitem 7498,1; //Losimier's_House_Key + close; + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Old Lady]"; + mes "Yep, Rain's coming."; + mes "Can feel it in my bones."; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Warp portal into Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,273,141,0 script Rosimmir_Entrance 45,2,2,{ +OnTouch: + if (countitem(7498) < 1) { + warp "yuno",270,141; + end; + } + + else { + warp "kh_rossi",20,92; + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Table +//---------------------------------------------------------------------------- +kh_rossi,23,23,0 script Table 111,{ + if (countitem(7499) < 1) { + cutin "kh_family_port",1; + mes "^3355FFYou examine the table,^000000"; + mes "^3355FFand find a frames portait^000000"; + mes "^3355FFinside the open drawer.^000000"; + getitem 7499,1; //Portrait_of_a_Family + } + + else { + mes "^3355FFThe open drawer of,^000000"; + mes "^3355FFthis desk is empty now.^000000"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Shelf +//---------------------------------------------------------------------------- +kh_rossi,92,40,0 script Shelf::ShelfKHQ1 111,{ + if (countitem(7500) < 1) { + mes "^3355FFThere are locked^000000"; + mes "^3355FFboxes on these bookshelves.^000000"; + mes "^3355FFPerhaps if you used this^000000"; + mes "^3355FFmansions's Master Key, you^000000"; + mes "^3355FFmight be able to open them.^000000"; + next; + + switch(select("Use Key","Pass")) { + + case 1: + mes "^3355FFWhich box do you^000000"; + mes "^3355FFwant to try to open?^000000"; + next; + + switch(select("First Box","Second Box")) { + + case 1: + mes "^3355FFYou use the Master Key to^000000"; + mes "^3355FFunlock the box, and obtain^000000"; + mes "^3355FFa portait of a woman that^000000"; + mes "^3355FFlooks just like Kiel Hyre's^000000"; + mes "^3355FFassistant, Allysia.^000000"; + next; + cutin "kh_ellisia_port",2; + mes "^3355FFThe message, ''To my love,^000000"; + mes "^3355FFAllysia. From James.'' is^000000"; + mes "^3355FFwritten on the back.^000000"; + getitem 7500,1; //Portrait_of_a_Lady + close2; + cutin "",255; + end; + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou've found a woman's^000000"; + mes "^3355FFportrait in one of the^000000"; + mes "^3355FFboxes on this shelf.^000000"; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Desk +//---------------------------------------------------------------------------- +kh_rossi,144,287,0 script Desk::DeskKHQ2 111,{ + mes "^3355FFThe desk has^000000"; + mes "^3355FFthree drawers^000000"; + next; + + switch(select("First Drawer","Second Drawer","Third Drawer","Cance;")) { + + case 1: + mes "^3355FFThe first drawer is locked.^000000"; + close; + + case 2: + if (countitem(7501) < 1) { + mes "^3355FFThere is a letter inside^000000"; + mes "^3355FFthis second drawer. it^000000"; + mes "^3355FFwas sent by a person^000000"; + mes "^3355FFwith the initials, K.H.,^000000"; + mes "^3355FFand addressed to Allysia.^000000"; + getitem 7501,1; //K.H's_Letter + close; + } + + else { + mes "^3355FFThis drawer is now empty.^000000"; + close; + + } + + case 3: + mes "^3355FFThere is a small note^000000"; + mes "^3355FFinside this third drawer.^000000"; + mes "^3355FFIt's written by James, and^000000"; + mes "^3355FFmentions that he wants to^000000"; + mes "^3355FFmarry Allysia, and that she^000000"; + mes "^3355FFrecieved an engagement ring.^000000"; + close; + + case 4: + mes "......"; + mes "........."; + mes "............"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Bookshelf +//---------------------------------------------------------------------------- +kh_rossi,149,288,0 script Bookshelf::BookshelfKHQ2 111,{ + if (countitem(7502) < 1) { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + mes "^3355FFfind a folded note between^000000"; + mes "^3355FFthe books as you examine them.^000000"; + getitem 7502,1; //James's_Memo + close; + } + + else { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Fisherman +//---------------------------------------------------------------------------- +yuno_fild12,232,222,0 script Old Fisherman 709,{ + if (KielHyreQuest < 60) { + mes "[Fisherman]"; + mes "These days, it's much"; + mes "harder to catch and fish."; + mes "Ever since they built"; + mes "this factory, the fish"; + mes "have started to change,"; + mes "and they look different too..."; + close; + } + + else if (KielHyreQuest == 60) { + mes "[Fisherman]"; + mes "Eh? You want something?"; + mes "Heh, youngsters! I know"; + mes "how much you love handouts,"; + mes "but you're not getting any."; + mes "Now, if you bring me some"; + mes "Raw Fish, I'd be more friendly~"; + + if (countitem(544) >= 10) { + next; + mes "[Fisherman]"; + mes "Oh, is all this fish"; + mes "for me? Heh, how very"; + mes "generous of you. If you're"; + mes "going to be so kind, then"; + mes "i suppose I have to repay"; + mes "the favor. Ask me anything~"; + next; + + switch(select("30 years ago, a woman killed herself...")) { + + case 1: + mes "[Fisherman]"; + mes "Oh? Ohh. Oh yeah."; + mes "I remember that. Yeah."; + mes "it was August 20th, my"; + mes "wife's birthday. That day,"; + mes "instead of catching fish,"; + mes "I caught a dead woman."; + next; + mes "[Fisherman]"; + mes "Of course, I reported it"; + mes "to the Juno Police! They told"; + mes "me she killed herself since"; + mes "she was betrayed by her lover,"; + mes "who also happened to be her"; + mes "employer. Really tragic stuff."; + next; + mes "[Fisherman]"; + mes "Anyway, when they were"; + mes "moving her body out of the"; + mes "river, her hand dropped"; + mes "some ring. I picked it up,"; + mes "hoping to sell it later for"; + mes "some zeny. I know, I know..."; + next; + mes "[Fisherman]"; + mes "I was pretty lucky the"; + mes "police didn't see me take"; + mes "it. Later that day, some guy"; + mes "came up to me and offered"; + mes "me a lot of money for it."; + mes "I guess it was my lucky day!"; + next; + mes "[Fisherman]"; + mes "I found out later that he was"; + mes "some mechanical repairman--"; + mes "something. He sold everything"; + mes "to buy that ring, so I guess"; + mes "he wanted it desperately."; + mes "Then he just dissapeared."; + next; + mes "[Fisherman]"; + mes "His name...?"; + mes "It was something like..."; + mes "Heil? Hyre? Anyway, it"; + mes "was a long time ago. Oh,"; + mes "his old house is still around."; + next; + mes "[Fisherman]"; + mes "If you're going to be"; + mes "that curious, you might"; + mes "as well check it out."; + mes "Let's see, he lived in"; + mes "a hut near the northeast"; + mes "forest guard camp."; + delitem 544,10; //Fish_Slice + set KielHyreQuest,62; + close; + } + + } + + else { + close; + } + + } + + else if (KielHyreQuest >= 62) { + mes "[Fisherman]"; + mes "Don't you remember"; + mes "what I told you? That"; + mes "guy lived in a hut near"; + mes "the northeast forest"; + mes "guard camp! Why don't"; + mes "you check that place out?"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre's hut; Wooden Board +//---------------------------------------------------------------------------- +yuno_fild09,158,217,0 script Wooden Board 111,{ + if ((KielHyreQuest < 62) || (KielHyreQuest >= 64)) { + mes "^3355FFIt's a useless^000000"; + mes "^3355FFwooden board^000000"; + mes "^3355FFin the bushes.^000000"; + close; + } + + else if (KielHyreQuest == 62) { + mes "^000oFFYou found a long^000000"; + mes "^3355FFwooden board carved^000000"; + mes "^3355FFwith the initials, 'K.H.'^000000"; + next; + cutin "kh_kyel_port",2; + mes "^3355FFYou find a portrait of^000000"; + mes "^3355FFa young man, that looks^000000"; + mes "^3355FFlike a younger version^000000"; + mes "^3355FFof Kiel Hyre, in a broken^000000"; + mes "^3355FFpicture frame underneath^000000"; + mes "^3355FFthe old wooden board.^000000"; + set KielHyreQuest,64; + getitem 7503,1; //Portrait_of_a_Guy + next; + cutin "",255; + mes "^3355FFYou have enough^000000"; + mes "^3355FFinformation by now,^000000"; + mes "^3355FFso you should report^000000"; + mes "^3355FFback to Mitchell.^000000"; + close; + } + +} + +//============================================================================ +// Kiehl Hyre's Room and Boss NPCs +//============================================================================ +// Beyond here the NPC for the final areas. +// Now, this area is not someplace you wanna slow down so +// you can pick up dialog. I used packet logging to pull +// what I could and for the sake of the two people with me, +// did not bother doing all the proper proper NPC positioning +// or some of the 'error/wrong option' dialogs. +// All the doors are kind of weird. +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiehl's Room; Receiver (Gives black keycards upon killing mobs) +//---------------------------------------------------------------------------- +kh_kiehl01,17,39,0 script Receiver 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^333333*BBBZZZ*^000000"; + if (KielHyreQuest == 74) { + next; + mes "[????]"; + mes "^333333*Bzzzz...*"; + mes "I've never seen you"; + mes "before. Did Father send"; + mes "you to kill me? We'll just"; + mes "see about that! Go ahead,"; + mes "try to find me, adventurer.^000000."; + set KielHyreQuest,76; + } + + close2; + monster "kh_kiehl01",16,32,"Alicel",1739,1,"Receiver::OnMyMobDead"; + monster "kh_kiehl01",18,31,"Aliot",1740,1,"Receiver::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 3) { + makeitem 7506,1,"this",19,36; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Flower Vase (Gives...password...for Box) +//---------------------------------------------------------------------------- +kh_kiehl01,13,40,0 script Flower Vase 111,{ + if (KielHyreQuest < 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + close; + } + + if (KielHyreQuest >= 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + next; + + switch(select("Pick Up Vase","Break Vase","Turn Vase Upside-down")) { + + case 1: + mes "^3355FFThe vase is empty.^000000"; + close; + + case 2: + mes "^3355FFYou can't destroy"; + mes "this vase, even by"; + mes "striking it with all your"; + mes "might. It must have been"; + mes "specially manufactured by"; + mes "the Rekenber Corporation.^000000"; + close; + + case 3: + mes "^3355FFThe following words"; + mes "are written at the"; + mes "bottom of the vase.^000000"; + next; + mes "[Vase Message]"; + mes "''The rabbit often"; + mes "observes the door"; + mes "The night eats the"; + mes "pickled orange.''"; + close; + + } + + } + +} + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Box +//---------------------------------------------------------------------------- +kh_kiehl01,19,25,0 script Box::BoxKHQ3 111,{ + if (countitem(7505) < 1) { + mes "^3355FFYou found a box with"; + mes "a button for each letter"; + mes "of the alphabet on top of it.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "open the door") { + mes "^3355FFAs soon as you enter the"; + mes "password, the nearby door"; + mes "emits a pleasant chiming"; + mes "sound, and the box pops"; + mes "open to reveal a small key.^000000"; + getitem 7505,1; //Toy_Key + close; + } + + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + + else { + mes "^3355FFThis is where you"; + mes "found the Toy key^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (First) +// - Anyone can pass through this door +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,44,33,0 script Big Door#BigDoorKHQ1 111,{ + if (.KHDoor1Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_1_Warp::OnEnable"; + enablenpc"Big_Door_1_Warp"; + set .KHDoor1Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,43,33,0 script Big_Door_1_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_1_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_1_Warp"; + set getvariableofnpc(.KHDoor1Opened,"Big Door#BigDoorKHQ1"),0; + end; + +OnTouch: + warp "kh_kiehl01",55,33; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (second) +// - Consume Toy Key when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,174,40,0 script Big Door#BigDoorKHQ2 111,{ + if (.KHDoor2Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a small"; + mes "keyhole next to the knob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Toy Key") { + if (countitem(7505) >= 1) { + mes "^3355FFYou insert the key into"; + mes "the keyhole, and the door"; + mes "unlocks with a click as"; + mes "you turn the key.^000000"; + delitem 7505,1; //Toy_Key + donpcevent "Big_Door_2_Warp::OnEnable"; + enablenpc"Big_Door_2_Warp"; + set .KHDoor2Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,174,39,0 script Big_Door_2_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_2_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_2_Warp"; + set getvariableofnpc(.KHDoor2Opened,"Big Door#BigDoorKHQ2"),0; + end; + +OnTouch: + warp "kh_kiehl01",173,52; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Third) +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,77,108,0 script Big Door#BigDoorKHQ3 111,{ + if (.KHDoor3Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_3_Warp::OnEnable"; + enablenpc"Big_Door_3_Warp"; + set .KHDoor3Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,78,108,0 script Big_Door_3_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_3_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_3_Warp"; + set getvariableofnpc(.KHDoor3Opened,"Big Door#BigDoorKHQ3"),0; + end; + +OnTouch: + warp "kh_kiehl01",68,108; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fourth) +// - Consume TWO Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,42,177,0 script Big Door#BigDoorKHQ4 111,{ + if (.KHDoor4Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 2) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,2; //Black_Keycard + donpcevent "Big_Door_4_Warp::OnEnable"; + enablenpc"Big_Door_4_Warp"; + set .KHDoor4Opened,1; + close; + } + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,41,177,0 script Big_Door_4_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_4_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_4_Warp"; + set getvariableofnpc(.KHDoor4Opened,"Big Door#BigDoorKHQ4"),0; + end; + +OnTouch: + warp "kh_kiehl01",49,177; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,179,0 script Robots#kh1 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^3355FFAs soon as you"; + mes "touch the test tube,"; + mes "a bunch of robots"; + mes "suddenly appeared.^000000."; + close2; + monster "kh_kiehl01",18,181,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,180,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,179,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,178,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 4) { + makeitem 7506,1,"this",18,180; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Dummy Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,177,0 script Robots#kh2::RobotsKHQ 111,{ + end; +} +kh_kiehl01,15,180,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,15,182,0 duplicate(RobotsKHQ) Robots#kh4 111 +kh_kiehl01,35,187,0 duplicate(RobotsKHQ) Robots#kh1 111 +kh_kiehl01,37,187,0 duplicate(RobotsKHQ) Robots#kh2 111 +kh_kiehl01,39,187,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,41,187,0 duplicate(RobotsKHQ) Robots#kh4 111 + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fifth, and final) +// - Anyone can pass through this door +// - Consumes 4 Solid Iron Pieces +//---------------------------------------------------------------------------- +kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ + if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + if (KielHyreQuest < 86) { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + next; + + switch(select("Push Door","Kick Door","Shake Door","Pull Door","Lift Door")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + case 4: + break; + + case 5: + break; + + } + + mes "^3355FFA group of monsters"; + mes "suddenly appeared as"; + mes "soon as you applied"; + mes "pressure to the door."; + mes "This must be some"; + mes "kind of security device.^000000"; + close2; + set @KHDoorPushAttempt,@KHDoorPushAttempt+1; + monster "kh_kiehl01",163,183,"Alicel",1739,1; + monster "kh_kiehl01",163,179,"Aliot",1740,1; + monster "kh_kiehl01",169,183,"Alicel",1739,1; + monster "kh_kiehl01",169,179,"Aliot",1740,1; + if (@KHDoorPushAttempt >= 3) { + set KielHyreQuest,86; + } + end; + } + + else if ((KielHyreQuest > 84) && (KielHyreQuest < 94)) { + mes "^3355FFYou apply some"; + mes "pressure to the door,"; + mes "and find that you can"; + mes "budge it slightly, but"; + mes "you can't fully open it.^000000"; + next; + mes "^3355FFIf you wedged something"; + mes "into the gap between the"; + mes "door and its frame, and"; + mes "fully leveraged it, then you"; + mes "should be able to open it.^000000"; + next; + + switch(select("Steel","Rusty Iron Piece","Solid Iron Piece","Iron Piece","Screw","Cancel")) { + + case 1: + set @KHPryingItem$,"Steel"; + break; + + case 2: + set @KHPryingItem$,"Rusty Iron Piece"; + break; + + case 3: + if (countitem(7507) >= 1) { + if (KielHyreQuest < 92) { + mes "^3355FFYou insert one end of"; + mes "a Solid Iron Piece into the"; + mes "door's gap in a strenuous"; + mes "effort to pry the door open"; + mes "The gap widens a little bit,"; + mes "but you break one of your"; + mes "Solid Iron Pieces.^000000"; + set KielHyreQuest,KielHyreQuest+2; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + else if (KielHyreQuest == 92) { + mes "^3355FFWith a mighty heave,"; + mes "you pry a Solid Iron"; + mes "Piece into the door jamb,"; + mes "and fling the door wide open"; + mes "Unable the withstand the"; + mes "awesome force, this Solid"; + mes "Iron Piece shatters into dust.^000000"; + set KielHyreQuest,94; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + } + + else { + mes "^3355FFIf only you had a Solid"; + mes "Iron Piece you could use to"; + mes "pry open this door.^000000"; + close; + } + + case 4: + set @KHPryingItem$,"Iron Piece"; + break; + + case 5: + set @KHPryingItem$,"Screw"; + break; + + case 6: + mes "^3355FFLet's look for something"; + mes "heavy we can use to pry"; + mes "open this door.^000000"; + close; + + } + + mes "^3355FFThis "+@KHPryingItem$+" is far"; + mes "to weak for what you're using it for"; + mes "and breaks.^000000"; + close; + + } + + else if ((KielHyreQuest >= 94) && (KielHyreQuest <= 104)) { + if (.KHDoor5Opened == 0) { + mes "^3355FFThe large door"; + mes "is wide open, and."; + mes "you may now enter.^000000"; + next; + + switch(select("Yes","No")) { + + case 1: + close2; + set $@KH_DoorInvoker$,strcharinfo(0); + donpcevent "Big_Door_5_Warp::OnEnable"; + enablenpc"Big_Door_5_Warp"; + set .KHDoor5Opened,1; + end; + + case 2: + mes "^3355FFWho knows what is on the"; + mes "other side of this door. Let's"; + mes "think about it before barging in..^000000"; + close; + + } + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + +} + +kh_kiehl01,166,186,0 script Big_Door_5_Warp 45,1,1,{ + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_5_Warp"; + set getvariableofnpc(.KHDoor5Opened,"Big Door#BigDoorKHQ5"),0; + end; + +OnInit: + disablenpc "Big_Door_5_Warp"; + end; + +OnTouch: + + if (KielHyreQuest >= 46) { + warp "kh_kiehl02",50,6; + } + else { + warp "kh_kiehl01",166,183; + } + + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Trap (Entry way trap) +//---------------------------------------------------------------------------- +kh_kiehl02,49,10,0 script Kiehl_Room_Trap -1,5,3,{ + end; + +OnTouch: + if (.KHTrapSprung < 1) { + set .KHTrapSprung,1; + set $@KHQuestBusy,1; + initnpctimer; + monster "kh_kiehl02",47,13,"Aliot",1740,1; + monster "kh_kiehl02",54,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + monster "kh_kiehl02",51,13,"Aliot",1740,1; + monster "kh_kiehl02",53,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + end; + } + + end; + + +OnTimer300000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer600000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer900000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer1200000: donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + end; + +OnGlobalTimerOff: + stopnpctimer; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl +// - Only the player who invoked the final door should progress this npc. +// - Only the player who invoked the final door should be able to get ring. +// - Timer will drop to 3 minutes once Kiehl is defeated. +//---------------------------------------------------------------------------- +kh_kiehl02,50,52,4 script Kiehl#Original 902,{ + cutin "kh_kiel01",2; + if (KielHyreQuest < 94) { + mes "[Kiehl]"; + mes "........."; + close; + } + + if ($@KH_DoorInvoker$ == strcharinfo(0)) { + if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) { + mes "[Kiehl]"; + mes "I'm surprised you made"; + mes "it this far, adventurer~"; + mes "I bid you welcome to my"; + mes "humble room. I assume that"; + mes "you've come for the Condensed"; + mes "Memory Scroll... my mind."; + next; + mes "[Kiehl]"; + mes "You can understand"; + mes "why I can't let you have it,"; + mes "so if you really want the"; + mes "Condensed Memory Scroll,"; + mes "then show me what you've got!"; + close2; + cutin "",255; + set getvariableofnpc(.KHKilled,"KiehlRoom"),0; + monster "kh_kiehl02",49,48,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,50,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",53,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,55,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,53,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } + + else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") == 5)) { + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Hmpf! You're pretty good."; + mes "Father must have spent"; + mes "a lot of money to hire"; + mes "you. So has he sent"; + mes "you to kill me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre sent me to ask"; + mes "you to stop turning all of"; + mes "the Third Generation robots"; + mes "into killing machines! How"; + mes "can do something like that"; + mes "to other robots like you?"; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Why not? It's said that man"; + mes "was made in the image of God."; + mes "Well, robots were made in the"; + mes "image of man. You humans kill"; + mes "each other as much as you"; + mes "like, as far as I can tell."; + next; + mes "[Kiehl]"; + mes "It might not be ethical"; + mes "for me to provide weapons"; + mes "to humans that need them..."; + mes "But that's what they are."; + mes "Weapons. It's more humane"; + mes "for robots to fight than humans."; + next; + mes "[Kiehl]"; + mes "Robots don't naturally"; + mes "feel pain or emotions."; + mes "Not unless they're specially"; + mes "programmed. Sorry, but I don't"; + mes "plans to stop what I'm doing."; + next; + cutin "kh_kiel04",2; + mes "["+strcharinfo(0)+"]"; + mes "Humankind may not be"; + mes "perfect, but think about"; + mes "who you're working with!"; + mes "Rekenber is the epitome of"; + mes "human evil! How can you"; + mes "support them like this?"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "I've had a long relationship"; + mes "with Rekenber. I'm fully aware"; + mes "of their capabilities. Do you"; + mes "remember the first room you"; + mes "passed on your way here, the"; + mes "one with all the toys?"; + next; + mes "[Kiehl]"; + mes "I bet you didn't know that there"; + mes "were 5 Second Generation"; + mes "robots. Me, and my four other"; + mes "brothers and sisters. Father"; + mes "built that room so that all"; + mes "five of us could live together."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "I was the only one to"; + mes "survive. I returned to"; + mes "Father and even got a"; + mes "name. But yes, I know"; + mes "how bad Rekenber really is."; + next; + mes "[Kiehl]"; + mes "I don't... I don't want"; + mes "to talk about this any more"; + mes "You've made me... Just leave."; + mes "I think I will let you live."; + next; + cutin "",255; + mes "[Mitchell]"; + mes "Freeze!"; + mes "Kiehl Hyre, you're"; + mes "under arrest for creating"; + mes "and trading illegal weapons!"; + set KielHyreQuest,100; + donpcevent "::OnKHAgent"; + enablenpc "Mitchell#KiehlRoom"; + enablenpc "Agent#KHAgent1"; + enablenpc "Agent#KHAgent2"; + enablenpc "Agent#KHAgent3"; + enablenpc "Agent#KHAgent4"; + close; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) { + set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Ah, Schwaltzvalt Republic"; + mes "agents. Heh. I haven't had"; + mes "this many guests before."; + mes "Well, I guess this means"; + mes "we'll have to fight after"; + mes "all, you and I. *Sigh* Pity..."; + next; + mes "[Kiehl]"; + mes "First, in all fairness,"; + mes "let me take care of these"; + mes "nuisances. They're just"; + mes "mindlessly doing their"; + mes "jobs--sort of like robots-- but"; + mes "don't worry, they won't be hurt."; + next; + donpcevent "::OnKHSpiderWeb"; + mes "[Mitchell]"; + mes "Nooooo!"; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "And now, you and I can"; + mes "have a proper duel, human"; + mes "I'm interested in seeing just"; + mes "how strong you really are~"; + close2; + cutin "",255; + monster "kh_kiehl02",50,52,"Kiehl",1733,1,"KiehlRoom::OnKiehlDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") == 1)) { + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "D-damn...!"; + mes "Well played, adventurer"; + mes "Well played. I should have"; + mes "known that Father would send"; + mes "the very best after me. Still,"; + mes "you've failed to truly defeat me."; + next; + mes "[Kiehl]"; + mes "I still have a few"; + mes "trump cards left"; + mes "I think... I'll take you"; + mes "to hell with me... Well"; + mes "if robots can go there~"; + announce "*Jeeeezzzgggg~ Geezzz~ Grrrr~ Clank~*",bc_map,0xFF0000; + next; + mes "[Mitchell]"; + mes "No...! We're locked"; + mes "in the room! We're"; + mes "We're trapped in here!"; + next; + mes "[Kiehl]"; + mes "Yay~ Let's burn"; + mes "everything down~"; + next; + mes "[Mitchell]"; + mes "Quick, "+strcharinfo(0)+","; + mes "use Kiel Hyre's power"; + mes "device, the one that's"; + mes "supposed to mess with"; + mes "Kiehl's power supply!"; + mes "Hurry, use it right now!"; + next; + delitem 7504,1; //Power_Source + announce "*Gzzzz~ Gzzzz~*",bc_map,0xFF0000; + next; + mes "[Kiehl]"; + mes "Wh-what? I c-can't"; + mes "move! This day is just"; + mes "full of surprises. Oh, well."; + mes "I guess it's time for me to"; + mes "use my other trump card."; + next; + mes "[Mitchell]"; + mes "What...?"; + mes "How many trump"; + mes "cards do you have?"; + next; + mes "[????]"; + mes "I'm so disappointed..."; + mes "I can't believe none"; + mes "of you thought of this..."; + next; + mes "[Mitchell]"; + mes "Who are you...?"; + mes "Show yourself!"; + next; + donpcevent "Kiehl#Copy::OnChangeState"; + enablenpc "Kiehl#Copy"; + mes "[????]"; + mes "Please."; + mes "Don't insult me."; + mes "You know this voice."; + mes "It's been talking to"; + mes "you this entire time~"; + next; + mes "[Mitchell]"; + mes "Impossible!"; + mes "How can there"; + mes "be two of you...?!"; + next; + cutin "kh_kiel01",0; + mes "[Kiehl]"; + mes "Hahahahaha!"; + mes "I'm a robot!"; + mes "I can make extra"; + mes "bodies, switch brains"; + mes "with them. It's awfully"; + mes "convenient, let me tell you."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Anyway, I don't mean to show"; + mes "off, but I suppose I better"; + mes "reveal to you my final trump"; + mes "card. First of all, I know all"; + mes "about you, Ms. Mitchell Layla~"; + next; + mes "[Mitchell]"; + mes "What? How do you"; + mes "know my name?"; + next; + mes "[Kiehl]"; + mes "Well, I have a few"; + mes "spies of my own..."; + mes "I'll allow him to explain."; + next; + mes "[Masked Man]"; + mes "Mitchell..."; + mes "I'm sorry that"; + mes "you had to get"; + mes "involved in all this."; + next; + mes "[Mitchell]"; + mes "Wolkeus? Wolkeus Kaiser?!"; + mes "You're the spy?! But you risked"; + mes "your life to save our president!"; + mes "No! Oh, God! How can this be"; + mes "happening?! Everything's just..."; + mes "This is all crazy! All of it!"; + next; + mes "[Wolkeus]"; + mes "This is just the result"; + mes "of elaborate plans that"; + mes "were made years ago. I didn't"; + mes "expect you to be this surprised,"; + mes "Mitchell. It's the way the game"; + mes "is played. You know that."; + next; + mes "[Mitchell]"; + mes "Mister President..."; + mes "I failed you... I'm sorry..."; + next; + mes "[Kiehl]"; + mes "Well, Kaiser, she took"; + mes "it pretty badly, but at least"; + mes "you're being gentlemanly"; + mes "about it. Well, I'd like for"; + mes "all of us to get better"; + mes "acquainted, but..."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "We'd better say our"; + mes "farewells here. This"; + mes "place will be gone in"; + mes "five minutes. Ah, and"; + mes "Ms. Layla, you're coming"; + mes "with us. We have questions~"; + next; + mes "[Kiehl]"; + mes "I'm curious as to what"; + mes "the president's plans are"; + mes "Mister Kaiser, if you'll"; + mes "escort Ms. Layla, please."; + next; + mes "[Wolkeus Kaiser]"; + mes "Sorry, Mitchell."; + mes "I gotta do it..."; + next; + mes "[Mitchell]"; + mes "No, get away! Let me go!"; + mes "Let go of me, Wolkeus!"; + donpcevent "::OnKHAgent"; + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "Great, we're done with"; + mes "that ugly business. Now,"; + mes "where was I? Ah, right."; + mes "Yes. I'm sorry. We don't"; + mes "have any more time to play."; + next; + mes "[Kiehl]"; + mes "Here, adventurer."; + mes "I'm aware that my father"; + mes "sent you here to get this."; + mes "Consider it my final gift"; + mes "to him. I'm surprised he left"; + mes "this ring inside me, though."; + next; + cutin "kh_kiel04",2; + mes "[Kiehl]"; + mes "I imagine that it must"; + mes "be precious to him. But"; + mes "I wonder why he placed"; + mes "it inside me? Well, anyway,"; + mes "I have a message I'd like"; + mes "for you to deliver to him."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "First... I guess we"; + mes "should get rid of this"; + mes "old thing. It was a good"; + mes "body, and it's served me"; + mes "well for 23 years. I'll miss"; + mes "it. Rest well, old Kiehl."; + next; + mes "[Kiehl]"; + mes "Now, this was the body"; + mes "that my father made."; + mes "Please tell him that"; + mes "this means that we're"; + mes "no longer related to"; + mes "each other at all."; + next; + mes "[Kiehl]"; + mes "The body I'm using right now?"; + mes "I made it myself with the most"; + mes "advanced technology. Consider"; + mes "it... a Fourth Generation robot"; + mes "body if you will. Father will"; + mes "understand what I mean."; + next; + mes "[Kiehl]"; + mes "Anyway, please tell him"; + mes "that, and get his old ring"; + mes "out of my old robot body,"; + mes "and then give it to him. For"; + mes "now, let's get out of here: we"; + mes "just have 3 minutes to evacuate."; + next; + mes "[Kiehl]"; + mes "You're a worthy opponent,"; + mes "and a human I respect."; + mes "I don't know if we'll meet"; + mes "again, but who knows?"; + mes "Anyway, I'll open up the"; + mes "exit for you. Farewell~"; + set KielHyreQuest,104; + donpcevent "Kiehl_Room_Exit::OnEnable"; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + donpcevent "Kiehl#Copy::OnChangeState"; + disablenpc "Kiehl#Copy"; + initnpctimer; + end; + } + + if (KielHyreQuest == 104) { + cutin "kh_kiel02",2; + mes "^3355FFYou retrieve the"; + mes "ring from the heart of"; + mes "Kiehl's old robotic body.^000000"; + getitem 7508,1; //Elisia's_Ring + set KielHyreQuest,106; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + end; + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + + + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + +OnTimer180000: + stopnpctimer; + mapannounce "kh_kiehl02","Beeeeeeeeeeeeep~",bc_npc,0xFF0000; + donpcevent "KiehlRoom::OnReset"; + end; + +OnTimer179000: + mapannounce "kh_kiehl02","1 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer178000: + mapannounce "kh_kiehl02","2 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer177000: + mapannounce "kh_kiehl02","3 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer176000: + mapannounce "kh_kiehl02","4 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer175000: + mapannounce "kh_kiehl02","5 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer170000: + mapannounce "kh_kiehl02","10 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer160000: + mapannounce "kh_kiehl02","20 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer150000: + mapannounce "kh_kiehl02","30 seconds to detonation",bc_npc,0xFF0000; + end; + +OnTimer120000: + mapannounce "kh_kiehl02","1 minutes remaining until detonation.",bc_npc,0xFF0000; + misceffect 563; + end; + +OnTimer60000: + mapannounce "kh_kiehl02","2 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnTimer1000: + mapannounce "kh_kiehl02","3 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; end; +} +//---------------------------------------------------------------------------- +// Kiehl's Room; NPC for mob control, timers, and other junk. +//---------------------------------------------------------------------------- +kh_kiehl02,1,1,0 script KiehlRoom -1,{ + end; + +OnKiehlMobDead: +debugmes "KLol: "+.KHKilled; + set .KHKilled,.KHKilled+1; + if (.KHKilled == 5) { + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + } + end; + +OnKiehlDead: + set .KHKilledBoss,1; + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + end; + OnReset: - disablenpc "Kiehl_Room_Exit"; + donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff"; + if (getmapusers("kh_kiehl02") > 0) { + mapwarp "kh_kiehl02","lighthalzen",192,200; + } killmonsterall "kh_kiehl02"; - set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0; - set getvariableofnpc(.KHKilled,"KiehlRoom"),0; + disablenpc "Kiehl_Room_Exit"; + set .KHKilledBoss,0; + set .KHKilled,0; set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0; - set $@KHQuestBusy$,""; + set $@KHQuestBusy,0; set $@KH_DoorInvoker$,""; + end; } //---------------------------------------------------------------------------- @@ -7296,11 +29838,7482 @@ kh_kiehl02,46,53,6 duplicate(KHAgent) Agent#KHAgent4 880 kh_kiehl02,48,53,7 script Kiehl#Copy 902,{ end; +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Kiehl#Copy"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Exit +//---------------------------------------------------------------------------- +kh_kiehl02,50,59,0 script Kiehl_Room_Exit 45,1,1,{ +OnTouch: + if (getmapusers("kh_kiehl02") < 1) { + donpcevent "KiehlRoom::OnReset"; + warp "lighthalzen",193,202; + } + + else { + warp "lighthalzen",193,202; + } + + end; + OnEnable: misceffect 215; end; -OnDisable: +OnInit: + disablenpc "Kiehl_Room_Exit"; + end; +} + +//============================================================================ + +//===== eAthena Script ======================================= +//= Kiel Hyre Quest +//===== By: ================================================== +//= L0ne_W0lf (Script), DZeroX (Timer) +//===== Current Version: ===================================== +//= 2.4 +//===== Compatible With: ===================================== +//= eAthena SVN +//===== Description: ========================================= +//= Quest for opening Robot Factory first and second floors. +//===== Comments: ============================================ +//= See below +//===== Additional Comments: ================================= +//= 1.0 First version, needs testing [Playtester] +//= 1.1 Copied over some changes made by -Tsuyuki- [L0ne_W0lf] +//= Reworked variables slightly so that the permenents ones aside from the +//= main tracking variable, are deleted when no longer needed. Renamed +//= several variables that handle strings to @KHInput$. [L0ne_W0lf] +//= 1.2 Removed duplicate NPCs. [Toms] +//= 1.3 More Bug fixes, fixed typo. Updated Additional comments. [L0ne_W0lf] +//= 1.4 Fixed doors not resetting in kh_kiehl01 after 30 second timer is up. [L0ne_W0lf] +//= 1.5 Another bug fixed (&& instead of ||). [L0ne_W0lf] +//= 1.6 More squashed bugs with if checking. [L0ne_W0lf] +//= 1.7 Corrected some spelling mistakes. [Balish] +// Corrected Exploit with the pub man, giving infinite wine and money. +// Corrected pool and map not showing text for some states of the quest. +// Corrected Elly showing cutin but not text for some states of the quest (causing players to log off to continue). +// Let fisherman talk to you when you have 10 fishes OR MORE. +// Corrected not letting you enter the tombstone after finishing the quest. +//= 1.8 Elly now deletes the Iron_Box, and Kiel Hyre deletes the Pin. [L0ne_W0lf] +//= More security on the 5th Big Door, now makes sure no one outside of who- +//= acticated it initially can use it. Resets after 10 minutes to make it. +//= Made it so that you need to be at least step 84 to activate the final door. +//= Corrected not deleting Allysia's Ring from inventory. +//= 1.9 Exit will now enable if you are just retrieving the Ring, keeps you from getting stuck. [L0ne_W0lf] +//= Corrected "KH_Kielh02", was setting off a debug, invalid map index. Should have been "kh_Kiehl02" +//= Made .KHQuestBusy$ into a temp global variable. $@KHQuestBusy$. +//= 2.0 Changed the labels on the "Big Doors" to "Identifier Names" to prevent an error with using getvariableofnpc [L0ne_W0lf] +//= 2.1 Fifth door now checks for a variable HIGHER or EQUAL to 74 not 84, as pointed out by Stollen. [L0ne_W0lf] +//= 2.2 Another fix for elly, no longer RESETS to 26 when you tak to her. [L0ne_W0lf] +//= 2.3 Should NOT have been setting .KHQuestBusy at all. It's not used or accessed anymore. Removed. [L0ne_W0lf] +//= 2.4 Lots of fixes (4ish) from Valandi. [L0ne_W0lf] +//= Added a getmapuser check to the mapwarp in KHTimerEnd so it's not trying to warp out 0 users. [L0ne_W0lf] +//= 2.5 FIxed several small issues (and large one) such as typos in cutins, typos in dialog, etc. [L0ne_W0lf] +//= Added some of the missing dialogs for several NPCs, and fixed a few NPC locations. +//= ALL books can now trigger the wall. +//= Allysia will now summon 4 (was 2) G_CONSTANTS instead of REGULAR constants. +//= Fixed where Golden_Key and Exquisite_Button are deleted. +//= Removed KHTimerEnd, and instead use OnReset. +//= Fixed typo in the second NPC that gives Black Keycards. +//= Added and Monster Warps. (Keeps monsters from being in dungeon quest area.) Non-functional though. +// +//============================================================ + + +//============================================================================ +// Kiel Hyre Quest/Robotic Lab Dungeon +// +// Script Dialog Obtained and Copied Down by L0ne_W0lf +// Timer work and some variable dances by DZeroX +// Based on [iRO Sakray] as of [03/29/2007] +//============================================================================ +//---------------------------------------------------------------------------- +// [Notes] +// - Let it be noted that ALL DIALOG IS OFFICIAL TO IRO UNLESS SPECIFIED. +// - I've fixed a few of iRO's mistakes, but I'm sure I made some of my own. +// - Will probably require a major optimizing. +// - Accidentally progressed Mills' dialog. Improvising. +// - Accidentally progressed Elly's dialog while reading 'Letter to Elly'. Improvising. +// - Possible missing dialog for all getitems when overweight. +// - Possible missing dialog for absense of Green Key item in "Bookshelf" NPC +// - Possible missing dialog for "Test Tube" if you haven't read the second poem. +// - Possible missing dialog for Elly in Dromitory if you don't have "Grey Box" +// - Possible missing dialog for "Grave" if you don't have "Yellow Keycard" +// - Not going to list ALL of the more usless NPCs. (Doors + Empty "Beautiful Ladies") +// - Accidently progressed Kiel Hyre's dialog. Improvising. +// - Improvising for getting back in to see Mitchell if you butterfly wing and need to get back in. +// - Possible missing dialog for "Odd Grandma" +// - Possible missing dialog for "Shelf" +// - Near the end I finshed the quest with some people. Used packet logging to get dialog. +// - Because of the above mentioned, NPC placement and dialog is a little sloppier. +// - Possible missing dialog for "Kiel Hyre" (Accept and Okay responses) +// - Parties are *NOT REQUIRED* as per Doddler's Wiki information. +// - Possible missing dialog for "Kiel Hyre" if you don't have Allysia's Ring. +// +//---------------------------------------------------------------------------- +// [Maps] [Use] +// yuno_in01 ........... Start quest in pub +// kh_school ........... Deliver Wine here, Meet Elly +// yuno ................ Get Delivery for/from "Little Kid" +// lighthalzen ......... Get Delivery package for "Little Kid" +// kh_vila ............. Kiel Hyre cottage. +// kh_dun01 ............ Robot Factory; Save Kiel Hyre +// kh_mansion .......... Kiel Hyre's Mansion in Lighthalzen +// kh_kiehl01 .......... Kiehl's room/Cave +// kh_kiehl02 .......... Kiehl's room/Boss Room +// +//---------------------------------------------------------------------------- +// [Variables in Use] +// KielHyreQuest - Main quest tracking variable +// +// KHPubMasterEnd - Finished with Pun Master if set to 1 +// - Deleted once no longer needed. +// +// KHToastGirlEnd - Pick up delivery if set to 1, +// - picked up delivery if set to 2 +// - finished if set to 3 +// - Deleted once no longer needed. +// +// KHCottagePoem1 - Tracks Poem 1 quest in cottage. (finished = 5) +// - Deleted once no longer needed. +// +// KHCottagePoem2 - Tracks Poem 2 quest in cottage. (finished = 3) +// - Deleted once no longer needed. +// +// @KHInput$ - Used with "Security Guard" +// - Used with "Test Tube" +// - Used when "Elly" (inputing string in attempt to wake her) +// - Used with "Grave", (twice) +// - Used with "Heavy Door" +// - Used with "Mechanical Device" +// - Used for opening various doors in Kiehl's area. +// +// @KHFirstKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// @KHSecondKeyhole - Holds 1 (green keycard) or 2 (cottage key) +// +// @KHPotionColor$ - Holds 'red', 'green', or 'yellow' depending on what wrong potion is selected. +// +// @KHFirstSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHSecondSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHThirdSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// @KHFourthSword - holds 1, 2, 3 or 4. Used to keep track of swords and snakes. +// +// @KHClimbAttempt - Set to random (1-5) to determine if you fail at climbing the water pipe. +// +// @KHQ1Read - Make sure player has asked question 1 to Kiel Hyre +// @KHQ2Read - Make sure player has asked question 2 to Kiel Hyre +// @KHQ3Read - Make sure player has asked question 3 to Kiel Hyre +// +// @KHTitle$ - Holds "Mr", "Mrs", or "Miss" +// +// @KHDoorPushAttempt - Keeps track of how many times a person has attmepted pushed the door open. +// +// @KHPryingItem$ - Used for incorrect options when prying open last door. +// +// .KHKilled - Tracks how many monsters have been killed. Used with "Receiver", "Robots", and "Kiehl" NPCs +// +// .KHDoor1Open - 0/1 Depending on if the first door is opened. +// .KHDoor2Open - 0/1 Depending on if the second door is opened. +// .KHDoor3Open - 0/1 Depending on if the third door is opened. +// .KHDoor4Open - 0/1 Depending on if the fourth door is opened. +// .KHDoor5Open - 0/1 Depending on if the fifth door is opened. +// +// .KHKilledBoss - 0/1 depending on if the boss has been killed. +// +// $@KHQuestBusy$ - Holds strcharinfo(0) for "locking" reasons, so only that person can use the door. Variable is unset at boss room reset. +// +// $@KH_DoorInvoker$ - Holds character name, so only that person can use certain NPCs. +// +//---------------------------------------------------------------------------- +// [NPCs] [Location] +// Pub Master .................. yuno_in01 [ 35,178] +// Hanie ....................... yuno_fild08 [196,196] +// Security Guard .............. yuno_fild08 [158,194] +// Security Guard .............. yuno_fild08 [158,183] +// Student ..................... kh_school [ 57,142] +// Student ..................... kh_school [ 57,139] +// Lady ........................ kh_school [176, 60] +// Cute Student ................ kh_school [179, 39] +// Little Kid .................. yuno [217,114] +// Windmill Owner .............. lighthalzen [365,300] +// Cottage Keeper .............. yuno_fild02 [ 93,210] +// Door ........................ yuno_fild02 [ 75,218] +// Door ........................ yuno_fild02 [109,218] +// Wall ........................ kh_vila [191, 14] +// Book ........................ kh_vila [184, 20] +// Book ........................ kh_vila [181, 20] +// Book ........................ kh_vila [178, 20] +// Book ........................ kh_vila [175, 19] +// KH_Letter_Trigger ........... kh_vila [179, 11] +// Box ......................... kh_vila [ 16,175] +// Apple Box ................... kh_vila [ 30,184] +// Map ......................... kh_vila [ 44,125] +// Pot ......................... kh_vila [ 33,148] +// Calabash .................... kh_vila [ 14, 55] +// Pool ........................ kh_vila [ 39, 39] +// Vicious Dog ................. kh_vila [180,178] +// Drawer ...................... kh_vila [115,186] +// Box ......................... kh_vila [107,126] +// Bookshelf ................... kh_vila [181,138] +// Sword Hilt .................. kh_vila [136, 69] +// Test Tube ................... kh_vila [179, 69] +// Test Tube ................... kh_vila [185, 69] +// Window ...................... yuno_fild08 [ 69,185] +// Elly ........................ kh_school [178,180] +// Cookie Basket ............... kh_school [175,175] +// Window ...................... kh_school [188,185] +// Grave ....................... yuno_fild08 [ 72,170] +// Heavy Door .................. kh_dun01 [236, 48] +// Beautiful lady .............. kh_school [119,149] +// Beautiful lady .............. kh_school [122,186] +// Signboard ................... kh_dun01 [163,223] +// Mechanical Device ........... kh_dun01 [166,223] +// Mechanical Device ........... kh_dun01 [162,206] +// Kiel_Hyre_Door .............. kh_dun01 [224,232] +// Steward ..................... kh_mansion [ 78, 55] +// Kiel Hyre ................... kh_mansion [ 22, 27] +// Allysia ..................... kh_mansion [ 22, 27] +// Abduction_trigger ........... lighthalzen [188,200] +// Mysterious Woman ............ kh_mansion [ 25, 79] +// Odd Granma .................. yuno [250,132] +// Old Lady .................... yuno [250,132] +// Rosimmir_Entrance ........... yuno [273,141] +// Table ....................... kh_rossi [ 23, 23] +// Shelf ....................... kh_rossi [ 92, 40] +// Desk ........................ kh_rossi [144,146] +// Bookshelf ................... kh_rossi [144,146] +// Old Fisherman ............... yuno_fild12 [232,222] +// Wooden Board ................ yuno_fild09 [158,217] +// Kiehl_Room_Warp ............. kh_mansion [ 29, 27] +// Entrance Device#KHEntry1 .... kh_dun01 [ 44, 20] +// Entrance Device#KHEntry2 .... kh_dun01 [ 44,203] +// Security Guard .............. yuno_fild08 [158,194] +// Receiver .................... kh_kiehl01 [ 17, 39] +// Flower Vase ................. kh_kiehl01 [ 13, 40] +// Box ......................... kh_kiehl01 [ 19, 25] +// Big Door .................... kh_kiehl01 [ 44, 33] +// Big_Door_1_Warp ............. kh_kiehl01 [ 43, 33] +// Big Door .................... kh_kiehl01 [174, 40] +// Big_Door_2_Warp ............. kh_kiehl01 [174, 39] +// Big Door .................... kh_kiehl01 [ 77,108] +// Big_Door_3_Warp ............. kh_kiehl01 [ 68,108] +// Big Door .................... kh_kiehl01 [ 41,177] +// Big_Door_4_Warp ............. kh_kiehl01 [ 78,177] +// Robots ...................... kh_kiehl01 [ 15,181] +// Big Door .................... kh_kiehl01 [166,187] +// Big_Door_5_Warp ............. kh_kiehl01 [166,186] +// Kiehl_Room_Trap ............. kh_kiehl02 [ 49, 15] +// Kiehl#Original .............. kh_kiehl02 [ 50, 52] +// KiehlRoom ................... kh_kiehl02 [ 1, 1] +// Floating NPC (Agent#KHAgent0::KHAgent) +// Mitchell#KiehlRoom .......... kh_kiehl02 [ 49, 55] +// Agent#KHAgent1 .... ....... kh_kiehl02 [ 53, 52] +// Agent#KHAgent2 .............. kh_kiehl02 [ 51, 49] +// Agent#KHAgent3 .............. kh_kiehl02 [ 47, 50] +// Agent#KHAgent4 .............. kh_kiehl02 [ 46, 53] +// Kiehl#Copy .................. kh_kiehl02 [ 48, 53] +// Kiehl_Roomn_Exit ............ kh_kiehl01 [ 50, 59] +// +//---------------------------------------------------------------------------- +// [Functions] +// None +// +//---------------------------------------------------------------------------- +// [Conflicts] +// Resolved +// +//============================================================================ + + +//============================================================================ +// Affiliated NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Juno Pub Master/Starting point. +//---------------------------------------------------------------------------- +yuno_in01,35,179,1 script Pub Master 46,4,4,{ + if (checkweight(7487,1) == 1) { + mes "^3355FF- Wait!! -"; + mes "- You are carrying too many items-"; + mes "- so you can't receive any more items -"; + mes "- please take off some items -"; + mes "- and come for the challenge again -^000000"; + close; + } + + if (KielHyreQuest == 1) { + mes "[Vandt]"; + mes "Hi there, welcome"; + mes "to my pub. So what"; + mes "would you like to have?"; + next; + + switch(select("Beer, please","A coctail, please","Soju, please.","You look worried, what's up?","Cancel")) { + + case 1: + mes "[Vandt]"; + mes "Alright, let me get"; + mes "you a glass of beer on"; + mes "tap. There you are, this"; + mes "is out special Schwaltz Beer."; + next; + mes "^3355FF*Gulp gulp gulp*^000000"; + percentheal 5,-5; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ahhh, it's really"; + mes "good! That really"; + mes "hits the spot!"; + close; + + case 2: + mes "[Vandt]"; + mes "I'm sorry, but I have to"; + mes "deliver all of our cocktail"; + mes "ingredients to other customers."; + mes "Maybe I'll have enough to make"; + mes "you something next time, okay?"; + close; + + case 3: + mes "[Vandt]"; + mes "S-soju? I'm sorry,"; + mes "but we don't serve that"; + mes "here. It's too much of"; + mes "a tough guy drink for me..."; + close; + + case 4: + mes "[Vandt]"; + mes "Oh, did you overhear?"; + mes "I'm sorry, it's just that one"; + mes "of my employees had an"; + mes "accident and was pretty hurt,"; + mes "so I have nodoby that can"; + mes "deliver this merchandise."; + next; + mes "[Vandt]"; + mes "I have an urgent order"; + mes "that I need to send to"; + mes "the Kiel Hyre Academy,"; + mes "but I can't find anyone"; + mes "that's avaliable for this"; + mes "kind of temporaty job."; + next; + + switch(select("I'm sorry to hear that","Do you want me to help you?")) { + + case 1: + mes "[Vandt]"; + mes "Well, I'm sure that I'll"; + mes "figure something out."; + mes "Do you know anyone"; + mes "that'd be interested in"; + mes "some part time work?"; + close; + + case 2: + mes "[Vandt]"; + mes "Really? That's great!"; + mes "But first, I think it's fair to"; + mes "tell you that this job may not"; + mes "be as simple as you'd think."; + mes "I expect you to complete the"; + mes "delivery, no matter what."; + next; + + switch(select("Sure I'll do it", "Wait, let me think about it...")) { + + case 1: + mes "[Vandt]"; + mes "I'm glad to hear that."; + mes "Well then, please take this"; + mes "bottle of Culinary Wine to"; + mes "Mrs. ^ff0000Lecollane^000000 in the Kiel"; + mes "Hyre Academy. I'll pay you"; + mes "once you finish the job, okay?"; + getitem 7487,1; //Culinary_Wine + set KielHyreQuest,2; + close; + + case 2: + mes "[Vandt]"; + mes "Sure thing. I really need"; + mes "to get this done, so if you"; + mes "can't do it, but know any"; + mes "capable, responsible"; + mes "people that can, then please"; + mes "tell them about my situation."; + close; + + } + + } + + case 5: + mes "[Vandt]"; + mes "Sure, just take"; + mes "your time, relax,"; + mes "and order something"; + mes "when you're ready."; + close; + } + + } + + else if ((KielHyreQuest >= 2) && (KielHyreQuest < 6)) { + mes "[Vandt]"; + mes "Please deliver that bottle"; + mes "of Wine I gave you to Mrs."; + mes "Mrs. ^ff0000Lecollane^000000, who should be"; + mes "inside the Kiel Hyre Academy."; + mes "Hurry and get it to her before she"; + mes "can complain about the delivery."; + close; + } + + else if ((KielHyreQuest == 6) && (KHPubMasterEnd != 1)) { + mes "[Vandt]"; + mes "Oh, you're back."; + mes "Thanks for making that"; + mes "delivery. Just give me"; + mes "a moment, and then I can"; + mes "pay you in zeny, okay?"; + next; + switch(select("I need more wine...")) { + + case 1: + mes "[Vandt]"; + mes "Oh, you need to deliver"; + mes "another bottle? Alright,"; + mes "let me look around, and"; + mes "I'll give you the wine"; + mes "and your payment."; + next; + mes "^3355FFRummage Rummage^000000"; + mes "^3355FFRummage Rummage^000000"; + next; + mes "[Vandt]"; + mes "There you go!"; + mes "Thank you so much"; + mes "for helping me out~"; + getitem 7487,1; //Culinary_Wine + set zeny,zeny+1000; + set KHPubMasterEnd,1; + close; + } + } + + else if ((KielHyreQuest > 6) || (KHPubMasterEnd == 1)) { + mes "[Vandt]"; + mes "Hey, thanks a lot"; + mes "for helping me out that"; + mes "last time. I knew I asked"; + mes "you out of the blue, but"; + mes "you ended up being a life"; + mes "saver! I really appreicate it!"; + close; + } + +OnTouch: + if (KielHyreQuest < 1) { + mes "[Vandt]"; + mes "Arrrggghhh..."; + mes "This can't be good..."; + mes "This isn't good at all!"; + mes "What am I suposed to do?"; + set KielHyreQuest,1; + close; + } +} + +//---------------------------------------------------------------------------- +// Juno Toast Sales Girl. +//---------------------------------------------------------------------------- +yuno,217,114,4 script Little Kid 96,{ + if (KielHyreQuest < 6) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + close; + } + + else if ((KielHyreQuest == 6) && (KHToastGirlEnd != 3)) { + if (KHToastGirlEnd < 1) { + mes "[Cezu]"; + mes "Fresh, crunchy toast!"; + mes "If you want some, come"; + mes "and get some tooooast~"; + mes "Oh! Hi hi~ Did you want"; + mes "to buy some yummy toast?"; + next; + + switch(select("I'm here for Elly","No, thanks")) { + + case 1: + mes "[Cezu]"; + mes "Oh, I see. Elly must have"; + mes "wasted another batch of"; + mes "ingredients again. Well,"; + mes "she's a regular customer,"; + mes "so I really want to help, but"; + mes "I can't really do anything."; + next; + mes "[Cezu]"; + mes "You see, I just ran"; + mes "out of ingredients too!"; + mes "But I can't really leave"; + mes "to get some more. What if"; + mes "people need to buy toast?"; + mes "Listen, can you help me out?"; + next; + mes "[Cezu]"; + mes "would you please go get"; + mes "some flour and eggs for me"; + mes "from the ^3355FFLighthalzen Windmill^000000"; + mes "Then, when you come back, I can"; + mes "divide the ingredients, and you"; + mes "can deliver some to Elly."; + next; + mes "[Cezu]"; + mes "I know that I'm basically"; + mes "making you do everything"; + mes "on your own, but please try"; + mes "to understand that my hands"; + mes "are tied. D-don't ask me"; + mes "why, they just are!"; + set KHToastGirlEnd,1; + close; + + case 2: + mes "[Cezu]"; + mes "Okay okay~"; + mes "Please come again!"; + close; + } + } + + else if (KHToastGirlEnd == 1) { + mes "[Cezu]"; + mes "Would you please go to"; + mes "the Lighthalzen Windmill"; + mes "and tell them that Cezu needs"; + mes "lots of flour and lots of eggs!"; + mes "Then, bring all the stuff over"; + mes "to me as soon as you can~"; + close; + } + + else if (KHToastGirlEnd == 2) { + mes "[Cezu]"; + mes "Hey, you're back with the"; + mes "ingredients! Thank you so"; + mes "much, I really needed these!"; + mes "Now please give this flour"; + mes "and these eggs to Elly, and"; + mes "send her my regards. See you~"; + delitem 7488,1; //Delivery_Package + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,3; + close; + } + + } + + else if ((KielHyreQuest >= 6) || (KHToastGirlEnd == 3)) { + //KHToastGirlEnd no longer needed-- deleting. + set KHToastGirlEnd,0; + mes "[Cezu]"; + mes "Hot, fresh and"; + mes "cruuuunchy toast!"; + mes "Come and get some!"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Lighthalzen WindMill Owner. +//---------------------------------------------------------------------------- +lighthalzen,365,300,2 script Windmill Owner 46,{ + if (KHToastGirlEnd < 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "I'm pretty busy right"; + mes "now, so you mind coming"; + mes "back later? Then we'll talk."; + close; + } + + else if (KHToastGirlEnd == 1) { + mes "[Mills]"; + mes "Hey, whaddya want?"; + mes "You just happened to"; + mes "catch me at a good time,"; + mes "but if you need anything,"; + mes "you'd better spit it out quick"; + mes "before things get hectic again."; + next; + + switch(select("I'm here for Cezu","......")) { + + case 1: + mes "[Mills]"; + mes "Oh, Cezu from the"; + mes "toast stand? Okay,"; + mes "I've got everything"; + mes "here, let me just get"; + mes "it ready for you..."; + next; + mes "[Mills]"; + mes "Kid's one of my regular"; + mes "customers, so you don't"; + mes "have to pay me, or run any"; + mes "extra errands on my end. Yeah,"; + mes "I know how other people treat"; + mes "you adventurers. Well, see ya."; + getitem 7488,1; //Delivery_Package + set KHToastGirlEnd,2; + close; + + case 2: + mes "[Mills]"; + mes "......"; + mes "Um, okay, well, if"; + mes "you need something,"; + mes "just hollar, I guess."; + mes "Cuts, Cutz where are you?"; + mes "You'd better not be goofing off!"; + close; + + } + + } + + else if (KHToastGirlEnd >= 2) { + mes "[Mills]"; + mes "That Cutz is such"; + mes "a lazy rascal. The guy"; + mes "thinks he can fool around"; + mes "when he's on the clock...!"; + mes "Ah well, he knows I can't find"; + mes "a better assistant. He'll learn..."; + close; + } + +} + +//============================================================================ +//Kiel Hyre Academy NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Girl (Talks about the academy) +//---------------------------------------------------------------------------- +yuno_fild08,196,196,5 script Hanie 102,{ + mes "[Hanie]"; + mes "Oh, I wish I could study"; + mes "at the Kiel Hyre Academy..."; + mes "All of the graduates get"; + mes "really nice jobs! I'm almost"; + mes "jealous of the students!"; + next; + + switch(select("Kiel Hyre Academy?")) { + + case 1: + mes "[Hanie]"; + mes "Oh, the Kiel Hyre Academy"; + mes "is a school founded by Kiel"; + mes "Hyre, an inventor that became"; + mes "rich from his strange machines."; + mes "He decided to give back to society"; + mes "by building this private academy."; + next; + mes "[Hanie]"; + mes "However, the school will"; + mes "only accept orphans that are"; + mes "too poor to enroll in any other"; + mes "schools. Sometimes, it makes"; + mes "me wish that I was an orphan too!"; + mes "Well, not really, but you know..."; + close; + } +} + + +//---------------------------------------------------------------------------- +// Academy Security Guards +//---------------------------------------------------------------------------- +yuno_fild08,158,194,5 script Security Guard#1::KHAGuard 852,{ + if ((KielHyreQuest < 2) && (KielHyreQuest >= 30)) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + close; + } + + + else if (KielHyreQuest == 2) { + mes "[Security Guard]"; + mes "I'm sorry, but if you aren't"; + mes "associated with this institution,"; + mes "then you're not authorized to"; + mes "enter the ^FF0000Kiel Hyre Academy^000000."; + mes "Please leave if you don't have"; + mes "an appointment with the staff."; + next; + switch(select("I'm here for a delivery.","......")) { + case 1: + mes "[Security Guard]"; + mes "You're here to deliver"; + mes "something? Okay, just give"; + mes "me the recipient's ^FF0000name^000000,"; + mes "followed by the ^FF0000item^000000 being"; + mes "delivered, and I'll verify it"; + mes "before letting you inside."; + next; + + input @KHDelivery$; + if (@KHDelivery$ != "Lecollane") { + mes "[Security Guard]"; + mes "You're here to deliver some"; + mes "Wine to...to who? What was"; + mes "the name? I...I don't think"; + mes "we have anybody in the"; + mes "academy named "+@KHDelivery$+""; + close; + } + + input @KHDelivery$ ; + if (@KHDelivery$ != "Culinary Wine") { + mes "[Security Guard]"; + mes "So you're here to make"; + mes "a delivery to Mrs. Lecollane?"; + mes "What is it you've brought for"; + mes "her? Some ^3355FF"+@KHDelivery$+"^000000?"; + next; + mes "[Security Guard]"; + mes "Let me buzz her first,"; + mes "and check to make sure"; + mes "that she's been expecting"; + mes "you. Let's see now..."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Huh. Mrs Lecollane"; + mes "is expecting a delivery,"; + mes "but not the item that you"; + mes "say that you've brought for"; + mes "her. You might want to check"; + mes "to see if there's been a mixup..."; + close; + } + + mes "[Security Guard]"; + mes "Alright...."; + mes "So you're here to"; + mes "deliver a bottle of"; + mes "Wine to Mrs. Lecollane?"; + mes "Let me buzz her, and get"; + mes "this confirmed real quickly."; + next; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[Security Guard]"; + mes "Okay, everything looks"; + mes "good. Mrs. Lecollane"; + mes "has been expecting you."; + mes "I guess you can enter."; + close2; + warp "kh_school",71,155; + end; + + case 2: + mes "[Security Guard]"; + mes "If you don't have"; + mes "an appoointment, then"; + mes "don't loiter around in"; + mes "front of the academy!"; + close; + + } + + } + + else if (KielHyreQuest >= 4) { + mes "[Security Guard]"; + mes "Oh, did you have"; + mes "other business inside"; + mes "the academy? I remember"; + mes "you from before, so there"; + mes "shouldn't be any problems"; + mes "letting you back inside..."; + close2; + warp "kh_school",71,155; + end; + } + +} + +yuno_fild08,158,183,7 duplicate(KHAGuard) Security Guard#2 852 + +//---------------------------------------------------------------------------- +// Gossiping Teenagers/Story NPCs +//---------------------------------------------------------------------------- +kh_school,57,142,7 script Student::StudentKHQ1 893,3,3,{ + mes "[Laci]"; + mes "Oh, wow! We usually"; + mes "don't get visitors on"; + mes "campus! Um, you're not"; + mes "a new faculty member, are you?"; + close; + +OnTouch: + mes "[Laci]"; + mes "Hey, Nesha...!"; + mes "have you heard why"; + mes "Aaci hasn't been coming"; + mes "to class for awhile?"; + next; + mes "[Gui Nesha]"; + mes "That's right, I haven't"; + mes "seen Aaci in awhile."; + mes "Did something happen?"; + next; + mes "[Laci]"; + mes "It's because...."; + mes "Aaci saw a freakin' ghost!"; + mes "It's one hundred percent"; + mes "true! I heard about it from,"; + mes "well, you know, my sources."; + next; + mes "[Gui Nesha]"; + mes "...Wha...?"; + mes "Oh, come on,"; + mes "get outta town."; + close; +} + +kh_school,57,139,1 script Student::StudentKHQ2 893,{ + mes "[Gui Nesha]"; + mes "Aren't we a little"; + mes "old to be talking about"; + mes "this kind of stuff? You"; + mes "know, rumors and ghost"; + mes "stories that make no sense?"; + mes "C'mon, Laci, knock it off!"; + emotion e_swt2; + close; +} + +//---------------------------------------------------------------------------- +// Mrs. Lecollane +//---------------------------------------------------------------------------- +kh_school,176,60,4 script Lady::LadyKHQ 101,{ + if (KielHyreQuest < 2) { + mes "[Mrs. Lecollane]"; + mes "Is there a problem?"; + mes "Outsiders are not allowed to come"; + mes "in here, please leave."; + close; + } + + else if (KielHyreQuest == 2) { + mes "[Mrs. Lecollane]"; + mes "Oh, hello. Ah!"; + mes "have you come to"; + mes "deliver my wine? The"; + mes "security guard called and"; + mes "mentioned you were coming."; + next; + + switch(select("Yes, that's right!","Er, s-sorry!")) { + + case 1: + mes "[Mrs. Lecollane]"; + mes "Well, you've come a little"; + mes "later than I thought, but"; + mes "I suppose it can't be helped."; + mes "I guess the waiting has just"; + mes "heightened my anticipation"; + mes "for this bottle of wi--"; + next; + mes "^3355FF*Cling! Crrrack!*^000000"; + next; + mes "[Mrs. Lecollane]"; + mes "Elly? Elly did you"; + mes "break something again?!"; + mes "You've got to be more careful!"; + mes "If you don't finish baking those"; + mes "cookies by the end of today, your"; + mes "semester grades will suffer!"; + next; + mes "[Elly]"; + mes "B-but I just..."; + next; + mes "[Mrs. Lecollane]"; + mes "^FF0000Elly^000000!!"; + next; + mes "[Elly]"; + mes "......"; + mes "Yes, Mrs. Lecollane."; + next; + mes "[Mrs. Lecollane]"; + mes "*Ahem* Excuse me."; + mes "Would you please leave"; + mes "the wine over there? You"; + mes "may go now, and please"; + mes "don't wander needlessly"; + mes "around the academy."; + delitem 7487,1; + set KielHyreQuest,4; + close; + + case 2: + mes "[Mrs. Lecollane]"; + mes "Hm...?"; + mes "I guess I must"; + mes "be mistaken. I'm"; + mes "sorry, I thought you"; + mes "were somebody else."; + close; + } + return; + } + + else if (KielHyreQuest == 4) { + mes "[Mrs Lecollane]"; + mes "Well, our business is"; + mes "completed, so would you"; + mes "please leave the campus"; + mes "as soon as you can? *Sigh*"; + mes "I can't believe our future"; + mes "is in these girls' hands..."; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly (In school) +//---------------------------------------------------------------------------- +kh_school,179,39,1 script Cute Student 895,{ + cutin "kh_elly01",2; + if (KielHyreQuest < 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "W-wah! Oh...!"; + mes "*Phew* That was close,"; + mes "I almost dropped them"; + mes "again! Why do I have so much"; + mes "trouble handling ingredients?"; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 4) { + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh no, what should"; + mes "I do? *Sob* Wh-what"; + mes "am I going to do? *sniff*"; + next; + switch(select("What happened?","......")) { + + case 1: + mes "[Elly]"; + mes "I...I have to finish baking"; + mes "this batch of cookies by the"; + mes "end of today, but then I spilled"; + mes "all of the ingredients on the"; + mes "floor. I don't know how I can"; + mes "bake those cookies now..."; + next; + switch(select("What can I do to help you?","Oh, I'm so sorry.")) { + + case 1: + L_Accept: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "What was that...?"; + mes "You'll really help"; + mes "me? That's wonderful!"; + mes "Thank you! Thank you so much!"; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, I guess the only way"; + mes "I can bake these cookies is"; + mes "to get some new ingredients."; + mes "I'm sorry to be such a burden,"; + mes "but if you didn't offer to help"; + mes "me, then I'd have no one to ask!"; + next; + mes "[Elly]"; + mes "You don't understand how"; + mes "important it is that I bake"; + mes "these cookies...If I don't"; + mes "finish the assignment, then"; + mes "Mrs. Crank will fail me for"; + mes "the entire semester!"; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Okay, I need to calm"; + mes "down. I think I can do"; + mes "this with your help."; + mes "Would you please do me"; + mes "this huge favor and bring"; + mes "all these ingredients?"; + next; + cutin "kh_elly01",2; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + next; + mes "[Elly]"; + mes "Good luck, getting"; + mes "everything, and I hope"; + mes "you hurry back here with"; + mes "those cookie ingredients"; + mes "as quickly as you can, okay?"; + set KielHyreQuest,6; + goto KH_Elly_end; + + Case 2: + mes "What, you don't go"; + mes "to this school, don't"; + mes "you? Y-you're one of"; + mes "those adventurers, right?"; + next; + switch(select("Yeah, that's right.")) { + + mes "Listen, I know you"; + mes "probably have your own"; + mes "plans, but do you think"; + mes "you can help me with this"; + mes "huge problem that I have?"; + next; + switch(select("Accept","Decline")) { + + case 1: + //Missing text, needs another run through. + goto L_Accept; + + case 2: + mes "["+strcharinfo(0)+"]"; + mes "I'm outta here."; + next; + emotion e_sob; + mes "W-wait...!"; + mes "Come back, you"; + mes "d-don't...! I really"; + mes "need some help!"; + goto KH_Elly_end; + + } + + } + + } + + case 2: + mes "*Sob*..."; + goto KH_Elly_end; + } + + } + + else if (KielHyreQuest == 6) { + //519 - Milk; 548 - Cheese; 7182 - Cacao; 7487 - Culinary_Wine; 7488 - Delivery_Package + if ((countitem(519) < 7) || (countitem(548) < 2) || (countitem(7182) < 5) || (countitem(7487) < 1) || (countitem(7488) < 1)) { + mes "[Elly]"; + mes "Let's see, would you"; + mes "like me to remind you"; + mes "which ingredients I need?"; + mes "Please bring these things as"; + mes "soon as you can so that I can"; + mes "quickly bake some cookies~"; + next; + mes "[Elly]"; + mes "^3355FF1 Wine^000000"; + mes "^3355FF7 Milks^000000"; + mes "^3355FF5 Cacaos^000000"; + mes "^3355FF2 Cheeses^000000"; + mes "^3355FF1 Egg^000000, and"; + mes "^3355FF1 Bag of flour^000000"; + next; + mes "[Elly]"; + mes "Let's see...You can"; + mes "get Wine from the pub in"; + mes "Juno, Cacaos from hunting"; + mes "Yoyos, and you can get flour"; + mes "and Eggs from the girl that"; + mes "runs the Toast Stand in Juno."; + goto KH_Elly_end; + } + else { + emotion e_ho; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Hooray! Finally, I have"; + mes "everything I need! This is"; + mes "great! Oh, would you please"; + mes "give me a moment while I bake"; + mes "these cookies? It shouldn't take"; + mes "long, so hold on just a bit."; + set KielHyreQuest,8; + //KHPubMasterEnd no longer needed-- deleting. + set KHPubMasterEnd,0; + delitem 519,7; //Milk + delitem 548,2; //Cheese + delitem 7182,5; //Cacao + delitem 7487,1; //Culinary_Wine + delitem 7488,1; //Delivery_Package + goto KH_Elly_end; + + } + + } + + else if (KielHyreQuest == 8) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "Tadah! I did it!"; + mes "They're finally done!"; + mes "''Elly's Special Cookies~''"; + mes "I'd like you to have some "; + mes "as a thanks for helping me out"; + next; + mes "[Elly]"; + mes "I'm sorry, but I was so"; + mes "preoccupied with baking"; + mes "these cookies that I didn't"; + mes "even ask for your name. I'm"; + mes "^FF0000Ellyja^000000, but everyone calls me,"; + mes "''Elly.'' What's your name?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "^3355FF"+strcharinfo(0)+"^000000."; + mes "It's ^3355FF"+strcharinfo(0)+"^000000."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes ""+strcharinfo(0)+"?"; + mes "...that name! It's wonderful!"; + set KielHyreQuest,10; + getitem 538,5; //Well_Baked_Cookie + goto KH_Elly_end; + } + + else if (KielHyreQuest == 10) { + cutin "kh_elly01",2; + mes "[Elly]"; + mes "I'm sorry, but I have"; + mes "another favor to ask you"; + mes "if you don't mind helping"; + mes "me out again. Don't worry,"; + mes "you won't have to hurry as"; + mes "quickly as you did last time."; + next; + + switch(select("What do you need?","Sorry, but I'm pretty busy...")) { + + case 1: + mes "[Elly]"; + mes "You know how you helped"; + mes "me bake those cookies?"; + mes "It's the first time I was able"; + mes "to do it without burning them!"; + mes "I just know Grandfather'd"; + mes "be so proud of me!"; + next; + mes "[Elly]"; + mes "I really want Grandfather"; + mes "to taste the cookies I baked,"; + mes "but the cookies will be stale"; + mes "by the time I'm able to leave"; + mes "campus. Would you deliver these"; + mes "cookies to my grandfather for me?"; + next; + + switch(select("Sure","I'm busy.")) { + + case 1: + cutin "kh_elly02",2; + mes "[Elly]"; + mes "Oh, "+strcharinfo(0)+"!"; + mes "Thank you so much, I knew"; + mes "you'd understand! Would you"; + mes "please bring the cookies to"; + mes "him at ^FF0000Kiel Hyre cottage^000000?"; + next; + mes "[Elly]"; + mes "Oh, right! They're really"; + mes "careful about visitors and"; + mes "keeping strangers off the"; + mes "property, but if you mention"; + mes "my name, they'll let you in."; + mes "Alright then, see you~"; + set KielHyreQuest,12; + goto KH_Elly_end; + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + + + case 2: + cutin "kh_elly03",2; + mes "[Elly]"; + mes "Oh, um..."; + mes "okay, I'm sorry to"; + mes "have bothered you..."; + goto KH_Elly_end; + } + } + + else if (KielHyreQuest == 12) { + mes "[Elly]"; + mes "Oh, you don't know where"; + mes "to find Kiel Hyre cottage?"; + mes "It's just north from this"; + mes "academy. Please deliver my"; + mes "cookies to grandfather, and"; + mes "let him know I really miss him."; + goto KH_Elly_end; + + } + + else if (KielHyreQuest == 14) { + mes "[Elly]"; + mes "Hm? Grandfather's not"; + mes "home? That's strange, he"; + mes "didn't mention anything about"; + mes "any business trips. I thought"; + mes "he'd be at home all day..."; + next; + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Would you go back to his"; + mes "cottage once more time? Here,"; + mes "you can use this Cottage Key."; + mes "That way, you can just go"; + mes "inside and talk to him~"; + getitem 7489,1; //Cottage Key + set KielHyreQuest,16; + goto KH_Elly_end; + } + + else if ((KielHyreQuest >= 14) && (KielHyreQuest < 20)) { + mes "[Elly]"; + mes "That's so weird..."; + mes "I thought Grandfather"; + mes "said that he'd be at"; + mes "home all day today..."; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 20) { + mes "[Elly]"; + mes "Hmmm...?"; + mes "What's this,"; + mes "a letter for me?"; + next; + mes "^3355FFElly opened the envelopre^000000"; + mes "^3355FFand started reading the letter^000000"; + next; + mes "Dearest Elly"; + mes "^FFFFFF_^000000"; + mes "I have something to discuss"; + mes "with my son Kiehl, so I am"; + mes "leaving to meet with him."; + mes "If you don't hear from me"; + mes "7 days after I've written"; + mes "it's possible I may be in"; + mes "trouble. Don't trust anyone"; + mes "at the Academy, Elly."; + mes "I've left something for you"; + mes "In the Study."; + next; + cutin "kh_elly03",2; + mes "[Elly]"; + mes "What? oh no, it's been"; + mes "ten days since he wrote"; + mes "this letter! Ah, does this"; + mes "mean that he's in danger?!"; + mes "Oh no, what should I do?"; + delitem 7490,1; //Letter_to_Elly + set KielHyreQuest,22; + goto KH_Elly_end; + } + + else if (KielHyreQuest == 22) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + switch(select("About your grandpa","Tell me about Kiehl","What's with this academy?")) { + + case 1: + mes "[Elly]"; + mes "Oh! My grandfather is"; + mes "Kiel Hyre, founder and"; + mes "CEO of the Kiel Hyre"; + mes "foundation. He looks"; + mes "strict and cold hearted"; + mes "but he's actually very nice!"; + next; + mes "[Elly]"; + mes "We're not related by"; + mes "blood, but he's taken"; + mes "care of me ever since"; + mes "I lost my parents. Oh,"; + mes "Grandpa, where are you?"; + mes "I'm getting so worried!"; + goto KH_Elly_end; + + case 2: + mes "[Elly]"; + mes "Kiehl? That's my"; + mes "grandfather's son..."; + mes "I don't know him that"; + mes "well, and only saw him"; + mes "once at an academy event."; + next; + mes "[Elly]"; + mes "Mmm, he's a good looking"; + mes "guy with pale skin, silver"; + mes "hair, and this cold, fierce"; + mes "stare. A lot of my classmates"; + mes "worship Kiehl because he's"; + mes "also a business genius~"; + next; + mes "[Elly]"; + mes "It's weird though..."; + mes "I have no idea why my"; + mes "grandpa and Kiehl don't"; + mes "get along. They're both"; + mes "really good at what they do."; + goto KH_Elly_end; + + case 3: + mes "[Elly]"; + mes "Well, I know the security"; + mes "here is really tight, but"; + mes "that's because everything"; + mes "here is so luxurious and"; + mes "expensive, you know~"; + next; + mes "[Elly]"; + mes "We also have a very"; + mes "special curriculum where"; + mes "you learn more of what you"; + mes "want. Personally, I want to"; + mes "become a great career woman,"; + mes "like ^3355FFMs. Allysia^000000. Heh heh~"; + next; + mes "[Elly]"; + mes "This place certainly"; + mes "isn't like other schools."; + mes "You already know that only"; + mes "Yeah, everything is made to"; + mes "fit each of the student's needs."; + next; + mes "[Elly]"; + mes "Recently, though?"; + mes "Some really weird stuff"; + mes "has been happening. All of"; + mes "my classmates are afraid of"; + mes "going out alone by themselves."; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "But I'll be okay!"; + mes "You'll be there to"; + mes "rescue me from danger"; + mes "right, "+strcharinfo(0)+"?"; + next; + switch(select("Who is Ms. Allysia?","Strange incidents?")) { + + case 1: + mes "[Elly]"; + mes "Oh, Ms. Allysia is"; + mes "Grandfather's secretary~"; + mes "She's so beautiful, and"; + mes "my grandfather really"; + mes "trusts her with everything!"; + goto KH_Elly_end; + + case 2: + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Well, "+strcharinfo(0)+"..."; + mes "I'm not supposed to tell"; + mes "anyone outside of the school,"; + mes "but I can trust you! You see..."; + mes "We're haunted by a ghost!"; + next; + mes "[Elly]"; + mes "I know it sounds crazy,"; + mes "but this ghost wanders the"; + mes "campus, and curses it's victims,"; + mes "making them so hold and lifeless."; + mes "It happened to my roommate,"; + mes "Mayo. It's like she's a statue."; + next; + mes "[Elly]"; + mes "I snuck into the medical"; + mes "office to see her, and she..."; + mes "She couldn't do anything!"; + mes "What would happen if the"; + mes "ghost decided to curse me?!"; + next; + cutin "kh_elly02",2; + mes "[Elly]"; + mes "You know what...?"; + mes "If I ever got cursed"; + mes "by that ghost, just yell"; + mes "''^FF0000Wake up, Elly!^000000''"; + mes "That'll wake me up for sure!"; + set KielHyreQuest,24; + goto KH_Elly_end; + + } + + } + + } + + else if (KielHyreQuest == 24) { + cutin "kh_elly04",2; + mes "[Elly]"; + mes "Arg, I'm in a fix!"; + mes "I have to finish my"; + mes "homework before it's due!"; + mes "Yeah, I've got to go see"; + mes "Mrs. Lecollane now."; + next; + goto KH_Step26; + } + + else if (KielHyreQuest == 26) { + KH_Step26: + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + set KielHyreQuest,26; + goto KH_Elly_end; + } + + else if (KielHyreQuest > 26) { + mes "[Elly]"; + mes "Say, "+strcharinfo(0)+","; + mes "if it's okay, would you"; + mes "please go find what my"; + mes "grandpa left for me in"; + mes "the ^FF0000cottage study^000000? You're"; + mes "the only one I can trust!"; + next; + mes "[Elly]"; + mes "Anyway, I'll see you later"; + mes "in the evening! Please come"; + mes "by my ^FF0000dorm room^000000. Um, the"; + mes "dorms are in the church just"; + mes "behind the academy, okay?"; + next; + mes "[Elly]"; + mes "My room is in the back,"; + mes "and it's on the ^FF0000second floor^000000"; + mes "^FF0000on the left side^000000. Please use"; + mes "a ladder to come up, okay?"; + mes "I'll leave my window open"; + mes "for you, so just come, okay?"; + next; + mes "[Elly]"; + mes "Hurry, hurry, the"; + mes "teacher's coming!"; + goto KH_Elly_end; + } + + KH_Elly_end: + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Elly's Window +//---------------------------------------------------------------------------- +yuno_fild08,69,185,0 script Window::WindowKHQ1 111,{ + if ((KielHyreQuest <= 28) || (KielHyreQuest >= 46)){ + mes "^3355FFThis must be Elly's room.^000000"; + mes "^3355FFIt doesn't sound like anyone^000000"; + mes "^3355FFis inside, so the probably^000000"; + mes "^3355FFisn't back yet. For now, you^000000"; + mes "^3355FFshould try to find what her^000000"; + mes "^3355FFgrandfather left for her^000000"; + mes "^3355FFin their cottage's study.^000000"; + close; + } + + if (KielHyreQuest >= 30) { + mes "^3355FFThis slightly open window^000000"; + mes "^3355FFmust lead into Elly's room.^000000"; + mes "^3355FFAlthought she asked you to^000000"; + mes "^3355FFfind a ladder to enter her^000000"; + mes "^3355FFwindow, you probably won't^000000"; + mes "^3355FFfind one. You might be able^000000"; + mes "^3355FFto climb up that water pipe...^000000"; + next; + switch(select("Climb Water Pipe","Find Another Way")) { + + case 1: + set @KHClimbAttempt,rand(1,5); + if (@KHClimbAttempt == 1) { + mes "^3355FFYou climbed up the^000000"; + mes "^3355FFwater pipe, and sneaked^000000"; + mes "^3355FFinto Elly's room successfully.^000000"; + close2; + warp "kh_school",185,185; + end; + } + + else { + mes "^3355FFYou tried to climb^000000"; + mes "^3355FFthe water pope, but^000000"; + mes "^3355FFyou ended up failing^000000"; + mes "^3355FFand bumping your head^000000"; + percentheal -10,0; + close; + } + + case 2: + mes "^3355FFThere must be some^000000"; + mes "^3355FFother way to get into^000000"; + mes "^3355FFElly's room, aside from^000000"; + mes "^3355FFclimbing up this water pipe...^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Elly (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,178,180,5 script Elly 895,{ + if (KielHyreQuest <= 30) { + mes "[Elly]"; + mes "Oh~!"; + mes "Who are you!"; + mes "How did you get here? Please leave"; + close2; + percentheal -99,0; + warp "yuno_fild08",100,100; + end; + } + + else if (KielHyreQuest == 32) { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly seems to have^000000"; + mes "^3355FFbeen cursed, and is^000000"; + mes "^3355FFcompletely still and^000000"; + mes "^3355FFlifeless. You've got to^000000"; + mes "^3355FFtry something, but what?^000000"; + next; + + switch(select("Wake her up by shaking.","Wake her up by yelling.","Ignore")) { + + case 1: + mes "^3355FFYou grab Elly by the^000000"; + mes "^3355FFshoulders and try to get^000000"; + mes "^3355FFher to respond by violently^000000"; + mes "^3355FFshaking her entire body.^000000"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Elly? Elly? no!"; + mes "Come back to us!"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + + case 2: + input @KHInput$; + if (@KHInput$ == "Wake up, Elly!") { + mes "[Elly]"; + mes "........."; + mes "^3355FFAs soon as you said those^000000"; + mes "^3355FFwords, a ^000000Small Golden Key^000000"; + mes "^3355FFand a ^000000Button^3355FF drop from Elly's^000000"; + mes "^3355FFhands. It looks like she woke^000000"; + mes "^3355FFup, but only for an instant.^000000"; + getitem 7493,1; //Golden_Key + getitem 7494,1; //Exquisite_Button + set KielHyreQuest,34; + close; + } + + else { + mes "[Elly]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "^3355FFElly's not responding...^000000"; + close; + } + + case 3: + mes "^3355FFAlright.^000000"; + mes "^3355FFBut sooner or later,^000000"; + mes "^3355FFyou should try to break^000000"; + mes "^3355FFthe curse placed on Elly.^000000"; + close; + + } + + } + + else if (KielHyreQuest == 34) { + if (countitem(7491) < 1) { + //Missing text, needs another run through. + mes "^3355FFMaybe the golden key^000000"; + mes "unlocks something in the^000000"; + mes "Cottage. Let's take another look.^000000"; + close; + } + + else { + mes "^3355FFIt looks like Elly's^000000"; + mes "^3355FFGolden Key might fit^000000"; + mes "^3355FFinto the keyhole on the^000000"; + mes "^3355FFGrey Box you found inside^000000"; + mes "^3355FFKiel Hyre's Cottage.^000000"; + next; + mes "^3355FFYou successfully open the^000000"; + mes "^3355FFGrey Box with the Golden Key,^000000"; + mes "^3355FFand find a Blue Keycard, along^000000"; + mes "^3355FFwith a folded note, inside the^000000"; + mes "^3355FFGrey Box. You quickly read^000000"; + mes "^3355FFthe note's contents...^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + getitem 7495,1; //Blue_Keycard + delitem 7491,1; //Iron_Box + set KielHyreQuest,36; + close; + } + + } + + else if (KielHyreQuest >= 36) { + mes "^3355FFThis is where you^000000"; + mes "^3355FFdiscovered the note^000000"; + mes "^3355FFlocked inside the Grey Box.^000000"; + mes "^3355FFThe following message was^000000"; + mes "^3355FFwritten in the note by Elly's^000000"; + mes "^3355FFgrandfather, Kiel Hyre.^000000"; + next; + mes "Dearest Elly,"; + mes "Kiehl finally broke the taboo,"; + mes "and tried to transform you guys"; + mes "into something horrible."; + mes "^FFFFFF_^000000"; + mes "By the time you read this,"; + mes "my life is probably in danger."; + mes "Whether I live depends on you."; + mes "^FFFFFF_^000000"; + mes "You'll already learn if you"; + mes "meet Puppet, but I want to tell"; + mes "you myself: you're not human."; + mes "You'll learn the details if you"; + mes "enter the factory by using the"; + mes "entrance near the grave next"; + mes "to the church. Then, I want"; + mes "you to find Allysia inside"; + mes "the factory's secret room."; + mes "I've registered your name in"; + mes "her security system, so don't"; + mes "worry. Hopefully, Allysia will"; + mes "then come to save me..."; + mes "^FFFFFF_^000000"; + mes "Sorry about that,"; + mes "Grandpa"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cookie Basket +//---------------------------------------------------------------------------- +kh_school,175,175,0 script Cookie Basket 111,{ + if (KielHyreQuest == 30) { + mes "^3355FFThis must be^000000"; + mes "^3355FFElly's cookie basket.^000000"; + mes "^3355FFThere appears to be^000000"; + mes "^3355FFa folded note wedged^000000"; + mes "^3355FFbetween the cookies.^000000"; + next; + + switch(select("Read Note","Ignore")) { + + case 1: + mes ""+strcharinfo(0)+", help!"; + mes "There's this guy dressed in"; + mes "black who;s walking around,"; + mes "and casting this weird spell!"; + mes "He's the one that's been making"; + mes "people cold and lifeless as"; + mes "puppets! I'm getting scared!"; + mes "^FFFFFF_^000000"; + mes "I hope you get this note..."; + mes "He ran after me, but I locked"; + mes "myself in my room. I'm going"; + mes "to leave my window open so that"; + mes "you can still find me. I hope he"; + mes "doesn't cast his curse on me!"; + set KielHyreQuest,32; + close; + + case 2: + mes "^3355FFThat note probably^000000"; + mes "^3355FFwasn't written just^000000"; + mes "^3355FFfor you, anyway.^000000"; + close; + + } + } + + else if (KielHyreQuest >= 32) { + mes "^3355FFThese cookies aren't^000000"; + mes "^3355FFstale yet, but they're no^000000"; + mes "^3355FFlonger warm. If they're^000000"; + mes "^3355FFnot room temperature,^000000"; + mes "^3355FFthen they're a little cold.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Elly's Window (In Dormitory) +//---------------------------------------------------------------------------- +kh_school,188,185,0 script Window::WindowKHQ2 111,{ + warp "yuno_fild08",69,183; + end; +} + +//---------------------------------------------------------------------------- +// Grave/Kiel Hyre dungeon entry +//---------------------------------------------------------------------------- +yuno_fild08,72,170,0 script Grave 111,{ + if (KielHyreQuest < 36) { + //Missing text, needs another run through. + mes "^3355FFIt's just a grave.^000000"; + mes "^3355FFIt might be important^000000"; + mes "^3355FFto you later, but now^000000"; + mes "^3355FFit's not really all that^000000"; + mes "^3355FFhelpful to you.^000000"; + close; + } + + else if (KielHyreQuest == 36) { + if (countitem(7492) < 1) { + + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + close; + } + + else { + mes "^3355FFThere's a secret door^000000"; + mes "^3355FFnear this grave. It looks^000000"; + mes "^3355FFlike there's some kind of^000000"; + mes "^3355FFslot and a number pad^000000"; + mes "^3355FFinstalled on the door.^000000"; + next; + mes "^3355FFWhat should you^000000"; + mes "^3355FFinsert into the slot?^000000"; + next; + + input @KHInput$; + + if (@KHInput$ == "Yellow Keycard") { + mes "^3355FFAn electronic confirmation^000000"; + mes "^3355FFchime sounds once you insert^000000"; + mes "^3355FFthe Yellow Keycard, followed by^000000"; + mes "^3355FFan automated voice that asks:^000000"; + next; + mes "[Security System]"; + mes "Please enter the password."; + next; + + input @KHInput$; + + next; + + if (@KHInput$ == "4772961") { + mes "[Security System]"; + mes "Password confirmed."; + mes "Welcome, Kiel Hyre."; + next; + mes "^3355FFYou hear another^000000"; + mes "^3355FFpleasant beep, and^000000"; + mes "^3355FFa secret path opens.^000000"; + set KielHyreQuest,38; + close; + } + + else { + mes "[Security System]"; + mes "Incorrect password."; + mes "Please try again."; + close; + } + } + + else { + mes "^3355FFWhatever you're trying^000000"; + mes "^3355FFto insert into the slot^000000"; + mes "^3355FFisn't working at all...^000000"; + close; + } + + } + + } + + else if ((KielHyreQuest >= 38) && (KielHyreQuest < 106)) { + mes "^3355FFThe door to the^000000"; + mes "^3355FFfactory is wide open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + + } + + else if (KielHyreQuest >= 106) { + if (countitem(7509) < 1) { + mes "^3355FFThe secret entrance"; + mes "has now been sealed.^000000"; + close; + } + + else { + mes "As you aproach the"; + mes "grave, it begins to"; + mes "emit flashes of light.^000000"; + next; + + switch(select("Use the ^0000FFLuxurious Keycard^000000","Ignore")) { + + case 1: + mes "Once you use the"; + mes "Luxurious Keycard,"; + mes "a secret path opens^000000"; + next; + + switch(select("Enter","cancel")) { + + case 1: + warp "kh_dun01",3,230; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + + } + + } + + } + +} + +//============================================================================ + +//============================================================================ +//Kiel Hyre Cottage NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Cottage Keeper +//---------------------------------------------------------------------------- +yuno_fild02,93,210,3 script Cottage Keeper 85,{ + if ((KielHyreQuest < 12) || (KielHyreQuest > 12)) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + close; + } + + else if (KielHyreQuest == 12) { + mes "[Cottage Keeper]"; + mes "This is private property,"; + mes "so please do not enter this"; + mes "area unless you're authorized."; + next; + + switch(select("I have an apointment with Kiel Hyre.","Alright.")) { + + case 1: + mes "[Cottage Keeper]"; + mes "You have an"; + mes "appointment with"; + mes "Master Kiel Hyre?"; + mes "Um, are you sure?"; + next; + switch(select("Yes","No")) { + + case 1: + mes "[Cottage Keeper]"; + mes "There must be some sort"; + mes "of mistake. Mister Hyre"; + mes "wouldn't have left if he"; + mes "was suposed to keep"; + mes "an appointment..."; + set KielHyreQuest,14; + close; + + case 2: + mes "[Cottage Keeper]"; + mes "Well unless you have"; + mes "an appointment, I don't"; + mes "think you'll be able to"; + mes "meet with Mister Hyre."; + close; + } + + case 2: + mes "[Cottage Keeper]"; + mes "Goodbye."; + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (left) +//---------------------------------------------------------------------------- +yuno_fild02,75,218,0 script Door::DoorKHQ1 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest == 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Unlock","Cancel")) { + + case 1: + mes "^3355FFYou unlock the door with the.^000000"; + mes "^3355FFkey that Elly gave you, and.^000000"; + mes "^3355FFas you push it open, a folded.^000000"; + mes "^3355FFnote dropped from the top of the.^000000"; + mes "^3355FFdoor. The following words.^000000"; + mes "^3355FFare written on this crude note.^000000"; + next; + mes "6 Forward,"; + mes "3 Left,"; + mes "3 Forward,"; + mes "4 Left"; + close2; + set KielHyreQuest,18; + warp "kh_vila",188,18; + end; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } + + if (KielHyreQuest >= 18) { + mes "^3355FFThe door is open.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",188,18; + end; + + case 2: + close; + } + } +} + +//---------------------------------------------------------------------------- +// Cottage Door (Right) +//---------------------------------------------------------------------------- +yuno_fild02,109,218,0 script Door::DoorKHQ2 111,{ + if (KielHyreQuest < 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + close; + } + + if (KielHyreQuest >= 16) { + mes "^3355FFThis door is locked.^000000"; + mes "^3355FFIf someone inside won't^000000"; + mes "^3355FFopen it for you, then you'll^000000"; + mes "^3355FFneed the right key to unlock it.^000000"; + next; + + switch(select("Open","Cancel")) { + + case 1: + mes "^3355FFYou don't have^000000"; + mes "^3355FFthe key that can^000000"; + mes "^3355FFunlock this door.^000000"; + close; + + case 2: + mes "......"; + mes "........."; + mes "............"; + close; + } + } +} + + +//---------------------------------------------------------------------------- +// Store room interior; Wall +//---------------------------------------------------------------------------- +kh_vila,191,14,0 script Wall 111,{ + if (KielHyreQuest < 28) { + mes "^3355FFIt's just a wall.^000000"; + mes "^3355FFIt's not particularly^000000"; + mes "^3355FFstanding in your way.^000000"; + close; + } + + if (KielHyreQuest >= 28) { + mes "^3355FFThe wall is now^000000"; + mes "^3355FFopen, revealing^000000"; + mes "^3355FFa secret path.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",17,177; + end; + + case 2: + close; + } + + } + +OnOpenDoor: + misceffect 316; + end; +} + +//---------------------------------------------------------------------------- +// Store room interior; books +//---------------------------------------------------------------------------- +kh_vila,184,20,0 script Book#1::BookKHQ1 111,{ + if ((KielHyreQuest < 26) || (KielHyreQuest > 26)) { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + else if (KielHyreQuest == 26) { + if (rand(1,10) == 8) { + mes "^3355FFWithout thinking, you^000000"; + mes "^3355FFreach for a book from^000000"; + mes "^3355FFthe bookshelf. As you^000000"; + mes "^3355FFpull it toward you, the^000000"; + mes "^3355FFwall slides open to^000000"; + mes "^3355FFreveal a secret path.^000000"; + donpcevent "Wall::OnOpenDoor"; + set KielHyreQuest,28; + close; + } + + else { + mes "^3355FFThis bookshelf is^000000"; + mes "^3355FFcrammed with many^000000"; + mes "^3355FFlarge, hardcover books^000000"; + close; + } + + } + +} + +kh_vila,181,20,0 duplicate(BookKHQ1) Book#2::BookKHQ2 111 + +kh_vila,178,20,0 duplicate(BookKHQ1) Book#3::BookKHQ3 111 + +kh_vila,175,19,0 duplicate(BookKHQ1) Book#4::BookKHQ4 111 + +//---------------------------------------------------------------------------- +// Store room interior; Letter to Elly on the floor. +//---------------------------------------------------------------------------- +kh_vila,179,11,0 script KH_Letter_Trigger -1,2,2,{ +OnTouch: + if (KielHyreQuest == 18) { + mes "^3355FFYou've found a letter^000000"; + mes "^3355FFon the floor. Naturally,^000000"; + mes "^3355FFyou pick i up, despite^000000"; + mes "^3355FFthe fact that it's not^000000"; + mes "^3355FFaddressed to you.^000000"; + getitem 7490,1; //Letter to Elly + set KielHyreQuest,20; + close; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Box (Pet Food vending machine) +//---------------------------------------------------------------------------- +kh_vila,16,175,0 script Box::BoxKHQ1 111,{ + mes "^FFFFFF##^000000*Tasty-Nutricious-Delicious*"; + mes "*Cute Pet Doof Vending Machine*"; + mes "The best food for your Cute Pets"; + mes "that is superior to the Pet Food"; + mes "you can buy in the market!"; + mes "^FFFFFF_^000000"; + mes "Price: 1,100 zeny (cheap!)"; + next; + + switch(select("Buy!","Cancel")) { + + case 1: + mes "^3355FF1,100 zeny seems kind"; + mes "^3355FFor expensive for Pet Food,"; + mes "^3355FFbut if it's better t han the"; + mes "^3355FFnormal stuff, it might"; + mes "^3355FFbe worth a shot."; + next; + if (zeny < 1100) { + //Adlibbed dialog. Need weight check, too. + mes "^3355FFYou don't have enough zeny...^000000"; + close; + } + else { + mes "^3355FFOh no...!^000000"; + mes "^3355FFThere's nothing^000000"; + mes "^3355FFspecial about it^000000"; + mes "^3355FFat all! It's just^000000"; + mes "^3355FFnormal Pet Food!^000000"; + set zeny,zeny-1100; + getitem 537,1; + close; + } + + case 2: + mes "^3355FFThis vending machine^000000"; + mes "^3355FFseems really shady and^000000"; + mes "^3355FFsuspicious for some reason^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Apple Box (Useless?) +//---------------------------------------------------------------------------- +kh_vila,30,184,0 script Apple Box 111,{ + mes "^3355FFYou find a box filled with^000000"; + mes "^3355FFripe, delicious apples.^000000"; + next; + + switch(select("Take the box","Leave it")) { + + case 1: + mes "^3355FFNo...! Wait!^000000"; + mes "^3355FFSomething's wrong!^000000"; + mes "^3355FFWhatever you do,^000000"; + mes "^3355FFdon't take this box!^000000"; + next; + mes "^3355FFAnd so, your inner^000000"; + mes "^3355FFvoice, your Jungian^000000"; + mes "^3355FFshadow if you will,^000000"; + mes "^3355FFprevented you from^000000"; + mes "^3355FFtaking the box.^000000"; + close; + + case 2: + mes "^3355FFSomething is wrong^000000"; + mes "^3355FFwith this box of apples.^000000"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, dining room; Map +//---------------------------------------------------------------------------- +kh_vila,44,126,0 script Map 111,{ + if ((KHCottagePoem1 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFA magnificent world map,^000000"; + mes "^3355FFdetailing the Rune-Midgarts^000000"; + mes "^3355FFKingdom, Schwaltzvalt Republic,^000000"; + mes "^3355FFas well as another country to the^000000"; + mes "^3355FFWest whose name is unfamiliar^000000"; + mes "^3355FFto you, is pasted to this wall.^000000"; + next; + mes "^3355FFAs you examine the^000000"; + mes "^3355FFworld map more closely,^000000"; + mes "^3355FFyou find that something has^000000"; + mes "^3355FFbeen hidden underneath it.^000000"; + next; + + switch(select("ignore","Examine")) { + + case 1: + mes "^3355FFWhatever might be^000000"; + mes "^3355FFhidden beneath this^000000"; + mes "^3355FFmap probably isn't^000000"; + mes "^3355FFimportant enough for^000000"; + mes "^3355FFyou to investigate.^000000"; + close; + + case 2: + mes "^3355FFUnfortunately, you can't^000000"; + mes "^3355FFsee what's under the map^000000"; + mes "^3355FFsince it's pasted to the wall.^000000"; + mes "^3355FFYou'll need to find some^000000"; + mes "^3355FFway to loosen the blue^000000"; + mes "^3355FFwithout damaging the map.^000000"; + set KHCottagePoem1,1; + close; + + } + + } + + else if ((KHCottagePoem1 == 2) && (KielHyreQuest < 30)) { + mes "^3355FFYou bring the pot of^000000"; + mes "^3355FFsteaming hot liquid^000000"; + mes "^3355FFclose to the world map.^000000"; + mes "^3355FFAs the paste on the wall^000000"; + mes "^3355FFmoistens, the map slowly^000000"; + mes "^3355FFbegins to peel back.^000000"; + next; + mes "^3355FFThe peelnig map revealed^000000"; + mes "^3355FFa folded piece of paper^000000"; + mes "^3355FFhidden beneath it. You^000000"; + mes "^3355FFtake the paper, and smooth^000000"; + mes "^3355FFthe map out to adhere it to^000000"; + mes "^3355FFthe wall once again. A message is^000000"; + mes "^3355FFwritten on the piece of paper.^000000"; + next; + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparent as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + set KHCottagePoem1,3; + close; + } + + else if ((KHCottagePoem1 > 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you found^000000"; + mes "^3355FFthe paper on which the^000000"; + mes "^3355FFpoem was written. Perhaps^000000"; + mes "^3355FFit would be a good idea to^000000"; + mes "^3355FFrefresh your memory and^000000"; + mes "^3355FFread that that poem again.^000000"; + next; + + switch(select("Read","Cancel")) { + + case 1: + mes "^808080She will be in a place^000000"; + mes "^808080as cold as the poles.^000000"; + mes "^808080When the well is dried^000000"; + mes "^808080and the earth is cracked,^000000"; + mes "^808080the path to her heart, a^000000"; + mes "^808080heart as transparant as^000000"; + mes "^808080crystal, will be open.^000000"; + next; + mes "^808080I'll have to fight four^000000"; + mes "^808080snakes with four swords^000000"; + mes "^808080to find her. The first sword^000000"; + mes "^808080is love. The second sword^000000"; + mes "^808080is despair. The third sword^000000"; + mes "^808080is rage. The fourth sword is^000000"; + mes "^808080hope. To find her, to rescue her.^000000"; + next; + mes "^3355FF......................^000000"; + mes "^3355FFThe deeper meaning^000000"; + mes "^3355FFof this poem, if it even^000000"; + mes "^3355FFexists, eludes you.^000000"; + close; + + case 2: + mes "^3355FFThere's no need for^000000"; + mes "^3355FFyou to reread this poem.^000000"; + mes "^3355FFYou're a freakin' genius!^000000"; + close; + + } + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, kitchen; Pot +//---------------------------------------------------------------------------- +kh_vila,33,184,0 script Pot 111,{ + if (KHCottagePoem1 < 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + close; + } + + else if (KHCottagePoem1 == 1) { + mes "^3355FFYou've found a pot^000000"; + mes "^3355FFfilled with boiling^000000"; + mes "^3355FFsteaming liquid.^000000"; + mes "^3355FFSteam... That you could^000000"; + mes "^3355FFuse to loosen the glue on^000000"; + mes "^3355FFthe map... You're a genius!^000000"; + next; + + switch(select("Try it.","That? That won't work!")) { + + case 1: + mes "^3355FFYou picked up the^000000"; + mes "^3355FFboiling pot, but^000000"; + mes "^3355FFslightly burned your^000000"; + mes "^3355FFhands on accident.^000000"; + set KHCottagePoem1,2; + close; + + case 2: + mes "^3355FFNo, no...^000000"; + mes "^3355FFWe'd better try^000000"; + mes "^3355FFsomething else.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 1) || (KielHyreQuest >= 30)){ + mes "^3355FFThis is where you^000000"; + mes "^3355FFpicked up the pot filled^000000"; + mes "^3355FFwith steaming liquid.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, fire place; Calabash +//---------------------------------------------------------------------------- +kh_vila,14,55,0 script Calabash 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFIt's an expensive^000000"; + mes "^3355FFlooking calabash--^000000"; + mes "^3355FFor in less fancy^000000"; + mes "^3355FFwords, a 'gourd.'^000000"; + mes "^3355FFWhat do you do?^000000"; + next; + + switch(select("Break Open Calabash","Look Inside Calabash","ignore")) { + + case 1: + mes "^3355FFYou can't break^000000"; + mes "^3355FFopen that calabash...^000000"; + mes "^3355FFYou're a hero, not a vandal.^000000"; + mes "^3355FFNow, if this act of vandalisim^000000"; + mes "^3355FFcan be considered an act of^000000"; + mes "^3355FFheroisim, then it'd be okay.^000000"; + close; + + case 2: + mes "^3355FFYou tenderly place^000000"; + + mes "^3355FFyour hand into the^000000"; + mes "^3355FFcalabash, and gently^000000"; + mes "^3355FFfeel around with your^000000"; + mes "^3355FFfingers until you retrieve^000000"; + mes "^3355FFan Old Bronze Key^000000"; + getitem 7329,1; //Old_Bronze_Key + close; + + case 3: + mes "^3355FFThere's probably^000000"; + mes "^3355FFnothing inside anyway^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the expensive^000000"; + mes "^3355FFlooking calabash from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe Old Bronze Key.^000000"; + mes "^3355FFIt's useless to you now.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, garden; Pool +//---------------------------------------------------------------------------- +kh_vila,39,41,0 script pool 111,{ + if ((KHCottagePoem1 < 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + close; + } + + else if ((KHCottagePoem1 == 3) && (KielHyreQuest < 30)) { + mes "^3355FFYou find a fancy pool^000000"; + mes "^3355FFfilled with fresh water.^000000"; + mes "^3355FFalong with a conscpicuous^000000"; + mes "^3355FFlion statue with two handles^000000"; + next; + + switch(select("Pull handles","cancel")) { + + case 1: + mes "Which handle would^000000"; + mes "you like to pull first?^000000"; + next; + + switch(select("Right Handle","Left Handle")) { + + case 1: + mes "^3355FFYou pull the right^000000"; + mes "^3355FFhandle, causing water^000000"; + mes "^3355FFto gush from the lion's^000000"; + mes "^3355FFmouth. It looks pretty cool~^000000"; + close; + + case 2: + mes "^3355FFAs soon as you pull the^000000"; + mes "^3355FFleft handle, the water in^000000"; + mes "^3355FFthe pool drains away. The^000000"; + mes "^3355FFpool empties, and you can^000000"; + mes "^3355FFsee a later of green moss^000000"; + mes "^3355FFcovering the pool's bottom.^000000"; + next; + + switch(select("Ignore","Investigate")) { + + case 1: + mes "^3355FFyou decide that^000000"; + mes "^3355FFa pool is little more^000000"; + mes "^3355FFthan a hole without^000000"; + mes "^3355FFany water to fill it.^000000"; + close; + + case 2: + mes "^3355FFAs you look through^000000"; + mes "^3355FFthe wet moss at the^000000"; + mes "^3355FFbottom of the pool,^000000"; + mes "^3355FFyou stumble upon a^000000"; + mes "^3355FFsmall, peculliar button.^000000"; + next; + + switch(select("Press button","Don't Press Button")) { + + case 1: + mes "^3355FFYou press the button^000000"; + mes "^3355FFwhich seems to trigger^000000"; + mes "^3355FFa strange sound coming^000000"; + mes "^3355FFfrom the stairs at the hallway.^000000"; + set KHCottagePoem1,4; + close; + + case 2: + mes "^3355FFYou'd better not push^000000"; + mes "^3355FFthis button. Your enemies^000000"; + mes "^3355FFmust have hidden it carefully^000000"; + mes "^3355FFfor you to find. It must be^000000"; + mes "^3355FFsome sort of nefarious trap.^000000"; + close; + + } + + } + + } + + case 2: + mes "^3355FFYou decided not^000000"; + mes "^3355FFto pull and handles.^000000"; + close; + + } + + } + + else if ((KHCottagePoem1 > 3) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you pressed^000000"; + mes "^3355FFthe small button that caused^000000"; + mes "^3355FFsome strange noise to come^000000"; + mes "^3355FFfrom the stairs near the wallway.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Vicious Dog +//---------------------------------------------------------------------------- +kh_vila,181,178,4 script Vicious Dog 81,7,3,{ +OnTouch: + mes "*Grrr~*"; + next; + mes "^3355FFAn extremely vicious^000000"; + mes "^3355FFlooking dog is glaring^000000"; + mes "^3355FFat you. Can you really^000000"; + mes "^3355FFpass by this creature^000000"; + mes "^3355FFwithout getting hurt?^000000"; + next; + + switch(select("March forward","Run away")) { + + case 1: + if (countitem(537) >= 1) { + mes "^3355FFWait! Perhaps you can^000000"; + mes "^3355FFuse food to soothe the^000000"; + mes "^3355FFsavage beast! Why don't^000000"; + mes "^3355FFyou feed it some of your Pet^000000"; + mes "^3355FFFood and see what happens?^000000"; + next; + + switch(select("Give pet Food","It won't work!")) { + + case 1: + mes "^3355FFYou gingerly throw the^000000"; + mes "^3355FFPet Food towards the dog.^000000"; + mes "^3355FFIts tail shakes violently as^000000"; + mes "^3355FFit devours the food. You'd^000000"; + mes "^3355FFbetter pass this dog now^000000"; + mes "^3355FFwhile you have the chance!^000000"; + delitem 537,1; //Pet_Food + close2; + warp "kh_vila",173,182; + end; + + case 2: + NoPetFood: + mes "^3355FFYou slowly approach^000000"; + mes "^3355FFthe dog, but it won't^000000"; + mes "^3355FFstop snarling at you.^000000"; + mes "^3355FFYou try to run past the^000000"; + mes "^3355FFdog, but it blocks all of^000000"; + mes "^3355FFyour moves. What to do?^000000"; + next; + mes "[Vicious Dog]"; + mes "BOW WOW!"; + mes "BOW WOW!"; + mes "BOW WOW WOW!"; + next; + mes "^3355FFThe dog chases you^000000"; + mes "^3355FFdownstairs like the^000000"; + mes "^3355FFsuckah chump you are^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + } + + else { + goto NoPetFood; + } + + case 2: + mes "^3355FFLet's get out of here!^000000"; + close2; + warp "kh_vila",126,70; + end; + + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Drawer, first room nightstand +//---------------------------------------------------------------------------- +kh_vila,115,186,0 script Drawer::DrawerKHQ1 111,{ + if ((countitem(7492) < 1) && (KielHyreQuest < 36)) { + mes "^3355FFyou find an old drawer^000000"; + mes "^3355FFthat has been closed.^000000"; + mes "^3355FFIf you open it, then you^000000"; + mes "^3355FFmight find something^000000"; + mes "^3355FFinside. Or could it be^000000"; + mes "^3355FFempty. Who knows?^000000"; + next; + + switch(select("Open Drawer","Ignore")) { + + case 1: + mes "^3355FFYou obtain a Yellow^000000"; + mes "^3355FFKeycard from inside the^000000"; + mes "^3355FFdrawer. Opening that drawer^000000"; + mes "^3355FFturned out to be worthwhile.^000000"; + getitem 7492,1; //Yellow_Keycard + close; + + case 2: + mes "^3355FFForget opening that^000000"; + mes "^3355FFdrawer. I mean, come on,^000000"; + mes "^3355FFwhat would be the point?^000000"; + close; + } + } + + else { + mes "^3355FFThis is where you^000000"; + mes "^3355FFfound the Yellow Keycard.^000000"; + mes "^3355FFThis drawer is now empty.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Box +//---------------------------------------------------------------------------- +kh_vila,107,126,0 script Box::BoxKHQ2 111,{ + if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + close; + } + + else if ((countitem(7329) >= 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) { + mes "^3355FFA solid box is laid^000000"; + mes "^3355FFon the floor in which^000000"; + mes "^3355FFa smaller, locked box^000000"; + mes "^3355FFhas been placed inside.^000000"; + mes "^3355FFperhaps you can use your^000000"; + mes "^3355FFOld Bronze Key to unlock it.^000000"; + next; + + switch(select("Use Old Bronze Key","No, it'll never work.")) { + + case 1: + mes "^3355FFYour hunch paid off!^000000"; + mes "^3355FFThe Old Bronze Key really^000000"; + mes "^3355FFdid unlock that box! You^000000"; + mes "^3355FFopen the inner box and^000000"; + mes "^3355FFobtain the Green Keycard^000000"; + mes "^3355FFthat was locked inside.^000000"; + getitem 7516,1; + delitem 7329,1; + close; + + + case 2: + mes "^3355FFWhat...?^000000"; + mes "^3355FFWhat? Using a key^000000"; + mes "^3355FFto unlock a lock?^000000"; + mes "^3355FFCome on, that's^000000"; + mes "^3355FFfreakin' crazy talk.^000000"; + close; + + } + + } + + else { + mes "^3355FFThis is the box from^000000"; + mes "^3355FFwhich you obtained^000000"; + mes "^3355FFthe green keycard.^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Bookshelf. +//---------------------------------------------------------------------------- +kh_vila,181,138,0 script Bookshelf::BookshelfKHQ1 111,{ + if ((countitem(7491) < 1) && (countitem(7516) >= 1)) { + mes "^3355FFOne of the books on^000000"; + mes "^3355FFthis crammed bookshell^000000"; + mes "^3355FFis labeled with the note,^000000"; + mes "^3355FF'To Elly.' It must have been^000000"; + mes "^3355FFleft behind by her grandfather^000000"; + next; + switch(select("Examine Book","Ignore")) { + + case 1: + mes "^3355FFYou skim through the^000000"; + mes "^3355FFbook's pages, and don't^000000"; + mes "^3355FFfind anything particularly^000000"; + mes "^3355FFinteresting. However, you^000000"; + mes "^3355FFnotice a steel surface behind the^000000"; + mes "^3355FFshelf as you place the book back.^000000"; + next; + + switch(select("Examine The steel surface","Ignore")) { + + case 1: + mes "^3355FFYou remove more of the^000000"; + mes "^3355FFself's books to reveal^000000"; + mes "^3355FFthat the steel surface is^000000"; + mes "^3355FFpart of a safe hidden behind^000000"; + mes "^3355FFthe bookshelf. There are two^000000"; + mes "^3355FFkeyholes on the steel safe.^000000"; + next; + + switch(select("Try all your keys","Cancel")) { + + case 1: + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe first keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHFirstKeyhole,1; + break; + + case 2: + set @KHFirstKeyhole,2; + break; + + } + + mes "^3355FFWhich key will^000000"; + mes "^3355FFyou insert into^000000"; + mes "^3355FFthe second keyhole?^000000"; + next; + + switch(select("Green keycard","Cottage Key")) { + + case 1: + set @KHSecondKeyhole,1; + break; + + case 2: + set @KHSecondKeyhole,2; + break; + + } + + if (@KHFirstKeyhole == 2) && (@KHSecondKeyhole == 1) { + mes "^3355FFThe safe opens with^000000"; + mes "^3355FFa click and you see^000000"; + mes "^3355FFa Grey Box inside.^000000"; + mes "^3355FFYou take the Grey Box^000000"; + mes "^3355FFwith you, hoping that^000000"; + mes "^3355FFwill come in handy later.^000000"; + delitem 7489,1; //Cottage Key + delitem 7516,1; //Green_Keycard + getitem 7491,1; //Iron_Box + close; + } + + else { + mes "^3355FFThe safe won't open.^000000"; + close; + } + + case 2: + mes "^3355FFIt's probably a better^000000"; + mes "^3355FFidea to investigate the^000000"; + mes "^3355FFcottage for the keys that^000000"; + mes "^3355FFwill open up this safe...^000000"; + close; + + } + + case 2: + mes "^3355FFYou place the books^000000"; + mes "^3355FFback on the bookchelf.^000000"; + close; + + } + + case 2: + mes "^3355FFYou can probably^000000"; + mes "^3355FFfind better clues^000000"; + mes "^3355FFsomewhere else^000000"; + mes "^3355FFaround here.^000000"; + close; + + } + } + + else { + end; + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Desk +//---------------------------------------------------------------------------- +kh_vila,118,143,0 script Desk::DeskKHQ1 111,{ + if (KHCottagePoem2 < 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books stacked on top^000000"; + mes "^3355FFof the desk covering topics^000000"; + mes "^3355FFlike artificial power, Sage^000000"; + mes "^3355FFVarmundt's research, factory^000000"; + mes "^3355FFrobotization, and magic scrolls...^000000"; + next; + mes "^3355FFWhile rummaging around through^000000"; + mes "^3355FFthe books and paper, you^000000"; + mes "^3355FFfind a piece of paper with^000000"; + mes "^3355FFthe Kiel Hyre Foundation's^000000"; + mes "^3355FFofficial seal. You decide that^000000"; + mes "^3355FFit might come in handy someday.^000000"; + next; + mes "^3355FFYou've obtained^000000"; + mes "^3355FFa blank piece of^000000"; + mes "^3355FFpaper with the Kiel^000000"; + mes "^3355FFHyre Foundation seal.^000000"; + set KHCottagePoem2,1; + close; + } + + else if (KHCottagePoem2 >= 1) { + mes "^3355FFThere are piles of papers^000000"; + mes "^3355FFand books, covering various^000000"; + mes "^3355FFscientific and magic tomics,^000000"; + mes "^3355FFstacked on top of this desk.^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, upstairs; Medicine Chest +//---------------------------------------------------------------------------- +kh_vila,123,170,0 script Medicine Chest 111,{ + if ((KHCottagePoem2 < 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + close; + } + + else if ((KHCottagePoem2 == 1) && (KielHyreQuest < 30)) { + mes "^3355FFThis medicine cabinet^000000"; + mes "^3355FFis filled with bottles of^000000"; + mes "^3355FFvarious colors. What kind^000000"; + mes "^3355FFof medicine can be found here?^000000"; + next; + mes "^3355FFWait, you have a blank piece^000000"; + mes "^3355FFof paper with the Kiel Hyre^000000"; + mes "^3355FFFoundation seal! It's strange^000000"; + mes "^3355FFthat the seal was put on a blank^000000"; + mes "^3355FFpiece of paper. Maybe something^000000"; + mes "^3355FFis written on it with special ink?^000000"; + next; + mes "^3355FFIt's a crazy hunch, but^000000"; + mes "^3355FFmaybe, just maybe, you can^000000"; + mes "^3355FFuse something inside this^000000"; + mes "^3355FFmedicine cabinet that will^000000"; + mes "^3355FFreveal any invisible ink^000000"; + mes "^3355FFwritten on this document!^000000"; + next; + + switch(select("What? That's crazy!","Of course! Let's try it!")) { + + case 1: + mes "^3355FFSorry.^000000"; + mes "^3355FFI thought it^000000"; + mes "^3355FFwas a good idea...^000000"; + close; + + case 2: + switch(select("Try Red Liquid","Try Blue Liquid","Try Yellow Liquid","Try Green Liquid","Cancel")) { + + case 1: + set @KHPotionColor$,"red"; + break; + + case 2: + mes "^3355FFIt works!^000000"; + mes "^3355FFThe blue liquid is^000000"; + mes "^3355FFrevealing small^000000"; + mes "^3355FFtext written on the paper.^000000"; + mes "^3355FFIt looks like some^000000"; + mes "^3355FFkind of long poem...^000000"; + next; + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle"; + mes "lost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + next; + mes "^3355FFThis is a very^000000"; + mes "^3355FFstrange poem. What^000000"; + mes "^3355FFcould it possibly mean?^000000"; + set KHCottagePoem2,2; + close; + + case 3: + set @KHPotionColor$,"yellow"; + break; + + case 4: + set @KHPotionColor$,"green"; + break; + + case 5: + mes "^3355FFNever mind.^000000"; + mes "^3355FFThis idea sounds^000000"; + mes "^3355FFtoo crazy to work...^000000"; + mes "^3355FFlike putting a man^000000"; + mes "^3355FFpn the moon. Can you^000000"; + mes "^3355FFbelieve that hogwash?^000000"; + close; + } + + mes "^3355FFYou tried sprinking^000000"; + mes "^3355FFthe "+@KHPotionColor$+" liquid from the^000000"; + mes "^3355FFmedicine cabinet onto^000000"; + mes "^3355FFthe blank paper with the^000000"; + mes "^3355FFKiel Hyre Foundation seal.^000000"; + mes "^3355FFHowever, nothing happened...^000000"; + close; + + } + } + + else if ((KHCottagePoem2 >= 2) || (KielHyreQuest >= 30)) { + mes "^3355FFThis is where you poured^000000"; + mes "^3355FFsome blue liquid to read^000000"; + mes "^3355FFa poem written in invisible^000000"; + mes "^3355FFink on a blank poece of paper^000000"; + mes "^3355FFwith the Kiel Hyre Foundation^000000"; + mes "^3355FFseal. Would you like to read it?^000000"; + next; + + switch(select("No time!","Read")) { + + case 1: + mes "^3355FFYou're running out of^000000"; + mes "^3355FFtime! For now, it would^000000"; + mes "^3355FFbe best for you to seach^000000"; + mes "^3355FFevery inch of the cottage.^000000"; + close; + + case 2: + mes "[Poem]"; + mes "The first snake is made of"; + mes "steel, but I used my rage"; + mes "to destroy it. The second"; + mes "snake is made of magic,"; + mes "but my love pierced its heart."; + next; + mes "[Poem]"; + mes "The third snake is flesh"; + mes "and blood, but my hope"; + mes "defeated it in the end."; + mes "However, the fourth and"; + mes "final snake is formless, and"; + mes "no one knows it's appearance."; + next; + mes "[Poem]"; + mes "I cast my despair to the air,"; + mes "but nobody knows if it killed"; + mes "the snake. I am merely a ^3355FFlittle^000000"; + mes "^3355FFlost devil^000000 with four swords and"; + mes "four snakes, searching for that"; + mes "girl in the darkness."; + close; + + } + } +} + +//---------------------------------------------------------------------------- +// Cottage interior, stair case; Sword hilt +//---------------------------------------------------------------------------- +kh_vila,136,68,0 script Sword Hilt 111,{ + if ((KHCottagePoem1 < 3) || (KHCottagePoem2 < 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures.^000000"; + close; + } + + else if ((KHCottagePoem1 <= 4) || (KHCottagePoem2 <= 2) && (KielHyreQuest < 30)) { + mes "^3355FFThere are four elaborately^000000"; + mes "^3355FFdesigned swords positioned^000000"; + mes "^3355FFnext to four creepy looking^000000"; + mes "^3355FFsnake sculptures. Wait!^000000"; + mes "^3355FFperhaps they're related to^000000"; + mes "^3355FFthat poem you read earlier...^000000"; + next; + + switch(select("No way!","Of course!")) { + + case 1: + mes "^3355FFImpossible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + mes "^3355FFOf course! And look!^000000"; + mes "^3355FFThere's a hole on top^000000"; + mes "^3355FFof the head of each snake^000000"; + mes "^3355FFsculpture. There holes seem^000000"; + mes "^3355FFbig enough to insert each of^000000"; + mes "^3355FFthe ornamental swords nearby...^000000"; + next; + + switch(select("Ignore","Insert Ornamental Swords")) { + + case 1: + mes "^3355FFImposible...^000000"; + mes "^3355FFIt must be some^000000"; + mes "^3355FFkind of coincidence...^000000"; + close; + + case 2: + if (KHCottagePoem1 != 4) { + mes "^3355FFCan't... Pull out...^000000"; + mes "^3355FFSword! It must be^000000"; + mes "^3355FFlocked into place^000000"; + mes "^3355FFsomehow, or sealed^000000"; + mes "^3355FFby some strange force!^000000"; + close; + } + + else { + mes "^3355FFYou should probably^000000"; + mes "^3355FFtry to insert each sword^000000"; + mes "^3355FFinto the correct snake.^000000"; + mes "^3355FFFirst please select the^000000"; + mes "^3355FFsnake in which you will^000000"; + mes "^3355FFinsert the first sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHfirstSword,1; + break; + + case 2: + set @KHfirstSword,2; + break; + + case 3: + set @KHfirstSword,3; + break; + + case 4: + set @KHfirstSword,4; + break; + + } + + next; + mes "^3355FFNow, please choose^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the second sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHSecondSword,1; + break; + + case 2: + set @KHSecondSword,2; + break; + + case 3: + set @KHSecondSword,3; + break; + + case 4: + set @KHSecondSword,4; + break; + + } + + next; + + mes "^3355FFNext, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the third sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHThirdSword,1; + break; + + + case 2: + set @KHThirdSword,2; + break; + + case 3: + set @KHThirdSword,3; + break; + + case 4: + set @KHThirdSword,4; + break; + + } + + next; + mes "^3355FFLastly, please select^000000"; + mes "^3355FFthe snake in which you^000000"; + mes "^3355FFwill insert the fourth sword.^000000"; + next; + + switch(select("First Snake","Second Snake","Third Snake","Fourth Snake")) { + + case 1: + set @KHFouthSword,1; + break; + + case 2: + set @KHFouthSword,2; + break; + + case 3: + set @KHFouthSword,3; + break; + + case 4: + set @KHFouthSword,4; + break; + + } + + if ((@KHFirstSword == 2) && (@KHSecondSword == 4) && (@KHThirdSword == 1) && (@KHFouthSword == 3)) { + mes "^3355FFYour ears are suddenly^000000"; + mes "^3355FFfilled with a low buzzing^000000"; + mes "^3355FFnoise, and your mind^000000"; + mes "^3355FFand body feel as if they^000000"; + mes "^3355FFare being swept away^000000"; + set KHCottagePoem1,5; + set KHCottagePoem2,3; + close2; + warp "kh_vila",178,72; + end; + } + + else { + mes "^3355FFNothing happened...^000000"; + mes "^3355FFYou probably didn't^000000"; + mes "^3355FFinsert the swords into^000000"; + mes "^3355FFthe correct snakes. For now,^000000"; + mes "^3355FFyou should return the swords,^000000"; + mes "^3355FFand then try this again later.^000000"; + close; + } + } + } + } + } + + else if ((KHCottagePoem1 == 5) && (KHCottagePoem2 == 3) || (KielHyreQuest >= 30)) { + mes "^3355FFHere is a hidden^000000"; + mes "^3355FFpath that leads to^000000"; + mes "^3355FFthe secret laboratory.^000000"; + next; + + switch(select("Enter","Cancel")) { + + case 1: + warp "kh_vila",178,72; + end; + + case 2: + close; + + } + } + +} + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; left test tube +//---------------------------------------------------------------------------- +kh_vila,179,68,0 script Test Tube::TestTubeKHQ1 111,{ + mes "^3355FFThis test tube contains^000000"; + mes "^3355FFa young man dressed in^000000"; + mes "^3355FFa Kiel Hyre Academy^000000"; + mes "^3355FFuniform. Somehow, you^000000"; + mes "^3355FFget the feeling that you've^000000"; + mes "^3355FFseen him somewhere before.^000000"; + close; +} + + +//---------------------------------------------------------------------------- +// Cottage interior, Secret Room; Right test tube +//---------------------------------------------------------------------------- +kh_vila,185,68,0 script Test Tube::TestTubeKHQ2 111,{ + if (KielHyreQuest == 28) { + mes "^3355FFA strange looking,^000000"; + mes "^3355FFwizend old man is^000000"; + mes "^3355FFheld within this test tube.^000000"; + mes "^3355FFThere is a small red button^000000"; + mes "^3355FFright underneath the test tube.^000000"; + next; + + switch(select("Press Button","Investigate Further")) { + + case 1: + + mes "[???]"; + mes "H-hello...? C-can you"; + mes "hear me? I don't recognize"; + mes "you... But... Maybe I forgot?"; + mes "Wait, wait. If you're my friend,"; + mes "then you know what to call me,"; + mes "right? Do you know what I am?"; + next; + + input @KHInput$; + + if (@KHInput$ == "little lost devil") { + mes "[???]"; + mes "Heh... Heh heh..."; + mes "He knows... Hey, you"; + mes "have to remember these"; + mes "numbers, okay? D-don't"; + mes "forget, they'll be important..."; + mes "^FF00004^000000, ^FF00007^000000, ^FF00002^000000, ^FF00009^000000, ^FF00006^000000, ^FF00001^000000. That's all..."; + next; + mes "^3355FF4772961^000000"; + mes "^3355FFWhat could^000000"; + mes "^3355FFthose numbers^000000"; + mes "^3355FFpossibly mean?^000000"; + //KHCottagePoem1 and KHCottagePoem2 no longer needed-- deleting + set KHCottagePoem1,0; + set KHCottagePoem2,0; + set KielHyreQuest,30; + close; + } + + else { + mes "[???]"; + mes "No... No..."; + mes "That's not right."; + mes "I don't think we"; + mes "were friends. No..."; + close; + } + + case 2: + mes "^3355FFLet's investigate^000000"; + mes "^3355FFthis area a little^000000"; + mes "^3355FFmore first.^000000"; + close; + + } + + } + + else if (KielHyreQuest >= 30) { + mes "^3355FFWhat could the^000000"; + mes "^3355FFnumber 4772961^000000"; + mes "^3355FFmean? For now, you've^000000"; + mes "^3355FFfound everything that^000000"; + mes "^3355FFyou need from this place,^000000"; + mes "^3355FFso you should return to Elly.^000000"; + close; + } + + else { + end; + } + +} + +//============================================================================ + +//============================================================================ +// Robot Factory NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door +//---------------------------------------------------------------------------- +kh_dun01,235,48,0 script Heavy Door::HeavyDoorKHQ1 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + if (@KHInput$ == "Blue Keycard") { + mes "^3355FFYou've successfully^000000"; + mes "^3355FFopened the door.^000000"; + close2; + warp "kh_school",119,144; + end; + } + + else { + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + } + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } +} + +//---------------------------------------------------------------------------- +// Robotic's Factory; Heavy Door (These doors don't seem to serve any purpose) +//---------------------------------------------------------------------------- +kh_dun01,76,233,0 script Heavy Door::HeavyDoorKHQ2 111,{ + if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + next; + + switch(select("Open Door","Cancel")) { + + case 1: + input @KHInput$; + mes "^3355FFYou try to push the^000000"; + mes "^3355FFdoor open with all^000000"; + mes "^3355FFyour might, but fail^000000"; + mes "^3355FFto make it budge.^000000"; + close; + + case 2: + mes "^3355FFyou decided to leave^000000"; + mes "^3355FFthis door alone until^000000"; + mes "^3355FFyou can figure out^000000"; + mes "^3355FFhow to open it^000000"; + close; + + } + + } + + else { + mes "^3355FFThere is a large, heavy^000000"; + mes "^3355FFdoor infront of you^000000"; + close; + } + +} + +kh_dun01,106,233,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ3 111 +kh_dun01,6,164,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ4 111 +kh_dun01,6,133,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ5 111 +kh_dun01,6,60,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ6 111 +kh_dun01,6,30,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ7 111 +kh_dun01,6,18,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ8 111 +kh_dun01,235,70,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ9 111 +kh_dun01,235,92,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ10 111 +kh_dun01,235,114,0 duplicate(HeavyDoorKHQ2) Heavy Door::HeavyDoorKHQ11 111 + +//---------------------------------------------------------------------------- +// Beautiful Lady and Beautiful Lady copies. +//---------------------------------------------------------------------------- +kh_school,119,149,4 script Beautiful lady::BeatifulLadyKHQ1 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest < 40) { + mes "[Allysia]"; + mes "Hm? I don't think"; + mes "I know you. Kiel Hyre"; + mes "has only authroized Elly,"; + mes "and a trusted friend that"; + mes "may be helping her, to"; + mes "be admitted to this area."; + next; + mes "[Allysia]"; + mes "I cannot see ^FF0000Elly^000000"; + mes "Has she been attacked as well?"; + mes "Are you ^FF0000Elly's friend^000000?"; + next; + mes "[Allysia]"; + mes "I don't see Elly anywhere"; + mes "around here. I can only let"; + mes "you enter if you can identify"; + mes "youtself as Elly's friend."; + mes "Is there anything that you"; + mes "can present to me as proof?"; + next; + + switch(select("Yellow Keycard","Blue Keycard","Golden Key","Carved Button","...?")) { + + case 1: + break; + + case 2: + break; + + case 3: + mes "Ah, isn't this the"; + mes "key that Kiel Hyre gave"; + mes "to Elly? Yes, I'm convinced"; + mes "that you've been helping her."; + mes "I've been waiting for you, so"; + mes "let me guide you to my room."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + + case 4: + mes "[Allysia]"; + mes "Th-that's Kiehl's"; + mes "heal! Did he send you"; + mes "here to get me?! I'm"; + mes "not taking any changes!"; + close2; + cutin "",255; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + monster "kh_school",117,144,"Constant",1745,1; + end; + + case 5: + mes "[Allysia]"; + mes "......"; + mes "........"; + mes "..........."; + close2; + cutin "",255; + end; + + } + + mes "[Allysia]"; + mes "Hm? This doesn't prove"; + mes "that Elly really trusts you..."; + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 40) { + mes "[Allysia]"; + mes "Please follow me."; + close2; + cutin "",255; + warp "kh_school",120,180; + end; + } +} + + +kh_school,117,149,4 script Beautiful lady::BeatifulLadyKHQ2 894,{ + end; +} + +kh_school,118,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ3 894 + +kh_school,120,149,4 duplicate(BeatifulLadyKHQ2) Beautiful lady::BeatifulLadyKHQ4 894 + +kh_school,121,149,4 duplicate(BeatifulLadyKHQ1) Beautiful lady::BeatifulLadyKHQ5 894 + +//---------------------------------------------------------------------------- +// Beautiful Lady "Allysia" +//---------------------------------------------------------------------------- +kh_school,122,186,4 script Beautiful lady 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 38) { + mes "[Allysia]"; + mes "Friend of prototype Elly,"; + mes "I welcome you. As you may"; + mes "have figured out, I need your"; + mes "help. Kiel Hyre is being help"; + mes "somewhere inside this factory."; + next; + mes "[Allysia]"; + mes "It is imperative that"; + mes "you search for Kiel Hyre"; + mes "and rescue him as soon"; + mes "as you possibly can!"; + next; + + switch(select("What is this factory?","What happened to ^FF0000Kiel Hyre^000000?")) { + + case 1: + mes "[Allysia]"; + mes "This factory is part of"; + mes "the Kiel Hyre Foundation's"; + mes "secret business where humanoid"; + mes "robots are manufactured. Myself,"; + mes "and all of the academy's students"; + mes "are actually robots, not humans."; + next; + mes "[Allysia]"; + mes "The Kiel Hyre Foundations's"; + mes "ultimate goal is to develop"; + mes "superior robots that will help"; + mes "human society. As robots, we"; + mes "can handle tasks that are too"; + mes "dangerous or difficult for humans."; + break; + + case 2: + mes "[Allysia]"; + mes "^3355FFKiehl^000000 has proceeded to"; + mes "proform abnormal modifications"; + mes "to the humanoid robots. This"; + mes "has been reported to Kiel Hyre,"; + mes "who has left to stop Kiehl."; + mes "However, Hyre hasn't returned."; + next; + mes "[Allysia]"; + mes "Fearing that Kiehl would"; + mes "break me, Kiel Hyre brought"; + mes "a copy of me instead. I can still"; + mes "detect Kiel Hyre's heartbeat,"; + mes "so he should be alright, but his"; + mes "own son might harm him soon."; + next; + mes "[Allysia]"; + mes "Take this Keycard"; + mes "which will enable you"; + mes "to enter the secret areas"; + mes "inside this factory. If you"; + mes "locate Kiel Hyre, please"; + mes "let me know right away."; + getitem 7496,1; //Red_Keycard + set KielHyreQuest,40; + break; + + } + + close2; + cutin "",255; + end; + + } + + else if (KielHyreQuest == 40) { + mes "[Allysia]"; + mes "I can still detect"; + mes "Kiel Hyre's heartbeat,"; + mes "but his sone Kiehl might"; + mes "do something desperate to"; + mes "him soon. Please locate Kiel"; + mes "Hyre before that can happen!"; + close2; + cutin "",255; + warp "kh_dun01",22,216; + end; + } + + else if (KielHyreQuest == 42) { + mes "[Allysia]"; + mes "Have you already"; + mes "located Kiel Hyre?"; + next; + mes "^3355FFYou tell Allysia where^000000"; + mes "^3355FFKiel Hyre has been locked^000000"; + mes "^3355FFup, and give her the metal^000000"; + mes "^3355FFfragment that Kiel Hyre handed^000000"; + mes "^3355FFto you. She took fragment^000000"; + mes "^3355FFand wore it around her wrist.^000000"; + next; + mes "[Allysia]"; + mes "...Kiel Hyre's secret code"; + mes "confirmed. B_2_3 area."; + mes "Vital signs are normal."; + mes "Envelope recieved. Sending"; + mes "Modified Puppet Designs..."; + next; + mes "[Allysia]"; + mes "Alright, I've recieved"; + mes "Kiel Hyre's orders, and"; + mes "must carry them out..."; + set KielHyreQuest,44; + delitem 7497,1; //Metal_Fragment + close2; + cutin "",255; + end; + } + + else if (KielHyreQuest == 44) { + mes "[Allysia]"; + mes "Alright, I have a mission"; + mes "to carry out for Kiel Hyre,"; + mes "and I don't have much time."; + mes "Let me give you some specific"; + mes "instructions very quickly."; + next; + mes "[Allysia]"; + mes "Firstly, I need to take your"; + mes "keycards for security reasons."; + mes "Secondly, meet me at the Kiel"; + mes "Hyre Mansion in Lighthalzen."; + mes "Present the Golden Key to"; + mes "be admitted to the premises"; + delitem 7492,1; //Yellow_Keycard + delitem 7495,1; //Blue_Keycard + delitem 7496,1; //Red_Keycard + set KielHyreQuest,46; + next; + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + + else if (KielHyreQuest >= 44) { + mes "[Allysia]"; + mes "I understand that this"; + mes "is sudden, and I'm not"; + mes "giving you a thorough"; + mes "explanation, but something"; + mes "horrible will happen if i don't"; + mes "hurry as quickly as possible."; + close2; + warp "yuno_fild08",73,172; + cutin "",255; + end; + } + +} + +//---------------------------------------------------------------------------- +// Signboard (another useless NPC?) +//---------------------------------------------------------------------------- +kh_dun01,163,223,0 script Signboard 857,{ + mes "[Notice]"; + mes "Cute Pets are prohibited"; + mes "in this area. (Cute Pets that"; + mes "provide special assistance"; + mes "to the visually impaired are"; + mes "exempt from this rule.)"; + close; +} + +//---------------------------------------------------------------------------- +// Mechanical Devices for accessing restricted area +//---------------------------------------------------------------------------- +kh_dun01,166,223,0 script Mechanical Device::KHKeyardReader 111,{ + if ((KielHyreQuest <= 38) || (KielHyreQuest >= 44)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + close; + } + + else if ((KielHyreQuest == 40) && (countitem(7496) >= 1)) { + mes "^3355FFYou encounter^000000"; + mes "^3355FFa mechanical device.^000000"; + mes "^3355FFIt looks like it can be^000000"; + mes "^3355FFoperated by inserting the^000000"; + mes "^3355FFcorrect keycard into the slot.^000000"; + next; + + + input @KHInput$; + if (@KHInput$ == "Red Keycard") { + mes "^3355FFThe door opens once^000000"; + mes "^3355FFyou insert the Red Keycard..^000000"; + close2; + warp "kh_dun01",170,227; + end; + } + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + +} + +kh_dun01,162,206,0 duplicate(KHKeyardReader) Mechanical Device 111 + +//---------------------------------------------------------------------------- +// Keep monsters out of the quest area. +// Silly really sinc ehte rest of it's a dungeon +//---------------------------------------------------------------------------- +//kh_dun01,180,220,0 script Monster Warp#kh1::KHMobWarp -1,5,20,{ +//OnTouchNPC: +// warp "kh_dun01",178,138; +// end; +//} + +//kh_dun01,190,220,0 duplicate(KHMobWarp) Monster Warp#kh2 -1,5,20 +//kh_dun01,200,250,0 duplicate(KHMobWarp) Monster Warp#kh3 -1,5,20 +//kh_dun01,210,220,0 duplicate(KHMobWarp) Monster Warp#kh4 -1,5,20 +//kh_dun01,220,220,0 duplicate(KHMobWarp) Monster Warp#kh5 -1,5,10 + +//---------------------------------------------------------------------------- +// Kiel Hyre - OnTouch +//---------------------------------------------------------------------------- +kh_dun01,224,233,0 script Kiel_Hyre_Door -1,5,5,{ +OnTouch: + if (KielHyreQuest == 40) { + mes "^3355FFyou can faintly hear^000000"; + mes "^3355FFa voice from the other^000000"; + mes "^3355FFside of this door.^000000"; + next; + mes "[????]"; + mes "...Kiehl..."; + mes "...How dare you...!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Mister Kiel Hyre?"; + mes "Is that you in there?"; + next; + mes "[Kiel Hyre]"; + mes "Wh-who's there?"; + mes "Identify yourself!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm... I'm..."; + next; + mes "You explain your story^000000"; + mes "to the voice behind the^000000"; + mes "door, and tell him what^000000"; + mes "happened to Elly and Allysia.^000000"; + next; + mes "[Kiel Hyre]"; + mes "...Yes... It's me."; + mes "I'm Kiel Hyre, trapped"; + mes "in here. He went so far"; + mes "as to modify Elly, eh?"; + mes ".................."; + next; + mes "[Kiel Hyre]"; + mes "Hurry, take this"; + mes "module to Allysia!"; + mes "She'll know what to do"; + mes "with it. If you're really"; + mes "helping us, then she'll have"; + mes "some instructions for you too."; + next; + mes "^3355FFKiel Hyre slides^000000"; + mes "^3355FFa strange metal^000000"; + mes "^3355FFfragment through^000000"; + mes "^3355FFthe gap between the^000000"; + mes "^3355FFdoor and the floor.^000000"; + getitem 7497,1; //Metal_Fragment + set KielHyreQuest,42; + close; + } + + + else if (KielHyreQuest >= 42) { + mes "[Kiel Hyre]"; + mes "......"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Robot Factory Second Floor Entrances +//---------------------------------------------------------------------------- +kh_dun01,44,203,0 script Entrance Device#KHEntry1::KHAccess 111,{ + if (countitem(7509) < 1) { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + close; + } + + else { + mes "^3355FFYou encounter"; + mes "a mechanical device."; + mes "It looks like it can be"; + mes "operated by inserting the"; + mes "correct keycard into the slot.^000000"; + next; + + input @KHInput$; + if (@KHInput$ == "Luxurious Keycard") { + mes "^3355FFAs you insert the"; + mes "Luxurious Keycard"; + mes "into the keycard slot,"; + mes "the door swings open"; + mes "to reveal a long flight"; + mes "of descending stairs.^000000"; + next; + + switch(select("Descend Stairs","Cancel")) { + + case 1: + warp "kh_dun02",41,198; + end; + + case 2: + mes "^3355FFIt looks like this door"; + mes "has automatically closed"; + mes "after the preprogrammed"; + mes "time limit has elapsed.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + } + +} + +kh_dun01,36,195,0 duplicate(KHAccess) Entrance Device#KHEntry2 111 + +//============================================================================ + +//============================================================================ +// Kiel Hyre Mansion NPCs, and Kiehl's Room NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiel's Steward +//---------------------------------------------------------------------------- +kh_mansion,78,55,5 script Steward::StewardKHQ1 109,{ + if (KielHyreQuest < 46) { + mes "[Steward]"; + mes "This is a private residence,"; + mes "please leave."; + close2; + warp "lighthalzen",188,201; + end; + } + + if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) { + mes "[Steward]"; + mes "Greetings."; + mes "Have you been invited"; + mes "by the master of"; + mes "this mansion?"; + next; + + switch(select("Present Golden Key","????")) { + + case 1: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "I've been expecting your"; + mes "arival. Please, this way."; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "If you have not been"; + mes "invited by the master of"; + mes "this mansion, then I'm"; + mes "afraid that I must insist on"; + mes "your immediate departure!"; + close2; + warp "lightalzen",188,201; + end; + + } + + } + + if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + L_SeeKielHyre: + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Very well."; + mes "Please make"; + mes "yourself at home."; + close; + + } + + } + + if ((KielHyreQuest == 52) || (KielHyreQuest == 54) || (KielHyreQuest >= 64) && (KielHyreQuest <= 70)) { + mes "[Steward]"; + mes "Ah, Master "+strcharinfo(0)+"."; + mes "It is a pleasure to"; + mes "recieve your company"; + mes "once again. Would you"; + mes "like to see my master, or...?"; + next; + + switch(select("^FF0000Kiel Hyre^000000","^3355FFMitchell^000000")) { + + case 1: + mes "[Steward]"; + mes "Very well."; + mes "Right this way~"; + close2; + warp "kh_mansion",21,14; + end; + + case 2: + mes "[Steward]"; + mes "Oh...? You must."; + mes "be here to deliver"; + mes "good news. Excuse me..."; + next; + mes "^3355FFThe Steward furtively^000000"; + mes "^3355FFlooked around to check^000000"; + mes "^3355FFif anyone is watching him.^000000"; + next; + mes "[Steward]"; + mes "I believe it should"; + mes "be save enough to let"; + mes "you go see him now..."; + mes "Please, hurry this way."; + close2; + warp "kh_mansion",20,87; + end; + + } + + } + + if (KielHyreQuest >= 70) { + goto L_SeeKielHyre; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre +//---------------------------------------------------------------------------- +kh_mansion,22,28,4 script Kiel Hyre 903,{ + cutin "kh_kyel02",2; + if (KielHyreQuest < 46) { + mes "[Kiehl Hyre]"; + mes "........."; + close; + } + + else if (KielHyreQuest == 46) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Ah, you must be "+strcharinfo(0)+"."; + mes "I'd like to thank you for saving"; + mes "my life. You must have many"; + mes "questions to ask me, so I'll"; + mes "do my best to give you answers."; + next; + + L_Menu: + + switch(select("Robots?","^3355FFKiehl^000000?","^FF0000Elly^000000's button?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I've been researching"; + mes "robotics for thirty-two"; + mes "years now. I'm proud to"; + mes "say that I've succeeded"; + mes "where the great Sage"; + mes "Varmundt did not."; + next; + mes "[Kiel Hyre]"; + mes "It's been my dream to"; + mes "develop humanoid robots"; + mes "from humans. Those Guardians"; + mes "might be robots too, but they"; + mes "don't operate using free will."; + next; + mes "[Kiel Hyre]"; + mes "If you'd like to know more"; + mes "of the specifics concerning"; + mes "robotics, why don't you speak"; + mes "with ^3355FFAllysia^000000? She can explain"; + mes "everything much more succinctly"; + mes "than I can. I tend to ramble..."; + if (@KHQ1Read < 1) { set @KHQ1Read,1; } + break; + + case 2: + mes "[Kiel Hyre]"; + mes "^3355FFKiehl^000000 is my only son,"; + mes "but the love of my life"; + mes "died after giving birth to"; + mes "him. I'll admit that he's"; + mes "a genius in mechanical"; + mes "design and development."; + next; + mes "[Kiel Hyre]"; + mes "He's largely responsible"; + mes "for the creation of Third"; + mes "Generation robots like Elly."; + mes "Unfortunately, he's trying to"; + mes "modify his creations for"; + mes "some sinister purpose."; + next; + mes "[Kiel Hyre]"; + mes "I tried to stop him,"; + mes "but I ended up getting"; + mes "locked inside the factory."; + mes "I don't know why he wants"; + mes "to do this. I still have"; + mes "absolutely no clue..."; + if (@KHQ2Read < 1) { set @KHQ2Read,1; } + break; + + case 3: + mes "[Kiel Hyre]"; + mes "That button Elly was"; + mes "holding has ^3355FFKiehl's emblem^000000"; + mes "engraved on it. Ah, and that"; + mes "man in black menacing the"; + mes "students? That was probably"; + mes "^3355FFKaiser^000000, Kiehl's bodyguard."; + next; + mes "[Kiel Hyre]"; + mes "Kaiser..."; + mes "I don't know"; + mes "anything about him."; + mes "I've never even seen"; + mes "his face! Kiehl just hired"; + mes "him without letting me know..."; + if (@KHQ3Read < 1) { set @KHQ3Read,1; } + break; + + } + + if ((@KHQ1Read == 1) && (@KHQ2Read == 1) && (@KHQ3Read == 1)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + delitem 7493,1; //Golden_Key + delitem 7494,1; //Exquisite_Button + set KielHyreQuest,48; + } + + else { + next; + goto L_Menu; + } + + } + + else if (KielHyreQuest == 48) { + mes "Ah, I almost forgot."; + mes "Please, take this as"; + mes "a little reward for"; + mes "saving my life."; + set KielHyreQuest,50; + getitem 12105,1; //Taming_Gift_Set + getexp 700000,0; + } + + else if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) { + mes "[Kiel Hyre]"; + mes "If you don't have"; + mes "anymore questions for me,"; + mes "then would you please"; + mes "let me rest?? I'm still not"; + mes "feeling well from the time"; + mes "I was locked up in the factory."; + } + + else if (KielHyreQuest == 64) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "Hm? Did you"; + mes "have something"; + mes "that you wanted"; + mes "to ask me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't have enough"; + mes "concrete evidence yet,"; + mes "but I might have some"; + mes "questions soon enough."; + } + + else if (KielHyreQuest == 68) { + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Ah, "+strcharinfo(0)+"."; + mes "It's you. So how can"; + mes "I help you today?"; + next; + + switch(select("About ^3355FFAllysia^000000...")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "You know, I was looking"; + mes "through this deserted house"; + mes "in Juno, and discovered"; + mes "an old portrait of a woman"; + mes "that looks just like Allysia."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Oh..."; + mes "Is that all?"; + mes "I thought you had"; + mes "a robotics question."; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Anyway, that's a"; + mes "strange coincidence."; + mes "Well, I suppose it's"; + mes "not so strange to find"; + mes "look-a-likes for other people..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "I don't think it's just"; + mes "a coincidence. The woman"; + mes "in that thirty year old portrait"; + mes "was also named Allysia, and she"; + mes "worked at Orsimier street"; + mes "in Juno. Does that ring a bell?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Then I thought that this"; + mes "Allysia must have been the"; + mes "woman that you loved, and"; + mes "that you based your robot's"; + mes "apperance on her."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "I think this is what happened:"; + mes "when you were a young, poor"; + mes "man, you fell in love with"; + mes "Allysia. However, she was"; + mes "in love with Rosimier, who"; + mes "was rich and powerful."; + next; + mes "["+strcharinfo(0)+"]"; + mes "However, Rosimier was"; + mes "betrothed to some other"; + mes "woman, and he ended up"; + mes "marrying his fiancee, thus"; + mes "breaking Allysia's heart."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Feeling betrayed, her"; + mes "heart broken, Allysia jumped"; + mes "into a river. Then, you decided"; + mes "to get revenge on Rosimier, so"; + mes "you ended up joining"; + mes "Rekenber Corporation!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hahahahahahaha!"; + mes "Oh, what an imagination~"; + mes "That's bery ridiculous..."; + mes "Though, I admit, maybe"; + mes "I did design Allysia after"; + mes "seeing that woman long ago."; + next; + mes "[Kiel Hyre]"; + mes "I'd almost forgotten"; + mes "about her! I think we"; + mes "were friends... Though,"; + mes "where did you get the idea"; + mes "that I might have"; + mes "been in love with her?"; + next; + + switch(select("Reveal Kiel's Portrait from Hut")) { + + case 1: + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "Wh-what..."; + mes "How did..."; + mes "Where did you...?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre, I found this"; + mes "portrait of you as a young"; + + mes "man from the house of the"; + mes "man that bought Allysia's ring."; + mes "I even spoke to the fisherman"; + mes "that discovered Allysia's body."; + next; + mes "["+strcharinfo(0)+"]"; + mes "You paid an awful lot"; + mes "of money to buy Allysia's"; + mes "ring. How can you not tell"; + mes "me that you didn't love her?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "*Sigh...*"; + mes "You got me, you got me."; + mes "I didn't want you to learn"; + mes "the truth. You are correct."; + mes "I loved Alysia, and designed"; + mes "my robot to look jus tlike her."; + next; + mes "[Kiel Hyre]"; + mes "I could never forget her."; + mes "Ever. But I would never"; + mes "do anything to harm the"; + mes "Rosimiers! I'm a scientist!"; + mes "I hated him when I was young,"; + mes "but things are different now!"; + next; + mes "[Kiel Hyre]"; + mes "I shed no tears when the"; + mes "Rosimiers fell, but I wasn't"; + mes "responsible. Besides, I didn't"; + mes "have the resources or the"; + mes "capability to cause it..."; + next; + cutin "kh_kyel02",2; + mes "["+strcharinfo(0)+"]"; + mes "I'm afraid that the"; + mes "evidence shows otherwise."; + next; + + switch(select("Reveal Portait of Rosimiers")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at this portrait that"; + mes "I found at the Rosimiers'"; + mes "old house. Do you see"; + mes "anything... incriminating?"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "ASide from that"; + mes "James Rosimier, you"; + mes "mean? No! I don't see"; + mes "anything wrong with"; + mes "this picture at all."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Take a good look"; + mes "at the pocketwatch"; + mes "in the portrait. That's"; + mes "the pocketwatch you"; + mes "wear today, isn't it?"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "...!!!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "You might not have caused"; + mes "the downfall of the Rosimiers"; + mes "yourself, but with the aid of"; + mes "the Rekenber Corporation, I'd"; + mes "say it was entirely possible!"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Well played, adventurer."; + mes "Well played. I don't regret"; + mes "what I did: they killed my"; + mes "Allysia! If James didn't betray"; + mes "her, if only he didn't drive"; + mes "her to commit suicide..."; + next; + mes "["+strcharinfo(0)+"]"; + mes "That's where you're wrong!"; + mes "Allysia was killed, she didn't"; + mes "commit suicide. Take a good"; + mes "look at this note right here!"; + next; + mes "[Kiel Hyre]"; + mes "What?!"; + next; + + switch(select("Show James's Note")) { + + case 1: + mes "[Kiel Hyre]"; + mes "What does this prove?"; + mes "This doesn't show that"; + mes "James didn't betray Allysia."; + mes "How does this change anything?"; + mes "She's dead, nothing I can do"; + mes "will bring her back to me!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I never said James didn't"; + mes "betray her. Look at the date"; + mes "on the note. James made plans"; + mes "to run away with her on August"; + mes "20th. However, her body was"; + mes "found on the same day."; + next; + mes "["+strcharinfo(0)+"]"; + mes "Ergo, Allysia must have"; + mes "died on August 19th. If she"; + mes "was planning to run away with"; + mes "her love on the next day, then"; + mes "she had no reason to kill herself!"; + next; + mes "[Kiel Hyre]"; + mes "No, that's not right!"; + mes "She probably couldn't"; + mes "trust me! She must have"; + mes "realized she was nothing"; + mes "but another toy to him!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Oh yeah? I say she jumped"; + mes "into the river because you"; + mes "met her on that day. Now,"; + mes "take a good look at this!"; + next; + + switch(select("Show K.H.'s note")) { + + case 1: + mes "["+strcharinfo(0)+"]"; + mes "This note was written by"; + mes "a man with your initials,"; + mes "K.H. These initials were also"; + mes "signed on her portrait. You"; + mes "must have written this note:"; + mes "there's too many coincidences!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "According to this note,"; + mes "you told Allysia that you"; + mes "wanted to see her again"; + mes "at the place you first med."; + mes "I think you did see her again..."; + mes "on August 19th, the day she died!"; + next; + mes "["+strcharinfo(0)+"]"; + mes "I'm assuming the place you"; + mes "two first met was near the"; + mes "river. No more of your lies:"; + mes "well me what really happened!"; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "............"; + mes "........."; + mes "......"; + next; + cutin "kh_Kyel03",2; + mes "[Kiel Hyre]"; + mes "Hah... Ha ha ha..."; + mes "Yes... That's right..."; + mes "That horrible night."; + mes "I remember it well..."; + mes "....................."; + next; + cutin "kh_kyel02",2; + mes "[Kiel Hyre]"; + mes "That night, when she came"; + mes "to the river to meet me as"; + mes "I had asked, I begged her to"; + mes "run away with me, instead"; + mes "of waiting for that James."; + next; + mes "[Kiel Hyre]"; + mes "She insisted that James"; + mes "never betrayed her, and he"; + mes "promised to take her away"; + mes "with him the next day. Can"; + mes "you imagine how that made"; + mes "me feel? I was nothing to her."; + next; + mes "[Kiel Hyre]"; + mes "My feelings didn't matter to"; + mes "her at all! She kept fidgeting"; + mes "with that ring...I lost control"; + mes "and tried to take that damned"; + mes "thing away from her, and"; + mes "throw it into the river..."; + next; + mes "[Kiel Hyre]"; + mes "But you know what?"; + mes "She struggled, she actually"; + mes "fought me! It was just a small"; + mes "fight, but then, before I knew"; + mes "it, the ground underneath us"; + mes "collapsed and... the rains..."; + next; + + switch(select(".........")) { + + case 1: + mes "[Kiel Hyre]"; + mes "I'm not sure what it"; + mes "was. The rain weakened"; + mes "the ground, something went"; + mes "wrong... and she just... just..."; + mes "The river swallowed her..."; + mes "I felt empty. She was gone. "; + set KielHyreQuest,70; + delitem 7498,1; //Losimier's_House_Key + delitem 7499,1; //Portrait_of_a_Family + delitem 7500,1; //Portrait_of_a_Lady + delitem 7501,1; //K.H's_Letter + delitem 7502,1; //James's_Memo + delitem 7503,1; //Portrait_of_a_Guy + close; + + } + + } + + } + + } + + } + + } + + } + + else if (KielHyreQuest == 70) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You already know that"; + mes "she was found dead the"; + mes "next day. But what really"; + mes "broke my heart was that"; + mes "she held that ring so tightly"; + mes "in her hand, even in death..."; + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "His family had everything"; + mes "while I had nothing. And"; + mes "he had the audacity to take"; + mes "Allysia away from me?!"; + mes "How could that be right?"; + next; + mes "[Kiel Hyre]"; + mes "Even though she had passed"; + mes "away, I still wanted to prove"; + mes "to Allysia what kind of ugly"; + mes "person James really was."; + mes "That was when I joined the"; + mes "Rekenber Corporation."; + next; + mes "[Kiel Hyre]"; + mes "I designed the very first"; + mes "First Generation Robot, which"; + mes "I named Allysia, and sold the"; + mes "designs to Rekenber. I gave them"; + mes "robots, and they gave me money,"; + mes "power, obedient subordinates."; + next; + mes "[Kiel Hyre]"; + mes "Of course I knew they'd use"; + mes "my robots for spying and killing!"; + mes "But you know what? It didn't"; + mes "matter so long as they gave me"; + mes "the means to my revenge. It was"; + mes "the perfect partnership, really."; + next; + mes "[Kiel Hyre]"; + mes "You've got me right"; + mes "where you want me."; + mes "Who are you working"; + mes "for, and what exactly"; + mes "do you want? My designs?"; + mes "My death? Everything...?"; + next; + cutin "kh_kyel01",2; + mes "["+strcharinfo(0)+"]"; + mes "Actually, I just want"; + mes "to ask about the nature"; + mes "of your professional"; + mes "relationship with the"; + mes "Rekenber Corporation."; + mes "And about Kiehl."; + next; + mes "[Kiel Hyre]"; + mes "Kiehl, eh? After hearing"; + mes "my crazy story, I'm guessing"; + mes "that you already suspect the"; + mes "truth about him... He's also"; + mes "a robot, specifically the first"; + mes "of the Second Generation models."; + next; + mes "[Kiel Hyre]"; + mes "His mind was developed using."; + mes "an experimental, and unstable,"; + mes "form of the Condensed Magic"; + mes "Spell Scrolls. He was the only"; + mes "Second Generation robot that"; + mes "I was allowed to keep."; + next; + mes "[Kiel Hyre]"; + mes "I've become very attached"; + mes "to Kiehl. It's not surprising,"; + mes "seeing that robotics have"; + mes "become my life. I even raised"; + mes "him as my own son, and taught"; + mes "him everything about robotics"; + next; + mes "[Kiel Hyre]"; + mes "Kiehl is now a genius,"; + mes "and has even developed the"; + mes "Third Generation of robots."; + mes "Unfortunately, I failed to"; + mes "properly raise him with"; + mes "human morals and ethics."; + next; + + switch(select("......")) { + + case 1: + mes "[Kiel Hyre]"; + mes "He's been transforming"; + mes "the Third Generation robots"; + mes "into killing machines. That's"; + mes "why I tried to put them all"; + mes "into the academy, so they"; + mes "could learn human behavior."; + next; + mes "[Kiel Hyre]"; + mes "Although the academy"; + mes "has delayed Kiehl's plans,"; + mes "he has succeeded into"; + mes "converting all of the robots"; + mes "into uncontrollable engines"; + mes "of mass destruction."; + next; + mes "[Kiel Hyre]"; + mes "Yes, he's been working"; + mes "closely with Rekenber."; + mes "Their true objective is to"; + mes "create killing machines"; + mes "for Rekenber's use."; + next; + mes "[Kiel Hyre]"; + mes "You know all the secrets"; + mes "of my past now. I'm not"; + mes "upset with you or anything,"; + mes "but I do have something"; + mes "that I want to ask of you."; + next; + mes "[Kiel Hyre]"; + mes "Please! Stop Kiehl!"; + mes "I don't want his madness"; + mes "to destroy any more robots!"; + mes "I see each and every one"; + mes "of them as one of my children!"; + next; + mes "[Kiel Hyre]"; + mes "I know that I must take"; + mes "full responsibility for all"; + mes "that has happened. I promise"; + mes "to take any punishment for"; + mes "my actions once everything"; + mes "has been resolved."; + + next; + + switch(select("Accept","Okay","Nod")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + } + + mes "[Kiel Hyre]"; + mes "Thank you so much!"; + mes "You can find Kiehl"; + mes "in the underground"; + mes "level in this mansion."; + set KielHyreQuest,72; + + } + + } + + else if (KielHyreQuest == 72) { + cutin "kh_kyel01",2; + //I believe this text goes here o_o + mes "[Kiel Hyre]"; + mes "He stays in the old room"; + mes "where he was created, but"; + mes "he reconstructed it as some"; + mes "kind of cave to keep everyone"; + mes "out, including me. Yes, he"; + mes "doesn't trust anyone anymore..."; + next; + mes "[Kiel Hyre]"; + mes "When you find him, I want"; + mes "you to take out Allysia's"; + mes "ring out of his heart. If you"; + mes "remove it, that should stop"; + mes "him from going berserk."; + next; + + switch(select("Allysia's Ring?")) { + + case 1: + mes "[Kiel Hyre]"; + mes "Yes... Her ring is the"; + mes "beginning of everything"; + mes "I put that in his heart so"; + mes "that I'd never forget what"; + mes "the Rosimiers did to me."; + next; + mes "[Kiel Hyre]"; + mes "I think Kiehl's grown"; + mes "so powerful that normal"; + mes "weapons might not work"; + mes "on him anymore. Use this"; + mes "device that will cause his"; + mes "power supply to fluctuate."; + getitem 7504,1; //Power_Source + next; + cutin "kh_kyel03",2; + mes "[Kiel Hyre]"; + mes "If you successfully attach"; + mes "this to Kiehl's body, then"; + mes "he won't be able to use his"; + mes "body's full power. While he's"; + mes "weakened, open up his chest"; + mes "and get the ring from his heart."; + next; + mes "[Kiel Hyre]"; + mes "Let me know once"; + mes "you're ready. Then, I'll"; + mes "guide you Kiehl's room."; + set KielHyreQuest,74; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 104)) { + mes "[Kiel Hyre]"; + mes "Are you ready"; + mes "to confront"; + mes "Kiehl now?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Kiel Hyre]"; + mes "There... the secret"; + mes "passage is open now."; + mes "Just go to the right of"; + mes "me, but be careful. Kiehl"; + mes "is extremely dangerous."; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + break; + + case 2: + mes "[Kiel Hyre]"; + mes "Please take your"; + mes "time. I imagine that"; + mes "it won't be easy."; + break; + + } + + } + + else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + cutin "kh_kyel01",2; + mes "[Kiel Hyre]"; + mes "You're back...!"; + mes "So were you able"; + mes "to retrieve Allysia's"; + mes "Ring from Kiehl's heart?"; + next; + + if (countitem(7508) < 1) { + mes "[Kiel Hyre]"; + mes "You mean... You don't have it?"; + mes "Please, retrieve Allysia's Ring"; + mes "from Kiehl's heart!"; + next; + enablenpc "Kiehl_Room_Warp"; + donpcevent "Kiehl_Room_Warp::OnEnable"; + close2; + cutin "",255; + } + + mes "[Kiel Hyre]"; + mes "Wh-what happened...?"; + mes "Kiehl developed a new"; + mes "body for himself? Th-that"; + mes "would make him a Fourth"; + mes "Generation robot. I had"; + mes "no idea he was this smart."; + next; + mes "[Kiel Hyre]"; + mes "Wait, now that I think about"; + mes "it, I did see robot bodies that"; + mes "looked like Kiehl when I was"; + mes "locked in the factory. So he"; + mes "was using those copies to"; + mes "develop personal upgrades."; + next; + mes "[Kiel Hyre]"; + mes "Here, please take this"; + mes "Keycard which will let you"; + mes "enter and investigate the"; + mes "deepest levels of the factory."; + mes "I'll investigate Kiehl's room."; + set KielHyreQuest,108; + getitem 7509,1; //Gorgeous_Keycard + next; + + if (sex == 0) { + if (getpartnerid() == 0) set @KHTitle$,"Miss"; + else set @KHSTitle$,"Mrs"; + } + else set @KHTitle$,"Mr"; + + mes "[Kiel Hyre]"; + mes "Kiehl is my responsibility..."; + mes "No matter what the cost may"; + mes "be, I've got to stop him! Oh,"; + mes "and here, please take this"; + mes "with my thanks for all of"; + mes "your help, "+@KHTitle+". "+strcharinfo(0)+"."; + getitem 616,1; //Old card Album + delitem 7508,1; //Elisia's_Ring + getexp 1000000,0; + } + + else if (KielHyreQuest >= 108) { + mes "[Kiel Hyre]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + + +//---------------------------------------------------------------------------- +// Allysia +//---------------------------------------------------------------------------- +kh_mansion,18,30,4 script Allysia 894,{ + cutin "kh_ellisia",2; + if (KielHyreQuest <= 68) { + mes "[Allysia]"; + mes "Who are you?"; + mes "How did you get here?"; + mes "Go away"; + close; + } + + else if (KielHyreQuest < 70) { + mes "[Allysia]"; + mes "You must be surprised"; + mes "by everything that's been"; + mes "happening. Maybe everything"; + mes "would be easier to understand"; + mes "if I explained about robots?"; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Allysia]"; + mes "The robots you've been"; + mes "encountering are automated"; + mes "mechanical puppets that can"; + mes "independantly think and operate."; + mes "Many sages have tried to develop"; + mes "their own robots, but have failed."; + next; + mes "[Allysia]"; + mes "My master, Kiel Hyre, has"; + mes "been studying robotics since"; + mes "he was twenty years old, and"; + mes "has developed three different"; + mes "generations of robots, the first,"; + mes "second, and third generations."; + next; + + switch(select("First Generation","Second Generation","Third Generation")) { + + case 1: + mes "[Allysia]"; + mes "I am a good example of one"; + mes "of Kiel Hyre's First Generation"; + mes "robots. I was constructed using"; + mes "a heavy mechanical framework,"; + mes "a robotic heart, and chemically"; + mes "synthesized skin covering."; + next; + mes "[Allysia]"; + mes "My central processing unit,"; + mes "equivilent to your brain, is"; + mes "essentially a Memory Scroll"; + mes "based on the design of the"; + mes "Magic Spell Scrolls that you"; + mes "adventurers use in battle."; + next; + mes "[Allysia]"; + mes "I'm the oldest type of"; + mes "humanoid robot, so I weigh"; + mes "a lot, and my mind can only"; + mes "process a limited amount of"; + mes "data. Therefore, I can't express"; + mes "emotion similarly to a human."; + break; + + case 2: + mes "[Allysia]"; + mes "The First Generation robots"; + mes "were developed from mostly"; + mes "mechanical parts, but the"; + mes "Second Generation robots"; + mes "incorporated Homunculus"; + mes "science and technology."; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "are more life-like since they"; + mes "have artifically created skin"; + mes "and flesh, although they still"; + mes "are constructed from a heavy"; + mes "mechanical framework."; + next; + mes "[Allysia]"; + mes "Sage elemental scroll"; + mes "technology was also used"; + mes "to develop the Condensed"; + mes "Memory Scroll, a central"; + mes "processing unit superior to that"; + mes "used in First Generation robots."; + next; + mes "[Allysia]"; + mes "Although Condensed Memory"; + mes "Scrolls were 100,000 times"; + mes "more powerful than ordinary"; + mes "Memory Scrolls, they were"; + mes "problematic and were prone"; + mes "to too many error problems"; + next; + mes "[Allysia]"; + mes "Second Generation robots"; + mes "were capable of expressing"; + mes "human-like emotion, but their"; + mes "production halted after six"; + mes "years because they were"; + mes "considered faulty."; + break; + + case 3: + mes "[Allysia]"; + mes "Third Generation robots"; + mes "were mostly designed by"; + mes "Kiel Hyre's son, Kiehl,"; + mes "and don't use a mechanical"; + mes "framework at all: the entire"; + mes "body is basically a homunculus."; + next; + mes "[Allysia]"; + mes "With their organic bodies"; + mes "and advanced artificial hearts"; + mes "make from imitation Ymir Heart"; + mes "Pieces, they can experience"; + mes "physiologic phenomena"; + mes "just like ordinary humans."; + next; + mes "[Allysia]"; + mes "Kiehl was able to develop"; + mes "a more stable form of the"; + mes "Condensed Memory Scroll"; + mes "which does not suffer from"; + mes "critical errors, and can be"; + mes "cheaply mass processed."; + next; + mes "[Allysia]"; + mes "Elly is actually a Third"; + mes "Generation prototype. Once"; + mes "we optimize the prototypes,"; + mes "we will begin mass production."; + mes "In fact, the academy is our"; + mes "prototype testing ground."; + next; + mes "[Allysia]"; + mes "The fact that out prototype"; + mes "robots can interact just like"; + mes "real humans is proof of our"; + mes "success in robotics."; + break; + + } + case 2: + mes "[Allysia]"; + mes "Please let me know if"; + mes "you'd like to learn more"; + mes "about Kiel Hyre's robots."; + break; + + } + + } + + else if (KielHyreQuest >= 70) { + mes "[Allysia]"; + mes "......"; + mes "........."; + mes "............"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Abduction triggering NPC +//---------------------------------------------------------------------------- +lighthalzen,188,200,0 script Abduction_trigger -1,3,1,{ +OnTouch: + if (KielHyreQuest == 50) { + mes "^3355FFAs you walked out of^000000"; + mes "^3355FFthe mansion, something^000000"; + mes "^3355FFsmashed the top of your^000000"; + mes "^3355FFhead, and you instnatly^000000"; + mes "^3355FFlose consiousness...^000000"; + close2; + percentheal -99,0; + warp "kh_mansion",30,75; + end; + } + + else { + end; + } +} + +//---------------------------------------------------------------------------- +// Mysterious Woman "Mitchell Layla" +//---------------------------------------------------------------------------- +kh_mansion,25,79,4 script Mysterious Woman 727,3,3,{ +L_StartDialog: + if (KielHyreQuest == 50) { + mes "^3355FFYou awaken with your^000000"; + mes "^3355FFhead painfully throbbing,^000000"; + mes "^3355FFand a mysterious woman^000000"; + mes "^3355FFstanding infront of you.^000000"; + next; + mes "[??????]"; + mes "Hm? Oh, you're awake"; + mes "earlier than I though."; + mes "You must feel confused,"; + mes "but listen carefully. If you"; + mes "don't, then I can't guarantee"; + mes "your safety, okay? Alright."; + next; + mes "[??????]"; + mes "All you need to know it"; + mes "that I'm a secret agent for"; + mes "the Schwaltzvalt Republic"; + mes "government. We're investigating"; + mes "abnormal activity between Kiel"; + mes "Hyre and the Rekenber Corporation."; + next; + mes "[??????]"; + mes "We saw you enter the"; + mes "mansion and speak to"; + mes "Kiel Hyre, so basically"; + mes "you're here for questioning."; + mes "Now tell me the truth. How"; + mes "do you know Kiel Hyre?"; + next; + + switch(select("I'll tell you everything!","I don't know nuthin'!")) { + + case 1: + goto L_TellEverything; + break; + + case 2: + mes "[??????]"; + mes "Don't...know...nuthin'?"; + mes "You sure about that? Only"; + mes "a select few can even speak"; + mes "with Kiel Hyre in person. You"; + mes "must have some connection"; + mes "to him. I'm right, aren't it?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "......"; + mes "........."; + mes "............"; + next; + mes "[??????]"; + mes "Are you trying to protect"; + mes "him? I think that you might"; + mes "not understand what kind of"; + mes "person you're really dealing"; + mes "with here. I'll tell you what"; + mes "I've learned about him..."; + next; + mes "[??????]"; + mes "Kiel Hyre. CEO of the"; + mes "Kiel Hyre Foundation,"; + mes "manufacturer of various"; + mes "machinery. His company started"; + mes "as a small Einbroch store whose"; + mes "technology slowly grew famous."; + next; + mes "[??????]"; + mes "Rekenber Corperation offered"; + mes "a merger with the Kiel Hyre"; + mes "Foundation. We're still not"; + mes "sure why they wanted Kiel"; + mes "Hyre in particular to repair"; + mes "and develop their Guardians..."; + next; + mes "[??????]"; + mes "We're also not sure why"; + mes "they wanted to suddenly"; + mes "focus more on Guardian"; + mes "development. Then, all"; + mes "of a sudden, Kiel Hyre's son"; + mes "appears from out of nowehre."; + next; + mes "[??????]"; + mes "It's very suspicious."; + mes "There's no records of his"; + mes "birth or anything. Still, maybe"; + mes "Kiel Hyre really did have him"; + mes "with his secretary, Allysia."; + mes "Well, no one is really sure."; + next; + mes "[??????]"; + mes "In any case, Kiel Hyre's"; + mes "son and heir, Kiehl, helped"; + mes "his father establish this"; + mes "special academy as their"; + mes "way of giving back t society."; + next; + mes "[??????]"; + mes "Almost every corporation and"; + mes "organization tried to get their"; + mes "spies to enter this academy,"; + mes "but all of them were rejected."; + mes "it's strange. At least one of"; + mes "them should have made it in."; + next; + mes "[??????]"; + mes "And recently, Kiehl Hyre"; + mes "has held a secret meeting with"; + mes "Rekenber executives to announce"; + mes "his new project. He intends to"; + mes "create advanced humanoid robots"; + mes "that will replace guardians!"; + next; + mes "[??????]"; + mes "Our spies reported that"; + mes "Kiel Hyre was nowhere to"; + mes "be seen at that meeting,"; + mes "as well as his trusted"; + mes "secretary, Allysia. He..."; + mes "He just disappeared!"; + next; + mes "[??????]"; + mes "Then, Kiel Hyre pops back"; + mes "in his mansion after all"; + mes "this time as if nothing"; + mes "happened! At the same time,"; + mes "Kiehl disappears, under the"; + mes "excuse of conducting research."; + next; + mes "[??????]"; + mes "Rekenber is sponsoring"; + mes "both Kiehl and Kiel, but"; + mes "there's some kind of conflict"; + mes "going on between father and"; + mes "son, I just know it! Now tell"; + mes "me, what's going on?"; + next; + mes "[??????]"; + mes "I'm not sure how well you"; + mes "know this country, but the"; + mes "fact that Rekenber is invoved"; + mes "must tell you that these aren't"; + mes "good people. Tell me what"; + mes "you know about them!"; + next; + L_TellEverything: + mes "^3355FFYou tell the woman^000000"; + mes "^3355FFeverything you know^000000"; + mes "^3355FFabout Kiel Hyre. Your^000000"; + mes "^3355FFvoice quivers with sadness^000000"; + mes "^3355FFwhenever you mention Elly.^000000"; + next; + mes "[??????]"; + mes "I see, I see..."; + mes "That poor girl... So..."; + mes "Your involvement in this"; + mes "is a coincidence? In that"; + mes "case, I want your help"; + mes "in our investigation."; + next; + + switch(select("OKay","......")) { + + case 1: + L_Help: + mes "[??????]"; + mes "Great."; + mes "I'm Agent Mitchell Layla."; + mes "From here on, you're working"; + mes "for the Schwaltzvalt Republic!"; + set KielHyreQuest,52; + close; + + case 2: + mes "[??????]"; + mes "If you don't cooperate,"; + mes "then I can't guarantee"; + mes "your safety, adventurer"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Huh? What...?"; + mes "What does that mean?"; + mes "Are you threatening me?"; + next; + + switch(select("Just do what she says.")) { + + case 1: + goto L_Help; + break; + + } + + } + + } + + } + + else if (KielHyreQuest == 52) { + mes "[Mitchell]"; + mes "I've got some new"; + mes "information for you."; + mes "There's an old lady in"; + mes "Juno that knew a woman"; + mes "named Allysia 30 years ago."; + next; + mes "[Mitchell]"; + mes "The clincher is that this"; + mes "Allysia from 30 years ago"; + mes "commited suicide, and is"; + mes "identical to Kiel Hyre's"; + mes "secretary, who is also"; + mes "named Allysia."; + next; + mes "[Mitchell]"; + mes "This is too much of a"; + mes "coincidense. I want you to"; + mes "go to Juno and investigate."; + mes "When you're done, talk to"; + mes "Kiel Hyre's steward, and"; + mes "he'll send you over to me."; + next; + mes "[Mitchell]"; + mes "Yeah, I know."; + mes "That guy actually"; + mes "works for me. Anyway,"; + mes "when you're ready to go"; + mes "to Juno, let me know, and you"; + mes "can board the federal airship."; + set KielHyreQuest,54; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Mitchell]"; + mes "Are you ready?"; + mes "I'll let you board"; + mes "the federal Airship so"; + mes "you can get to Juno, and"; + mes "finish your mission quickly."; + next; + + switch(select("Yes","No")) { + + case 1: + mes "[Mitchell]"; + mes "Good luck. Once you"; + mes "complete your mission,"; + mes "make sure that you report"; + mes "to Kiel Hyre's steward so"; + mes "that he can send you to me."; + close2; + warp "yuno",54,209; + end; + case 2: + mes "[Mitchell]"; + mes "Take your time..."; + mes "But keep in mind that"; + mes "I'm not a patient woman!"; + close; + + } + + } + + else if (KielHyreQuest == 64) { + mes "[Mitchell]"; + mes "Ah, you're back."; + mes "What do you have"; + mes "to report from your"; + mes "investigation?"; + next; + mes "[Mitchell]"; + mes "....................."; + mes "Ah, I see. Good work."; + mes "Why don't you go speak to Kiel"; + mes "Hyle and confront him with"; + mes "what you've learned about"; + mes "his past? Yeah, grill him."; + next; + mes "[Mitchell]"; + mes "Wear this hidden mic,"; + mes "so we can send help if"; + mes "you're endangered. I want"; + mes "you to find out who Kiel"; + mes "really is, and what's his"; + mes "relationship to Rekenber."; + set KielHyreQuest,68; + next; + warp "kh_mansion",83,50; + end; + } + + + else if (KielHyreQuest >= 68) { + mes "[Mitchell]"; + mes "Shouldn't you be"; + mes "leaving about now?"; + next; + warp "kh_mansion",83,50; + end; + } + +OnTouch: + if (KielHyreQuest <= 50) { + goto L_StartDialog; + } + end; +} + +//---------------------------------------------------------------------------- +// Warp portal into Kiehl's 'Room' +// - Anyone can enter +// - After 30-40 seonds this NPC should be disabled. +//---------------------------------------------------------------------------- +kh_mansion,29,27,0 script Kiehl_Room_Warp 45,2,2,{ +OnTouch: + warp "kh_kiehl01",10,31; + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Kiehl_Room_Warp"; + end; + +OnInit: + disablenpc "Kiehl_Room_Warp"; + end; +} + +//============================================================================ + +//============================================================================ +// Rosimier NPCs and other Related NPCs +//============================================================================ + +//---------------------------------------------------------------------------- +// Odd Grandma +//---------------------------------------------------------------------------- +yuno,256,141,4 script Odd Grandma 846,{ + if (KielHyreQuest < 54) { + mes "[Grandma]"; + mes "Where did you go,"; + mes "my darling? Where"; + mes "are you, my little dear?"; + close; + } + + else if (KielHyreQuest == 54) { + mes "[Grandma]"; + mes "Lullabye..."; + mes "Say goodnight..."; + mes "Hush little baby..."; + mes "Go to sleeeeep~"; + next; + + switch(select("What are you doing?","Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + mes "Oh? My baby won't stop"; + mes "crying and can't seem"; + mes "to sleep. She needs to"; + mes "rest, so I can go to work."; + mes "The house is so messy,"; + mes "and the boss is unhappy..."; + set KielHyreQuest,56; + next; + + switch(select("Um, I don't see a baby...")) { + + case 1: + mes "[Grandma]"; + //Missing text, needs another run through. + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + case 2: + //Missing text, needs another run through. + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + close; + + } + + } + + else if ((KielHyreQuest >= 56) && (KielHyreQuest < 60)) { + mes "[Grandma]"; + mes "Allysia...?!"; + mes "Allysia, where did"; + mes "you go? You were"; + mes "supposed to come"; + mes "home a while ago!"; + + if (countitem(7500) < 1) { + close; + } + + else { + next; + + switch(select("Allysia? Isn't she...")) { + + case 1: + cutin "kh_ellisia_port",1; + mes "^3355FFYou show Allysia's"; + mes "portrait to the old woman.^000000"; + next; + cutin "",255; + mes "[Grandma]"; + mes "Oh, do you know"; + mes "Allysia? She's been"; + mes "missing! She left home"; + mes "yesterday and hasn't"; + mes "come back! C-can you"; + mes "tell me where she is?!"; + close; + } + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Grandma]"; + mes "Don't worry, Allysia..."; + mes "Mommy will always be"; + mes "here for you. There's no"; + mes "need to be sad..."; + close; + } + +} + +//---------------------------------------------------------------------------- +// Old Lady; gives you the key to the Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,250,132,2 script Old Lady 711,{ + if (KielHyreQuest < 56) { + mes "[Old Lady]"; + mes "Oooh, my legs and back"; + mes "are so sore. These old"; + mes "bones ache all over..."; + close; + } + + else if (KielHyreQuest == 56) { + mes "[Old Lady]"; + mes "Goodness, I hate this"; + mes "weather! Reminds me"; + mes "of how old I've gotten!"; + mes "It chills my bones, it does!"; + next; + + switch(select("......","Do you know that grandma?")) { + + case 1: + mes "[Old Lady]"; + mes "Damn it! If only I didn't"; + mes "have all those adventures"; + mes "in my youth! Then maybe"; + mes "I wouldn't suffer so in"; + mes "my advanced age!"; + close; + + case 2: + mes "[Old Lady]"; + mes "Oh... Yes. She was"; + mes "the mother of my best"; + mes "friend, ^3355FFAllysia^000000. Ever since"; + mes "she commited suicide, things"; + mes "haven't been the same. Her"; + mes "mother lost her sanity..."; + next; + + switch(select("Was ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, Allysia was such"; + mes "a beautiful girl. So many"; + mes "men wanted her, especially"; + mes "that dashing Games Rosimier."; + mes "I remember hearing that they"; + mes "were going to get married..."; + next; + mes "[Old Lady]"; + mes "I was so happy for her!"; + mes "But then, all of a sudden,"; + mes "she killed herself. Well,"; + mes "that's what they all say."; + mes "Even today, I'm still not"; + mes "sure what happened."; + next; + + switch(select("Wait, who's James Rosimier?")) { + + case 1: + mes "[Old Lady]"; + mes "Oh, James belonged to"; + mes "one of the oldest and richest"; + mes "families in Juno. Everything"; + mes "was going great for them, but"; + mes "some time after Allysia died,"; + mes "the family went bankrupt."; + next; + mes "[Old Lady]"; + mes "The city manages their"; + mes "old residence now. For"; + mes "some reason, they decided"; + mes "to entrust me with the master"; + mes "key to the Rosimier Mansion."; + next; + + switch(select("may I borrow the Master Key?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I'm really not"; + mes "supposed to give it to just"; + mes "anyone, but I can tell that"; + mes "you're working with Allysia's"; + mes "best interests at heart."; + next; + mes "[Old Lady]"; + mes "However, you've got to"; + mes "make sure that you return"; + mes "it to me before the people"; + mes "from City Hall ask me for it."; + mes "Alright then, I hope you find"; + mes "what you're looking for."; + set KielHyreQuest,58; + getitem 7498,1; //Losimier's_House_Key + close; + } + + } + + } + + } + + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) < 1) || + (countitem(7500) < 1) || + (countitem(7501) < 1) || + (countitem(7502) < 1)) { + mes "[Old Lady]"; + mes "Please hurry and find"; + mes "whatever you're searching"; + mes "for in the Rosimier Mansion."; + mes "I might get in trouble if"; + mes "the people from City Hall"; + mes "come and ask me for the key..."; + close; + } + + else if ((KielHyreQuest == 58) && + (countitem(7499) == 1) && + (countitem(7500) == 1) && + (countitem(7501) == 1) && + (countitem(7502) == 1)) { + mes "[Old Lady]"; + mes "Oh, you're finished"; + mes "searching the mansion?"; + mes "Depressing, isn't it?"; + mes "The creditors basically"; + mes "ransacked everything"; + mes "a very long time ago."; + next; + + switch(select("Why did ^3355FFAllysia^000000...?")) { + + case 1: + mes "[Old Lady]"; + mes "Well, I know that James"; + mes "and Allysia were in love,"; + mes "and he promised to marry"; + mes "her. Now, supposedly his"; + mes "family already betrothed"; + mes "him to another woman."; + next; + mes "[Old Lady]"; + mes "Time went by, and he"; + mes "was forced to marry his"; + mes "fiancee. Allysia was pretty"; + mes "devistated. I htink maybe"; + mes "that's wht she... you know..."; + next; + mes "[Old Lady]"; + mes "Listen, if you want to learn"; + mes "more about what happened,"; + mes "then I think you should talk"; + mes "to the ^3355FFfisherman that lives^000000"; + mes "^3355FFsouth of the Kiel Hyre Academy.^000000"; + next; + mes "[Old Lady]"; + mes "He's the one that found"; + mes "Allysia's body in the river,"; + mes "so he might have a better"; + mes "idea of what had happened."; + set KielHyreQuest,60; + delitem 7498,1; //Losimier's_House_Key + close; + + } + + } + + else if (KielHyreQuest >= 60) { + mes "[Old Lady]"; + mes "Yep, Rain's coming."; + mes "Can feel it in my bones."; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Warp portal into Rosimier Mansion +//---------------------------------------------------------------------------- +yuno,273,141,0 script Rosimmir_Entrance 45,2,2,{ +OnTouch: + if (countitem(7498) < 1) { + warp "yuno",270,141; + end; + } + + else { + warp "kh_rossi",20,92; + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Table +//---------------------------------------------------------------------------- +kh_rossi,23,23,0 script Table 111,{ + if (countitem(7499) < 1) { + cutin "kh_family_port",1; + mes "^3355FFYou examine the table,^000000"; + mes "^3355FFand find a frames portait^000000"; + mes "^3355FFinside the open drawer.^000000"; + getitem 7499,1; //Portrait_of_a_Family + } + + else { + mes "^3355FFThe open drawer of,^000000"; + mes "^3355FFthis desk is empty now.^000000"; + } + + close2; + cutin "",255; + end; +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, first floor; Shelf +//---------------------------------------------------------------------------- +kh_rossi,92,40,0 script Shelf::ShelfKHQ1 111,{ + if (countitem(7500) < 1) { + mes "^3355FFThere are locked^000000"; + mes "^3355FFboxes on these bookshelves.^000000"; + mes "^3355FFPerhaps if you used this^000000"; + mes "^3355FFmansions's Master Key, you^000000"; + mes "^3355FFmight be able to open them.^000000"; + next; + + switch(select("Use Key","Pass")) { + + case 1: + mes "^3355FFWhich box do you^000000"; + mes "^3355FFwant to try to open?^000000"; + next; + + switch(select("First Box","Second Box")) { + + case 1: + mes "^3355FFYou use the Master Key to^000000"; + mes "^3355FFunlock the box, and obtain^000000"; + mes "^3355FFa portait of a woman that^000000"; + mes "^3355FFlooks just like Kiel Hyre's^000000"; + mes "^3355FFassistant, Allysia.^000000"; + next; + cutin "kh_ellisia_port",2; + mes "^3355FFThe message, ''To my love,^000000"; + mes "^3355FFAllysia. From James.'' is^000000"; + mes "^3355FFwritten on the back.^000000"; + getitem 7500,1; //Portrait_of_a_Lady + close2; + cutin "",255; + end; + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + case 2: + mes "^3355FFThis box is empty.^000000"; + close; + + } + + } + + else { + mes "^3355FFYou've found a woman's^000000"; + mes "^3355FFportrait in one of the^000000"; + mes "^3355FFboxes on this shelf.^000000"; + close; + } + +} + + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Desk +//---------------------------------------------------------------------------- +kh_rossi,144,287,0 script Desk::DeskKHQ2 111,{ + mes "^3355FFThe desk has^000000"; + mes "^3355FFthree drawers^000000"; + next; + + switch(select("First Drawer","Second Drawer","Third Drawer","Cance;")) { + + case 1: + mes "^3355FFThe first drawer is locked.^000000"; + close; + + case 2: + if (countitem(7501) < 1) { + mes "^3355FFThere is a letter inside^000000"; + mes "^3355FFthis second drawer. it^000000"; + mes "^3355FFwas sent by a person^000000"; + mes "^3355FFwith the initials, K.H.,^000000"; + mes "^3355FFand addressed to Allysia.^000000"; + getitem 7501,1; //K.H's_Letter + close; + } + + else { + mes "^3355FFThis drawer is now empty.^000000"; + close; + + } + + case 3: + mes "^3355FFThere is a small note^000000"; + mes "^3355FFinside this third drawer.^000000"; + mes "^3355FFIt's written by James, and^000000"; + mes "^3355FFmentions that he wants to^000000"; + mes "^3355FFmarry Allysia, and that she^000000"; + mes "^3355FFrecieved an engagement ring.^000000"; + close; + + case 4: + mes "......"; + mes "........."; + mes "............"; + close; + + } + +} + +//---------------------------------------------------------------------------- +// Rosimier Mansion, top floor; Bookshelf +//---------------------------------------------------------------------------- +kh_rossi,149,288,0 script Bookshelf::BookshelfKHQ2 111,{ + if (countitem(7502) < 1) { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + mes "^3355FFfind a folded note between^000000"; + mes "^3355FFthe books as you examine them.^000000"; + getitem 7502,1; //James's_Memo + close; + } + + else { + mes "^3355FFYou encounter a dusty ^000000"; + mes "^3355FFbookshelf filled with^000000"; + mes "^3355FFnumerous books. You^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Fisherman +//---------------------------------------------------------------------------- +yuno_fild12,232,222,0 script Old Fisherman 709,{ + if (KielHyreQuest < 60) { + mes "[Fisherman]"; + mes "These days, it's much"; + mes "harder to catch and fish."; + mes "Ever since they built"; + mes "this factory, the fish"; + mes "have started to change,"; + mes "and they look different too..."; + close; + } + + else if (KielHyreQuest == 60) { + mes "[Fisherman]"; + mes "Eh? You want something?"; + mes "Heh, youngsters! I know"; + mes "how much you love handouts,"; + mes "but you're not getting any."; + mes "Now, if you bring me some"; + mes "Raw Fish, I'd be more friendly~"; + + if (countitem(544) >= 10) { + next; + mes "[Fisherman]"; + mes "Oh, is all this fish"; + mes "for me? Heh, how very"; + mes "generous of you. If you're"; + mes "going to be so kind, then"; + mes "i suppose I have to repay"; + mes "the favor. Ask me anything~"; + next; + + switch(select("30 years ago, a woman killed herself...")) { + + case 1: + mes "[Fisherman]"; + mes "Oh? Ohh. Oh yeah."; + mes "I remember that. Yeah."; + mes "it was August 20th, my"; + mes "wife's birthday. That day,"; + mes "instead of catching fish,"; + mes "I caught a dead woman."; + next; + mes "[Fisherman]"; + mes "Of course, I reported it"; + mes "to the Juno Police! They told"; + mes "me she killed herself since"; + mes "she was betrayed by her lover,"; + mes "who also happened to be her"; + mes "employer. Really tragic stuff."; + next; + mes "[Fisherman]"; + mes "Anyway, when they were"; + mes "moving her body out of the"; + mes "river, her hand dropped"; + mes "some ring. I picked it up,"; + mes "hoping to sell it later for"; + mes "some zeny. I know, I know..."; + next; + mes "[Fisherman]"; + mes "I was pretty lucky the"; + mes "police didn't see me take"; + mes "it. Later that day, some guy"; + mes "came up to me and offered"; + mes "me a lot of money for it."; + mes "I guess it was my lucky day!"; + next; + mes "[Fisherman]"; + mes "I found out later that he was"; + mes "some mechanical repairman--"; + mes "something. He sold everything"; + mes "to buy that ring, so I guess"; + mes "he wanted it desperately."; + mes "Then he just dissapeared."; + next; + mes "[Fisherman]"; + mes "His name...?"; + mes "It was something like..."; + mes "Heil? Hyre? Anyway, it"; + mes "was a long time ago. Oh,"; + mes "his old house is still around."; + next; + mes "[Fisherman]"; + mes "If you're going to be"; + mes "that curious, you might"; + mes "as well check it out."; + mes "Let's see, he lived in"; + mes "a hut near the northeast"; + mes "forest guard camp."; + delitem 544,10; //Fish_Slice + set KielHyreQuest,62; + close; + } + + } + + else { + close; + } + + } + + else if (KielHyreQuest >= 62) { + mes "[Fisherman]"; + mes "Don't you remember"; + mes "what I told you? That"; + mes "guy lived in a hut near"; + mes "the northeast forest"; + mes "guard camp! Why don't"; + mes "you check that place out?"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiel Hyre's hut; Wooden Board +//---------------------------------------------------------------------------- +yuno_fild09,158,217,0 script Wooden Board 111,{ + if ((KielHyreQuest < 62) || (KielHyreQuest >= 64)) { + mes "^3355FFIt's a useless^000000"; + mes "^3355FFwooden board^000000"; + mes "^3355FFin the bushes.^000000"; + close; + } + + else if (KielHyreQuest == 62) { + mes "^000oFFYou found a long^000000"; + mes "^3355FFwooden board carved^000000"; + mes "^3355FFwith the initials, 'K.H.'^000000"; + next; + cutin "kh_kyel_port",2; + mes "^3355FFYou find a portrait of^000000"; + mes "^3355FFa young man, that looks^000000"; + mes "^3355FFlike a younger version^000000"; + mes "^3355FFof Kiel Hyre, in a broken^000000"; + mes "^3355FFpicture frame underneath^000000"; + mes "^3355FFthe old wooden board.^000000"; + set KielHyreQuest,64; + getitem 7503,1; //Portrait_of_a_Guy + next; + cutin "",255; + mes "^3355FFYou have enough^000000"; + mes "^3355FFinformation by now,^000000"; + mes "^3355FFso you should report^000000"; + mes "^3355FFback to Mitchell.^000000"; + close; + } + +} + +//============================================================================ +// Kiehl Hyre's Room and Boss NPCs +//============================================================================ +// Beyond here the NPC for the final areas. +// Now, this area is not someplace you wanna slow down so +// you can pick up dialog. I used packet logging to pull +// what I could and for the sake of the two people with me, +// did not bother doing all the proper proper NPC positioning +// or some of the 'error/wrong option' dialogs. +// All the doors are kind of weird. +//============================================================================ + +//---------------------------------------------------------------------------- +// Kiehl's Room; Receiver (Gives black keycards upon killing mobs) +//---------------------------------------------------------------------------- +kh_kiehl01,17,39,0 script Receiver 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^333333*BBBZZZ*^000000"; + if (KielHyreQuest == 74) { + next; + mes "[????]"; + mes "^333333*Bzzzz...*"; + mes "I've never seen you"; + mes "before. Did Father send"; + mes "you to kill me? We'll just"; + mes "see about that! Go ahead,"; + mes "try to find me, adventurer.^000000."; + set KielHyreQuest,76; + } + + close2; + monster "kh_kiehl01",16,32,"Alicel",1739,1,"Receiver::OnMyMobDead"; + monster "kh_kiehl01",18,31,"Aliot",1740,1,"Receiver::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 3) { + makeitem 7506,1,"this",19,36; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Flower Vase (Gives...password...for Box) +//---------------------------------------------------------------------------- +kh_kiehl01,13,40,0 script Flower Vase 111,{ + if (KielHyreQuest < 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + close; + } + + if (KielHyreQuest >= 74) { + mes "^3355FFYou found"; + mes "a flower vase.^000000"; + next; + + switch(select("Pick Up Vase","Break Vase","Turn Vase Upside-down")) { + + case 1: + mes "^3355FFThe vase is empty.^000000"; + close; + + case 2: + mes "^3355FFYou can't destroy"; + mes "this vase, even by"; + mes "striking it with all your"; + mes "might. It must have been"; + mes "specially manufactured by"; + mes "the Rekenber Corporation.^000000"; + close; + + case 3: + mes "^3355FFThe following words"; + mes "are written at the"; + mes "bottom of the vase.^000000"; + next; + mes "[Vase Message]"; + mes "''The rabbit often"; + mes "observes the door"; + mes "The night eats the"; + mes "pickled orange.''"; + close; + + } + + } + +} + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Box +//---------------------------------------------------------------------------- +kh_kiehl01,19,25,0 script Box::BoxKHQ3 111,{ + if (countitem(7505) < 1) { + mes "^3355FFYou found a box with"; + mes "a button for each letter"; + mes "of the alphabet on top of it.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "open the door") { + mes "^3355FFAs soon as you enter the"; + mes "password, the nearby door"; + mes "emits a pleasant chiming"; + mes "sound, and the box pops"; + mes "open to reveal a small key.^000000"; + getitem 7505,1; //Toy_Key + close; + } + + else { + mes "^3355FFNothing happened.^000000"; + close; + } + + } + + else { + mes "^3355FFThis is where you"; + mes "found the Toy key^000000"; + close; + } + +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (First) +// - Anyone can pass through this door +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,44,33,0 script Big Door#BigDoorKHQ1 111,{ + if (.KHDoor1Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_1_Warp::OnEnable"; + enablenpc"Big_Door_1_Warp"; + set .KHDoor1Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,43,33,0 script Big_Door_1_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_1_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_1_Warp"; + set getvariableofnpc(.KHDoor1Opened,"Big Door#BigDoorKHQ1"),0; + end; + +OnTouch: + warp "kh_kiehl01",55,33; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (second) +// - Consume Toy Key when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,174,40,0 script Big Door#BigDoorKHQ2 111,{ + if (.KHDoor2Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a small"; + mes "keyhole next to the knob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Toy Key") { + if (countitem(7505) >= 1) { + mes "^3355FFYou insert the key into"; + mes "the keyhole, and the door"; + mes "unlocks with a click as"; + mes "you turn the key.^000000"; + delitem 7505,1; //Toy_Key + donpcevent "Big_Door_2_Warp::OnEnable"; + enablenpc"Big_Door_2_Warp"; + set .KHDoor2Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,174,39,0 script Big_Door_2_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_2_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_2_Warp"; + set getvariableofnpc(.KHDoor2Opened,"Big Door#BigDoorKHQ2"),0; + end; + +OnTouch: + warp "kh_kiehl01",173,52; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Third) +// - Consume one Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,77,108,0 script Big Door#BigDoorKHQ3 111,{ + if (.KHDoor3Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 1) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,1; //Black_Keycard + donpcevent "Big_Door_3_Warp::OnEnable"; + enablenpc"Big_Door_3_Warp"; + set .KHDoor3Opened,1; + close; + } + + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,78,108,0 script Big_Door_3_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_3_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_3_Warp"; + set getvariableofnpc(.KHDoor3Opened,"Big Door#BigDoorKHQ3"),0; + end; + +OnTouch: + warp "kh_kiehl01",68,108; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fourth) +// - Consume TWO Black KeyCard when opened. +// - Only one person actually needs to open it. +//---------------------------------------------------------------------------- +kh_kiehl01,42,177,0 script Big Door#BigDoorKHQ4 111,{ + if (.KHDoor4Opened == 0) { + mes "^3355FFThe door is locked,"; + mes "but there is a narrow"; + mes "slot next to the doorknob.^000000"; + next; + input @KHInput$; + if (@KHInput$ == "Black Keycard") { + if (countitem(7506) >= 2) { + mes "^3355FFYou insert the"; + mes "Black Keycard into the"; + mes "slot, and successfully"; + mes "unlock and open the door.^000000"; + delitem 7506,2; //Black_Keycard + donpcevent "Big_Door_4_Warp::OnEnable"; + enablenpc"Big_Door_4_Warp"; + set .KHDoor4Opened,1; + close; + } + } + + mes "^3355FFYou try to push the"; + mes "door open with all"; + mes "your might, but fail"; + mes "to make it budge.^000000"; + close; + } + + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + +} + +kh_kiehl01,41,177,0 script Big_Door_4_Warp 45,1,1,{ +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnInit: + disablenpc "Big_Door_4_Warp"; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_4_Warp"; + set getvariableofnpc(.KHDoor4Opened,"Big Door#BigDoorKHQ4"),0; + end; + +OnTouch: + warp "kh_kiehl01",49,177; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,179,0 script Robots#kh1 111,{ + if (.KHKilled < 1) { + set .KHKilled,.KHKilled+1; + mes "^3355FFAs soon as you"; + mes "touch the test tube,"; + mes "a bunch of robots"; + mes "suddenly appeared.^000000."; + close2; + monster "kh_kiehl01",18,181,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,180,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,179,"Aliot",1740,1,"Robots#kh1::OnMyMobDead"; + monster "kh_kiehl01",18,178,"Alicel",1739,1,"Robots#kh1::OnMyMobDead"; + end; + } + + else { + end; + } + +OnMyMobDead: + set .KHKilled,.KHKilled+1; + if (.KHKilled == 4) { + makeitem 7506,1,"this",18,180; + set .KHKilled,0; + } + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Dummy Robots +//---------------------------------------------------------------------------- +kh_kiehl01,15,177,0 script Robots#kh2::RobotsKHQ 111,{ + end; +} +kh_kiehl01,15,180,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,15,182,0 duplicate(RobotsKHQ) Robots#kh4 111 +kh_kiehl01,35,187,0 duplicate(RobotsKHQ) Robots#kh1 111 +kh_kiehl01,37,187,0 duplicate(RobotsKHQ) Robots#kh2 111 +kh_kiehl01,39,187,0 duplicate(RobotsKHQ) Robots#kh3 111 +kh_kiehl01,41,187,0 duplicate(RobotsKHQ) Robots#kh4 111 + +//---------------------------------------------------------------------------- +// Kiehl's Room; Big Door, (Fifth, and final) +// - Anyone can pass through this door +// - Consumes 4 Solid Iron Pieces +//---------------------------------------------------------------------------- +kh_kiehl01,166,187,0 script Big Door#BigDoorKHQ5 111,{ + if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) { + if (KielHyreQuest < 86) { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + next; + + switch(select("Push Door","Kick Door","Shake Door","Pull Door","Lift Door")) { + + case 1: + break; + + case 2: + break; + + case 3: + break; + + case 4: + break; + + case 5: + break; + + } + + mes "^3355FFA group of monsters"; + mes "suddenly appeared as"; + mes "soon as you applied"; + mes "pressure to the door."; + mes "This must be some"; + mes "kind of security device.^000000"; + close2; + set @KHDoorPushAttempt,@KHDoorPushAttempt+1; + monster "kh_kiehl01",163,183,"Alicel",1739,1; + monster "kh_kiehl01",163,179,"Aliot",1740,1; + monster "kh_kiehl01",169,183,"Alicel",1739,1; + monster "kh_kiehl01",169,179,"Aliot",1740,1; + if (@KHDoorPushAttempt >= 3) { + set KielHyreQuest,86; + } + end; + } + + else if ((KielHyreQuest > 84) && (KielHyreQuest < 94)) { + mes "^3355FFYou apply some"; + mes "pressure to the door,"; + mes "and find that you can"; + mes "budge it slightly, but"; + mes "you can't fully open it.^000000"; + next; + mes "^3355FFIf you wedged something"; + mes "into the gap between the"; + mes "door and its frame, and"; + mes "fully leveraged it, then you"; + mes "should be able to open it.^000000"; + next; + + switch(select("Steel","Rusty Iron Piece","Solid Iron Piece","Iron Piece","Screw","Cancel")) { + + case 1: + set @KHPryingItem$,"Steel"; + break; + + case 2: + set @KHPryingItem$,"Rusty Iron Piece"; + break; + + case 3: + if (countitem(7507) >= 1) { + if (KielHyreQuest < 92) { + mes "^3355FFYou insert one end of"; + mes "a Solid Iron Piece into the"; + mes "door's gap in a strenuous"; + mes "effort to pry the door open"; + mes "The gap widens a little bit,"; + mes "but you break one of your"; + mes "Solid Iron Pieces.^000000"; + set KielHyreQuest,KielHyreQuest+2; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + else if (KielHyreQuest == 92) { + mes "^3355FFWith a mighty heave,"; + mes "you pry a Solid Iron"; + mes "Piece into the door jamb,"; + mes "and fling the door wide open"; + mes "Unable the withstand the"; + mes "awesome force, this Solid"; + mes "Iron Piece shatters into dust.^000000"; + set KielHyreQuest,94; + delitem 7507,1; //Hard_Piece_of_Steel + close; + } + + } + + else { + mes "^3355FFIf only you had a Solid"; + mes "Iron Piece you could use to"; + mes "pry open this door.^000000"; + close; + } + + case 4: + set @KHPryingItem$,"Iron Piece"; + break; + + case 5: + set @KHPryingItem$,"Screw"; + break; + + case 6: + mes "^3355FFLet's look for something"; + mes "heavy we can use to pry"; + mes "open this door.^000000"; + close; + + } + + mes "^3355FFThis "+@KHPryingItem$+" is far"; + mes "to weak for what you're using it for"; + mes "and breaks.^000000"; + close; + + } + + else if ((KielHyreQuest >= 94) && (KielHyreQuest <= 104)) { + if (.KHDoor5Opened == 0) { + mes "^3355FFThe large door"; + mes "is wide open, and."; + mes "you may now enter.^000000"; + next; + + switch(select("Yes","No")) { + + case 1: + close2; + set $@KH_DoorInvoker$,strcharinfo(0); + donpcevent "Big_Door_5_Warp::OnEnable"; + enablenpc"Big_Door_5_Warp"; + set .KHDoor5Opened,1; + end; + + case 2: + mes "^3355FFWho knows what is on the"; + mes "other side of this door. Let's"; + mes "think about it before barging in..^000000"; + close; + + } + } + + else { + mes "^3355FFThe door is open.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + + } + + else { + mes "^3355FFThis large door.."; + mes "is closed shut."; + mes "If you listen carefully,"; + mes "you can hear the door"; + mes "hinges slightly squeak.^000000"; + close; + } + +} + +kh_kiehl01,166,186,0 script Big_Door_5_Warp 45,1,1,{ + end; + +OnEnable: + initnpctimer; + misceffect 215; + end; + +OnTimer30000: + stopnpctimer; + misceffect 215; + disablenpc "Big_Door_5_Warp"; + set getvariableofnpc(.KHDoor5Opened,"Big Door#BigDoorKHQ5"),0; + end; + +OnInit: + disablenpc "Big_Door_5_Warp"; + end; + +OnTouch: + + if (KielHyreQuest >= 46) { + warp "kh_kiehl02",50,6; + } + else { + warp "kh_kiehl01",166,183; + } + + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl_Room_Trap (Entry way trap) +//---------------------------------------------------------------------------- +kh_kiehl02,49,10,0 script Kiehl_Room_Trap -1,5,3,{ + end; + +OnTouch: + if (.KHTrapSprung < 1) { + set .KHTrapSprung,1; + set $@KHQuestBusy,1; + initnpctimer; + monster "kh_kiehl02",47,13,"Aliot",1740,1; + monster "kh_kiehl02",54,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + monster "kh_kiehl02",51,13,"Aliot",1740,1; + monster "kh_kiehl02",53,13,"Alicel",1739,1; + monster "kh_kiehl02",49,13,"Constant",1745,1; + end; + } + + end; + + +OnTimer300000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer600000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer900000: + if (getmapusers("kh_kiehl02") == 0) { + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + } + end; + +OnTimer1200000: + donpcevent "KiehlRoom::OnReset"; + stopnpctimer; + end; + +OnGlobalTimerOff: + stopnpctimer; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Kiehl +// - Only the player who invoked the final door should progress this npc. +// - Only the player who invoked the final door should be able to get ring. +// - Timer will drop to 3 minutes once Kiehl is defeated. +//---------------------------------------------------------------------------- +kh_kiehl02,50,52,4 script Kiehl#Original 902,{ + cutin "kh_kiel01",2; + if (KielHyreQuest < 94) { + mes "[Kiehl]"; + mes "........."; + close; + } + + if ($@KH_DoorInvoker$ == strcharinfo(0)) { + if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) { + mes "[Kiehl]"; + mes "I'm surprised you made"; + mes "it this far, adventurer~"; + mes "I bid you welcome to my"; + mes "humble room. I assume that"; + mes "you've come for the Condensed"; + mes "Memory Scroll... my mind."; + next; + mes "[Kiehl]"; + mes "You can understand"; + mes "why I can't let you have it,"; + mes "so if you really want the"; + mes "Condensed Memory Scroll,"; + mes "then show me what you've got!"; + close2; + cutin "",255; + set getvariableofnpc(.KHKilled,"KiehlRoom"),0; + monster "kh_kiehl02",49,48,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,50,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,50,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",53,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,55,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",49,53,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead"; + monster "kh_kiehl02",46,53,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } + + else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") >= 5)) { + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Hmpf! You're pretty good."; + mes "Father must have spent"; + mes "a lot of money to hire"; + mes "you. So has he sent"; + mes "you to kill me?"; + next; + mes "["+strcharinfo(0)+"]"; + mes "Kiel Hyre sent me to ask"; + mes "you to stop turning all of"; + mes "the Third Generation robots"; + mes "into killing machines! How"; + mes "can do something like that"; + mes "to other robots like you?"; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Why not? It's said that man"; + mes "was made in the image of God."; + mes "Well, robots were made in the"; + mes "image of man. You humans kill"; + mes "each other as much as you"; + mes "like, as far as I can tell."; + next; + mes "[Kiehl]"; + mes "It might not be ethical"; + mes "for me to provide weapons"; + mes "to humans that need them..."; + mes "But that's what they are."; + mes "Weapons. It's more humane"; + mes "for robots to fight than humans."; + next; + mes "[Kiehl]"; + mes "Robots don't naturally"; + mes "feel pain or emotions."; + mes "Not unless they're specially"; + mes "programmed. Sorry, but I don't"; + mes "plans to stop what I'm doing."; + next; + cutin "kh_kiel04",2; + mes "["+strcharinfo(0)+"]"; + mes "Humankind may not be"; + mes "perfect, but think about"; + mes "who you're working with!"; + mes "Rekenber is the epitome of"; + mes "human evil! How can you"; + mes "support them like this?"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "I've had a long relationship"; + mes "with Rekenber. I'm fully aware"; + mes "of their capabilities. Do you"; + mes "remember the first room you"; + mes "passed on your way here, the"; + mes "one with all the toys?"; + next; + mes "[Kiehl]"; + mes "I bet you didn't know that there"; + mes "were 5 Second Generation"; + mes "robots. Me, and my four other"; + mes "brothers and sisters. Father"; + mes "built that room so that all"; + mes "five of us could live together."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "I was the only one to"; + mes "survive. I returned to"; + mes "Father and even got a"; + mes "name. But yes, I know"; + mes "how bad Rekenber really is."; + next; + mes "[Kiehl]"; + mes "I don't... I don't want"; + mes "to talk about this any more"; + mes "You've made me... Just leave."; + mes "I think I will let you live."; + next; + cutin "",255; + mes "[Mitchell]"; + mes "Freeze!"; + mes "Kiehl Hyre, you're"; + mes "under arrest for creating"; + mes "and trading illegal weapons!"; + set KielHyreQuest,100; + donpcevent "::OnKHAgent"; + enablenpc "Mitchell#KiehlRoom"; + enablenpc "Agent#KHAgent1"; + enablenpc "Agent#KHAgent2"; + enablenpc "Agent#KHAgent3"; + enablenpc "Agent#KHAgent4"; + close; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) { + set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "Ah, Schwaltzvalt Republic"; + mes "agents. Heh. I haven't had"; + mes "this many guests before."; + mes "Well, I guess this means"; + mes "we'll have to fight after"; + mes "all, you and I. *Sigh* Pity..."; + next; + mes "[Kiehl]"; + mes "First, in all fairness,"; + mes "let me take care of these"; + mes "nuisances. They're just"; + mes "mindlessly doing their"; + mes "jobs--sort of like robots-- but"; + mes "don't worry, they won't be hurt."; + next; + donpcevent "::OnKHSpiderWeb"; + mes "[Mitchell]"; + mes "Nooooo!"; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "And now, you and I can"; + mes "have a proper duel, human"; + mes "I'm interested in seeing just"; + mes "how strong you really are~"; + close2; + cutin "",255; + monster "kh_kiehl02",50,52,"Kiehl",1733,1,"KiehlRoom::OnKiehlDead"; + donpcevent "Kiehl#Original::OnChangeState"; + disablenpc "Kiehl#Original"; + end; + } + + else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") == 1)) { + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "D-damn...!"; + mes "Well played, adventurer"; + mes "Well played. I should have"; + mes "known that Father would send"; + mes "the very best after me. Still,"; + mes "you've failed to truly defeat me."; + next; + mes "[Kiehl]"; + mes "I still have a few"; + mes "trump cards left"; + mes "I think... I'll take you"; + mes "to hell with me... Well"; + mes "if robots can go there~"; + announce "*Jeeeezzzgggg~ Geezzz~ Grrrr~ Clank~*",bc_map,0xFF0000; + next; + mes "[Mitchell]"; + mes "No...! We're locked"; + mes "in the room! We're"; + mes "We're trapped in here!"; + next; + mes "[Kiehl]"; + mes "Yay~ Let's burn"; + mes "everything down~"; + next; + mes "[Mitchell]"; + mes "Quick, "+strcharinfo(0)+","; + mes "use Kiel Hyre's power"; + mes "device, the one that's"; + mes "supposed to mess with"; + mes "Kiehl's power supply!"; + mes "Hurry, use it right now!"; + next; + delitem 7504,1; //Power_Source + announce "*Gzzzz~ Gzzzz~*",bc_map,0xFF0000; + next; + mes "[Kiehl]"; + mes "Wh-what? I c-can't"; + mes "move! This day is just"; + mes "full of surprises. Oh, well."; + mes "I guess it's time for me to"; + mes "use my other trump card."; + next; + mes "[Mitchell]"; + mes "What...?"; + mes "How many trump"; + mes "cards do you have?"; + next; + mes "[????]"; + mes "I'm so disappointed..."; + mes "I can't believe none"; + mes "of you thought of this..."; + next; + mes "[Mitchell]"; + mes "Who are you...?"; + mes "Show yourself!"; + next; + donpcevent "Kiehl#Copy::OnChangeState"; + enablenpc "Kiehl#Copy"; + mes "[????]"; + mes "Please."; + mes "Don't insult me."; + mes "You know this voice."; + mes "It's been talking to"; + mes "you this entire time~"; + next; + mes "[Mitchell]"; + mes "Impossible!"; + mes "How can there"; + mes "be two of you...?!"; + next; + cutin "kh_kiel01",0; + mes "[Kiehl]"; + mes "Hahahahaha!"; + mes "I'm a robot!"; + mes "I can make extra"; + mes "bodies, switch brains"; + mes "with them. It's awfully"; + mes "convenient, let me tell you."; + next; + cutin "kh_kiel03",2; + mes "[Kiehl]"; + mes "Anyway, I don't mean to show"; + mes "off, but I suppose I better"; + mes "reveal to you my final trump"; + mes "card. First of all, I know all"; + mes "about you, Ms. Mitchell Layla~"; + next; + mes "[Mitchell]"; + mes "What? How do you"; + mes "know my name?"; + next; + mes "[Kiehl]"; + mes "Well, I have a few"; + mes "spies of my own..."; + mes "I'll allow him to explain."; + next; + mes "[Masked Man]"; + mes "Mitchell..."; + mes "I'm sorry that"; + mes "you had to get"; + mes "involved in all this."; + next; + mes "[Mitchell]"; + mes "Wolkeus? Wolkeus Kaiser?!"; + mes "You're the spy?! But you risked"; + mes "your life to save our president!"; + mes "No! Oh, God! How can this be"; + mes "happening?! Everything's just..."; + mes "This is all crazy! All of it!"; + next; + mes "[Wolkeus]"; + mes "This is just the result"; + mes "of elaborate plans that"; + mes "were made years ago. I didn't"; + mes "expect you to be this surprised,"; + mes "Mitchell. It's the way the game"; + mes "is played. You know that."; + next; + mes "[Mitchell]"; + mes "Mister President..."; + mes "I failed you... I'm sorry..."; + next; + mes "[Kiehl]"; + mes "Well, Kaiser, she took"; + mes "it pretty badly, but at least"; + mes "you're being gentlemanly"; + mes "about it. Well, I'd like for"; + mes "all of us to get better"; + mes "acquainted, but..."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "We'd better say our"; + mes "farewells here. This"; + mes "place will be gone in"; + mes "five minutes. Ah, and"; + mes "Ms. Layla, you're coming"; + mes "with us. We have questions~"; + next; + mes "[Kiehl]"; + mes "I'm curious as to what"; + mes "the president's plans are"; + mes "Mister Kaiser, if you'll"; + mes "escort Ms. Layla, please."; + next; + mes "[Wolkeus Kaiser]"; + mes "Sorry, Mitchell."; + mes "I gotta do it..."; + next; + mes "[Mitchell]"; + mes "No, get away! Let me go!"; + mes "Let go of me, Wolkeus!"; + donpcevent "::OnKHAgent"; + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + next; + cutin "kh_kiel02",2; + mes "[Kiehl]"; + mes "Great, we're done with"; + mes "that ugly business. Now,"; + mes "where was I? Ah, right."; + mes "Yes. I'm sorry. We don't"; + mes "have any more time to play."; + next; + mes "[Kiehl]"; + mes "Here, adventurer."; + mes "I'm aware that my father"; + mes "sent you here to get this."; + mes "Consider it my final gift"; + mes "to him. I'm surprised he left"; + mes "this ring inside me, though."; + next; + cutin "kh_kiel04",2; + mes "[Kiehl]"; + mes "I imagine that it must"; + mes "be precious to him. But"; + mes "I wonder why he placed"; + mes "it inside me? Well, anyway,"; + mes "I have a message I'd like"; + mes "for you to deliver to him."; + next; + cutin "kh_kiel01",2; + mes "[Kiehl]"; + mes "First... I guess we"; + mes "should get rid of this"; + mes "old thing. It was a good"; + mes "body, and it's served me"; + mes "well for 23 years. I'll miss"; + mes "it. Rest well, old Kiehl."; + next; + mes "[Kiehl]"; + mes "Now, this was the body"; + mes "that my father made."; + mes "Please tell him that"; + mes "this means that we're"; + mes "no longer related to"; + mes "each other at all."; + next; + mes "[Kiehl]"; + mes "The body I'm using right now?"; + mes "I made it myself with the most"; + mes "advanced technology. Consider"; + mes "it... a Fourth Generation robot"; + mes "body if you will. Father will"; + mes "understand what I mean."; + next; + mes "[Kiehl]"; + mes "Anyway, please tell him"; + mes "that, and get his old ring"; + mes "out of my old robot body,"; + mes "and then give it to him. For"; + mes "now, let's get out of here: we"; + mes "just have 3 minutes to evacuate."; + next; + mes "[Kiehl]"; + mes "You're a worthy opponent,"; + mes "and a human I respect."; + mes "I don't know if we'll meet"; + mes "again, but who knows?"; + mes "Anyway, I'll open up the"; + mes "exit for you. Farewell~"; + set KielHyreQuest,104; + donpcevent "Kiehl_Room_Exit::OnEnable"; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + donpcevent "Kiehl#Copy::OnChangeState"; + disablenpc "Kiehl#Copy"; + initnpctimer; + end; + } + + if (KielHyreQuest == 104) { + cutin "kh_kiel02",2; + mes "^3355FFYou retrieve the"; + mes "ring from the heart of"; + mes "Kiehl's old robotic body.^000000"; + getitem 7508,1; //Elisia's_Ring + set KielHyreQuest,106; + enablenpc "Kiehl_Room_Exit"; + close2; + cutin "",255; + end; + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + + + } + + else { + mes "......"; + close2; + cutin "",255; + end; + } + 1200000 +OnTimer180000: + stopnpctimer; + mapannounce "kh_kiehl02","Beeeeeeeeeeeeep~",bc_npc,0xFF0000; + donpcevent "KiehlRoom::OnReset"; + end; + +OnTimer179000: + mapannounce "kh_kiehl02","1 second remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer178000: + mapannounce "kh_kiehl02","2 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer177000: + mapannounce "kh_kiehl02","3 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer176000: + mapannounce "kh_kiehl02","4 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer175000: + mapannounce "kh_kiehl02","5 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer170000: + mapannounce "kh_kiehl02","10 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer160000: + mapannounce "kh_kiehl02","20 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer150000: + mapannounce "kh_kiehl02","30 seconds remaining until detonation",bc_npc,0xFF0000; + end; + +OnTimer120000: + mapannounce "kh_kiehl02","1 minute remaining until detonation.",bc_npc,0xFF0000; + end; + +OnTimer60000: + mapannounce "kh_kiehl02","2 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnTimer1000: + mapannounce "kh_kiehl02","3 minutes remaining until detonation.",bc_npc,0xFF0000; + end; + +OnChangeState: + misceffect 215; + end; + +OnInit: + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; NPC for mob control, timers, and other junk. +//---------------------------------------------------------------------------- +kh_kiehl02,1,1,0 script KiehlRoom -1,{ + end; + +OnKiehlMobDead: +debugmes "KLol: "+.KHKilled; + set .KHKilled,.KHKilled+1; + if (.KHKilled == 5) { + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + } + end; + +OnKiehlDead: + set .KHKilledBoss,1; + donpcevent "Kiehl#Original::OnChangeState"; + enablenpc "Kiehl#Original"; + end; + +OnReset: + donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff"; + if (getmapusers("kh_kiehl02") > 0) { + mapwarp "kh_kiehl02","lighthalzen",192,200; + } + killmonsterall "kh_kiehl02"; + disablenpc "Kiehl_Room_Exit"; + disablenpc "Mitchell#KiehlRoom"; + disablenpc "Agent#KHAgent1"; + disablenpc "Agent#KHAgent2"; + disablenpc "Agent#KHAgent3"; + disablenpc "Agent#KHAgent4"; + disablenpc "Kiehl#Copy"; + enablenpc "Kiehl#Original"; + set .KHKilledBoss,0; + set .KHKilled,0; + set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0; + set $@KHQuestBusy,0; + set $@KH_DoorInvoker$,""; + end; +} + +//---------------------------------------------------------------------------- +// Kiehl's Room; Mitchell and Agents. (Floating NPC + Duplicates) +//---------------------------------------------------------------------------- +- script Agent#KHAgent1::KHAgent -1,{ + end; + +OnKHAgent: + misceffect 215; + end; + +OnKHSpiderWeb: + misceffect 404; + end; +} + + +kh_kiehl02,49,55,7 duplicate(KHAgent) Mitchell#KiehlRoom 727 + +kh_kiehl02,53,52,4 duplicate(KHAgent) Agent#KHAgent1 880 + +kh_kiehl02,51,49,0 duplicate(KHAgent) Agent#KHAgent2 880 + +kh_kiehl02,47,50,0 duplicate(KHAgent) Agent#KHAgent3 880 + +kh_kiehl02,46,53,6 duplicate(KHAgent) Agent#KHAgent4 880 + + +//---------------------------------------------------------------------------- +// Kiehl's Room; Copy of Kiehl. +//---------------------------------------------------------------------------- +kh_kiehl02,48,53,7 script Kiehl#Copy 902,{ + end; + +OnChangeState: misceffect 215; end; |