viewing paste kiel_hyre_quest.txt | Athena

Posted on the
  1. //===== rAthena Script ======================================= 
  2. //= Kiel Hyre Quest
  3. //===== By: ================================================== 
  4. //= L0ne_W0lf (Script), DZeroX (Timer)
  5. //===== Current Version: ===================================== 
  6. //= 4.6
  7. //===== Compatible With: ===================================== 
  8. //= rAthena SVN
  9. //===== Description: ========================================= 
  10. //= Quest for opening Robot Factory first and second floors.
  11. //===== Comments: ============================================
  12. //= See below
  13. //===== Additional Comments: ================================= 
  14. //= 1.0 First version, needs testing [Playtester]
  15. //= 1.1 Copied over some changes made by -Tsuyuki- [L0ne_W0lf]
  16. //=	Reworked variables slightly so that the permenents ones aside from the 
  17. //=	main tracking variable, are deleted when no longer needed. Renamed
  18. //=	several variables that handle strings to @KHInput$. [L0ne_W0lf]
  19. //= 1.2 Removed duplicate NPCs. [Toms]
  20. //= 1.3 More Bug fixes, fixed typo. Updated Additional comments. [L0ne_W0lf]
  21. //= 1.4 Fixed doors not resetting in kh_kiehl01 after 30 second timer is up. [L0ne_W0lf]
  22. //= 1.5 Another bug fixed (&& instead of ||). [L0ne_W0lf]
  23. //= 1.6 More squashed bugs with if checking. [L0ne_W0lf]
  24. //= 1.7 Corrected some spelling mistakes. [Balish]
  25. //	Corrected Exploit with the pub man, giving infinite wine and money.
  26. //	Corrected pool and map not showing text for some states of the quest.
  27. //	Corrected Elly showing cutin but not text for some states of the quest (causing players to log off to continue).
  28. //	Let fisherman talk to you when you have 10 fishes OR MORE.
  29. //	Corrected not letting you enter the tombstone after finishing the quest.
  30. //= 1.8 Elly now deletes the Iron_Box, and Kiel Hyre deletes the Pin. [L0ne_W0lf]
  31. //= 	More security on the 5th Big Door, now makes sure no one outside of who-
  32. //=	acticated it initially can use it. Resets after 10 minutes to make it.
  33. //=	Made it so that you need to be at least step 84 to activate the final door.
  34. //=	Corrected not deleting Allysia's Ring from inventory.
  35. //= 1.9 Exit will now enable if you are just retrieving the Ring, keeps you from getting stuck. [L0ne_W0lf]
  36. //=	Corrected "KH_Kielh02", was setting off a debug, invalid map index. Should have been "kh_Kiehl02"
  37. //=	Made .KHQuestBusy$ into a temp global variable. $@KHQuestBusy$. 
  38. //= 2.0 Changed the labels on the "Big Doors" to "Identifier Names" to prevent an error with using getvariableofnpc [L0ne_W0lf]
  39. //= 2.1 Fifth door now checks for a variable HIGHER or EQUAL to 74 not 84, as pointed out by Stollen. [L0ne_W0lf]
  40. //= 2.2 Another fix for Elly, no longer RESETS to 26 when you talk to her. [L0ne_W0lf]
  41. //= 2.3 Should NOT have been setting .KHQuestBusy at all. It's not used or accessed anymore. Removed. [L0ne_W0lf]
  42. //= 2.4 Lots of fixes (4ish) from Valandi. [L0ne_W0lf]
  43. //=	Added a getmapuser check to the mapwarp in KHTimerEnd so it's not trying to warp out 0 users. [L0ne_W0lf]
  44. //= 2.5 Fixed several small issues (and large one) such as typos in cutins, typos in dialog, etc. [L0ne_W0lf]
  45. //=	Added some of the missing dialogs for several NPCs, and fixed a few NPC locations.
  46. //=	ALL books can now trigger the wall.
  47. //=	Allysia will now summon 4 (was 2) G_CONSTANTS instead of REGULAR constants.
  48. //=	Fixed where Golden_Key and Kiel_Button are deleted.
  49. //=	Removed KHTimerEnd, and instead use OnReset.
  50. //=	Fixed typo in the second NPC that gives Black Keycards.
  51. //=	Added Monster Warps. (Keeps monsters from being in dungeon quest area.) [Non-functional]
  52. //= 2.6 Stupid mistake, accidentally had 4 copies of the same script in 1... [L0ne_W0lf the bonehead]
  53. //= 2.7 Fixed the wrong name being displayed for Kiel Hyre in one dialog. 
  54. //=	Removed $@KH_DoorInvoker entirely. The quest is now working like it should according to iRO.
  55. //=	Fixed up a few more NPC headers. Facing direction fixes mostly this time.
  56. //=	More progression changes to Kiehl Hyre. He no longer stops dialog after the agents appear.
  57. //= 2.8 Fixed the weight checking in Vandt, and added official dialog. [L0ne_W0lf]
  58. //=	Added weight checks for all NPCs that give items. Semi-official dialog.
  59. //=	Got the missing portion of dialog for Mills'.
  60. //=	Will add further proper dialogs as I get to them on the second runthrough of the quest.
  61. //= 2.8a minor optimization with extra goto, else or empty switch [Lupus]
  62. //= 2.9 Fixed the "enablenpc" problem with the missing spaces. No idea how it happened. [L0ne_W0lf]
  63. //= 3.0 Fixed a typo in Elly, in her room. (was <= should have been <) [L0ne_W0lf]
  64. //=	Added an 'end;' to the cookie basket. Kiel Hyre's final dialog will now delete all quest-related items.
  65. //= 3.1 Moved the "delitem" for all related quest items to the proper NPC. [L0ne_W0lf]
  66. //= 3.2 Fixed error with Allysia teling you to "Go away." maybe. [L0ne_W0lf]
  67. //= 3.2b Fixed some typos and grammar mistakes. [SinSloth]
  68. //= 3.3 Fixed the receiver log out bugs. [L0ne_W0lf]
  69. //= 3.4 Fixed bug when u can't get a Yellow Keycard if u got the Blue one at first [Lupus]
  70. //=     Note: There are many condition checks that should be omitted in the future fixed item names in item_db.txt / txt resources according the quest
  71. //=     for items, should be used bitwise methods in a single variable. So let's fix the rest possible bugs (if they exist) and then optimize ^_-
  72. //= 3.5 Changed the way the Black Keycard distibuting NPCs work slighty. [L0ne_W0lf]
  73. //= 3.6 Keil Hyre removes ALL outstanding quest items when he is talked [L0ne_W0lf]
  74. //=	to after finishing the quest.
  75. //= 3.7 Corrected NPC names to fall within proper restrictions. [L0ne_W0lf]
  76. //= 3.8 Corrected some delitems. (bugreport:690) [Samuray22]
  77. //= 3.9 Fixed a cutin not being erased. (bugreport:1539) [L0ne_W0lf]
  78. //= 4.0 A whole bunch-a-updates to various npcs. [L0ne_W0lf]
  79. //=     Corrected condition checks throughout the quest.
  80. //=     Npcs no longer make use of the goto command.
  81. //=     Uses temp npc vars now instead of temp char.
  82. //=     Reduced the amount of variables used.
  83. //=     Corrected some of the cutins in npcs with them.
  84. //=     Added the missing dialogs and weight checks.
  85. //=     Fixed many typos, and grammatical errors.
  86. //=     NPC now names use '#<name>' instead of labels.
  87. //=     Updated some NPC positions, and facings.
  88. //=     Changed the way some NPCs work.
  89. //=     Updated comments for get/delitem commands.
  90. //= 4.1 Added an 'end;' to Kiel Hyre's dialog for the "Yes" option for if you want to confront Kiehl.
  91. //= 4.2 Fixed some issues reported in bugreport:2129. [L0ne_W0lf]
  92. //= 4.2a Follow up to last update. [L0ne_W0lf]
  93. //= 4.2b Missed a condition, fixed it though. [L0ne_W0lf]
  94. //= 4.2c More various fixes :D [L0ne_W0lf]
  95. //= 4.3 Fixed improper condition in the Elly NPC. [L0ne_W0lf]
  96. //=     Corrected some typos in the dialogs.
  97. //= 4.4 Updated reviecer and robots NPC to use mobcount. (bugreport:2380) [L0ne_W0lf]
  98. //= 4.5 Removed a delitem that was no logner needed. [L0en_W0lf]
  99. //= 4.6 Fixed impossible condition for security guard. [L0ne_W0lf]
  100. //============================================================ 
  101.  
  102. //============================================================================
  103. // Kiel Hyre Quest/Robotic Lab Dungeon
  104. //
  105. // Script Dialog Obtained and Copied Down by L0ne_W0lf
  106. // Timer work and some variable dances by DZeroX
  107. // Based on [iRO Sakray] as of [03/29/2007]
  108. //============================================================================
  109. //----------------------------------------------------------------------------
  110. // [Notes]
  111. //  - Let it be noted that ALL DIALOG IS OFFICIAL TO IRO UNLESS SPECIFIED.
  112. //  - I've fixed a few of iRO's mistakes, but I'm sure I made some of my own. 
  113. //  - Will probably require a major optimizing.
  114. //  - Not going to list ALL of the more usless NPCs. (Doors + Empty "Beautiful Ladies")
  115. //  - Parties are *NOT REQUIRED* as per Doddler's Wiki information.
  116. //
  117. //----------------------------------------------------------------------------
  118. // [Maps]                [Use]
  119. //  yuno_in01 ........... Start quest in pub
  120. //  kh_school ........... Deliver Wine here, Meet Elly
  121. //  yuno ................ Get Delivery for/from "Little Kid"
  122. //  lighthalzen ......... Get Delivery package for "Little Kid"
  123. //  kh_vila ............. Kiel Hyre cottage.
  124. //  kh_dun01 ............ Robot Factory; Save Kiel Hyre
  125. //  kh_mansion .......... Kiel Hyre's Mansion in Lighthalzen
  126. //  kh_kiehl01 .......... Kiehl's room/Cave
  127. //  kh_kiehl02 .......... Kiehl's room/Boss Room
  128. //
  129. //----------------------------------------------------------------------------
  130. // [Variables in Use]
  131. //  KielHyreQuest 	- Main quest tracking variable (Quest finished at 106)
  132. //
  133. //  KHToastGirlEnd	- Pick up delivery if set to 1, 
  134. //			- picked up delivery if set to 2
  135. //			- finished if set to 3 
  136. //			- Deleted once no longer needed.
  137. //
  138. //  KHCottagePoem1	- Tracks Poem 1 quest in cottage. (finished = 5)
  139. //			- Deleted once no longer needed.
  140. //
  141. //  KHCottagePoem2	- Tracks Poem 2 quest in cottage. (finished = 3)
  142. //			- Deleted once no longer needed.
  143. //
  144. //  .@KHInput$		- Used with "Security Guard"
  145. //  			- Used with "Test Tube"
  146. //  			- Used when "Elly" (inputing string in attempt to wake her)
  147. //  			- Used with "Grave", (twice)
  148. //  			- Used with "Heavy Door"
  149. //  			- Used with "Mechanical Device"
  150. //  			- Used for opening various doors in Kiehl's area.
  151. //
  152. //  .@KHFirstKeyhole	- Holds 1 (green keycard) or 2 (cottage key)
  153. //  .@KHSecondKeyhole	- Holds 1 (green keycard) or 2 (cottage key)
  154. //
  155. //  .@KHPotionColor$	- Holds 'red', 'green', or 'yellow' depending on what wrong potion is selected.
  156. //
  157. //  .@KHSwords 		- Used with "Sword Hilt"
  158. //
  159. //  .@KHQRead		- Make sure player has asked questions to Kiel Hyre
  160. //
  161. //  .@KHTitle$		- Holds "Mr", "Mrs", or "Miss"
  162. //
  163. //  .@KHDoorPushAttempt	- Keeps track of how many times a person has attmepted to push the door open.
  164. //
  165. //  .@KHPryingItem$	- Used for incorrect options when prying open last door.
  166. //
  167. //  .KHKilled		- Tracks how many monsters have been killed. Used with "Receiver", "Robots", and "Kiehl" NPCs
  168. //
  169. //  .KHDoor1Open	- 0/1 Depending on if the first door is opened.
  170. //  .KHDoor2Open	- 0/1 Depending on if the second door is opened.
  171. //  .KHDoor3Open	- 0/1 Depending on if the third door is opened.
  172. //  .KHDoor4Open	- 0/1 Depending on if the fourth door is opened.
  173. //  .KHDoor5Open	- 0/1 Depending on if the fifth door is opened.
  174. //
  175. //  .KHKilledBoss	- 0/1 depending on if the boss has been killed.
  176. //
  177. //  $@KHQuestBusy	- 0/1 depending on if the boss room has been set in motion.
  178. //
  179. //----------------------------------------------------------------------------
  180. // [NPCs]			 [Location]
  181. //  Pub Master .................. yuno_in01	[ 35,178]
  182. //  Hanie ....................... yuno_fild08	[196,196]
  183. //  Security Guard .............. yuno_fild08	[158,194]
  184. //  Security Guard .............. yuno_fild08	[158,183]
  185. //  Student ..................... kh_school	[ 57,142]
  186. //  Student ..................... kh_school	[ 57,139]
  187. //  Lady ........................ kh_school	[176, 60]
  188. //  Cute Student ................ kh_school	[179, 39]
  189. //  Little Kid .................. yuno		[217,114]
  190. //  Windmill Owner .............. lighthalzen	[365,300]
  191. //  Cottage Keeper .............. yuno_fild02	[ 93,210]
  192. //  Door ........................ yuno_fild02	[ 75,218]
  193. //  Door ........................ yuno_fild02	[109,218]
  194. //  Wall ........................ kh_vila	[191, 14]
  195. //  Book ........................ kh_vila	[184, 20]
  196. //  Book ........................ kh_vila	[181, 20]
  197. //  Book ........................ kh_vila	[178, 20]
  198. //  Book ........................ kh_vila	[175, 19]
  199. //  Letter ...................... kh_vila	[179, 11]
  200. //  Box ......................... kh_vila	[ 16,175]
  201. //  Apple Box ................... kh_vila	[ 30,184]
  202. //  Map ......................... kh_vila	[ 44,125]
  203. //  Pot ......................... kh_vila	[ 33,148]
  204. //  Calabash .................... kh_vila	[ 14, 55]
  205. //  Pool ........................ kh_vila	[ 39, 39]
  206. //  Vicious Dog ................. kh_vila 	[180,178]
  207. //  Drawer ...................... kh_vila 	[115,186]
  208. //  Box ......................... kh_vila 	[107,126]
  209. //  Bookshelf ................... kh_vila 	[181,138]
  210. //  Sword Hilt .................. kh_vila 	[136, 69]
  211. //  Test Tube ................... kh_vila	[179, 69]
  212. //  Test Tube ................... kh_vila	[185, 69]
  213. //  Window ...................... yuno_fild08	[ 69,185]
  214. //  Elly ........................ kh_school	[178,180]
  215. //  Cookie Basket ............... kh_school	[175,175]
  216. //  Window ...................... kh_school	[188,185]
  217. //  Grave ....................... yuno_fild08	[ 72,170]
  218. //  Heavy Door .................. kh_dun01	[236, 48]
  219. //  Beautiful lady .............. kh_school	[119,149]
  220. //  Beautiful lady .............. kh_school	[122,186]
  221. //  Signboard ................... kh_dun01	[163,223]
  222. //  Mechanical Device ........... kh_dun01	[166,223]
  223. //  Mechanical Device ........... kh_dun01	[162,206]
  224. //  Kiel_Hyre_Door .............. kh_dun01	[224,232]
  225. //  Steward ..................... kh_mansion	[ 78, 55]
  226. //  Kiel Hyre ................... kh_mansion	[ 22, 27]
  227. //  Allysia ..................... kh_mansion	[ 22, 27]
  228. //  Abduction_trigger ........... lighthalzen	[188,200]
  229. //  Mysterious Woman ............ kh_mansion	[ 25, 79]
  230. //  Odd Granma .................. yuno		[250,132]
  231. //  Old Lady .................... yuno 		[250,132]
  232. //  Rosimmir_Entrance ........... yuno		[273,141]
  233. //  Table ....................... kh_rossi	[ 23, 23]
  234. //  Shelf ....................... kh_rossi	[ 92, 40]
  235. //  Desk ........................ kh_rossi	[144,146]
  236. //  Bookshelf ................... kh_rossi	[144,146]
  237. //  Bed ......................... kh_rossi	[154,286]
  238. //  Old Fisherman ............... yuno_fild12	[232,222]
  239. //  Wooden Board ................ yuno_fild09	[158,217]
  240. //  Kiehl_Room_Warp ............. kh_mansion	[ 29, 27]
  241. //  Entrance Device#KHEntry1 .... kh_dun01	[ 44, 20]
  242. //  Entrance Device#KHEntry2 .... kh_dun01	[ 44,203]
  243. //  Security Guard .............. yuno_fild08	[158,194]
  244. //  Receiver .................... kh_kiehl01	[ 17, 39]
  245. //  Flower Vase ................. kh_kiehl01	[ 13, 40]
  246. //  Box ......................... kh_kiehl01	[ 19, 25]
  247. //  Big Door .................... kh_kiehl01	[ 44, 33]
  248. //  Big_Door_1_Warp ............. kh_kiehl01	[ 43, 33]
  249. //  Big Door .................... kh_kiehl01	[174, 40]
  250. //  Big_Door_2_Warp ............. kh_kiehl01	[174, 39]
  251. //  Big Door .................... kh_kiehl01	[ 77,108]
  252. //  Big_Door_3_Warp ............. kh_kiehl01	[ 68,108]
  253. //  Big Door .................... kh_kiehl01	[ 41,177]
  254. //  Big_Door_4_Warp ............. kh_kiehl01	[ 78,177]
  255. //  Robots ...................... kh_kiehl01	[ 15,181]
  256. //  Big Door .................... kh_kiehl01	[166,187]
  257. //  Big_Door_5_Warp ............. kh_kiehl01	[166,186]
  258. //  Kiehl_Room_Trap ............. kh_kiehl02	[ 49, 15]
  259. //  Kiehl#Original .............. kh_kiehl02	[ 50, 52]
  260. //  KiehlRoom ................... kh_kiehl02	[  1,  1]
  261. //  Mitchell#KiehlRoom .......... kh_kiehl02	[ 49, 55]
  262. //  Agent#KHAgent1 ....   ....... kh_kiehl02	[ 53, 52]
  263. //  Agent#KHAgent2 .............. kh_kiehl02	[ 51, 49]
  264. //  Agent#KHAgent3 .............. kh_kiehl02	[ 47, 50]
  265. //  Agent#KHAgent4 .............. kh_kiehl02	[ 46, 53]
  266. //  Kiehl#Copy .................. kh_kiehl02	[ 48, 53]
  267. //  Kiehl_Roomn_Exit ............ kh_kiehl01	[ 50, 59]
  268. //
  269. //----------------------------------------------------------------------------
  270. // [Functions]
  271. //  None
  272. //
  273. //----------------------------------------------------------------------------
  274. // [Conflicts]
  275. //   Resolved
  276. //
  277. //============================================================================
  278.  
  279. //============================================================================
  280. // Affiliated NPCs
  281. //============================================================================
  282.  
  283. //----------------------------------------------------------------------------
  284. // Juno Pub Master/Starting point.
  285. //----------------------------------------------------------------------------
  286. yuno_in01,35,179,4	script	Pub Master#kh	46,5,5,{
  287. 	if (checkweight(7487,1) == 0) {
  288. 		mes "[Vandt]";
  289. 		mes "Just a second! You're";
  290. 		mes "carrying too many items";
  291. 		mes "right now. You'd better";
  292. 		mes "put your stuff in Kafra";
  293. 		mes "Storage or you won't be";
  294. 		mes "able to pick up anything new...";
  295. 		close;
  296. 	}
  297. 	if (KielHyreQuest == 0) {
  298. 		mes "[Vandt]";
  299. 		mes "Hi there, welcome";
  300. 		mes "to my pub. So what";
  301. 		mes "would you like to have?";
  302. 		next;
  303. 		switch(select("Beer, please.","A cocktail, please.","Soju, please.","Maybe later.")) {
  304. 		case 1:
  305. 			mes "[Vandt]";
  306. 			mes "Alright, let me get";
  307. 			mes "you a glass of beer on";
  308. 			mes "tap. There you are, this";
  309. 			mes "is out special Schwaltz Beer.";
  310. 			next;
  311. 			mes "^3355FF*Gulp gulp gulp*^000000";
  312. 			percentheal 5,-5;
  313. 			next;
  314. 			mes "["+strcharinfo(0)+"]";
  315. 			mes "Ahhh, it's really";
  316. 			mes "good! That really";
  317. 			mes "hits the spot!";
  318. 			close;
  319. 		case 2:
  320. 			mes "[Vandt]";
  321. 			mes "I'm sorry, but I have to";
  322. 			mes "deliver all of our cocktail";
  323. 			mes "ingredients to other customers.";
  324. 			mes "Maybe I'll have enough to make";
  325. 			mes "you something next time, okay?";
  326. 			close;
  327. 		case 3:
  328. 			mes "[Vandt]";
  329. 			mes "S-soju? I'm sorry,";
  330. 			mes "but we don't serve that";
  331. 			mes "here. It's too much of";
  332. 			mes "a tough guy drink for me...";
  333. 			close;
  334. 		case 4:
  335. 			mes "[Vandt]";
  336. 			mes "Sure, just take";
  337. 			mes "your time, relax,";
  338. 			mes "and order something";
  339. 			mes "when you're ready.";
  340. 			close;
  341. 		}
  342. 	}
  343. 	if (KielHyreQuest == 1) {
  344. 		mes "[Vandt]";
  345. 		mes "Hi there, welcome";
  346. 		mes "to my pub. So what";
  347. 		mes "would you like to have?";
  348. 		next;
  349. 		switch(select("Beer, please:A cocktail, please:Soju, please.:You look worried, what's up?:Cancel")) {
  350. 		case 1:
  351. 			mes "[Vandt]";
  352. 			mes "Alright, let me get";
  353. 			mes "you a glass of beer on";
  354. 			mes "tap. There you are, this";
  355. 			mes "is out special Schwaltz Beer.";
  356. 			next;
  357. 			mes "^3355FF*Gulp gulp gulp*^000000";
  358. 			percentheal 5,-5;
  359. 			next;
  360. 			mes "["+strcharinfo(0)+"]";
  361. 			mes "Ahhh, it's really";
  362. 			mes "good! That really";
  363. 			mes "hits the spot!";
  364. 			close;
  365. 		case 2:
  366. 			mes "[Vandt]";
  367. 			mes "I'm sorry, but I have to";
  368. 			mes "deliver all of our cocktail";
  369. 			mes "ingredients to other customers.";
  370. 			mes "Maybe I'll have enough to make";
  371. 			mes "you something next time, okay?";
  372. 			close;
  373. 		case 3:
  374. 			mes "[Vandt]";
  375. 			mes "S-soju? I'm sorry,";
  376. 			mes "but we don't serve that";
  377. 			mes "here. It's too much of";
  378. 			mes "a tough guy drink for me...";
  379. 			close;
  380. 		case 4:
  381. 			mes "[Vandt]";
  382. 			mes "Oh, did you overhear?";
  383. 			mes "I'm sorry, it's just that one";
  384. 			mes "of my employees had an";
  385. 			mes "accident and was pretty hurt,";
  386. 			mes "so I have nodoby that can";
  387. 			mes "deliver this merchandise.";
  388. 			next;
  389. 			mes "[Vandt]";
  390. 			mes "I have an urgent order";
  391. 			mes "that I need to send to";
  392. 			mes "the Kiel Hyre Academy,";
  393. 			mes "but I can't find anyone";
  394. 			mes "that's available for this";
  395. 			mes "kind of temporary job.";
  396. 			next;
  397. 			switch(select("I'm sorry to hear that:Do you want me to help you?")) {
  398. 			case 1:
  399. 				mes "[Vandt]";
  400. 				mes "Well, I'm sure that I'll";
  401. 				mes "figure something out.";
  402. 				mes "Do you know anyone";
  403. 				mes "that'd be interested in";
  404. 				mes "some part time work?";
  405. 				close;
  406. 			case 2:
  407. 				mes "[Vandt]";
  408. 				mes "Really? That's great!";
  409. 				mes "But first, I think it's fair to";
  410. 				mes "tell you that this job may not";
  411. 				mes "be as simple as you'd think.";
  412. 				mes "I expect you to complete the";
  413. 				mes "delivery, no matter what.";
  414. 				next;
  415. 				switch(select("Sure I'll do it:Wait, let me think about it...")) {
  416. 				case 1:
  417. 					mes "[Vandt]";
  418. 					mes "I'm glad to hear that.";
  419. 					mes "Well then, please take this";
  420. 					mes "bottle of Culinary Wine to";
  421. 					mes "Mrs. ^ff0000Lecollane^000000 in the Kiel";
  422. 					mes "Hyre Academy. I'll pay you";
  423. 					mes "once you finish the job, okay?";
  424. 					getitem 7487,1; //Tavern_Wine
  425. 					set KielHyreQuest,2;
  426. 					close;
  427. 				case 2:
  428. 					mes "[Vandt]";
  429. 					mes "Sure thing. I really need";
  430. 					mes "to get this done, so if you";
  431. 					mes "can't do it, but know any";
  432. 					mes "capable, responsible";
  433. 					mes "people that can, then please";
  434. 					mes "tell them about my situation.";
  435. 					close;
  436. 				}
  437. 			}
  438. 		case 5:
  439. 			mes "[Vandt]";
  440. 			mes "Sure, just take";
  441. 			mes "your time, relax,";
  442. 			mes "and order something";
  443. 			mes "when you're ready.";
  444. 			close;
  445. 		}
  446. 	}
  447. 	else if ((KielHyreQuest >= 2) && (KielHyreQuest < 6)) {
  448. 		mes "[Vandt]";
  449. 		mes "Please deliver that bottle";
  450. 		mes "of Wine I gave you to Mrs.";
  451. 		mes "Mrs. ^ff0000Lecollane^000000, who should be";
  452. 		mes "inside the Kiel Hyre Academy.";
  453. 		mes "Hurry and get it to her before she";
  454. 		mes "can complain about the delivery.";
  455. 		close;
  456. 	}
  457. 	else if (KielHyreQuest == 6) {
  458. 		if (countitem(7487) == 0) {
  459. 			mes "[Vandt]";
  460. 			mes "Oh, you're back.";
  461. 			mes "Thanks for making that";
  462. 			mes "delivery. Just give me";
  463. 			mes "a moment, and then I can";
  464. 			mes "pay you in zeny, okay?";
  465. 			next;
  466. 			select("I need more wine...");
  467. 			mes "[Vandt]";
  468. 			mes "Oh, you need to deliver";
  469. 			mes "another bottle? Alright,";
  470. 			mes "let me look around, and";
  471. 			mes "I'll give you the wine";
  472. 			mes "and your payment.";
  473. 			next;
  474. 			mes "^3355FFRummage Rummage^000000";
  475. 			mes "^3355FFRummage Rummage^000000";
  476. 			next;
  477. 			mes "[Vandt]";
  478. 			mes "There you go!";
  479. 			mes "Thank you so much";
  480. 			mes "for helping me out~";
  481. 			getitem 7487,1; //Tavern_Wine
  482. 			set zeny,zeny+1000;
  483. 			close;
  484. 		}
  485. 		else {
  486. 			mes "[Vandt]";
  487. 			mes "Hey, thanks a lot";
  488. 			mes "for helping me out that";
  489. 			mes "last time. I knew I asked";
  490. 			mes "you out of the blue, but";
  491. 			mes "you ended up being a life";
  492. 			mes "saver! I really appreciate it!";
  493. 			close;
  494. 		}
  495. 	}
  496. 	else {
  497. 		mes "[Vandt]";
  498. 		mes "You're a really good";
  499. 		mes "worker, you know that?";
  500. 		mes "Dependable, responsible,";
  501. 		mes "willing to help others, and";
  502. 		mes "proactive too! I think you'll";
  503. 		mes "go far in life, kid, I really do~";
  504. 		close;
  505. 	}
  506.  
  507. //OnTouch2:
  508. OnTouch:
  509. 	if (KielHyreQuest < 1) {
  510. 		mes "[Vandt]";
  511. 		mes "Arrrggghhh...";
  512. 		mes "This can't be good...";
  513. 		mes "This isn't good at all!";
  514. 		mes "What am I suposed to do?";
  515. 		set KielHyreQuest,1;
  516. 		close;
  517. 	} 
  518. }
  519.  
  520. //----------------------------------------------------------------------------
  521. // Juno Toast Sales Girl.
  522. //----------------------------------------------------------------------------
  523. yuno,217,114,6	script	Little Kid#kh	96,{
  524. 	mes "[Cezu]"; 
  525. 	if (KielHyreQuest < 6) {
  526. 		mes "Fresh, crunchy toast!";
  527. 		mes "If you want some, come";
  528. 		mes "and get some tooooast~";
  529. 		close;
  530. 	}
  531. 	else if (KielHyreQuest == 6) {
  532. 		if (KHToastGirlEnd < 1) {
  533. 			mes "Fresh, crunchy toast!";
  534. 			mes "If you want some, come";
  535. 			mes "and get some tooooast~";
  536. 			mes "Oh! Hi hi~ Did you want";
  537. 			mes "to buy some yummy toast?";
  538. 			next;
  539. 			switch(select("I'm here for Elly:No, thanks")) {
  540. 			case 1:
  541. 				mes "[Cezu]"; 
  542. 				mes "Oh, I see. Elly must have";
  543. 				mes "wasted another batch of";
  544. 				mes "ingredients again. Well,";
  545. 				mes "she's a regular customer,";
  546. 				mes "so I really want to help, but";
  547. 				mes "I can't really do anything.";
  548. 				next;
  549. 				mes "[Cezu]"; 
  550. 				mes "You see, I just ran";
  551. 				mes "out of ingredients too!";
  552. 				mes "But I can't really leave";
  553. 				mes "to get some more. What if";
  554. 				mes "people need to buy toast?";
  555. 				mes "Listen, can you help me out?";
  556. 				next;
  557. 				mes "[Cezu]"; 
  558. 				mes "Would you please go get";
  559. 				mes "some flour and eggs for me";
  560. 				mes "from the ^3355FFLighthalzen Windmill^000000";
  561. 				mes "Then, when you come back, I can";
  562. 				mes "divide the ingredients, and you";
  563. 				mes "can deliver some to Elly.";
  564. 				next;
  565. 				mes "[Cezu]"; 
  566. 				mes "I know that I'm basically";
  567. 				mes "making you do everything";
  568. 				mes "on your own, but please try";
  569. 				mes "to understand that my hands";
  570. 				mes "are tied. D-don't ask me";
  571. 				mes "why, they just are!";
  572. 				set KHToastGirlEnd,1;
  573. 				close;
  574. 			case 2:
  575. 				mes "[Cezu]";
  576. 				mes "Okay okay~";
  577. 				mes "Please come again!";
  578. 				close;
  579. 			}
  580. 		}
  581. 		else if (KHToastGirlEnd == 1) {
  582. 			mes "Would you please go to";
  583. 			mes "the Lighthalzen Windmill";
  584. 			mes "and tell them that Cezu needs";
  585. 			mes "lots of flour and lots of eggs!";
  586. 			mes "Then, bring all the stuff over";
  587. 			mes "to me as soon as you can~";
  588. 			close;
  589. 		}
  590. 		else if (KHToastGirlEnd == 2) {
  591. 			mes "Hey, you're back with the";
  592. 			mes "ingredients! Thank you so";
  593. 			mes "much, I really needed these!";
  594. 			mes "Now please give this flour";
  595. 			mes "and these eggs to Elly, and";
  596. 			mes "send her my regards. See you~";
  597. 			delitem 7488,1; //Delivery_Package
  598. 			getitem 7488,1; //Delivery_Package
  599. 			set KHToastGirlEnd,3;
  600. 			close;
  601. 		}
  602. 	}
  603. 	//KHToastGirlEnd no longer needed-- deleting.
  604. 	if (KielHyreQuest > 6) set KHToastGirlEnd,0;
  605. 	mes "Hot, fresh and";
  606. 	mes "cruuuunchy toast!";
  607. 	mes "Come and get some!";
  608. 	close;
  609. }
  610.  
  611. //----------------------------------------------------------------------------
  612. // Lighthalzen WindMill Owner.
  613. //----------------------------------------------------------------------------
  614. lighthalzen,366,299,4	script	Windmill Owner#kh	46,{
  615. 	if (checkweight(7488,1) == 0) {
  616. 		mes "[Mills]";
  617. 		mes "Hey, you've got too much";
  618. 		mes "stuff on you right now. ";
  619. 		mes "Put your junk in Kafra Storage";
  620. 		mes "if you expect me to give you";
  621. 		mes "anything. That's why you came";
  622. 		mes "here to the miss, didn't you?";
  623. 		close;
  624. 	}
  625. 	if (KHToastGirlEnd < 1) {
  626. 		mes "[Mills]";
  627. 		mes "Hey, whaddya want?";
  628. 		mes "I'm pretty busy right";
  629. 		mes "now, so you mind coming";
  630. 		mes "back later? Then we'll talk.";
  631. 		close;
  632. 	}
  633. 	else if (KHToastGirlEnd == 1) {
  634. 		mes "[Mills]";
  635. 		mes "Hey, whaddya want?";
  636. 		mes "You just happened to";
  637. 		mes "catch me at a good time,";
  638. 		mes "but if you need anything,";
  639. 		mes "you'd better spit it out quick";
  640. 		mes "before things get hectic again.";
  641. 		next;
  642. 		switch(select("I'm here for Cezu:......")) {
  643. 		case 1:
  644. 			mes "[Mills]";
  645. 			mes "Oh, Cezu from the";
  646. 			mes "toast stand? Okay,";
  647. 			mes "I've got everything";
  648. 			mes "that kid needs right";
  649. 			mes "here. There's eggs inside,";
  650. 			mes "so be really careful with it.";
  651. 			mes "It's ready for you...";
  652. 			next;
  653. 			mes "[Mills]";
  654. 			mes "Kid's one of my regular";
  655. 			mes "customers, so you don't";
  656. 			mes "have to pay me, or run any";
  657. 			mes "extra errands on my end. Yeah,";
  658. 			mes "I know how other people treat";
  659. 			mes "you adventurers. Well, see ya.";
  660. 			getitem 7488,1; //Delivery_Package
  661. 			set KHToastGirlEnd,2;
  662. 			close;
  663. 		case 2:
  664. 			mes "[Mills]";
  665. 			mes "......";
  666. 			mes "Um, okay, well, if";
  667. 			mes "you need something,";
  668. 			mes "just hollar, I guess.";
  669. 			mes "Cuts, Cutz where are you?";
  670. 			mes "You'd better not be goofing off!";
  671. 			close;
  672. 		}
  673. 	}
  674. 	else if (KHToastGirlEnd >= 2) {
  675. 		mes "[Mills]";
  676. 		mes "That Cutz is such";
  677. 		mes "a lazy rascal. The guy";
  678. 		mes "thinks he can fool around";
  679. 		mes "when he's on the clock...!";
  680. 		mes "Ah well, he knows I can't find";
  681. 		mes "a better assistant. He'll learn...";
  682. 		close;
  683. 	}
  684. }
  685.  
  686. lighthalzen,366,289,2	script	Windmill Owner's Helper	97,{
  687. 	if (KHToastGirlEnd < 1) {
  688. 		mes "[Cutz]";
  689. 		mes "Man, why are we";
  690. 		mes "always so busy?";
  691. 		mes "Why does Mills have";
  692. 		mes "to work me to the bone?";
  693. 		mes "Eh, it's a living, I suppose...";
  694. 		close;
  695. 	}
  696. 	else if (KHToastGirlEnd >= 2) {
  697. 		mes "[Cutz]";
  698. 		mes "Wh-what makes you";
  699. 		mes "think I'm goofing off,";
  700. 		mes "Mills? L-look, look,";
  701. 		mes "my hands are moving,";
  702. 		mes "I'm busy, I'm working!";
  703. 		close;
  704. 	}
  705. 	else {
  706. 		mes "[Cutz]";
  707. 		mes "Hey, you're from";
  708. 		mes "Cezu's toast stand,";
  709. 		mes "right? How is cute";
  710. 		mes "little Cezu doing?";
  711. 		close;
  712. 	}
  713. }
  714.  
  715. //============================================================================
  716. //Kiel Hyre Academy NPCs
  717. //============================================================================
  718.  
  719. //----------------------------------------------------------------------------
  720. // Girl (Talks about the academy)
  721. //----------------------------------------------------------------------------
  722. yuno_fild08,196,196,5	script	Hanie#kh1	102,{
  723. 	mes "[Hanie]";
  724. 	mes "Oh, I wish I could study";
  725. 	mes "at the Kiel Hyre Academy...";
  726. 	mes "All of the graduates get";
  727. 	mes "really nice jobs! I'm almost";
  728. 	mes "jealous of the students!";
  729. 	next;
  730. 	select("Kiel Hyre Academy?");
  731. 	mes "[Hanie]";
  732. 	mes "Oh, the Kiel Hyre Academy";
  733. 	mes "is a school founded by Kiel";
  734. 	mes "Hyre, an inventor that became";
  735. 	mes "rich from his strange machines.";
  736. 	mes "He decided to give back to society";
  737. 	mes "by building this private academy.";
  738. 	next;
  739. 	mes "[Hanie]";
  740. 	mes "However, the school will";
  741. 	mes "only accept orphans that are";
  742. 	mes "too poor to enroll in any other";
  743. 	mes "schools. Sometimes, it makes";
  744. 	mes "me wish that I was an orphan too!";
  745. 	mes "Well, not really, but you know...";
  746. 	close;
  747. }
  748.  
  749.  
  750. //----------------------------------------------------------------------------
  751. // Academy Security Guards
  752. //----------------------------------------------------------------------------
  753. yuno_fild08,158,194,6	script	Security Guard#1::KHAGuard	852,{
  754. 	if ((KielHyreQuest < 2) || (KielHyreQuest > 31)) { 
  755. 		mes "[Security Guard]";
  756. 		mes "I'm sorry, but if you aren't";
  757. 		mes "associated with this institution,";
  758. 		mes "then you're not authorized to";
  759. 		mes "enter the ^FF0000Kiel Hyre Academy^000000.";
  760. 		mes "Please leave if you don't have";
  761. 		mes "an appointment with the staff.";
  762. 		close;
  763. 	}
  764. 	else if (KielHyreQuest == 2) { 
  765. 		mes "[Security Guard]";
  766. 		mes "I'm sorry, but if you aren't";
  767. 		mes "associated with this institution,";
  768. 		mes "then you're not authorized to";
  769. 		mes "enter the ^FF0000Kiel Hyre Academy^000000.";
  770. 		mes "Please leave if you don't have";
  771. 		mes "an appointment with the staff.";
  772. 		next;
  773. 		switch(select("I'm here for a delivery.:......")) {
  774. 		case 1:
  775. 			mes "[Security Guard]";
  776. 			mes "You're here to deliver";
  777. 			mes "something? Okay, just give";
  778. 			mes "me the recipient's ^FF0000name^000000,";
  779. 			mes "followed by the ^FF0000item^000000 being";
  780. 			mes "delivered, and I'll verify it";
  781. 			mes "before letting you inside.";
  782. 			next;
  783. 			input .@KHDelivery$;
  784. 			if (.@KHDelivery$ != "Lecollane") {
  785. 				mes "[Security Guard]";
  786. 				mes "You're here to deliver some";
  787. 				mes "Wine to...to who? What was";
  788. 				mes "the name? I...I don't think";
  789. 				mes "we have anybody in the";
  790. 				mes "academy named "+.@KHDelivery$+"";
  791. 				close;
  792. 			}
  793. 			input .@KHDelivery$ ;
  794. 			if (.@KHDelivery$ != "Culinary Wine") {
  795. 				mes "[Security Guard]";
  796. 				mes "So you're here to make";
  797. 				mes "a delivery to Mrs. Lecollane?";
  798. 				mes "What is it you've brought for";
  799. 				mes "her? Some ^3355FF"+.@KHDelivery$+"^000000?";
  800. 				next;
  801. 				mes "[Security Guard]";
  802. 				mes "Let me buzz her first,";
  803. 				mes "and check to make sure";
  804. 				mes "that she's been expecting";
  805. 				mes "you. Let's see now...";
  806. 				next;
  807. 				mes "......";
  808. 				mes ".........";
  809. 				mes "............";
  810. 				next;
  811. 				mes "[Security Guard]";
  812. 				mes "Huh. Mrs Lecollane";
  813. 				mes "is expecting a delivery,";
  814. 				mes "but not the item that you";
  815. 				mes "say that you've brought for";
  816. 				mes "her. You might want to check";
  817. 				mes "to see if there's been a mixup...";
  818. 				close;
  819. 			}
  820. 			mes "[Security Guard]";
  821. 			mes "Alright....";
  822. 			mes "So you're here to";
  823. 			mes "deliver a bottle of";
  824. 			mes "Wine to Mrs. Lecollane?";
  825. 			mes "Let me buzz her, and get";
  826. 			mes "this confirmed real quickly.";
  827. 			next;
  828. 			mes "......";
  829. 			mes ".........";
  830. 			mes "............";
  831. 			next;
  832. 			mes "[Security Guard]";
  833. 			mes "Okay, everything looks";
  834. 			mes "good. Mrs. Lecollane";
  835. 			mes "has been expecting you.";
  836. 			mes "I guess you can enter.";
  837. 			close2;
  838. 			warp "kh_school",71,155;
  839. 			end;
  840. 		case 2:
  841. 			mes "[Security Guard]";
  842. 			mes "If you don't have";
  843. 			mes "an appoointment, then";
  844. 			mes "don't loiter around in";
  845. 			mes "front of the academy!";
  846. 			close;
  847. 		}
  848. 	}
  849. 	else if (KielHyreQuest < 32) { 
  850. 		mes "[Security Guard]";
  851. 		mes "Oh, did you have";
  852. 		mes "other business inside";
  853. 		mes "the academy? I remember";
  854. 		mes "you from before, so there";
  855. 		mes "shouldn't be any problems";
  856. 		mes "letting you back inside...";
  857. 		close2;
  858. 		warp "kh_school",71,155;
  859. 		end;
  860. 	}
  861. }
  862.  
  863. yuno_fild08,158,183,7	duplicate(KHAGuard)	Security Guard#2	852
  864.  
  865. //----------------------------------------------------------------------------
  866. // Gossiping Teenagers/Story NPCs
  867. //----------------------------------------------------------------------------
  868. kh_school,57,142,6	script	Student#kha	893,3,3,{
  869. 	mes "[Laci]";
  870. 	mes "Oh, wow! We usually";
  871. 	mes "don't get visitors on";
  872. 	mes "campus! Um, you're not";
  873. 	mes "a new faculty member, are you?";
  874. 	close;
  875.  
  876. OnTouch:
  877. 	mes "[Laci]";
  878. 	mes "Hey, Nesha...!";
  879. 	mes "have you heard why";
  880. 	mes "Aaci hasn't been coming";
  881. 	mes "to class for awhile?";
  882. 	next;
  883. 	mes "[Gui Nesha]";
  884. 	mes "That's right, I haven't";
  885. 	mes "seen Aaci in awhile.";
  886. 	mes "Did something happen?";
  887. 	next;
  888. 	mes "[Laci]";
  889. 	mes "It's because....";
  890. 	mes "Aaci saw a freakin' ghost!";
  891. 	mes "It's one hundred percent";
  892. 	mes "true! I heard about it from,";
  893. 	mes "well, you know, my sources.";
  894. 	next;
  895. 	mes "[Gui Nesha]";
  896. 	mes "...Wha...?";
  897. 	mes "Oh, come on,";
  898. 	mes "get outta town.";
  899. 	close;
  900. }
  901.  
  902. kh_school,57,139,0	script	Student#khb	893,{
  903. 	mes "[Gui Nesha]";
  904. 	mes "Aren't we a little";
  905. 	mes "old to be talking about";
  906. 	mes "this kind of stuff? You";
  907. 	mes "know, rumors and ghost";
  908. 	mes "stories that make no sense?";
  909. 	mes "C'mon, Laci, knock it off!";
  910. 	emotion e_swt2;
  911. 	close;
  912. }
  913.  
  914. //----------------------------------------------------------------------------
  915. // Mrs. Lecollane
  916. //----------------------------------------------------------------------------
  917. kh_school,176,60,4	script	Lady#kh	101,{
  918. 	if (KielHyreQuest < 2) {
  919. 		mes "[Mrs. Lecollane]";
  920. 		mes "Is there a problem?";
  921. 		mes "Outsiders are not allowed to come";
  922. 		mes "in here, please leave.";
  923. 		close;
  924. 	}
  925. 	else if (KielHyreQuest == 2) { 
  926. 		mes "[Mrs. Lecollane]";
  927. 		mes "Oh, hello. Ah!";
  928. 		mes "have you come to";
  929. 		mes "deliver my wine? The";
  930. 		mes "security guard called and";
  931. 		mes "mentioned you were coming.";
  932. 		next;
  933. 		switch(select("Yes, that's right!:Er, s-sorry!")) {
  934. 		case 1:
  935. 			mes "[Mrs. Lecollane]";
  936. 			mes "Well, you've come a little";
  937. 			mes "later than I thought, but";
  938. 			mes "I suppose it can't be helped.";
  939. 			mes "I guess the waiting has just";
  940. 			mes "heightened my anticipation";
  941. 			mes "for this bottle of wi--";
  942. 			next;
  943. 			mes "^3355FF*Cling! Crrrack!*^000000";
  944. 			next;
  945. 			mes "[Mrs. Lecollane]";
  946. 			mes "Elly? Elly did you";
  947. 			mes "break something again?!";
  948. 			mes "You've got to be more careful!";
  949. 			mes "If you don't finish baking those";
  950. 			mes "cookies by the end of today, your";
  951. 			mes "semester grades will suffer!";
  952. 			next;
  953. 			mes "[Elly]";
  954. 			mes "B-but I just...";
  955. 			next;
  956. 			mes "[Mrs. Lecollane]";
  957. 			mes "^FF0000Elly^000000!!";
  958. 			next;
  959. 			mes "[Elly]";
  960. 			mes "......";
  961. 			mes "Yes, Mrs. Lecollane.";
  962. 			next;
  963. 			mes "[Mrs. Lecollane]";
  964. 			mes "*Ahem* Excuse me.";
  965. 			mes "Would you please leave";
  966. 			mes "the wine over there? You";
  967. 			mes "may go now, and please";
  968. 			mes "don't wander needlessly";
  969. 			mes "around the academy.";
  970. 			delitem 7487,1; //Tavern_Wine
  971. 			set KielHyreQuest,4;
  972. 			close;
  973. 		case 2:
  974. 			mes "[Mrs. Lecollane]";
  975. 			mes "Hm...?";
  976. 			mes "I guess I must";
  977. 			mes "be mistaken. I'm";
  978. 			mes "sorry, I thought you";
  979. 			mes "were somebody else.";
  980. 			close;
  981. 		}
  982. 	}
  983. 	else if (KielHyreQuest == 4) {
  984. 		mes "[Mrs Lecollane]";
  985. 		mes "Well, our business is";
  986. 		mes "completed, so would you";
  987. 		mes "please leave the campus";
  988. 		mes "as soon as you can? *Sigh*";
  989. 		mes "I can't believe our future";
  990. 		mes "is in these girls' hands...";
  991. 		close;
  992. 	}
  993. }
  994.  
  995. //----------------------------------------------------------------------------
  996. // Elly (In school)
  997. //----------------------------------------------------------------------------
  998. kh_school,179,39,0	script	Cute Student#kh	895,{
  999. 	if (checkweight(908,200) == 0) {
  1000. 		mes "[Elly]";
  1001. 		mes "I'm sorry, but would you";
  1002. 		mes "put some of your things in";
  1003. 		mes "your Kafra Storage first or";
  1004. 		mes "something? I can't really";
  1005. 		mes "help you when you're ";
  1006. 		mes "carrying so much stuff.";
  1007. 		close;
  1008. 	}
  1009. 	cutin "kh_elly01",2;
  1010. 	if (KielHyreQuest < 4) { 
  1011. 		cutin "kh_elly03",2;
  1012. 		mes "[Elly]";
  1013. 		mes "W-wah! Oh...!";
  1014. 		mes "^333333*Phew*^000000 That was close,";
  1015. 		mes "I almost dropped them ";
  1016. 		mes "again! Why do I have so much";
  1017. 		mes "trouble handling ingredients?";
  1018. 	}
  1019. 	else if (KielHyreQuest == 4) { 
  1020. 		cutin "kh_elly03",2;
  1021. 		mes "[Elly]";
  1022. 		mes "Oh no, what should";
  1023. 		mes "I do? ^333333*Sob*^000000 Wh-what";
  1024. 		mes "am I going to do? ^333333*Sniff*^000000";
  1025. 		next;
  1026. 		switch(select("What happened?:......")) {
  1027. 		case 1:
  1028. 			mes "[Elly]";
  1029. 			mes "I... I have to finish baking";
  1030. 			mes "this batch of cookies by the";
  1031. 			mes "end of today, but then I spilled";
  1032. 			mes "all of the ingredients on the";
  1033. 			mes "floor. I don't know how I can";
  1034. 			mes "bake those cookies now...";
  1035. 			next;
  1036. 			switch(select("What can I do to help you?:Oh, I'm so sorry.")) {
  1037. 			case 1:
  1038. 				cutin "kh_elly02",2;
  1039. 				mes "[Elly]";
  1040. 				mes "What was that...?";
  1041. 				mes "You'll really help";
  1042. 				mes "me? That's wonderful!";
  1043. 				mes "Thank you! Thanks so much!";
  1044. 				next;
  1045. 				break;
  1046. 			Case 2:
  1047. 				mes "[Elly]";
  1048. 				mes "Wait, you don't go";
  1049. 				mes "to this school, don't";
  1050. 				mes "you? Y-you're one of";
  1051. 				mes "those adventurers, right?";
  1052. 				next;
  1053. 				select("Yeah, that's right.");
  1054. 				mes "Listen, I know you";
  1055. 				mes "probably have your own";
  1056. 				mes "plans, but do  you think";
  1057. 				mes "you can help me with this";
  1058. 				mes "huge problem that I have?";
  1059. 				next;
  1060. 				switch(select("Accept:Decline")) {
  1061. 				case 1:
  1062. 					cutin "kh_elly02",2;
  1063. 					mes "How Wonderful!";
  1064. 					mes "Thank you! Thank you";
  1065. 					mes "so much! I'm supposed to";
  1066. 					mes "finish baking this batch of";
  1067. 					mes "cookies soon, but I spilled";
  1068. 					mes "all of the ingredients...";
  1069. 					next;
  1070. 					break;
  1071. 				case 2:
  1072. 					mes "["+strcharinfo(0)+"]";
  1073. 					mes "I'm outta here.";
  1074. 					next;
  1075. 					cutin "kh_elly04",2;
  1076. 					mes "[Elly]";
  1077. 					mes "W-wait...!";
  1078. 					mes "Come back, you";
  1079. 					mes "d-don't...! I really";
  1080. 					mes "need some help!";
  1081. 					emotion e_sob;
  1082. 					close2;
  1083. 					cutin "",255;
  1084. 					end;
  1085. 				}
  1086. 			}
  1087. 			cutin "kh_elly01",2;
  1088. 			mes "[Elly]";
  1089. 			mes "Well, I guess the only way";
  1090. 			mes "I can bake these cookies is";
  1091. 			mes "to get some new ingredients.";
  1092. 			mes "I'm sorry to be such a burden,";
  1093. 			mes "but if you didn't offer to help";
  1094. 			mes "me, then I'd have no one to ask!";
  1095. 			next;
  1096. 			cutin "kh_elly04",2;
  1097. 			mes "[Elly]";
  1098. 			mes "You don't understand how";
  1099. 			mes "important it is that I bake";
  1100. 			mes "these cookies... If I don't";
  1101. 			mes "finish this assignment, then";
  1102. 			mes "Mrs. Crank will fail me for";
  1103. 			mes "the entire semester!";
  1104. 			next;
  1105. 			mes "[Elly]";
  1106. 			cutin "kh_elly01",2;
  1107. 			mes "Okay, I need to calm";
  1108. 			mes "down. I think I can do";
  1109. 			mes "this with your help.";
  1110. 			mes "Would you please do me";
  1111. 			mes "this huge favor and bring";
  1112. 			mes "all of these ingredients?";
  1113. 			next;
  1114. 			mes "[Elly]";
  1115. 			mes "^3355FF1 Wine^000000,";
  1116. 			mes "^3355FF7 Milks^000000,";
  1117. 			mes "^3355FF5 Cacaos^000000,";
  1118. 			mes "^3355FF2 Cheeses^000000,";
  1119. 			mes "^3355FF1 Egg^000000, and";
  1120. 			mes "^3355FF1 Bag of Flour^000000.";
  1121. 			next;
  1122. 			mes "[Elly]";
  1123. 			mes "Let's see... You can";
  1124. 			mes "get Wine from a pub in";
  1125. 			mes "Juno, Cacaos from hunting";
  1126. 			mes "Yoyos, and you can get flour";
  1127. 			mes "and Eggs from the girl that";
  1128. 			mes "runs the Toast Stand in Juno.";
  1129. 			next;
  1130. 			mes "[Elly]";
  1131. 			mes "Good luck, getting";
  1132. 			mes "everything, and I hope";
  1133. 			mes "you hurry back here with";
  1134. 			mes "those cookie ingredients";
  1135. 			mes "as quickly as you can, okay?";
  1136. 			set KielHyreQuest,6;
  1137. 			break;
  1138. 		case 2:
  1139. 			mes "[Elly]";
  1140. 			mes "*Sob*...";
  1141. 			break;
  1142. 		}
  1143. 	}
  1144. 	else if (KielHyreQuest == 6) {
  1145. 		if ((countitem(519) < 7) || (countitem(548) < 2) || (countitem(7182) < 5) || (countitem(7487) < 1) || (countitem(7488) < 1)) {
  1146. 			mes "[Elly]";
  1147. 			mes "Let's see, would you";
  1148. 			mes "like me to remind you";
  1149. 			mes "which ingredients I need?";
  1150. 			mes "Please bring these things as";
  1151. 			mes "soon as you can so that I can";
  1152. 			mes "quickly bake some cookies~";
  1153. 			next;
  1154. 			mes "[Elly]";
  1155. 			mes "^3355FF1 Wine^000000,";
  1156. 			mes "^3355FF7 Milks^000000,";
  1157. 			mes "^3355FF5 Cacaos^000000,";
  1158. 			mes "^3355FF2 Cheeses^000000,";
  1159. 			mes "^3355FF1 Egg^000000, and";
  1160. 			mes "^3355FF1 Bag of Flour^000000.";
  1161. 			next;
  1162. 			cutin "kh_elly01",2;
  1163. 			mes "[Elly]";
  1164. 			mes "Let's see... You can";
  1165. 			mes "get Wine from a pub in";
  1166. 			mes "Juno, Cacaos from hunting";
  1167. 			mes "Yoyos, and you can get flour";
  1168. 			mes "and Eggs from the girl that";
  1169. 			mes "runs the Toast Stand in Juno.";
  1170. 		}
  1171. 		else {
  1172. 			cutin "kh_elly02",2;
  1173. 			mes "[Elly]";
  1174. 			mes "Hooray! Finally, I have";
  1175. 			mes "everything I need! This is";
  1176. 			mes "great! Oh, would you please";
  1177. 			mes "give me a moment while I bake";
  1178. 			mes "these cookies?  It shouldn't take";
  1179. 			mes "long, so hold on just a bit.";
  1180. 			delitem 519,7; //Milk
  1181. 			delitem 548,2; //Cheese
  1182. 			delitem 7182,5; //Cacao
  1183. 			delitem 7487,1; //Tavern_Wine
  1184. 			delitem 7488,1; //Delivery_Package
  1185. 			set KielHyreQuest,8;
  1186. 			//KHPubMasterEnd no longer needed-- deleting.
  1187. 			set KHPubMasterEnd,0;
  1188. 			set KHToastGirlEnd,0;
  1189. 			emotion e_ho;
  1190. 		}
  1191. 	}
  1192. 	else if (KielHyreQuest == 8) {
  1193. 		mes "[Elly]";
  1194. 		mes "Tadah! I did it!";
  1195. 		mes "They're finally done!";
  1196. 		mes "Elly's special cookies.";
  1197. 		mes "I'd like you to have some";
  1198. 		mes "as thanks for helping me out.";
  1199. 		next;
  1200. 		mes "[Elly]";
  1201. 		mes "I'm sorry, but I was so";
  1202. 		mes "preoccupied with baking";
  1203. 		mes "these cookies that I didn't";
  1204. 		mes "even ask for your name. I'm";
  1205. 		mes "^FF0000Ellyja^000000, but everybody calls me,";
  1206. 		mes "''Elly.'' What's your name?";
  1207. 		next;
  1208. 		mes "["+strcharinfo(0)+"]";
  1209. 		mes "^3355FF"+strcharinfo(0)+"^000000.";
  1210. 		mes "It's ^3355FF"+strcharinfo(0)+"^000000.";
  1211. 		next;
  1212. 		cutin "kh_elly02",2;
  1213. 		mes "[Elly]";
  1214. 		mes ""+strcharinfo(0)+"?";
  1215. 		mes "...that name! It's wonderful!";
  1216. 		getitem 538,5; //Well_Baked_Cookie
  1217. 		set KielHyreQuest,10;
  1218. 	}
  1219. 	else if (KielHyreQuest == 10) {
  1220. 		mes "[Elly]";
  1221. 		mes "I'm sorry, but I have";
  1222. 		mes "another favor to ask you";
  1223. 		mes "if you don't mind helping";
  1224. 		mes "me out again. Don't worry,";
  1225. 		mes "you won't have to hurry as";
  1226. 		mes "quickly as you did last time.";
  1227. 		next;
  1228. 		switch(select("What do you need?:Sorry, but I'm pretty busy...")) {
  1229. 		case 1:
  1230. 			mes "[Elly]";
  1231. 			mes "You know how you helped";
  1232. 			mes "me bake those cookies?";
  1233. 			mes "It's the first time I was able";
  1234. 			mes "to do it without burning them!";
  1235. 			mes "I just know Grandfather'd";
  1236. 			mes "be so proud of me!";
  1237. 			next;
  1238. 			mes "[Elly]";
  1239. 			mes "I really want Grandfather";
  1240. 			mes "to taste the cookies I baked,";
  1241. 			mes "but the cookies will be stale";
  1242. 			mes "by the time I'm able to leave";
  1243. 			mes "campus. Would you deliver these";
  1244. 			mes "cookies to my grandfather for me?";
  1245. 			next;
  1246. 			switch(select("Sure:I'm busy.")) {
  1247. 			case 1:
  1248. 				cutin "kh_elly02",2;
  1249. 				mes "[Elly]";
  1250. 				mes "Oh, "+strcharinfo(0)+"!";
  1251. 				mes "Thank you so much, I knew";
  1252. 				mes "you'd understand! Would you";
  1253. 				mes "please bring the cookies to";
  1254. 				mes "him at ^FF0000Kiel Hyre's cottage^000000?";
  1255. 				next;
  1256. 				mes "[Elly]";
  1257. 				mes "Oh, right! They're really";
  1258. 				mes "careful about visitors and";
  1259. 				mes "keeping strangers off the";
  1260. 				mes "property, but if you mention";
  1261. 				mes "my name, they'll let you in.";
  1262. 				mes "Alright then, see you~";
  1263. 				set KielHyreQuest,12;
  1264. 				break;
  1265. 			case 2:
  1266. 				cutin "kh_elly03",2;
  1267. 				mes "[Elly]";
  1268. 				mes "Oh, um...";
  1269. 				mes "Okay, I'm sorry to";
  1270. 				mes "have bothered you...";
  1271. 				break;
  1272. 			}
  1273. 			break;
  1274. 		case 2:
  1275. 			cutin "kh_elly03",2;
  1276. 			mes "[Elly]";
  1277. 			mes "Oh, um...";
  1278. 			mes "Okay, I'm sorry to";
  1279. 			mes "have bothered you...";
  1280. 			break;
  1281. 		}
  1282. 	}
  1283. 	else if (KielHyreQuest == 12) {
  1284. 		mes "[Elly]";
  1285. 		mes "Oh, you don't know where";
  1286. 		mes "to find Kiel Hyre's cottage?";
  1287. 		mes "It's just north from this";
  1288. 		mes "academy. Please deliver my";
  1289. 		mes "cookies to Grandfather, and";
  1290. 		mes "let him know I really miss him.";
  1291. 	}
  1292. 	else if (KielHyreQuest == 14) {
  1293. 		cutin "kh_elly03",2;
  1294. 		mes "[Elly]";
  1295. 		mes "Hm? Grandfather's not";
  1296. 		mes "home? That's strange, he";
  1297. 		mes "didn't mention anything about";
  1298. 		mes "any business trips. I thought";
  1299. 		mes "he'd be at home all day...";
  1300. 		next;
  1301. 		cutin "kh_elly04",2;
  1302. 		mes "[Elly]";
  1303. 		mes "Would you go back to his";
  1304. 		mes "cottage one more time? Here,";
  1305. 		mes "you can use this Cottage Key.";
  1306. 		mes "That way, you can just go";
  1307. 		mes "inside and talk to him~";
  1308. 		getitem 7489,1; //Villa_Spare_Key
  1309. 		set KielHyreQuest,16;
  1310. 	}
  1311. 	else if ((KielHyreQuest >= 14) && (KielHyreQuest < 20)) {
  1312. 		mes "[Elly]";
  1313. 		mes "That's so weird...";
  1314. 		mes "I thought Grandfather";
  1315. 		mes "said that he'd be at";
  1316. 		mes "home all day today...";
  1317. 	}
  1318. 	else if (KielHyreQuest == 20) {
  1319. 		mes "[Elly]";
  1320. 		mes "Hmm...?";
  1321. 		mes "What's this,";
  1322. 		mes "a letter for me?";
  1323. 		next;
  1324. 		mes "^3355FFElly opened the envelope";
  1325. 		mes "and started reading the letter.^000000";
  1326. 		next;
  1327. 		mes "^333333Dearest Elly,";
  1328. 		mes " ";
  1329. 		mes "I have something to discuss";
  1330. 		mes "with my son Kiehl, so I am";
  1331. 		mes "leaving to meet with him.";
  1332. 		mes "If you don't hear from me";
  1333. 		mes "after 7 days after I've written";
  1334. 		mes "this letter, then you must";
  1335. 		mes "escape the academy as soon";
  1336. 		mes "as possible, and retrieve";
  1337. 		mes "something inside our ";
  1338. 		mes "cottage's study.";
  1339. 		mes " ";
  1340. 		mes "If you have a friend you";
  1341. 		mes "can trust, please ask him";
  1342. 		mes "to follow my traces in the";
  1343. 		mes "cottage. I might be in danger,";
  1344. 		mes "and in dire need of rescue.";
  1345. 		mes " ";
  1346. 		mes "Elly, don't trust anyone";
  1347. 		mes "in the academy, even your";
  1348. 		mes "classmates, since they may";
  1349. 		mes "be influenced by Kiehl.";
  1350. 		mes " ";
  1351. 		mes "Be careful, and I love you.";
  1352. 		mes " ";
  1353. 		mes "--Grandpa^000000";
  1354. 		next;
  1355. 		cutin "kh_elly03",2;
  1356. 		mes "[Elly]";
  1357. 		mes "What? Oh no, it's been";
  1358. 		mes "ten days since he wrote";
  1359. 		mes "this letter! Ah, does this";
  1360. 		mes "mean that he's in danger?!";
  1361. 		mes "Oh no, what should I do?";
  1362. 		delitem 7490,1; //Letter_to_Elly
  1363. 		set KielHyreQuest,22;
  1364. 	}
  1365. 	else if (KielHyreQuest == 22) {
  1366. 		cutin "kh_elly03",2;
  1367. 		mes "[Elly]";
  1368. 		mes "......";
  1369. 		mes ".........";
  1370. 		mes "............";
  1371. 		next;
  1372. 		switch(select("About your grandpa:Tell me about Kiehl:What's with this academy?")) {
  1373. 		case 1:
  1374. 			mes "[Elly]";
  1375. 			mes "Oh! My grandfather is";
  1376. 			mes "Kiel Hyre, founder and";
  1377. 			mes "CEO of the Kiel Hyre";
  1378. 			mes "foundation. He looks";
  1379. 			mes "strict and cold hearted,";
  1380. 			mes "but he's actually very nice!";
  1381. 			next;
  1382. 			mes "[Elly]";
  1383. 			mes "We're not related by";
  1384. 			mes "blood, but he's taken";
  1385. 			mes "care of me ever since";
  1386. 			mes "I lost my parents. Oh,";
  1387. 			mes "Grandapa, where are you?";
  1388. 			mes "I'm getting so worried!";
  1389. 			break;
  1390. 		case 2:
  1391. 			mes "[Elly]";
  1392. 			mes "Kiehl? That's my";
  1393. 			mes "grandfather's son...";
  1394. 			mes "I don't know him that";
  1395. 			mes "well, and only saw him";
  1396. 			mes "once at an academy event.";
  1397. 			next;
  1398. 			mes "[Elly]";
  1399. 			mes "Mmm, he's a good looking";
  1400. 			mes "guy with pale skin, silver";
  1401. 			mes "hair, and this cold, fierce";
  1402. 			mes "stare. A lot of my classmates";
  1403. 			mes "worship Kiehl because he's";
  1404. 			mes "also a business genius~";
  1405. 			next;
  1406. 			mes "[Elly]";
  1407. 			mes "It's weird though...";
  1408. 			mes "I have no idea why my";
  1409. 			mes "grandpa and Kiehl don't";
  1410. 			mes "get along. They're both";
  1411. 			mes "really good at what they do...";
  1412. 			break;
  1413. 		case 3:
  1414. 			mes "[Elly]";
  1415. 			mes "Well, I know the security";
  1416. 			mes "here is really tight, but";
  1417. 			mes "that's because everything";
  1418. 			mes "here is so luxurious and";
  1419. 			mes "expensive, you know~";
  1420. 			next;
  1421. 			mes "[Elly]";
  1422. 			mes "We also have a very";
  1423. 			mes "special curriculum where";
  1424. 			mes "you learn more of what you";
  1425. 			mes "want. Personally, I want to";
  1426. 			mes "become a great career woman";
  1427. 			mes "like ^0000FFMs. Allysia^000000. Heh heh~";
  1428. 			next;
  1429. 			mes "[Elly]";
  1430. 			mes "This place certainly";
  1431. 			mes "isn't like other schools.";
  1432. 			//mes "You already know that only";
  1433. 			mes "Yeah, everything is made to";
  1434. 			mes "fit each of the student's needs.";
  1435. 			next;
  1436. 			mes "[Elly]";
  1437. 			mes "Recently, though?";
  1438. 			mes "Some really weird stuff";
  1439. 			mes "has been happening. All of";
  1440. 			mes "my classmates are afraid of";
  1441. 			mes "going out alone by themselves.";
  1442. 			next;
  1443. 			cutin "kh_elly02",2;
  1444. 			mes "[Elly]";
  1445. 			mes "But I'll be okay!";
  1446. 			mes "You'll be there to";
  1447. 			mes "rescue me from danger,";
  1448. 			mes "right, "+strcharinfo(0)+"?";
  1449. 			next;
  1450. 			switch(select("Who is Ms. Allysia?:Strange incidents?")) {
  1451. 			case 1:
  1452. 				mes "[Elly]";
  1453. 				mes "Oh, Ms. Allysia is";
  1454. 				mes "Grandfather's secretary~";
  1455. 				mes "She's so beautiful, and";
  1456. 				mes "my grandfather really";
  1457. 				mes "trusts her with everything!";
  1458. 				break;
  1459. 			case 2:
  1460. 				cutin "kh_elly04",2;
  1461. 				mes "[Elly]";
  1462. 				mes "Well, "+strcharinfo(0)+"...";
  1463. 				mes "I'm not supposed to tell";
  1464. 				mes "anyone outside of the school,";
  1465. 				mes "but I can trust you! You see...";
  1466. 				mes "We're haunted by a ghost!";
  1467. 				next;
  1468. 				mes "[Elly]";
  1469. 				mes "I know it sounds crazy,";
  1470. 				mes "but this ghost wanders the";
  1471. 				mes "campus, and curses its victims,";
  1472. 				mes "making them so cold and lifeless.";
  1473. 				mes "It happened to my roommate,";
  1474. 				mes "Mayo. It's like she's a statue...";
  1475. 				next;
  1476. 				mes "[Elly]";
  1477. 				mes "I snuck into the medical";
  1478. 				mes "office to see her, and she...";
  1479. 				mes "She couldn't do anything!";
  1480. 				mes "What would happen if the";
  1481. 				mes "ghost decided to curse me?!";
  1482. 				next;
  1483. 				cutin "kh_elly02",2;
  1484. 				mes "[Elly]";
  1485. 				mes "You know what...?";
  1486. 				mes "If I ever got cursed";
  1487. 				mes "by that ghost, just yell";
  1488. 				mes "''^FF0000Wake up, Elly!^000000''";
  1489. 				mes "That'll wake me up for sure!";
  1490. 				set KielHyreQuest,24;
  1491. 				break;
  1492. 			}
  1493. 		}
  1494. 	}
  1495. 	else if (KielHyreQuest >= 24 && KielHyreQuest <= 26) {
  1496. 		cutin "kh_elly04",2;
  1497. 		mes "[Elly]";
  1498. 		mes "Argh, I'm in a fix!";
  1499. 		mes "I have to finish my";
  1500. 		mes "homework before it's due!";
  1501. 		mes "Yeah, I've got to go see";
  1502. 		mes "Mrs. Lecollane now.";
  1503. 		next;
  1504. 		mes "[Elly]";
  1505. 		mes "Say, "+strcharinfo(0)+",";
  1506. 		mes "if it's okay, would you";
  1507. 		mes "please go find what my";
  1508. 		mes "grandpa left for me in";
  1509. 		mes "the ^FF0000cottage study^000000? You're";
  1510. 		mes "the only one I can trust!";
  1511. 		next;
  1512. 		mes "[Elly]";
  1513. 		mes "Anyway, I'll see you later";
  1514. 		mes "in the evening! Please come";
  1515. 		mes "by my ^FF0000dorm room^000000. Um, the";
  1516. 		mes "dorms are in the church just";
  1517. 		mes "behind the academy, okay?";
  1518. 		next;
  1519. 		mes "[Elly]";
  1520. 		mes "My room is in the back,";
  1521. 		mes "and it's on the ^FF0000second floor^000000";
  1522. 		mes "^FF0000on the left side^000000. Please use";
  1523. 		mes "a ladder to come up, okay?";
  1524. 		mes "I'll leave my window open";
  1525. 		mes "for you, so just come, okay?";
  1526. 		next;
  1527. 		mes "[Elly]";
  1528. 		mes "Hurry, hurry, the";
  1529. 		mes "teacher's coming!";
  1530. 		set KielHyreQuest,26;
  1531. 	}
  1532. 	else {
  1533. 		mes "[Elly]";
  1534. 		mes "Hurry, hurry, the";
  1535. 		mes "teacher's coming!";
  1536. 	}
  1537. 	close2;
  1538. 	cutin "",255;
  1539. 	end;
  1540. }
  1541.  
  1542. //----------------------------------------------------------------------------
  1543. // Elly's Window 
  1544. //----------------------------------------------------------------------------
  1545. yuno_fild08,69,185,0	script	Window#kh	111,{
  1546. 	if (KielHyreQuest < 29) {
  1547. 		mes "^3355FFYou can see a curtain";
  1548. 		mes "decorated with a cute";
  1549. 		mes "design through the";
  1550. 		mes "window of this room,";
  1551. 		mes "which is probably";
  1552. 		mes "used by a young girl.^000000";
  1553. 		close;
  1554. 	}
  1555. 	else if (KielHyreQuest== 29) {
  1556. 		mes "^3355FFThis must be Elly's room.";
  1557. 		mes "It doesn't sound like anyone";
  1558. 		mes "is inside, so she probably";
  1559. 		mes "isn't back yet. For now, you";
  1560. 		mes "should try to find what her";
  1561. 		mes "grandfather left for her";
  1562. 		mes "in their cottage's Study.^000000";
  1563. 		close;
  1564. 	}
  1565. 	else if ((KielHyreQuest >= 30) && (KielHyreQuest <= 45)) {
  1566. 		mes "^3355FFThis slightly open window";
  1567. 		mes "must lead into Elly's room.";
  1568. 		mes "Although she asked you to";
  1569. 		mes "find a ladder to enter her";
  1570. 		mes "window, you probably won't";
  1571. 		mes "find one. You might be able";
  1572. 		mes "to climb up that water pipe...^000000";
  1573. 		next;
  1574. 		switch(select("Climb Water Pipe:Find Another Way")) {
  1575. 		case 1:
  1576. 			if (rand(1,3) == 2) {
  1577. 				mes "^3355FFYou climbed up the";
  1578. 				mes "water pipe, and sneaked";
  1579. 				mes "into Elly's room successfully.^000000";
  1580. 				close2;
  1581. 				warp "kh_school",185,185;
  1582. 				end;
  1583. 			}
  1584. 			else {
  1585. 				mes "^3355FFYou tried to climb";
  1586. 				mes "the water pipe, but";
  1587. 				mes "you ended up falling";
  1588. 				mes "and bumping your head.^000000";
  1589. 				percentheal -10,0;
  1590. 				close;
  1591. 			}
  1592. 		case 2:
  1593. 			mes "^3355FFThere must be some";
  1594. 			mes "other way to get into";
  1595. 			mes "Elly's room, aside from";
  1596. 			mes "climbing up this water pipe...^000000";
  1597. 			close;
  1598.  
  1599. 		}
  1600. 	}
  1601. 	else {
  1602. 		mes "^3355FFYou can't go up into";
  1603. 		mes "that open window.^000000";
  1604. 		close;
  1605. 	}
  1606. }
  1607.  
  1608. //----------------------------------------------------------------------------
  1609. // Elly (In Dormitory)
  1610. //----------------------------------------------------------------------------
  1611. kh_school,178,180,4	script	Elly	895,{
  1612. 	if (checkweight(908,200) == 0) {
  1613. 		mes "^3355FFJust a second...";
  1614. 		mes "You're carrying too";
  1615. 		mes "many items with you";
  1616. 		mes "right now, so you'll";
  1617. 		mes "need to free up more";
  1618. 		mes "Inventory space first...^000000";
  1619. 		close;
  1620. 	}
  1621. 	if (KielHyreQuest < 30) {
  1622. 		mes "[Elly]";
  1623. 		mes "Who the heck are you?";
  1624. 		mes "Y-you're not supposed";
  1625. 		mes "to be able to get inside!";
  1626. 		mes "Get out of here right now!";
  1627. 		close2;
  1628. 		percentheal -99,0;
  1629. 		warp "yuno_fild08",100,100;
  1630. 		end;
  1631. 	}
  1632. 	else if (KielHyreQuest < 32) {
  1633. 		mes "[Elly]";
  1634. 		mes "......";
  1635. 		mes ".........";
  1636. 		mes "............";
  1637. 		close;
  1638. 	}
  1639. 	else if (KielHyreQuest == 32) {
  1640. 		mes "[Elly]";
  1641. 		mes "......";
  1642. 		mes ".........";
  1643. 		mes "............";
  1644. 		next;
  1645. 		mes "^3355FFElly seems to have";
  1646. 		mes "been cursed, and is";
  1647. 		mes "completely still and";
  1648. 		mes "lifeless. You've got to";
  1649. 		mes "try something, but what?^000000";
  1650. 		next;
  1651. 		switch(select("Wake her up by shaking.:Wake her up by yelling.:Ignore")) {
  1652. 		case 1:
  1653. 			mes "^3355FFYou grab Elly by the";
  1654. 			mes "shoulders, and try to get";
  1655. 			mes "her to respond by violently";
  1656. 			mes "shaking her entire body.^000000";
  1657. 			next;
  1658. 			mes "["+strcharinfo(0)+"]";
  1659. 			mes "Elly? Elly! No!";
  1660. 			mes "Come back to us!";
  1661. 			next;
  1662. 			mes "^3355FFElly's not responding...^000000";
  1663. 			close;
  1664. 		case 2:
  1665. 			input .@KHInput$;
  1666. 			if (.@KHInput$ == "Wake up, Elly!") {
  1667. 				mes "[Elly]";
  1668. 				mes ".............";
  1669. 				next;
  1670. 				mes "^3355FFAs soon as you said those";
  1671. 				mes "words, a ^000000Small Golden Key^3355FF";
  1672. 				mes "and a ^000000Button^3355FF drop from Elly's";
  1673. 				mes "hands. It looks like she woke";
  1674. 				mes "up, but only for an instant.^000000";
  1675. 				getitem 7493,1; //Golden_Key
  1676. 				getitem 7494,1; //Kiel_Button
  1677. 				set KielHyreQuest,34;
  1678. 				close;
  1679. 			}
  1680. 			else {
  1681. 				mes "[Elly]";
  1682. 				mes "......";
  1683. 				mes ".........";
  1684. 				mes "............";
  1685. 				next;
  1686. 				mes "^3355FFElly's not responding...^000000";
  1687. 				close;
  1688. 			}
  1689. 		case 3:
  1690. 			mes "^3355FFAlright...";
  1691. 			mes "But sooner or later,";
  1692. 			mes "you should try to break";
  1693. 			mes "the curse placed on Elly.^000000";
  1694. 			close;
  1695. 		}
  1696. 	}
  1697. 	else if (KielHyreQuest == 34) {
  1698. 		if (countitem(7491) < 1) {
  1699. 			//Missing text, needs another run through.
  1700. 			mes "^3355FFMaybe the golden key^000000";
  1701. 			mes "unlocks something in the^000000";
  1702. 			mes "Cottage. Let's take another look.^000000";
  1703. 			close;
  1704. 		}
  1705. 		else {
  1706. 			mes "^3355FFIt looks like Elly's";
  1707. 			mes "Golden Key might fit";
  1708. 			mes "into the keyhole on the";
  1709. 			mes "Grey Box you found inside";
  1710. 			mes "Kiel Hyre's Cottage.^000000";
  1711. 			next;
  1712. 			mes "^3355FFYou successfully open the";
  1713. 			mes "Grey Box with the Golden Key,";
  1714. 			mes "and find a Blue Keycard, along";
  1715. 			mes "with a folded note, inside the";
  1716. 			mes "Grey Box. You quickly read";
  1717. 			mes "the note's contents...^000000";
  1718. 			next;
  1719. 			mes "Dearest Elly,";
  1720. 			mes "Kiehl finally broke the taboo,";
  1721. 			mes "and tried to transform you guys";
  1722. 			mes "into something horrible.";
  1723. 			mes "^FFFFFF_^000000";
  1724. 			mes "By the time you read this,";
  1725. 			mes "my life is probably in danger.";
  1726. 			mes "Whether I live depends on you.";
  1727. 			mes "^FFFFFF_^000000";
  1728. 			mes "You'll already learn if you";
  1729. 			mes "meet Puppet, but I want to tell";
  1730. 			mes "you myself: you're not human.";
  1731. 			mes "You'll learn the details if you";
  1732. 			mes "enter the factory by using the";
  1733. 			mes "entrance near the grave next";
  1734. 			mes "to the church. Then, I want";
  1735. 			mes "you to find Allysia inside";
  1736. 			mes "the factory's secret room.";
  1737. 			mes "I've registered your name in";
  1738. 			mes "her security system, so don't";
  1739. 			mes "worry. Hopefully, Allysia will";
  1740. 			mes "then come to save me...";
  1741. 			mes "^FFFFFF_^000000";
  1742. 			mes "Sorry about that,";
  1743. 			mes "Grandpa";
  1744. 			getitem 7495,1; //Blue_Key_Card
  1745. 			delitem 7491,1; //Iron_Box
  1746. 			set KielHyreQuest,36;
  1747. 			close;
  1748. 		}
  1749. 	}
  1750. 	else if (KielHyreQuest >= 36) {
  1751. 		mes "^3355FFThis is where you";
  1752. 		mes "discovered the note";
  1753. 		mes "locked inside the Grey Box.";
  1754. 		mes "The following message was";
  1755. 		mes "written in the note by Elly's";
  1756. 		mes "grandfather, Kiel Hyre.^000000";
  1757. 		next;
  1758. 		mes "Dearest Elly,";
  1759. 		mes "Kiehl finally broke the taboo,";
  1760. 		mes "and tried to transform you guys";
  1761. 		mes "into something horrible.";
  1762. 		mes "^FFFFFF_^000000";
  1763. 		mes "By the time you read this,";
  1764. 		mes "my life is probably in danger.";
  1765. 		mes "Whether I live depends on you.";
  1766. 		mes "^FFFFFF_^000000";
  1767. 		mes "You'll already learn if you";
  1768. 		mes "meet Puppet, but I want to tell";
  1769. 		mes "you myself: you're not human.";
  1770. 		mes "You'll learn the details if you";
  1771. 		mes "enter the factory by using the";
  1772. 		mes "entrance near the grave next";
  1773. 		mes "to the church. Then, I want";
  1774. 		mes "you to find Allysia inside";
  1775. 		mes "the factory's secret room.";
  1776. 		mes "I've registered your name in";
  1777. 		mes "her security system, so don't";
  1778. 		mes "worry. Hopefully, Allysia will";
  1779. 		mes "then come to save me...";
  1780. 		mes "^FFFFFF_^000000";
  1781. 		mes "Sorry about that,";
  1782. 		mes "Grandpa";
  1783. 		close;
  1784. 	}
  1785. }
  1786.  
  1787. //----------------------------------------------------------------------------
  1788. // Cookie Basket
  1789. //----------------------------------------------------------------------------
  1790. kh_school,175,176,0	script	Cookie Basket#kh	111,{
  1791. 	if (KielHyreQuest < 30) {
  1792. 		mes "^3355FFIt's a cookie";
  1793. 		mes "basket filled with";
  1794. 		mes "delicious cookies.^000000";
  1795. 		close;
  1796. 	}
  1797. 	else if (KielHyreQuest == 30) {
  1798. 		mes "^3355FFThis must be";
  1799. 		mes "Elly's cookie basket.";
  1800. 		mes "There appears to be";
  1801. 		mes "a folded note wedged";
  1802. 		mes "between the cookies.^000000";
  1803. 		next;
  1804. 		switch(select("Read Note:Ignore")) {
  1805. 		case 1:
  1806. 			mes ""+strcharinfo(0)+", help!";
  1807. 			mes "There's this guy dressed in";
  1808. 			mes "black who's walking around,";
  1809. 			mes "and casting this weird spell!";
  1810. 			mes "He's the one that's been making";
  1811. 			mes "people cold and lifeless as";
  1812. 			mes "puppets! I'm getting scared!";
  1813. 			mes "^FFFFFF_^000000";
  1814. 			mes "I hope you get this note...";
  1815. 			mes "He ran after me, but I locked";
  1816. 			mes "myself in my room. I'm going";
  1817. 			mes "to leave my window open so that";
  1818. 			mes "you can still find me. I hope he";
  1819. 			mes "doesn't cast his curse on me!";
  1820. 			set KielHyreQuest,32;
  1821. 			close;
  1822. 		case 2:
  1823. 			mes "^3355FFThat note probably";
  1824. 			mes "wasn't written just";
  1825. 			mes "for you, anyway.^000000";
  1826. 			close;
  1827. 		}
  1828. 	}
  1829. 	else if (KielHyreQuest < 108) {
  1830. 		mes "^3355FFThese cookies aren't";
  1831. 		mes "stale yet, but they're no";
  1832. 		mes "longer warm. If they're";
  1833. 		mes "not at room temperature,";
  1834. 		mes "then they're a little cold.^000000";
  1835. 		close;
  1836. 	}
  1837. 	else if (KielHyreQuest == 108) {
  1838. 		mes "^3355FFAs you stare at the";
  1839. 		mes "cookie basket, the wind";
  1840. 		mes "from the window jostles";
  1841. 		mes "it, revealing a letter that";
  1842. 		mes "was placed underneath.";
  1843. 		mes "It was probably written";
  1844. 		mes "by Elly for you to read.^000000";
  1845. 		next;
  1846. 		mes "^333333Dearest "+strcharinfo(0)+",";
  1847. 		mes " ";
  1848. 		mes "My teachers usually yell at me";
  1849. 		mes "since I make so many mistakes,";
  1850. 		mes "but today Mrs. Lecollane gave me";
  1851. 		mes "praise for my yummy cookies!";
  1852. 		mes "It's all thanks to you, my friend.";
  1853. 		mes "I'm very happy we've met:";
  1854. 		mes "you've taught me that there";
  1855. 		mes "are good people in the world.";
  1856. 		mes "And I know Grandpa will like";
  1857. 		mes "you, though, I don't know";
  1858. 		mes "where he could be...";
  1859. 		mes " ";
  1860. 		mes "Someday, I hope to become";
  1861. 		mes "as nice a person as you are.";
  1862. 		mes "Let's keep in touch and be";
  1863. 		mes "really good friends, okay?";
  1864. 		mes " ";
  1865. 		mes "Yours, Elly^000000";
  1866. 		next;
  1867. 		mes "^3355FFIt feels like you can";
  1868. 		mes "still sense Elly's warmth";
  1869. 		mes "and kindness from her";
  1870. 		mes "cookie basket. You picked";
  1871. 		mes "out a cookie, and put it";
  1872. 		mes "in your mouth. It was";
  1873. 		mes "deliciously bittersweet.";
  1874. 		set KielHyreQuest,109;
  1875. 		next;
  1876. 		input .@input$;
  1877. 		mes "["+strcharinfo(0)+"]";
  1878. 		mes ""+.@input$+"";
  1879. 		mes "It's time to go back. I can't";
  1880. 		mes "stay here much longer.";
  1881. 		close2;
  1882. 		warp "yuno_fild08",69,183;
  1883. 		end;
  1884. 	}
  1885. 	else {
  1886. 		mes "^3355FFAll the cookies";
  1887. 		mes "in this basket are";
  1888. 		mes "stale! Well, it shouldn't";
  1889. 		mes "come as a surprise.";
  1890. 		mes "It's been a long time";
  1891. 		mes "since they were baked.^000000";
  1892. 		close;
  1893. 	}
  1894. 	end;
  1895. }
  1896.  
  1897. //----------------------------------------------------------------------------
  1898. // Elly's Window (In Dormitory)
  1899. //----------------------------------------------------------------------------
  1900. kh_school,188,185,0	script	Window#kh2	111,{
  1901. 	warp "yuno_fild08",69,183;
  1902. 	end;
  1903. }
  1904.  
  1905. //----------------------------------------------------------------------------
  1906. // Grave/Kiel Hyre dungeon entry
  1907. //----------------------------------------------------------------------------
  1908. yuno_fild08,71,170,0	script	Grave#kh	111,{
  1909. 	if (KielHyreQuest < 36) {
  1910. 		mes "^3355FFIt's just a grave.";
  1911. 		mes "It might be important";
  1912. 		mes "to you later, but now";
  1913. 		mes "it's not really all that";
  1914. 		mes "helpful to you.^000000";
  1915. 		close;
  1916. 	}
  1917. 	else if (KielHyreQuest == 36) {
  1918. 		if (countitem(7492) < 1) {
  1919. 			mes "^3355FFIt's just a grave.";
  1920. 			mes "It might be important";
  1921. 			mes "to you later, but now";
  1922. 			mes "it's not really all that";
  1923. 			mes "helpful to you.^000000";
  1924. 			close;
  1925. 		}
  1926. 		else {
  1927. 			mes "^3355FFThere's a secret door";
  1928. 			mes "near this grave. It looks";
  1929. 			mes "like there's some kind of";
  1930. 			mes "slot and a number pad";
  1931. 			mes "installed on the door.^000000";
  1932. 			next;
  1933. 			mes "^3355FFWhat should you";
  1934. 			mes "insert into the slot?^000000";
  1935. 			next;
  1936. 			input .@KHInput$;
  1937. 			if (.@KHInput$ == "Yellow Keycard") {
  1938. 				mes "^3355FFAn electronic confirmation";
  1939. 				mes "chime sounds once you insert";
  1940. 				mes "the Yellow Keycard, followed by";
  1941. 				mes "an automated voice that asks:^000000";
  1942. 				next;
  1943. 				mes "[Security System]";
  1944. 				mes "Please enter the password.";
  1945. 				next;
  1946. 				input .@KHInput$;
  1947. 				next;
  1948. 				if (.@KHInput$ == "4772961") {
  1949. 					mes "[Security System]";
  1950. 					mes "Password confirmed.";
  1951. 					mes "Welcome, Kiel Hyre.";
  1952. 					next;
  1953. 					mes "^3355FFYou hear another ";
  1954. 					mes "pleasant beep, and";
  1955. 					mes "a secret path opens.^000000";
  1956. 					set KielHyreQuest,38;
  1957. 					close;
  1958. 				}
  1959. 				else {
  1960. 					mes "[Security System]";
  1961. 					mes "Incorrect password.";
  1962. 					mes "Please try again.";
  1963. 					close;
  1964. 				}
  1965. 			}
  1966. 			else {
  1967. 				mes "^3355FFWhatever you're trying";
  1968. 				mes "to insert into the slot";
  1969. 				mes "isn't working at all...^000000";
  1970. 				close;
  1971. 			}
  1972. 		}
  1973. 	}
  1974. 	else if ((KielHyreQuest >= 38) && (KielHyreQuest < 106)) {
  1975. 		mes "^3355FFThe door to the";
  1976. 		mes "factory is wide open.^000000";
  1977. 		next;
  1978. 		switch(select("Enter:Cancel")) {
  1979. 		case 1:
  1980. 			warp "kh_dun01",3,230;
  1981. 			end;
  1982. 		case 2:
  1983. 			mes "......";
  1984. 			mes ".........";
  1985. 			mes "............";
  1986. 			close;
  1987. 		}
  1988. 	}
  1989.  
  1990. 	else if (KielHyreQuest >= 106) {
  1991. 		if (countitem(7509) < 1) {
  1992. 			mes "^3355FFThe secret entrance";
  1993. 			mes "has now been sealed.^000000";
  1994. 			close;
  1995. 		}
  1996. 		else {
  1997. 			mes "As you aproach the";
  1998. 			mes "grave, it begins to";
  1999. 			mes "emit flashes of light.^000000";
  2000. 			next;
  2001. 			switch(select("Use the ^0000FFLuxurious Keycard^000000:Ignore")) {
  2002. 			case 1:
  2003. 				mes "Once you use the";
  2004. 				mes "Luxurious Keycard,";
  2005. 				mes "a secret path opens^000000";
  2006. 				next;
  2007. 				switch(select("Enter:cancel")) {
  2008. 				case 1:
  2009. 					warp "kh_dun01",3,230;
  2010. 					end;
  2011. 				case 2:
  2012. 					mes "......";
  2013. 					mes ".........";
  2014. 					mes "............";
  2015. 					close;
  2016. 				}
  2017. 			case 2:
  2018. 				mes "......";
  2019. 				mes ".........";
  2020. 				mes "............";
  2021. 				close;
  2022. 			}
  2023. 		}
  2024. 	}
  2025. }
  2026.  
  2027. //============================================================================
  2028.  
  2029. //============================================================================
  2030. //Kiel Hyre Cottage NPCs
  2031. //============================================================================
  2032.  
  2033. //----------------------------------------------------------------------------
  2034. // Cottage Keeper
  2035. //----------------------------------------------------------------------------
  2036. yuno_fild02,93,210,4	script	Cottage Keeper#kh	85,{
  2037. 	if ((KielHyreQuest < 12) || (KielHyreQuest > 12)) {
  2038. 		mes "[Cottage Keeper]";
  2039. 		mes "This is private property,";
  2040. 		mes "so please do not enter this";
  2041. 		mes "area unless you're authorized.";
  2042. 		close;
  2043. 	}
  2044. 	else if (KielHyreQuest == 12) {
  2045. 		mes "[Cottage Keeper]";
  2046. 		mes "This is private property,";
  2047. 		mes "so please do not enter this";
  2048. 		mes "area unless you're authorized.";
  2049. 		next;
  2050. 		switch(select("I have an appointment with Kiel Hyre.:Alright.")) {
  2051. 		case 1:
  2052. 			mes "[Cottage Keeper]";
  2053. 			mes "You have an";
  2054. 			mes "appointment with";
  2055. 			mes "Master Kiel Hyre?";
  2056. 			mes "Um, are you sure?";
  2057. 			next;
  2058. 			switch(select("Yes:No")) {
  2059. 			case 1:
  2060. 				mes "[Cottage Keeper]";
  2061. 				mes "There must be some sort";
  2062. 				mes "of mistake. Mister Hyre";
  2063. 				mes "wouldn't have left if he";
  2064. 				mes "was supposed to keep";
  2065. 				mes "an appointment...";
  2066. 				set KielHyreQuest,14;
  2067. 				close;
  2068. 			case 2:
  2069. 				mes "[Cottage Keeper]";
  2070. 				mes "Well unless you have";
  2071. 				mes "an appointment, I don't";
  2072. 				mes "think you'll be able to";
  2073. 				mes "meet with Mister Hyre.";
  2074. 				close;
  2075. 			}
  2076. 		case 2:
  2077. 			mes "[Cottage Keeper]";
  2078. 			mes "Goodbye.";
  2079. 			close;
  2080. 		}
  2081. 	}
  2082. }
  2083.  
  2084. //----------------------------------------------------------------------------
  2085. // Cottage Door (left)
  2086. //----------------------------------------------------------------------------
  2087. yuno_fild02,75,218,0	script	Door#kh2	111,{
  2088. 	if (KielHyreQuest < 16) {
  2089. 		mes "^3355FFThis door is locked.";
  2090. 		mes "If someone inside won't";
  2091. 		mes "open it for you, then you'll";
  2092. 		mes "need the right key to unlock it.";
  2093. 		close;
  2094. 	}
  2095. 	if (KielHyreQuest == 16) {
  2096. 		mes "^3355FFThis door is locked.";
  2097. 		mes "If someone inside won't";
  2098. 		mes "open it for you, then you'll";
  2099. 		mes "need the right key to unlock it.";
  2100. 		next;
  2101. 		switch(select("Unlock:Cancel")) {
  2102. 		case 1:
  2103. 			mes "^3355FFYou unlock the door with the";
  2104. 			mes "key that Elly gave you, and";
  2105. 			mes "as you push it open, a folded";
  2106. 			mes "note dropped from top of the";
  2107. 			mes "door. The following words";
  2108. 			mes "are written on this crude note.";
  2109. 			next;
  2110. 			mes "6 Forward,";
  2111. 			mes "3 Left,";
  2112. 			mes "3 Forward,";
  2113. 			mes "4 Left";
  2114. 			close2;
  2115. 			set KielHyreQuest,18;
  2116. 			warp "kh_vila",188,18;
  2117. 			end;
  2118. 		case 2:
  2119. 			mes "......";
  2120. 			mes ".........";
  2121. 			mes "............";
  2122. 			close;
  2123. 		}
  2124. 	}
  2125. 	else {
  2126. 		mes "^3355FFThe door is open.^000000";
  2127. 		next;
  2128. 		switch(select("Enter:Cancel")) {
  2129. 		case 1:
  2130. 			warp "kh_vila",188,18;
  2131. 			end;
  2132. 		case 2:
  2133. 			close;
  2134. 		}
  2135. 	}
  2136. }
  2137.  
  2138. //----------------------------------------------------------------------------
  2139. // Cottage Door (Right)
  2140. //----------------------------------------------------------------------------
  2141. yuno_fild02,109,218,0	script	Door#kh1	111,{
  2142. 	if (KielHyreQuest != 16) {
  2143. 		mes "^3355FFThis door is locked.";
  2144. 		mes "If someone inside won't";
  2145. 		mes "open it for you, then you'll";
  2146. 		mes "need the right key to unlock it.";
  2147. 		close;
  2148. 	}
  2149. 	if (KielHyreQuest == 16) {
  2150. 		mes "^3355FFThis door is locked.";
  2151. 		mes "If someone inside won't";
  2152. 		mes "open it for you, then you'll";
  2153. 		mes "need the right key to unlock it.";
  2154. 		next;
  2155. 		switch(select("Open:Cancel")) {
  2156. 		case 1:
  2157. 			mes "^3355FFYou don't have";
  2158. 			mes "the key that can";
  2159. 			mes "unlock this door.^000000";
  2160. 			close;
  2161. 		case 2:
  2162. 			mes "......";
  2163. 			mes ".........";
  2164. 			mes "............";
  2165. 			close;
  2166. 		}
  2167. 	}
  2168. }
  2169.  
  2170.  
  2171. //----------------------------------------------------------------------------
  2172. // Store room interior; Wall
  2173. //----------------------------------------------------------------------------
  2174. kh_vila,191,14,0	script	Wall#kh	139,1,1,{
  2175. 	if (KielHyreQuest < 28) {
  2176. 		mes "^3355FFIt's just a wall.";
  2177. 		mes "It's not particularly";
  2178. 		mes "standing in your way.^000000";
  2179. 		close;
  2180. 	}
  2181. 	if (KielHyreQuest >= 28) {
  2182. 		mes "^3355FFThe wall is now";
  2183. 		mes "open, revealing";
  2184. 		mes "a secret path.^000000";
  2185. 		next;
  2186. 		switch(select("Enter:Cancel")) {
  2187. 		case 1:
  2188. 			warp "kh_vila",17,177;
  2189. 			end;
  2190. 		case 2:
  2191. 			close;
  2192. 		}
  2193. 	}
  2194.  
  2195. OnOpenDoor:
  2196. 	misceffect 316;
  2197. 	end;
  2198. }
  2199.  
  2200. //----------------------------------------------------------------------------
  2201. // Store room interior; books
  2202. //----------------------------------------------------------------------------
  2203. kh_vila,184,20,0	script	Book#kh1::BookKHQ1	111,{
  2204. 	if (KielHyreQuest != 26) {
  2205. 		mes "^3355FFThis bookshelf is^000000";
  2206. 		mes "^3355FFcrammed with many^000000";
  2207. 		mes "^3355FFlarge, hardcover books^000000";
  2208. 		close;
  2209. 	}
  2210. 	else if (KielHyreQuest == 26) {
  2211. 		if (rand(1,10) == 8) {
  2212. 			mes "^3355FFWithout thinking, you";
  2213. 			mes "reach for a book from";
  2214. 			mes "the bookshelf. As you";
  2215. 			mes "pull it towards you, the";
  2216. 			mes "wall slides opens open";
  2217. 			mes "to reveal a secret path.^000000";
  2218. 			donpcevent "Wall#kh::OnOpenDoor";
  2219. 			set KielHyreQuest,28;
  2220. 			close;
  2221. 		}
  2222. 		else {
  2223. 			mes "^3355FFThis bookshelf is";
  2224. 			mes "crammed with many";
  2225. 			mes "large, hardcover books.^000000";
  2226. 			close;
  2227. 		}
  2228.  
  2229. 	}
  2230.  
  2231. }
  2232.  
  2233. kh_vila,181,20,0	duplicate(BookKHQ1)	Book#kh2	111
  2234.  
  2235. kh_vila,178,20,0	duplicate(BookKHQ1)	Book#kh3	111
  2236.  
  2237. kh_vila,175,19,0	duplicate(BookKHQ1)	Book#kh4	111
  2238.  
  2239. //----------------------------------------------------------------------------
  2240. // Store room interior; Letter to Elly on the floor.
  2241. //----------------------------------------------------------------------------
  2242. kh_vila,179,11,0	script	Letter#kh	-1,1,1,{
  2243. //OnTouch2:
  2244. OnTouch:
  2245. 	if (KielHyreQuest == 18) {
  2246. 		if (checkweight(7490,1) == 0) {
  2247. 			mes "^3355FFJust a minute...!";
  2248. 			mes "There's something on";
  2249. 			mes "the floor here, but you";
  2250. 			mes "can't pick it up since";
  2251. 			mes "you're carrying too";
  2252. 			mes "many items now.^000000";
  2253. 			close;
  2254. 		}
  2255. 		mes "^3355FFYou've found a letter";
  2256. 		mes "on the floor. Naturally,";
  2257. 		mes "you pick it up, despite";
  2258. 		mes "the fact that it's not";
  2259. 		mes "addressed to you.^000000";
  2260. 		getitem 7490,1; //Kyll_Hire_Letter
  2261. 		set KielHyreQuest,20;
  2262. 		close;
  2263. 	} 
  2264. 	else{
  2265. 		mes "^3355FFYou entered the room.^000000";
  2266. 		close;
  2267. 	}
  2268. 	end; 
  2269. }
  2270.  
  2271. //----------------------------------------------------------------------------
  2272. // Cottage interior, kitchen; Box (Pet Food vending machine)
  2273. //----------------------------------------------------------------------------
  2274. kh_vila,16,175,0	script	Box#khp1	111,{
  2275. 	mes "^FFFFFF##^000000*Tasty-Nutricious-Delicious*";
  2276. 	mes "*Cute Pet Doof Vending Machine*";
  2277. 	mes "The best food for your Cute Pets";
  2278. 	mes "that is superior to the Pet Food";
  2279. 	mes "you can buy in the market!";
  2280. 	mes "^FFFFFF_^000000";
  2281. 	mes "Price: 1,100 zeny (cheap!)";
  2282. 	next;
  2283. 	switch(select("Buy!:Cancel")) {
  2284. 	case 1:
  2285. 		if (zeny < 1100) {
  2286. 			mes "^3355FFUnfortunately, you";
  2287. 			mes "don't have enough";
  2288. 			mes "zeny to insert into";
  2289. 			mes "the vending machine.^000000";
  2290. 			close;
  2291. 		}
  2292. 		else {
  2293. 			mes "^3355FFOh no...!^000000";
  2294. 			mes "^3355FF1,100 zeny seems kind";
  2295. 			mes "of expensive for Pet Food,";
  2296. 			mes "but if it's better than the";
  2297. 			mes "normal stuff, it might";
  2298. 			mes "be worth a shot.^000000";
  2299. 			next;
  2300. 			mes "^3355FFOh no...!";
  2301. 			mes "There's nothing";
  2302. 			mes "special about it";
  2303. 			mes "at all! It's just";
  2304. 			mes "normal Pet Food!";
  2305. 			set zeny,zeny-1100;
  2306. 			getitem 537,1;	//Pet_Food
  2307. 			close;
  2308. 		}
  2309. 	case 2:
  2310. 		mes "^3355FFThis vending machine";
  2311. 		mes "seems really shady and";
  2312. 		mes "suspicious for some reason.^000000";
  2313. 		close;
  2314. 	}
  2315. }
  2316.  
  2317. //----------------------------------------------------------------------------
  2318. // Cottage interior, kitchen; Apple Box (Useless?)
  2319. //----------------------------------------------------------------------------
  2320. kh_vila,30,184,0	script	Apple Box#khp1	111,{
  2321. 	mes "^3355FFYou find a box filled with";
  2322. 	mes "ripe, delicious apples.^000000";
  2323. 	next;
  2324. 	switch(select("Take the box:Leave it")) {
  2325. 	case 1:
  2326. 		mes "^3355FFNo...! Wait!";
  2327. 		mes "Something's wrong!";
  2328. 		mes "Whatever you do,";
  2329. 		mes "don't take this box!^000000";
  2330. 		next;
  2331. 		mes "^3355FFAnd so, your inner";
  2332. 		mes "voice, your Jungian";
  2333. 		mes "shadow if you will,";
  2334. 		mes "prevented you from";
  2335. 		mes "taking the box.^000000";
  2336. 		close;
  2337. 	case 2: 
  2338. 		mes "^3355FFSomething is wrong";
  2339. 		mes "with this box of apples.^000000";
  2340. 		close;
  2341. 	}
  2342. }
  2343.  
  2344. //----------------------------------------------------------------------------
  2345. // Cottage interior, dining room; Map
  2346. //----------------------------------------------------------------------------
  2347. kh_vila,44,126,0	script	Map#khp1	111,{
  2348. 	if ((KHCottagePoem1 < 2) && (KielHyreQuest < 30)) {
  2349. 		mes "^3355FFA magnificent world map,";
  2350. 		mes "detailing the Rune-Midgarts";
  2351. 		mes "Kingdom, Schwaltzvalt Republic,";
  2352. 		mes "as well as another country to the";
  2353. 		mes "west whose name is unfamiliar";
  2354. 		mes "to you, is pasted to this wall.^000000";
  2355. 		next;
  2356. 		mes "^3355FFAs you examine the";
  2357. 		mes "world map more closely,";
  2358. 		mes "you find that something has";
  2359. 		mes "been hidden underneath it.^000000";
  2360. 		switch(select("Ignore:Examine")) {
  2361. 		case 1:
  2362. 			mes "^3355FFWhatever might be";
  2363. 			mes "hidden beneath this";
  2364. 			mes "map probably isn't";
  2365. 			mes "important enough for";
  2366. 			mes "you to investigate.^000000";
  2367. 			close;
  2368. 		case 2:
  2369. 			mes "^3355FFUnfortunately, you can't";
  2370. 			mes "see what's under the map";
  2371. 			mes "since it's pasted to the wall.";
  2372. 			mes "You'll need to find some";
  2373. 			mes "way to loosen the glue";
  2374. 			mes "without damaging the map...^000000";
  2375. 			set KHCottagePoem1,1;
  2376. 			close;
  2377. 		}
  2378. 	}
  2379. 	else  if ((KHCottagePoem1 == 2) && (KielHyreQuest < 30)) {
  2380. 		mes "^3355FFYou bring the pot of";
  2381. 		mes "steaming hot liquid";
  2382. 		mes "close to the world map.";
  2383. 		mes "As the paste on the wall";
  2384. 		mes "moistens, the map slowly";
  2385. 		mes "begins to peel back.^000000";
  2386. 		next;
  2387. 		mes "^3355FFThe peeling map reveals";
  2388. 		mes "a folded piece of paper";
  2389. 		mes "hidden beneath it. You";
  2390. 		mes "take the paper, and smooth";
  2391. 		mes "the map out to adhere it to the";
  2392. 		mes "wall once again. A message is";
  2393. 		mes "written on the piece of paper.^000000";
  2394. 		next;
  2395. 		mes "^0000FFShe will be in a place";
  2396. 		mes "as cold as the poles.";
  2397. 		mes "When the well is dried";
  2398. 		mes "and the earth is cracked,";
  2399. 		mes "the path to her heart, a";
  2400. 		mes "heart as transparent as";
  2401. 		mes "crystal, will be open.^000000";
  2402. 		next;
  2403. 		mes "^3355FFI'll have to fight four";
  2404. 		mes "snakes with four swords";
  2405. 		mes "to find her. The first sword";
  2406. 		mes "is love. The second sword";
  2407. 		mes "is despair. The third sword";
  2408. 		mes "is rage. The fourth sword is";
  2409. 		mes "hope. To find her, to rescue her.^000000";
  2410. 		next;
  2411. 		mes "^3355FF...............................";
  2412. 		mes "The deeper meaning";
  2413. 		mes "of this poem, if it even";
  2414. 		mes "exists, eludes you.^000000";
  2415. 		set KHCottagePoem1,3;
  2416. 		close;
  2417. 	}
  2418. 	else  if ((KHCottagePoem1 > 2) || (KielHyreQuest >= 30)) {
  2419. 		mes "^3355FFThis is were you found";
  2420. 		mes "the paper on which the";
  2421. 		mes "poem was written. Perhaps";
  2422. 		mes "it would be a good idea to";
  2423. 		mes "refresh your memory and";
  2424. 		mes "read that poem again.^000000";
  2425. 		next;
  2426. 		switch(select("Read:Cancel")) {
  2427. 		case 1:
  2428. 			mes "^0000FFShe will be in a place";
  2429. 			mes "as cold as the poles.";
  2430. 			mes "When the well is dried";
  2431. 			mes "and the earth is cracked,";
  2432. 			mes "the path to her heart, a";
  2433. 			mes "heart as transparent as";
  2434. 			mes "crystal, will be open.^000000";
  2435. 			next;
  2436. 			mes "^3355FFI'll have to fight four";
  2437. 			mes "snakes with four swords";
  2438. 			mes "to find her. The first sword";
  2439. 			mes "is love. The second sword";
  2440. 			mes "is despair. The third sword";
  2441. 			mes "is rage. The fourth sword is";
  2442. 			mes "hope. To find her, to rescue her.^000000";
  2443. 			next;
  2444. 			mes "^3355FF...............................";
  2445. 			mes "The deeper meaning";
  2446. 			mes "of this poem, if it even";
  2447. 			mes "exists, eludes you.^000000";
  2448. 			close;
  2449. 		case 2:
  2450. 			mes "^3355FFThere's no need for";
  2451. 			mes "you to reread this poem.";
  2452. 			mes "You're a freakin' genius!^000000";
  2453. 			close;
  2454. 		}
  2455. 	}
  2456. }
  2457.  
  2458. //----------------------------------------------------------------------------
  2459. // Cottage interior, kitchen; Pot
  2460. //----------------------------------------------------------------------------
  2461. kh_vila,33,184,0	script	Pot#khp1	111,{
  2462. 	if (KHCottagePoem1 < 1) {
  2463. 		mes "^3355FFYou've found a pot";
  2464. 		mes "filled with boiling,";
  2465. 		mes "steaming liquid.^000000";
  2466. 		close;
  2467. 	}
  2468. 	else if (KHCottagePoem1 == 1) {
  2469. 		mes "^3355FFYou've found a pot";
  2470. 		mes "filled with boiling,";
  2471. 		mes "steaming liquid.";
  2472. 		mes "Steam... That you could";
  2473. 		mes "use to loosen the glue on";
  2474. 		mes "the map... You're a genius!^000000";
  2475. 		next;
  2476. 		switch(select("Try it.:That? That won't work!")) {
  2477. 		case 1:
  2478. 			mes "^3355FFYou picked up the";
  2479. 			mes "boiling pot, but";
  2480. 			mes "slightly burned your";
  2481. 			mes "hands by accident.";
  2482. 			set KHCottagePoem1,2;
  2483. 			close;
  2484.  
  2485. 		case 2:
  2486. 			mes "^3355FFNo, no...";
  2487. 			mes "We'd better try";
  2488. 			mes "something else.^000000";
  2489. 			close;
  2490. 		}
  2491. 	}
  2492. 	else if ((KHCottagePoem1 > 1) || (KielHyreQuest >= 30)){
  2493. 		mes "^3355FFThis is where you";
  2494. 		mes "picked up the pot filled";
  2495. 		mes "with steaming hot liquid.^000000";
  2496. 		close;
  2497. 	}
  2498. }
  2499.  
  2500. //----------------------------------------------------------------------------
  2501. // Cottage interior, fire place; Calabash
  2502. //----------------------------------------------------------------------------
  2503. kh_vila,14,55,0	script	Calabash#khp1	111,{
  2504. 	if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) {
  2505. 		if (checkweight(7329,1) == 0) {
  2506. 			mes "^3355FFThat's a nice looking";
  2507. 			mes "calabash. You might even";
  2508. 			mes "get something from it...";
  2509. 			mes "But first you better get";
  2510. 			mes "rid of all your extra weight.";
  2511. 			mes "And by weight, I mean items.^000000";
  2512. 			close;
  2513. 		}
  2514. 		mes "^3355FFIt's an expensive";
  2515. 		mes "looking calabash--";
  2516. 		mes "or in less fancy";
  2517. 		mes "words, a ''gourd.''";
  2518. 		mes "Would do you do?^000000";
  2519. 		next;
  2520. 		switch(select("Break Open Calabash:Look Inside Calabash:Ignore")) {
  2521. 		case 1:
  2522. 			mes "^3355FFYou can't break";
  2523. 			mes "open that calabash...";
  2524. 			mes "You're a hero, not a vandal.";
  2525. 			mes "Now, if this act of vandalism";
  2526. 			mes "can be considered an act of";
  2527. 			mes "heroism, then it'd be okay.^000000";
  2528. 			close;
  2529. 		case 2:
  2530. 			mes "^3355FFYou tenderly place";
  2531. 			mes "your hand into the";
  2532. 			mes "calabash, and gently";
  2533. 			mes "feel around with your";
  2534. 			mes "fingers until you retrieve";
  2535. 			mes "an Old Bronze Key.^000000";
  2536. 			getitem 7329,1; //Old_Bronze_Key
  2537. 			close;
  2538. 		case 3:
  2539. 			mes "^3355FFThere's probably";
  2540. 			mes "nothing inside anyway.^000000";
  2541. 			close;
  2542. 		}
  2543. 	}
  2544. 	else {
  2545. 		mes "^3355FFThis is the expensive";
  2546. 		mes "looking calabash from";
  2547. 		mes "which you've obtained";
  2548. 		mes "the Old Bronze Key.";
  2549. 		mes "It's useless to you now.^000000";
  2550. 		close;
  2551. 	}
  2552. }
  2553.  
  2554. //----------------------------------------------------------------------------
  2555. // Cottage interior, garden; Pool
  2556. //----------------------------------------------------------------------------
  2557. kh_vila,39,41,0	script	Pool#khp1	111,{
  2558. 	if ((KHCottagePoem1 < 3) && (KielHyreQuest < 30)) {
  2559. 		mes "^3355FFYou find a fancy pool";
  2560. 		mes "filled with fresh water.^000000";
  2561. 		close;
  2562. 	}
  2563. 	else if ((KHCottagePoem1 == 3) && (KielHyreQuest < 30)) {
  2564. 		mes "^3355FFYou find a fancy pool";
  2565. 		mes "filled with fresh water,";
  2566. 		mes "along with a conscpicuous";
  2567. 		mes "lion statue with two handles.^000000";
  2568. 		next;
  2569. 		switch(select("Pull Handles:Cancel")) {
  2570. 		case 1:
  2571. 			mes "Which handle would";
  2572. 			mes "you like to pull first?";
  2573. 			next;
  2574. 			switch(select("Right Handle:Left Handle")) {
  2575. 			case 1:
  2576. 				mes "^3355FFYou pull the right";
  2577. 				mes "handle, causing water";
  2578. 				mes "to gush out of the lion's";
  2579. 				mes "mouth. It looks pretty cool~^000000";
  2580. 				close;
  2581. 			case 2:
  2582. 				mes "^3355FFAs soon as you pull the";
  2583. 				mes "left handle, the water in";
  2584. 				mes "the pool drains away. The";
  2585. 				mes "pool empties, and you can";
  2586. 				mes "see a layer of green moss";
  2587. 				mes "covering the pool's bottom.^000000";
  2588. 				next;
  2589. 				switch(select("Ignore:Investigate")) {
  2590. 				case 1:
  2591. 					mes "^3355FFYou decide that";
  2592. 					mes "a pool is little more";
  2593. 					mes "than a hole without";
  2594. 					mes "any water to fill it.^000000";
  2595. 					close;
  2596. 				case 2:
  2597. 					mes "^3355FFAs you look through";
  2598. 					mes "the wet moss at the";
  2599. 					mes "bottom of the pool,";
  2600. 					mes "you stumble upon a";
  2601. 					mes "small, peculiar button.^000000";
  2602. 					next;
  2603. 					switch(select("Press button:Don't Press Button")) {
  2604. 					case 1:
  2605. 						mes "^3355FFYou press the button,";
  2606. 						mes "which seems to trigger";
  2607. 						mes "a strange sound coming";
  2608. 						mes "from the stairs at the hallway.^000000";
  2609. 						set KHCottagePoem1,4;
  2610. 						close;
  2611. 					case 2:
  2612. 						mes "^3355FFYou'd better not push";
  2613. 						mes "this button. Your enemies";
  2614. 						mes "must have hidden it carefully";
  2615. 						mes "for you to find: it must be";
  2616. 						mes "some sort of nefarious trap.^000000";
  2617. 						close;
  2618. 					}
  2619. 				}
  2620. 			}
  2621. 		case 2:
  2622. 			mes "^3355FFYou decided not";
  2623. 			mes "to pull any handles.^000000";
  2624. 			close;
  2625. 		}
  2626. 	}
  2627. 	else if ((KHCottagePoem1 > 3) || (KielHyreQuest >= 30)) {
  2628. 		mes "^3355FFThis is where you pressed";
  2629. 		mes "the small button that caused";
  2630. 		mes "some strange sound to come";
  2631. 		mes "from the stairs near the hallway.";
  2632. 		close;
  2633. 	}
  2634. }
  2635.  
  2636. //----------------------------------------------------------------------------
  2637. // Cottage interior, upstairs; Vicious Dog
  2638. //----------------------------------------------------------------------------
  2639. kh_vila,181,178,4	script	Vicious Dog#khp1	81,7,3,{
  2640. //OnTouch2:
  2641. OnTouch:
  2642. 	mes "*Grrr~*";
  2643. 	next;
  2644. 	mes "^3355FFAn extremely vicious";
  2645. 	mes "looking dog is glaring";
  2646. 	mes "at you. Can you really";
  2647. 	mes "pass by this creature";
  2648. 	mes "without getting hurt?^000000";
  2649. 	next;
  2650. 	switch(select("March forward:Run away")) {
  2651. 	case 1:
  2652. 		if (countitem(537) >= 1) {
  2653. 			mes "^3355FFWait! Perhaps you can";
  2654. 			mes "use food to soothe the";
  2655. 			mes "savage beast. Why don't";
  2656. 			mes "you feed it some of your Pet";
  2657. 			mes "Food and see what happens?^000000";
  2658. 			next;
  2659. 			switch(select("Give Pet Food:It won't work!")) {
  2660. 			case 1:
  2661. 				mes "^3355FFYou gingerly throw the";
  2662. 				mes "Pet Food towards the dog.";
  2663. 				mes "Its tail shakes violently as";
  2664. 				mes "it devours the food. You'd";
  2665. 				mes "better pass this dog now";
  2666. 				mes "while you have the chance!^000000";
  2667. 				delitem 537,1; //Pet_Food
  2668. 				close2;
  2669. 				warp "kh_vila",173,182;
  2670. 				end;
  2671. 			case 2:
  2672. 				break;
  2673. 			}
  2674. 		}
  2675. 		mes "^3355FFYou slowly approach";
  2676. 		mes "the dog, but it won't";
  2677. 		mes "stop snarling at you.";
  2678. 		mes "You try to run past the";
  2679. 		mes "dog, but it blocks all of";
  2680. 		mes "your moves. What to do?^000000";
  2681. 		next;
  2682. 		mes "[Vicious Dog]";
  2683. 		mes "BOW WOW!";
  2684. 		mes "BOW WOW!";
  2685. 		mes "BOW WOW WOW!";
  2686. 		next;
  2687. 		mes "^3355FFThe dog chased you";
  2688. 		mes "downstairs like the";
  2689. 		mes "suckah chump you are.^000000";
  2690. 		close2;
  2691. 		warp "kh_vila",126,70;
  2692. 		end;
  2693. 	case 2:
  2694. 		mes "^3355FFLet's get out of here!^000000";
  2695. 		close2;
  2696. 		warp "kh_vila",126,70;
  2697. 		end;
  2698. 	}
  2699. }
  2700.  
  2701. //----------------------------------------------------------------------------
  2702. // Cottage interior, upstairs; Drawer, first room nightstand
  2703. //----------------------------------------------------------------------------
  2704. kh_vila,115,186,0	script	Drawer#khp1	111,{
  2705. 	if (checkweight(7492,1) == 0) {
  2706. 		mes "^3355FFThere's something inside";
  2707. 		mes "this drawer, but you can't";
  2708. 		mes "take it since you're carrying";
  2709. 		mes "to many items with you. Maybe";
  2710. 		mes "you should pay a visit to your";
  2711. 		mes "trusty Kafra Storage first.^000000";
  2712. 		close;
  2713. 	}
  2714. 	if ((countitem(7492) < 1) && (KielHyreQuest <= 36)) {
  2715. 		mes "^3355FFYou find an old drawer";
  2716. 		mes "^that has been closed.";
  2717. 		mes "^If you open it, then you";
  2718. 		mes "^might find something";
  2719. 		mes "^inside. Or could it be";
  2720. 		mes "^empty. Who knows?^000000";
  2721. 		next;
  2722. 		switch(select("Open Drawer:Ignore")) {
  2723. 		case 1:
  2724. 			mes "^3355FFYou obtain a Yellow";
  2725. 			mes "Keycard from inside the";
  2726. 			mes "drawer. Opening that drawer";
  2727. 			mes "turned out to be worthwhile.^000000";
  2728. 			getitem 7492,1; //Yellow_Key_Card
  2729. 			close;
  2730. 		case 2:
  2731. 			mes "^3355FFForget opening that";
  2732. 			mes "drawer. I mean, come on,";
  2733. 			mes "what would be the point?^000000";
  2734. 			close;
  2735. 		}
  2736. 	}
  2737. 	else {
  2738. 		mes "^3355FFThis is where you";
  2739. 		mes "found the Yellow Keycard.";
  2740. 		mes "This drawer is now empty.^000000";
  2741. 		close;
  2742. 	}
  2743. }
  2744.  
  2745. //----------------------------------------------------------------------------
  2746. // Cottage interior, upstairs; Box
  2747. //----------------------------------------------------------------------------
  2748. kh_vila,107,126,0	script	Box#khp2	111,{
  2749. 	if ((countitem(7329) < 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) {
  2750. 		mes "^3355FFA solid box is laid";
  2751. 		mes "on the floor in which";
  2752. 		mes "a smaller, locked box";
  2753. 		mes "has been placed inside.^000000";
  2754. 		close;
  2755. 	}
  2756. 	else if ((countitem(7329) >= 1) && (countitem(7516) < 1) && (countitem(7491) < 1) && (KielHyreQuest < 38)) {
  2757. 		mes "^3355FFA solid box is laid";
  2758. 		mes "on the floor in which";
  2759. 		mes "a smaller, locked box";
  2760. 		mes "has been placed inside.";
  2761. 		mes "Perhaps you can use your";
  2762. 		mes "Old Bronze Key to unlock it.^000000";
  2763. 		next;
  2764. 		switch(select("Use Old Bronze Key:No, it'll never work.")) {
  2765. 		case 1:
  2766. 			mes "^3355FFYour hunch paid off!";
  2767. 			mes "The Old Bronze Key really";
  2768. 			mes "did unlock that box! You";
  2769. 			mes "open the inner box and";
  2770. 			mes "obtain the Green Keycard";
  2771. 			mes "that was locked inside.";
  2772. 			getitem 7516,1; //Green_Key_Card
  2773. 			delitem 7329,1; //Old_Bronze_Key
  2774. 			close;
  2775. 		case 2:
  2776. 			mes "^3355FFWhat...?";
  2777. 			mes "What? Using a key";
  2778. 			mes "to unlock a lock?";
  2779. 			mes "Come on, that's";
  2780. 			mes "freakin' crazy talk!^000000";
  2781. 			close;
  2782. 		}
  2783. 	}
  2784. 	else {
  2785. 		mes "^3355FFThis is the box from";
  2786. 		mes "which you've obtained";
  2787. 		mes "the Green Keycard.^000000";
  2788. 		close;
  2789. 	}
  2790. }
  2791.  
  2792. //----------------------------------------------------------------------------
  2793. // Cottage interior, upstairs; Bookshelf.
  2794. //----------------------------------------------------------------------------
  2795. kh_vila,181,138,0	script	Bookshelf#khp1	111,{
  2796. 	if ((countitem(7491) < 1) && (countitem(7329) >= 1) || (countitem(7516) >= 1)) {
  2797. 		mes "^3355FFOne of the books on";
  2798. 		mes "this crammed bookshelf";
  2799. 		mes "is labeled with the note,";
  2800. 		mes "''To Elly.'' It must have been";
  2801. 		mes "left behind by her grandfather.^000000";
  2802. 		next;
  2803. 		switch(select("Examine Book:Ignore")) {
  2804. 		case 1:
  2805. 			mes "^3355FFYou skim through the";
  2806. 			mes "book's pages, and don't";
  2807. 			mes "find anything particularly";
  2808. 			mes "interesting. However, you";
  2809. 			mes "notice a steel surface behind the";
  2810. 			mes "shelf as you place the book back.^000000";
  2811. 			next;
  2812. 			switch(select("Examine the steel surface:Ignore")) {
  2813. 			case 1:
  2814. 				mes "^3355FFYou remove more of the";
  2815. 				mes "shelf's books to reveal";
  2816. 				mes "that the steel surface is";
  2817. 				mes "part of a safe hidden behind";
  2818. 				mes "the bookshelf. There are two";
  2819. 				mes "keyholes on the steel safe.^000000";
  2820. 				next;
  2821. 				switch(select("Try all your keys:Cancel")) {
  2822. 				case 1:
  2823. 					mes "^3355FFWhich key will";
  2824. 					mes "you insert into";
  2825. 					mes "the first keyhole?^000000";
  2826. 					next;
  2827. 					if (countitem(7329) >= 1) {
  2828. 						select("Old Bronze Key:Cottage Key");
  2829. 						mes "^3355FFWhich key will";
  2830. 						mes "you insert into";
  2831. 						mes "the second keyhole?^000000";
  2832. 						next;
  2833. 						select("Old Bronze Key:Cottage Key");
  2834. 					}
  2835. 					else if (countitem(7516) >= 1) {
  2836. 						switch(select("Green Keycard:Cottage Key")) {
  2837. 						case 1:
  2838. 							set .@KHFirstKeyhole,1;
  2839. 							break;
  2840. 						case 2:
  2841. 							set .@KHFirstKeyhole,2;
  2842. 							break;
  2843. 						}
  2844. 						mes "^3355FFWhich key will";
  2845. 						mes "you insert into";
  2846. 						mes "the second keyhole?^000000";
  2847. 						next;
  2848. 						switch(select("Green Keycard:Cottage Key")) {
  2849. 						case 1:
  2850. 							set .@KHSecondKeyhole,1;
  2851. 							break;
  2852.  
  2853. 						case 2:
  2854. 							set .@KHSecondKeyhole,2;
  2855. 							break;
  2856.  
  2857. 						}
  2858. 						if (.@KHFirstKeyhole == 2) && (.@KHSecondKeyhole == 1) {
  2859. 							mes "^3355FFThe safe opens with";
  2860. 							mes "a click, and you see";
  2861. 							mes "a Grey Box inside.";
  2862. 							mes "You take the Grey Box";
  2863. 							mes "with you, hoping that it";
  2864. 							mes "will come in handy later.^000000";
  2865. 							delitem 7489,1; //Villa_Spare_Key
  2866. 							delitem 7516,1; //Green_Key_Card
  2867. 							getitem 7491,1; //Iron_Box
  2868. 							close;
  2869. 						}
  2870.  
  2871. 					}
  2872. 					mes "^3355FFThe safe won't open.^000000";
  2873. 					close;
  2874. 				case 2:
  2875. 					mes "^3355FFIt's probably a better";
  2876. 					mes "idea to investigate the";
  2877. 					mes "cottage for the keys that";
  2878. 					mes "will open up this safe...^000000";
  2879. 					close;
  2880. 				}
  2881. 			case 2:
  2882. 				mes "^3355FFYou place the books";
  2883. 				mes "back on the bookshelf.^000000";
  2884. 				close;
  2885. 			}
  2886. 		case 2:
  2887. 			mes "^3355FFYou can probably";
  2888. 			mes "find better clues";
  2889. 			mes "somewhere else";
  2890. 			mes "around here.^000000";
  2891. 			close;
  2892. 		}
  2893. 	}
  2894. 	else {
  2895. 		mes "^3355FFYou've found a";
  2896. 		mes "bookshelf that's";
  2897. 		mes "crammed with books.^000000";
  2898. 		close;
  2899. 	}
  2900. }
  2901.  
  2902. //----------------------------------------------------------------------------
  2903. // Cottage interior, upstairs; Desk
  2904. //----------------------------------------------------------------------------
  2905. kh_vila,118,144,0	script	Desk#khp1	111,{
  2906. 	if (KHCottagePoem2 < 1) {
  2907. 		mes "^3355FFThere are piles of papers";
  2908. 		mes "and books stacked on top";
  2909. 		mes "of the desk covering topics";
  2910. 		mes "like artificial power, Sage";
  2911. 		mes "Varmundt's research, factory";
  2912. 		mes "robotization, and magic scrolls...^000000";
  2913. 		next;
  2914. 		mes "^3355FFWhile rummaging through";
  2915. 		mes "the books and papers, you";
  2916. 		mes "find a piece of paper with";
  2917. 		mes "the Kiel Hyre Foundation's";
  2918. 		mes "official seal. You decide that";
  2919. 		mes "it might come in handy someday.^000000";
  2920. 		next;
  2921. 		mes "^3355FFYou've obtained";
  2922. 		mes "a blank piece of";
  2923. 		mes "paper with the Kiel";
  2924. 		mes "Hyre Foundation seal.^000000";
  2925. 		set KHCottagePoem2,1;
  2926. 		close;
  2927. 	}
  2928. 	else if (KHCottagePoem2 >= 1) {
  2929. 		mes "^3355FFThere are piles of papers";
  2930. 		mes "and books, covering various";
  2931. 		mes "scientific and magic topics,";
  2932. 		mes "stacked on top of this desk.^000000";
  2933. 		close;
  2934. 	}
  2935. }
  2936.  
  2937. //----------------------------------------------------------------------------
  2938. // Cottage interior, upstairs; Medicine Chest
  2939. //----------------------------------------------------------------------------
  2940. kh_vila,123,170,0	script	Medicine Chest#khp1	111,{
  2941. 	if ((KHCottagePoem2 < 1) && (KielHyreQuest < 30)) {
  2942. 		mes "^3355FFThis medicine cabinet";
  2943. 		mes "is filled with bottles of";
  2944. 		mes "various colors. What kind";
  2945. 		mes "of medicine can be found here?^000000";
  2946. 		close;
  2947. 	}
  2948. 	else if ((KHCottagePoem2 == 1) && (KielHyreQuest < 30)) {
  2949. 		mes "^3355FFThis medicine cabinet";
  2950. 		mes "is filled with bottles of";
  2951. 		mes "various colors. What kind";
  2952. 		mes "of medicine can be found here?^000000";
  2953. 		next;
  2954. 		mes "^3355FFWait, you have a blank piece";
  2955. 		mes "of paper with the Kiel Hyre";
  2956. 		mes "Foundation seal! It's strange";
  2957. 		mes "that the seal was put on a blank";
  2958. 		mes "piece of paper. Maybe something";
  2959. 		mes "is written on it with special ink?^000000";
  2960. 		next;
  2961. 		mes "^3355FFIt's a crazy hunch, but";
  2962. 		mes "maybe, just maybe, you can";
  2963. 		mes "use something inside this";
  2964. 		mes "medicine cabinet that will";
  2965. 		mes "reveal any invisible ink";
  2966. 		mes "written on this document!^000000";
  2967. 		next;
  2968. 		switch(select("What? That's crazy!:Of course! Let's try it!")) {
  2969. 		case 1:
  2970. 			mes "^3355FFSorry.";
  2971. 			mes "I thought it";
  2972. 			mes "was a good idea...^000000";
  2973. 			close;
  2974. 		case 2:
  2975. 			switch(select("Try Red Liquid:Try Blue Liquid:Try Yellow Liquid:Try Green Liquid:Cancel")) {
  2976. 			case 1:
  2977. 				set .@KHPotionColor$,"red";
  2978. 				break;
  2979. 			case 2:
  2980. 				mes "^3355FFIt works!";
  2981. 				mes "The blue liquid is";
  2982. 				mes "revealing small text";
  2983. 				mes "written on the paper.";
  2984. 				mes "It looks like some";
  2985. 				mes "kind of long poem...^000000";
  2986. 				next;
  2987. 				mes "[Poem]";
  2988. 				mes "The first snake is made of";
  2989. 				mes "steel, but I used my rage";
  2990. 				mes "to destroy it. The second";
  2991. 				mes "snake is made of magic,";
  2992. 				mes "but my love pierced its heart.";
  2993. 				next;
  2994. 				mes "[Poem]";
  2995. 				mes "The third snake is flesh";
  2996. 				mes "and blood, but my hope";
  2997. 				mes "defeated it in the end.";
  2998. 				mes "However, the fourth and";
  2999. 				mes "final snake is formless, and";
  3000. 				mes "no one knows its appearance.";
  3001. 				next;
  3002. 				mes "[Poem]";
  3003. 				mes "I cast my despair to the air,";
  3004. 				mes "but nobody knows if it killed";
  3005. 				mes "the snake. I am merely ^0000FFa little";
  3006. 				mes "lost devil^000000 with four swords and";
  3007. 				mes "four snakes, searching for that";
  3008. 				mes "girl in the darkness.";
  3009. 				next;
  3010. 				mes "^3355FFThis is a very";
  3011. 				mes "strange poem. What";
  3012. 				mes "could it possibly mean?^000000";
  3013. 				set KHCottagePoem2,2;
  3014. 				close;
  3015. 			case 3:
  3016. 				set .@KHPotionColor$,"yellow";
  3017. 				break;
  3018. 			case 4:
  3019. 				set .@KHPotionColor$,"green";
  3020. 				break;
  3021. 			case 5:
  3022. 				mes "^3355FFNever mind.";
  3023. 				mes "This idea sounds";
  3024. 				mes "too crazy to work...";
  3025. 				mes "like puttting a man";
  3026. 				mes "on the moon. Can you";
  3027. 				mes "believe that hogwash?^000000";
  3028. 				close;
  3029. 			}
  3030. 			mes "^3355FFYou tried sprinkling";
  3031. 			mes "the "+.@KHPotionColor$+" liquid from the";
  3032. 			mes "medicine cabinet onto";
  3033. 			mes "the blank paper with the";
  3034. 			mes "Kiel Hyre Foundation seal.";
  3035. 			mes "However, nothing happened...^000000";
  3036. 			close;
  3037. 		}
  3038. 	}
  3039. 	else if ((KHCottagePoem2 >= 2) || (KielHyreQuest >= 30)) {
  3040. 		mes "^3355FFThis is where you poured";
  3041. 		mes "some blue liquid to read";
  3042. 		mes "a poem written in invisible";
  3043. 		mes "ink on the blank piece of paper";
  3044. 		mes "with the Kiel Hyre Foundation";
  3045. 		mes "seal. Would you like read it?^000000";
  3046. 		next;
  3047. 		switch(select("No time!:Read")) {
  3048. 		case 1:
  3049. 			mes "^3355FFYou're running out of";
  3050. 			mes "time! For now, it would";
  3051. 			mes "be best for you to search";
  3052. 			mes "every inch of this cottage.^000000";
  3053. 			close;
  3054. 		case 2:
  3055. 			mes "[Poem]";
  3056. 			mes "The first snake is made of";
  3057. 			mes "steel, but I used my rage";
  3058. 			mes "to destroy it. The second";
  3059. 			mes "snake is made of magic,";
  3060. 			mes "but my love pierced its heart.";
  3061. 			next;
  3062. 			mes "[Poem]";
  3063. 			mes "The third snake is flesh";
  3064. 			mes "and blood, but my hope";
  3065. 			mes "defeated it in the end.";
  3066. 			mes "However, the fourth and";
  3067. 			mes "final snake is formless, and";
  3068. 			mes "no one knows it's appearance.";
  3069. 			next;
  3070. 			mes "[Poem]";
  3071. 			mes "I cast my despair to the air,";
  3072. 			mes "but nobody knows if it killed";
  3073. 			mes "the snake. I am merely a ^3355FFlittle^000000";
  3074. 			mes "^3355FFlost devil^000000 with four swords and";
  3075. 			mes "four snakes, searching for that";
  3076. 			mes "girl in the darkness.";
  3077. 			close;
  3078.  
  3079. 		}
  3080. 	}
  3081. }
  3082.  
  3083. //----------------------------------------------------------------------------
  3084. // Cottage interior, stair case; Sword hilt
  3085. //----------------------------------------------------------------------------
  3086. kh_vila,136,68,0	script	Sword Hilt#kh	111,{
  3087. 	if ((KHCottagePoem1 < 3) || (KHCottagePoem2 < 2) && (KielHyreQuest < 30)) {
  3088. 		mes "^3355FFThere are four elaborately";
  3089. 		mes "designed swords positioned";
  3090. 		mes "next to four creepy looking";
  3091. 		mes "snake sculptures.^000000";
  3092. 		close;
  3093. 	}
  3094. 	else if ((KHCottagePoem1 <= 4) || (KHCottagePoem2 <= 2) && (KielHyreQuest < 30)) {
  3095. 		mes "^3355FFThere are four elaborately";
  3096. 		mes "designed swords positioned";
  3097. 		mes "next to four creepy looking";
  3098. 		mes "snake sculptures. Wait!";
  3099. 		mes "Perhaps they're related to";
  3100. 		mes "that poem you read earlier...";
  3101. 		next;
  3102. 		switch(select("No way!:Of course!")) {
  3103. 		case 1:
  3104. 			mes "^3355FFImpossible...";
  3105. 			mes "It must be some";
  3106. 			mes "kind of coincidence...^000000";
  3107. 			close;
  3108. 		case 2:
  3109. 			mes "^3355FFOf course! And look!";
  3110. 			mes "There's a hole on top";
  3111. 			mes "of the head of each snake";
  3112. 			mes "sculpture. These holes seem";
  3113. 			mes "big enough to insert each of";
  3114. 			mes "the ornamental swords nearby...^000000";
  3115. 			next;
  3116. 			switch(select("Ignore:Insert Ornamental Swords")) {
  3117. 			case 1:
  3118. 				mes "^3355FFImposible...^000000";
  3119. 				mes "^3355FFIt must be some^000000";
  3120. 				mes "^3355FFkind of coincidence...^000000";
  3121. 				close;
  3122. 			case 2:
  3123. 				if (KHCottagePoem1 != 4) {
  3124. 					mes "^3355FFCan't... Pull out...";
  3125. 					mes "Sword! It must be";
  3126. 					mes "locked into place";
  3127. 					mes "somehow, or sealed";
  3128. 					mes "by some strange force!^000000";
  3129. 					close;
  3130. 				}
  3131. 				else {
  3132. 					mes "^3355FFYou should probably";
  3133. 					mes "try to insert each sword";
  3134. 					mes "into the correct snake.";
  3135. 					mes "First, please select the";
  3136. 					mes "snake in which you will";
  3137. 					mes "insert the first sword.^000000";
  3138. 					next;
  3139. 					switch(select("First Snake:Second Snake:Third Snake:Fourth Snake")) {
  3140. 					default:
  3141. 						break;
  3142. 					case 2:
  3143. 						set .@KHSwords,.@KHSwords+1;
  3144. 						break;
  3145. 					}
  3146. 					next;
  3147. 					mes "^3355FFNow, please choose";
  3148. 					mes "the snake in which you";
  3149. 					mes "will insert the second sword.^000000";
  3150. 					next;
  3151. 					switch(select("First Snake:Second Snake:Third Snake:Fourth Snake")) {
  3152. 					default:
  3153. 						break;
  3154. 					case 4:
  3155. 						set .@KHSwords,.@KHSwords+1;
  3156. 						break;
  3157. 					}
  3158. 					next;
  3159. 					mes "^3355FFNext, please select";
  3160. 					mes "the snake in which you";
  3161. 					mes "will insert the third sword.^000000";
  3162. 					next;
  3163. 					switch(select("First Snake:Second Snake:Third Snake:Fourth Snake")) {
  3164. 					case 1:
  3165. 						set .@KHSwords,.@KHSwords+1;
  3166. 						break;
  3167. 					default:
  3168. 						break;
  3169. 					}
  3170. 					next;
  3171. 					mes "^3355FFLastly, please select";
  3172. 					mes "the snake in which you";
  3173. 					mes "will insert the fourth sword.^000000";
  3174. 					next;
  3175. 					switch(select("First Snake:Second Snake:Third Snake:Fourth Snake")) {
  3176. 					default:
  3177. 						break;
  3178. 					case 3:
  3179. 						set .@KHSwords,.@KHSwords+1;
  3180. 						break;
  3181. 					}
  3182.  
  3183. 					if (.@KHSwords == 4) {
  3184. 						mes "^3355FFYour ears are suddenly";
  3185. 						mes "filled with a low buzzing";
  3186. 						mes "noise, and your mind";
  3187. 						mes "and body feel as if they";
  3188. 						mes "are being swept away...^000000";
  3189. 						set KHCottagePoem1,5;
  3190. 						set KHCottagePoem2,3;
  3191. 						close2;
  3192. 						warp "kh_vila",178,72;
  3193. 						end;
  3194. 					}
  3195.  
  3196. 					else {
  3197. 						mes "^3355FFNothing happened...";
  3198. 						mes "You probably didn't";
  3199. 						mes "insert the swords into";
  3200. 						mes "the correct snakes. For now,";
  3201. 						mes "you should return the swords,";
  3202. 						mes "and then try this again later.^000000";
  3203. 						close;
  3204. 					}
  3205. 				}
  3206. 			}
  3207. 		}
  3208. 	}
  3209. 	else if ((KHCottagePoem1 == 5) && (KHCottagePoem2 == 3) || (KielHyreQuest >= 30)) {
  3210. 		mes "^3355FFHere is a hidden";
  3211. 		mes "path that leads to";
  3212. 		mes "the secret laboratory.^000000";
  3213. 		next;
  3214. 		switch(select("Enter:Cancel")) {
  3215. 		case 1:
  3216. 			warp "kh_vila",178,72;
  3217. 			end;
  3218. 		case 2:
  3219. 			close;
  3220. 		}
  3221. 	}
  3222. }
  3223.  
  3224. //----------------------------------------------------------------------------
  3225. // Cottage interior, Secret Room; left test tube
  3226. //----------------------------------------------------------------------------
  3227. kh_vila,179,68,0	script	Test Tube#khp2	111,{
  3228. 	mes "^3355FFThis test tube contains";
  3229. 	mes "a young man dressed in";
  3230. 	mes "a Kiel Hyre Academy";
  3231. 	mes "uniform. Somehow, you";
  3232. 	mes "get the feeling that you've";
  3233. 	mes "seen him somewhere before.^000000";
  3234. 	close;
  3235. }
  3236.  
  3237.  
  3238. //----------------------------------------------------------------------------
  3239. // Cottage interior, Secret Room; Right test tube
  3240. //----------------------------------------------------------------------------
  3241. kh_vila,185,68,0	script	Test Tube::TestTubeKHQ2	111,{
  3242. 	if (KielHyreQuest > 28) {
  3243. 		mes "^3355FFA strange looking,";
  3244. 		mes "wizened old man is";
  3245. 		mes "held within this test tube.^000000";
  3246. 		close;
  3247. 	}
  3248. 	else if (KielHyreQuest == 28) {
  3249. 		mes "^3355FFA strange looking,";
  3250. 		mes "wizened old man is";
  3251. 		mes "held within this test tube.";
  3252. 		mes "There is a small red button";
  3253. 		mes "right underneath the test tube.^000000";
  3254. 		next;
  3255. 		switch(select("Press Button:Investigate Further")) {
  3256. 		case 1:
  3257. 			mes "[???]";
  3258. 			mes "H-hello...? C-can you";
  3259. 			mes "hear me? I don't recognize";
  3260. 			mes "you... But... Maybe I forgot?";
  3261. 			mes "Wait, wait. If you're my friend,";
  3262. 			mes "then you know what to call me,";
  3263. 			mes "right? Do you know what I am?";
  3264. 			next;
  3265. 			input .@KHInput$;
  3266. 			if (.@KHInput$ == "little lost devil") {
  3267. 				mes "[???]";
  3268. 				mes "Heh... Heh heh...";
  3269. 				mes "He knows... Hey, you";
  3270. 				mes "have to remember these";
  3271. 				mes "numbers, okay? D-don't";
  3272. 				mes "forget, they'll be important...";
  3273. 				mes "^FF00004^000000, ^FF00007^000000, ^FF00007^000000, ^FF00002^000000, ^FF00009^000000, ^FF00006^000000, ^FF00001^000000. That's all...";
  3274. 				next;
  3275. 				mes "^3355FF4772961^000000";
  3276. 				mes "^3355FFWhat could^000000";
  3277. 				mes "^3355FFthose numbers^000000";
  3278. 				mes "^3355FFpossibly mean?^000000";
  3279. 				//KHCottagePoem1 and KHCottagePoem2 no longer needed-- deleting
  3280. 				set KHCottagePoem1,0;
  3281. 				set KHCottagePoem2,0;
  3282. 				set KielHyreQuest,30;
  3283. 				close;
  3284. 			}
  3285. 			else {
  3286. 				mes "[???]";
  3287. 				mes "No... No...";
  3288. 				mes "That's not right.";
  3289. 				mes "I don't think we";
  3290. 				mes "were friends. No...";
  3291. 				close;
  3292. 			}
  3293. 		case 2:
  3294. 			mes "^3355FFLet's investigate";
  3295. 			mes "this area a little";
  3296. 			mes "more first.^000000";
  3297. 			close;
  3298. 		}
  3299. 	}
  3300. 	else if (KielHyreQuest >= 30) {
  3301. 		if ((countitem(7491) > 0) && (countitem(7492) > 0)){
  3302. 			mes "^3355FFWhat could the";
  3303. 			mes "number 4772961";
  3304. 			mes "mean? For now, you've";
  3305. 			mes "found everything that";
  3306. 			mes "you need from this place,";
  3307. 			mes "so you should return to Elly.^000000";
  3308. 			close;
  3309. 		}
  3310. 		else {
  3311. 			mes "^3355FFWhat could the";
  3312. 			mes "number 4772961";
  3313. 			mes "mean? For now, you'd";
  3314. 			mes "better search this cottage";
  3315. 			mes "for any clues you can find...^000000";
  3316. 			close;
  3317. 		}
  3318. 	}
  3319. 	end;
  3320. }
  3321.  
  3322. //============================================================================
  3323.  
  3324. //============================================================================
  3325. // Robot Factory NPCs
  3326. //============================================================================
  3327.  
  3328. //----------------------------------------------------------------------------
  3329. // Robotic's Factory; Heavy Door
  3330. //----------------------------------------------------------------------------
  3331. kh_dun01,235,48,0	script	Heavy Door#kh1::HeavyDoorKHQ1	111,{
  3332. 	if (KielHyreQuest < 38) {
  3333. 		mes "^3355FFThere is a large, heavy";
  3334. 		mes "door infront of you.^000000";
  3335. 		next;
  3336. 		switch(select("Open Door:Cancel")) {
  3337. 		case 1:
  3338. 			input .@KHInput$;
  3339. 			mes "^3355FFYou try to push the";
  3340. 			mes "door open with all";
  3341. 			mes "your might, but fail";
  3342. 			mes "to make it budge.^000000";
  3343. 			close;
  3344. 		case 2:
  3345. 			mes "^3355FFyou decided to leave";
  3346. 			mes "this door alone until";
  3347. 			mes "you can figure out";
  3348. 			mes "how to open it^000000";
  3349. 			close;
  3350. 		}
  3351. 	}
  3352. 	else if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) {
  3353. 		mes "^3355FFThere is a large, heavy";
  3354. 		mes "door in front of you.^000000";
  3355. 		next;
  3356. 		switch(select("Open Door:Cancel")) {
  3357. 		case 1:
  3358. 			input .@KHInput$;
  3359. 			if (.@KHInput$ == "Blue Keycard") {
  3360. 				mes "^3355FFYou've successfully";
  3361. 				mes "opened the door.";
  3362. 				close2;
  3363. 				warp "kh_school",119,144;
  3364. 				end;
  3365. 			}
  3366. 			else {
  3367. 				mes "^3355FFYou try to push the";
  3368. 				mes "door open with all";
  3369. 				mes "your might, but fail";
  3370. 				mes "to make it budge.^000000";
  3371. 				close;
  3372. 			}
  3373. 		case 2:
  3374. 			mes "^3355FFYou decided to leave";
  3375. 			mes "this door alone until";
  3376. 			mes "you can figure out";
  3377. 			mes "how you can open it.^000000";
  3378. 			close;
  3379. 		}
  3380. 	}
  3381. 	else {
  3382. 		mes "^3355FFThis is an incredibly";
  3383. 		mes "heavy door that is tightly";
  3384. 		mes "closed. You won't be able to";
  3385. 		mes "open it through brute force.^000000";
  3386. 		close;
  3387. 	}
  3388. }
  3389.  
  3390. //----------------------------------------------------------------------------
  3391. // Robotic's Factory; Heavy Door (These doors don't seem to serve any purpose)
  3392. //----------------------------------------------------------------------------
  3393. kh_dun01,76,233,0	script	Heavy Door::HeavyDoorKHQ2	111,{
  3394. 	if ((KielHyreQuest >= 38) && (KielHyreQuest < 46)) {
  3395. 		mes "^3355FFThere is a large, heavy";
  3396. 		mes "door infront of you.^000000";
  3397. 		next;
  3398. 		switch(select("Open Door:Cancel")) {
  3399. 		case 1:
  3400. 			input .@KHInput$;
  3401. 			mes "^3355FFYou try to push the";
  3402. 			mes "door open with all";
  3403. 			mes "your might, but fail";
  3404. 			mes "to make it budge.^000000";
  3405. 			close;
  3406. 		case 2:
  3407. 			mes "^3355FFyou decided to leave";
  3408. 			mes "this door alone until";
  3409. 			mes "you can figure out";
  3410. 			mes "how to open it^000000";
  3411. 			close;
  3412. 		}
  3413. 	}
  3414. 	else {
  3415. 		mes "^3355FFThere is a large, heavy";
  3416. 		mes "door infront of you^000000";
  3417. 		close;
  3418. 	}
  3419. }
  3420.  
  3421. kh_dun01,106,233,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh3	111
  3422. kh_dun01,6,164,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh4	111
  3423. kh_dun01,6,133,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh5	111
  3424. kh_dun01,6,60,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh6	111
  3425. kh_dun01,6,30,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh7	111
  3426. kh_dun01,6,18,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh8	111
  3427. kh_dun01,235,70,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh9	111
  3428. kh_dun01,235,92,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh10	111
  3429. kh_dun01,235,114,0	duplicate(HeavyDoorKHQ2)	Heavy Door#kh11	111
  3430.  
  3431. //----------------------------------------------------------------------------
  3432. // Beautiful Lady and Beautiful Lady copies.
  3433. //----------------------------------------------------------------------------
  3434. kh_school,119,149,4	script	Beautiful Lady#kh1::BeatifulLadyKHQ1	894,{
  3435. 	cutin "kh_ellisia",2;
  3436. 	if (KielHyreQuest < 40) {
  3437. 		mes "[Allysia]";
  3438. 		mes "Hm? I don't think";
  3439. 		mes "I know you. Kiel Hyre";
  3440. 		mes "has only authorized Elly,";
  3441. 		mes "and a trusted friend that";
  3442. 		mes "may be helping her, to";
  3443. 		mes "be admitted to this area.";
  3444. 		next;
  3445. 		mes "[Allysia]";
  3446. 		mes "I cannot see ^FF0000Elly^000000.";
  3447. 		mes "Has she been attacked as well?";
  3448. 		mes "Are you ^FF0000Elly's friend^000000?";
  3449. 		next;
  3450. 		mes "[Allysia]";
  3451. 		mes "I don't see Elly anywhere";
  3452. 		mes "around here. I can only let";
  3453. 		mes "you enter if you can identify";
  3454. 		mes "yourself as Elly's friend.";
  3455. 		mes "Is there anything that you";
  3456. 		mes "can present to me as proof?";
  3457. 		next;
  3458. 		switch(select("Yellow Keycard:Blue Keycard:Golden Key:Carved Button:...?")) {
  3459. 		default:
  3460. 			break;
  3461. 		case 3:
  3462. 			mes "[Allysia]";
  3463. 			mes "Ah, isn't this the";
  3464. 			mes "key that Kiel Hyre gave";
  3465. 			mes "to Elly? Yes, I'm convinced";
  3466. 			mes "that you've been helping her.";
  3467. 			mes "I've been waiting for you, so";
  3468. 			mes "let me guide you to my room.";
  3469. 			close2;
  3470. 			cutin "",255;
  3471. 			warp "kh_school",120,180;
  3472. 			end;
  3473. 		case 4:
  3474. 			mes "[Allysia]";
  3475. 			mes "Th-that's Kiehl's";
  3476. 			mes "seal! Did he send you";
  3477. 			mes "here to get me?! I'm";
  3478. 			mes "not taking any chances!";
  3479. 			close2;
  3480. 			cutin "",255;
  3481. 			monster "kh_school",117,144,"Bomb",1745,1;
  3482. 			monster "kh_school",117,144,"Bomb",1745,1;
  3483. 			monster "kh_school",117,144,"Bomb",1745,1;
  3484. 			monster "kh_school",117,144,"Bomb",1745,1;
  3485. 			end;
  3486. 		case 5:
  3487. 			mes "[Allysia]";
  3488. 			mes "......";
  3489. 			mes "........";
  3490. 			mes "...........";
  3491. 			close2;
  3492. 			cutin "",255;
  3493. 			end;
  3494. 		}
  3495. 		mes "[Allysia]";
  3496. 		mes "Hm? This doesn't prove";
  3497. 		mes "that Elly really trusts you...";
  3498. 		close2;
  3499. 		cutin "",255;
  3500. 		end;
  3501. 	}
  3502. 	else if (KielHyreQuest >= 40) {
  3503. 		mes "[Allysia]";
  3504. 		mes "Please follow me.";
  3505. 		close2;
  3506. 		cutin "",255;
  3507. 		warp "kh_school",120,180;
  3508. 		end;
  3509. 	}
  3510. }
  3511.  
  3512.  
  3513. kh_school,117,149,4	script	Beautiful lady#kh2::BeatifulLadyKHQ2	894,{
  3514. 	end;
  3515. }
  3516. kh_school,118,149,4	duplicate(BeatifulLadyKHQ2)	Beautiful lady#kh3	894
  3517. kh_school,120,149,4	duplicate(BeatifulLadyKHQ2)	Beautiful lady#kh4	894
  3518. kh_school,121,149,4	duplicate(BeatifulLadyKHQ1)	Beautiful lady#kh5	894
  3519.  
  3520. //----------------------------------------------------------------------------
  3521. // Beautiful Lady "Allysia"
  3522. //----------------------------------------------------------------------------
  3523. kh_school,122,186,4	script	Beautiful Lady#kh6	894,{
  3524. 	if (checkweight(7496,1) == 0) {
  3525. 		mes "^3355FFJust a second...";
  3526. 		mes "You're carrying too";
  3527. 		mes "many items with you";
  3528. 		mes "right now, so you'll";
  3529. 		mes "need to free up more";
  3530. 		mes "Inventory space first...^000000";
  3531. 		close;
  3532. 	}
  3533. 	cutin "kh_ellisia",2;
  3534. 	if (KielHyreQuest < 38) {
  3535. 		mes "[??????]";
  3536. 		mes "This is private property.";
  3537. 		mes "Please leave immediately!";
  3538. 		close2;
  3539. 		cutin "kh_ellisia",255;
  3540. 		warp "yuno_fild08",73,172;
  3541. 		end;
  3542. 	}
  3543. 	else if (KielHyreQuest <= 38) {
  3544. 		mes "[Allysia]";
  3545. 		mes "Friend of prototype Elly,";
  3546. 		mes "I welcome you. As you may";
  3547. 		mes "have figured out, I need your";
  3548. 		mes "help. Kiel Hyre is being held";
  3549. 		mes "somewhere inside this factory.";
  3550. 		next;
  3551. 		mes "[Allysia]";
  3552. 		mes "It is imperative that";
  3553. 		mes "you search for Kiel Hyre";
  3554. 		mes "and rescue him as soon";
  3555. 		mes "as you possibly can!";
  3556. 		next;
  3557. 		switch(select("What is this factory?:What happened to ^FF0000Kiel Hyre^000000?")) {
  3558. 		case 1:
  3559. 			mes "[Allysia]";
  3560. 			mes "This factory is part of";
  3561. 			mes "the Kiel Hyre Foundation's";
  3562. 			mes "secret business where humanoid";
  3563. 			mes "robots are manufactured. Myself,";
  3564. 			mes "and all of the academy's students";
  3565. 			mes "are actually robots, not humans.";
  3566. 			next;
  3567. 			mes "[Allysia]";
  3568. 			mes "The Kiel Hyre Foundation's";
  3569. 			mes "ultimate goal is to develop";
  3570. 			mes "superior robots that will help";
  3571. 			mes "human society. As robots, we";
  3572. 			mes "can handle tasks that are too";
  3573. 			mes "dangerous or difficult for humans.";
  3574. 			break;
  3575. 		case 2:
  3576. 			mes "[Allysia]";
  3577. 			mes "^3355FFKiehl^000000 has proceeded to";
  3578. 			mes "perform abnormal modifications";
  3579. 			mes "to the humanoid robots. This";
  3580. 			mes "has been reported to Kiel Hyre,";
  3581. 			mes "who has left to stop Kiehl.";
  3582. 			mes "However, Hyre hasn't returned.";
  3583. 			next;
  3584. 			mes "[Allysia]";
  3585. 			mes "Fearing that Kiehl would";
  3586. 			mes "break me, Kiel Hyre brought";
  3587. 			mes "a copy of me instead. I can still";
  3588. 			mes "detect Kiel Hyre's heartbeat,";
  3589. 			mes "so he should be alright, but his";
  3590. 			mes "own son might harm him soon.";
  3591. 			next;
  3592. 			mes "[Allysia]";
  3593. 			mes "Take this Keycard";
  3594. 			mes "which will enable you";
  3595. 			mes "to enter the secret areas";
  3596. 			mes "inside this factory. If you";
  3597. 			mes "locate Kiel Hyre, please";
  3598. 			mes "let me know right away.";
  3599. 			getitem 7496,1; //Red_Key_Card
  3600. 			set KielHyreQuest,40;
  3601. 			break;
  3602. 		}
  3603. 		close2;
  3604. 		cutin "",255;
  3605. 		end;
  3606. 	}
  3607. 	else if (KielHyreQuest == 40) {
  3608. 		mes "[Allysia]";
  3609. 		mes "I can still detect";
  3610. 		mes "Kiel Hyre's heartbeat,";
  3611. 		mes "but his sone Kiehl might";
  3612. 		mes "do something desperate to";
  3613. 		mes "him soon. Please locate Kiel";
  3614. 		mes "Hyre before that can happen!";
  3615. 		close2;
  3616. 		cutin "",255;
  3617. 		warp "kh_dun01",22,216;
  3618. 		end;
  3619. 	}
  3620. 	else if (KielHyreQuest == 42) {
  3621. 		mes "[Allysia]";
  3622. 		mes "Have you already";
  3623. 		mes "located Kiel Hyre?";
  3624. 		next;
  3625. 		mes "^3355FFYou tell Allysia where^000000";
  3626. 		mes "^3355FFKiel Hyre has been locked^000000";
  3627. 		mes "^3355FFup, and give her the metal^000000";
  3628. 		mes "^3355FFfragment that Kiel Hyre handed^000000";
  3629. 		mes "^3355FFto you. She took fragment^000000";
  3630. 		mes "^3355FFand wore it around her wrist.^000000";
  3631. 		next;
  3632. 		mes "[Allysia]";
  3633. 		mes "...Kiel Hyre's secret code";
  3634. 		mes "confirmed. B_2_3 area.";
  3635. 		mes "Vital signs are normal.";
  3636. 		mes "Envelope received. Sending";
  3637. 		mes "modified Puppet Designs...";
  3638. 		next;
  3639. 		mes "[Allysia]";
  3640. 		mes "Alright, I've recieved";
  3641. 		mes "Kiel Hyre's orders, and";
  3642. 		mes "must carry them out...";
  3643. 		delitem 7497,1; //Steel_Piece
  3644. 		set KielHyreQuest,44;
  3645. 		close2;
  3646. 		cutin "",255;
  3647. 		end;
  3648. 	}
  3649. 	else if (KielHyreQuest == 44) {
  3650. 		mes "[Allysia]";
  3651. 		mes "Alright, I have a mission";
  3652. 		mes "to carry out for Kiel Hyre,";
  3653. 		mes "and I don't have much time.";
  3654. 		mes "Let me give you some specific";
  3655. 		mes "instructions very quickly.";
  3656. 		next;
  3657. 		mes "[Allysia]";
  3658. 		mes "Firstly, I need to take your";
  3659. 		mes "keycards for security reasons.";
  3660. 		mes "Secondly, meet me at the Kiel";
  3661. 		mes "Hyre Mansion in Lighthalzen.";
  3662. 		mes "Present the Golden Key to";
  3663. 		mes "be admitted to the premises.";
  3664. 		delitem 7492,1; //Yellow_Key_Card
  3665. 		delitem 7495,1; //Blue_Key_Card
  3666. 		delitem 7496,1; //Red_Key_Card
  3667. 		set KielHyreQuest,46;
  3668. 		next;
  3669. 		mes "[Allysia]";
  3670. 		mes "I understand that this";
  3671. 		mes "is sudden, and I'm not";
  3672. 		mes "giving you a thorough";
  3673. 		mes "explanation, but something";
  3674. 		mes "horrible will happen if I don't";
  3675. 		mes "hurry as quickly as possible.";
  3676. 		close2;
  3677. 		warp "yuno_fild08",73,172;
  3678. 		cutin "",255;
  3679. 		end;
  3680. 	}
  3681. 	else if (KielHyreQuest >= 44) {
  3682. 		mes "[Allysia]";
  3683. 		mes "I understand that this";
  3684. 		mes "is sudden, and I'm not";
  3685. 		mes "giving you a thorough";
  3686. 		mes "explanation, but something";
  3687. 		mes "horrible will happen if i don't";
  3688. 		mes "hurry as quickly as possible.";
  3689. 		close2;
  3690. 		warp "yuno_fild08",73,172;
  3691. 		cutin "",255;
  3692. 		end;
  3693. 	}
  3694. }
  3695.  
  3696. //----------------------------------------------------------------------------
  3697. // Signboard (another useless NPC?)
  3698. //----------------------------------------------------------------------------
  3699. kh_dun01,163,223,4	script	Signboard#kh	857,{
  3700. 	mes "[Notice]";
  3701. 	mes "Cute Pets are prohibited";
  3702. 	mes "in this area. (Cute Pets that";
  3703. 	mes "provide special assistance";
  3704. 	mes "to the visually impaired are";
  3705. 	mes "exempt from this rule.)";
  3706. 	close;
  3707. }
  3708.  
  3709. //----------------------------------------------------------------------------
  3710. // Mechanical Devices for accessing restricted area
  3711. //----------------------------------------------------------------------------
  3712. kh_dun01,166,223,0	script	Mechanical Device#kh::KHKeyardReader	111,{
  3713. 	if ((KielHyreQuest <= 38) || (KielHyreQuest >= 44)) {
  3714. 		mes "^3355FFYou encounter";
  3715. 		mes "a mechanical device.";
  3716. 		mes "It looks like it can be";
  3717. 		mes "operated by inserting the";
  3718. 		mes "correct keycard into the slot.^000000";
  3719. 		close;
  3720. 	}
  3721. 	else if ((KielHyreQuest == 40) && (countitem(7496) >= 1)) {
  3722. 		mes "^3355FFYou encounter";
  3723. 		mes "a mechanical device.";
  3724. 		mes "It looks like it can be";
  3725. 		mes "operated by inserting the";
  3726. 		mes "correct keycard into the slot.^000000";
  3727. 		next;
  3728. 		input .@KHInput$;
  3729. 		if (.@KHInput$ == "Red Keycard") {
  3730. 			mes "^3355FFThe door opens once";
  3731. 			mes "you insert the Red Keycard.^000000";
  3732. 			close2;
  3733. 			warp "kh_dun01",170,227;
  3734. 			end;
  3735. 		}
  3736. 		else {
  3737. 			mes "^3355FFNothing happened.^000000";
  3738. 			close;
  3739. 		}
  3740. 	}
  3741. }
  3742.  
  3743. kh_dun01,162,206,0	duplicate(KHKeyardReader)	Mechanical Device	111
  3744.  
  3745. //----------------------------------------------------------------------------
  3746. // Keep monsters out of the quest area.
  3747. // Silly really since the rest of it's a dungeon
  3748. //----------------------------------------------------------------------------
  3749. //kh_dun01,180,220,0	script	Monster Warp#kh1::KHMobWarp	-1,5,20,{
  3750. //OnTouchNPC:
  3751. //	warp "kh_dun01",178,138;
  3752. //	end;
  3753. //}
  3754.  
  3755. //kh_dun01,190,220,0	duplicate(KHMobWarp)	Monster Warp#kh2	-1,5,20
  3756. //kh_dun01,200,250,0	duplicate(KHMobWarp)	Monster Warp#kh3	-1,5,20
  3757. //kh_dun01,210,220,0	duplicate(KHMobWarp)	Monster Warp#kh4	-1,5,20
  3758. //kh_dun01,220,220,0	duplicate(KHMobWarp)	Monster Warp#kh5	-1,5,10
  3759.  
  3760. //----------------------------------------------------------------------------
  3761. // Kiel Hyre - OnTouch
  3762. //----------------------------------------------------------------------------
  3763. kh_dun01,224,233,0	script	Factory B Area Door	-1,5,5,{
  3764. //OnTouch2:
  3765. OnTouch:
  3766. 	if (KielHyreQuest == 40) {
  3767. 		if (checkweight(7497,1) == 0) {
  3768. 			mes "^3355FFJust a second...";
  3769. 			mes "You're carrying too";
  3770. 			mes "many items with you";
  3771. 			mes "right now, so you'll";
  3772. 			mes "need to free up more";
  3773. 			mes "Inventory space first...^000000";
  3774. 			close;
  3775. 		}
  3776. 		mes "^3355FFYou can faintly hear";
  3777. 		mes "a voice from the other";
  3778. 		mes "side of this door.^000000";
  3779. 		next;
  3780. 		mes "[????]";
  3781. 		mes "^333333...Kiehl...";
  3782. 		mes "...How dare you...!^000000";
  3783. 		next;
  3784. 		mes "["+strcharinfo(0)+"]";
  3785. 		mes "Mister Kiel Hyre?";
  3786. 		mes "Is that you in there?";
  3787. 		next;
  3788. 		mes "[Kiel Hyre]";
  3789. 		mes "Wh-who's there?";
  3790. 		mes "Identify yourself!";
  3791. 		next;
  3792. 		mes "["+strcharinfo(0)+"]";
  3793. 		mes "I'm... I'm...";
  3794. 		next;
  3795. 		mes "^3355FFYou explain your story";
  3796. 		mes "to the voice behind the";
  3797. 		mes "door, and tell him what";
  3798. 		mes "happened to Elly and Allysia.^000000";
  3799. 		next;
  3800. 		mes "[Kiel Hyre]";
  3801. 		mes "^333333...Yes... It's me.";
  3802. 		mes "I'm Kiel Hyre, trapped";
  3803. 		mes "in here. He went so far";
  3804. 		mes "as to modify Elly, eh?";
  3805. 		mes "...............................^000000";
  3806. 		next;
  3807. 		mes "[Kiel Hyre]";
  3808. 		mes "^333333Hurry, take this";
  3809. 		mes "module to Allysia!";
  3810. 		mes "She'll know what to do";
  3811. 		mes "with it. If you're really";
  3812. 		mes "helping us, then she'll have";
  3813. 		mes "some instructions for you too.^000000 ";
  3814. 		next;
  3815. 		mes "^3355FFKiel Hyre slid";
  3816. 		mes "a strange metal";
  3817. 		mes "fragment through";
  3818. 		mes "the gap between the";
  3819. 		mes "door and the floor.^000000";
  3820. 		getitem 7497,1; //Steel_Piece
  3821. 		set KielHyreQuest,42;
  3822. 		close;
  3823. 	}
  3824.  
  3825. 	else if (KielHyreQuest >= 42) {
  3826. 		mes "[Kiel Hyre]";
  3827. 		mes "......";
  3828. 		close;
  3829. 	}
  3830. }
  3831.  
  3832. //----------------------------------------------------------------------------
  3833. // Robot Factory Second Floor Entrances
  3834. //----------------------------------------------------------------------------
  3835. kh_dun01,44,203,0	script	Entrance Device#khd2::KHAccess	111,{
  3836. 	if (countitem(7509) < 1) {
  3837. 		mes "^3355FFYou encounter";
  3838. 		mes "a mechanical device.";
  3839. 		mes "It looks like it can be";
  3840. 		mes "operated by inserting the";
  3841. 		mes "correct keycard into the slot.^000000";
  3842. 		close;
  3843. 	}
  3844. 	else {
  3845. 		mes "^3355FFYou encounter";
  3846. 		mes "a mechanical device.";
  3847. 		mes "It looks like it can be";
  3848. 		mes "operated by inserting the";
  3849. 		mes "correct keycard into the slot.^000000";
  3850. 		next;
  3851. 		input .@KHInput$;
  3852. 		if (.@KHInput$ == "Luxurious Keycard") {
  3853. 			mes "^3355FFAs you insert the";
  3854. 			mes "Luxurious Keycard";
  3855. 			mes "into the keycard slot,";
  3856. 			mes "the door swings open";
  3857. 			mes "to reveal a long flight";
  3858. 			mes "of descending stairs.^000000";
  3859. 			next;
  3860. 			switch(select("Descend Stairs:Cancel")) {
  3861. 			case 1:
  3862. 				warp "kh_dun02",41,198;
  3863. 				end;
  3864. 			case 2:
  3865. 				mes "^3355FFIt looks like this door";
  3866. 				mes "has automatically closed";
  3867. 				mes "after the preprogrammed";
  3868. 				mes "time limit has elapsed.^000000";
  3869. 				close;
  3870. 			}
  3871. 		}
  3872. 		else {
  3873. 			mes "^3355FFYou try to push the";
  3874. 			mes "door open with all";
  3875. 			mes "your might, but fail";
  3876. 			mes "to make it budge.^000000";
  3877. 			close;
  3878. 		}
  3879. 	}
  3880. }
  3881.  
  3882. kh_dun01,36,195,0	duplicate(KHAccess)	Entrance Device#khd1	111
  3883.  
  3884. //============================================================================
  3885.  
  3886. //============================================================================
  3887. // Kiel Hyre Mansion NPCs, and Kiehl's Room NPCs
  3888. //============================================================================
  3889.  
  3890. //----------------------------------------------------------------------------
  3891. // Kiel's Steward
  3892. //----------------------------------------------------------------------------
  3893. kh_mansion,78,55,5	script	Steward#kh	109,{
  3894. 	if (KielHyreQuest < 46) {
  3895. 		mes "[Steward]";
  3896. 		mes "This is a private residence,";
  3897. 		mes "please leave.";
  3898. 		close2;
  3899. 		warp "lighthalzen",188,201;
  3900. 		end;
  3901. 	}
  3902. 	if ((KielHyreQuest >= 46) && (KielHyreQuest < 50)) {
  3903. 		mes "[Steward]";
  3904. 		mes "Greetings.";
  3905. 		mes "Have you been invited";
  3906. 		mes "by the master of";
  3907. 		mes "this mansion?";
  3908. 		next;
  3909. 		switch(select("Present Golden Key:????")) {
  3910. 		case 1:
  3911. 			mes "[Steward]";
  3912. 			mes "Ah, Master "+strcharinfo(0)+".";
  3913. 			mes "I've been expecting your";
  3914. 			mes "arrival. Please, this way.";
  3915. 			close2;
  3916. 			warp "kh_mansion",21,14;
  3917. 			end;
  3918. 		case 2:
  3919. 			mes "[Steward]";
  3920. 			mes "If you have not been";
  3921. 			mes "invited by the master of";
  3922. 			mes "this mansion, then I'm";
  3923. 			mes "afraid that I must insist on";
  3924. 			mes "your immediate departure!";
  3925. 			close2;
  3926. 			warp "lighthalzen",188,201;
  3927. 			end;
  3928. 		}
  3929. 	}
  3930. 	if ((KielHyreQuest >= 50) && (KielHyreQuest < 64) || (KielHyreQuest >= 70)) {
  3931. 		mes "[Steward]";
  3932. 		mes "Ah, Master "+strcharinfo(0)+".";
  3933. 		mes "It is a pleasure to";
  3934. 		mes "receive your company";
  3935. 		mes "once again. Would you";
  3936. 		mes "like to see my master?";
  3937. 		next;
  3938. 		switch(select("Yes:No")) {
  3939. 		case 1:
  3940. 			mes "[Steward]";
  3941. 			mes "Very well.";
  3942. 			mes "Right this way~";
  3943. 			close2;
  3944. 			warp "kh_mansion",21,14;
  3945. 			end;
  3946. 		case 2:
  3947. 			mes "[Steward]";
  3948. 			mes "Very well.";
  3949. 			mes "Please make";
  3950. 			mes "yourself at home.";
  3951. 			close;
  3952. 		}
  3953. 	}
  3954. 	if ((KielHyreQuest == 52) || (KielHyreQuest == 54) || (KielHyreQuest >= 64) && (KielHyreQuest <= 70)) {
  3955. 		mes "[Steward]";
  3956. 		mes "Ah, Master "+strcharinfo(0)+".";
  3957. 		mes "It is a pleasure to";
  3958. 		mes "receive your company";
  3959. 		mes "once again. Would you";
  3960. 		mes "like to see my master, or...?";
  3961. 		next;
  3962. 		switch(select("^FF0000Kiel Hyre^000000:^3355FFMitchell^000000")) {
  3963. 		case 1:
  3964. 			mes "[Steward]";
  3965. 			mes "Very well.";
  3966. 			mes "Right this way~";
  3967. 			close2;
  3968. 			warp "kh_mansion",21,14;
  3969. 			end;
  3970. 		case 2:
  3971. 			mes "[Steward]";
  3972. 			mes "Oh...? You must.";
  3973. 			mes "be here to deliver";
  3974. 			mes "good news. Excuse me...";
  3975. 			next;
  3976. 			mes "^3355FFThe Steward furtively^000000";
  3977. 			mes "^3355FFlooked around to check^000000";
  3978. 			mes "^3355FFif anyone is watching him.^000000";
  3979. 			next;
  3980. 			mes "[Steward]";
  3981. 			mes "I believe it should";
  3982. 			mes "be safe enough to let";
  3983. 			mes "you go see him now...";
  3984. 			mes "Please, hurry this way.";
  3985. 			close2;
  3986. 			warp "kh_mansion",20,87;
  3987. 			end;
  3988. 		}
  3989. 	}
  3990. }
  3991.  
  3992. //----------------------------------------------------------------------------
  3993. // Kiel Hyre
  3994. //----------------------------------------------------------------------------
  3995. kh_mansion,22,28,4	script	Kiel Hyre#kh	903,{
  3996. 	if (checkweight(908,200) == 0) {
  3997. 		mes "^3355FFJust a second...";
  3998. 		mes "You're carrying too";
  3999. 		mes "many items with you";
  4000. 		mes "right now, so you'll";
  4001. 		mes "need to free up more";
  4002. 		mes "inventory space first...^000000";
  4003. 		close;
  4004. 	}
  4005.  
  4006. 	cutin "kh_kyel01",2;
  4007. 	if (KielHyreQuest < 46) {
  4008. 		mes "[Kiel Hyre]";
  4009. 		mes ".........";
  4010. 		mes ".........";
  4011. 		mes "............";
  4012. 		close2;
  4013. 		cutin "",255;
  4014. 		end;
  4015. 	}
  4016.  
  4017. 	else if (KielHyreQuest == 46) {
  4018. 		cutin "kh_kyel01",2;
  4019. 		mes "[Kiel Hyre]";
  4020. 		mes "Ah, you must be "+strcharinfo(0)+".";
  4021. 		mes "I'd like to thank you for saving";
  4022. 		mes "my life. You must have many";
  4023. 		mes "questions to ask me, so I'll";
  4024. 		mes "do my best to give you answers.";
  4025. 		next;
  4026. 		while(1) {
  4027. 			switch(select("Robots?:^3355FFKiehl^000000?:^FF0000Elly^000000's button?")) {
  4028. 			case 1:
  4029. 				mes "[Kiel Hyre]";
  4030. 				mes "I've been researching";
  4031. 				mes "robotics for thirty-two";
  4032. 				mes "years now. I'm proud to";
  4033. 				mes "say that I've succeeded";
  4034. 				mes "where the great Sage";
  4035. 				mes "Varmundt did not.";
  4036. 				next;
  4037. 				mes "[Kiel Hyre]";
  4038. 				mes "It's been my dream to";
  4039. 				mes "develop humanoid robots";
  4040. 				mes "from humans. Those Guardians";
  4041. 				mes "might be robots too, but they";
  4042. 				mes "don't operate using free will.";
  4043. 				next;
  4044. 				mes "[Kiel Hyre]";
  4045. 				mes "If you'd like to know more";
  4046. 				mes "of the specifics concerning";
  4047. 				mes "robotics, why don't you speak";
  4048. 				mes "with ^3355FFAllysia^000000? She can explain";
  4049. 				mes "everything much more succinctly";
  4050. 				mes "than I can. I tend to ramble...";
  4051. 				set .@KHQRead,.@KHQRead+1;
  4052. 				next;
  4053. 				break;
  4054. 			case 2:
  4055. 				mes "[Kiel Hyre]";
  4056. 				mes "^3355FFKiehl^000000 is my only son,";
  4057. 				mes "but the love of my life";
  4058. 				mes "died after giving birth to";
  4059. 				mes "him. I'll admit that he's";
  4060. 				mes "a genius in mechanical";
  4061. 				mes "design and development.";
  4062. 				next;
  4063. 				mes "[Kiel Hyre]";
  4064. 				mes "He's largely responsible";
  4065. 				mes "for the creation of Third";
  4066. 				mes "Generation robots like Elly.";
  4067. 				mes "Unfortunately, he's trying to";
  4068. 				mes "modify his creations for";
  4069. 				mes "some sinister purpose.";
  4070. 				next;
  4071. 				mes "[Kiel Hyre]";
  4072. 				mes "I tried to stop him,";
  4073. 				mes "but I ended up getting";
  4074. 				mes "locked inside the factory.";
  4075. 				mes "I don't know why he wants";
  4076. 				mes "to do this. I still have";
  4077. 				mes "absolutely no clue...";
  4078. 				set .@KHQRead,.@KHQRead+1;
  4079. 				next;
  4080. 				break;
  4081. 			case 3:
  4082. 				mes "[Kiel Hyre]";
  4083. 				mes "That button Elly was";
  4084. 				mes "holding has ^3355FFKiehl's emblem^000000";
  4085. 				mes "engraved on it. Ah, and that";
  4086. 				mes "man in black menacing the";
  4087. 				mes "students? That was probably";
  4088. 				mes "^3355FFKaiser^000000, Kiehl's bodyguard.";
  4089. 				next;
  4090. 				mes "[Kiel Hyre]";
  4091. 				mes "Kaiser...";
  4092. 				mes "I don't know";
  4093. 				mes "anything about him.";
  4094. 				mes "I've never even seen";
  4095. 				mes "his face! Kiehl just hired";
  4096. 				mes "him without letting me know...";
  4097. 				set .@KHQRead,.@KHQRead+1;
  4098. 				next;
  4099. 				break;
  4100. 			}
  4101. 			if (.@KHQRead == 3) {
  4102. 				mes "[Kiel Hyre]";
  4103. 				mes "If you don't have";
  4104. 				mes "anymore questions for me,";
  4105. 				mes "then would you please";
  4106. 				mes "let me rest?? I'm still not";
  4107. 				mes "feeling well from the time";
  4108. 				mes "I was locked up in the factory.";
  4109. 				delitem 7493,1; //Golden_Key
  4110. 				delitem 7494,1; //Kiel_Button
  4111. 				set KielHyreQuest,48;
  4112. 				break;
  4113. 			}
  4114. 		}
  4115. 	}
  4116. 	else if (KielHyreQuest == 48) {
  4117. 		mes "[Kiel Hyre]";
  4118. 		mes "Ah, I almost forgot.";
  4119. 		mes "Please, take this as";
  4120. 		mes "a little reward for";
  4121. 		mes "saving my life.";
  4122. 		getitem 12105,1; //Taming_Gift_Set
  4123. 		getexp 70000,0;
  4124. 		set KielHyreQuest,50;
  4125. 	}
  4126. 	else if ((KielHyreQuest >= 50) && (KielHyreQuest < 64)) {
  4127. 		mes "[Kiel Hyre]";
  4128. 		mes "If you don't have";
  4129. 		mes "anymore questions for me,";
  4130. 		mes "then would you please";
  4131. 		mes "let me rest?? I'm still not";
  4132. 		mes "feeling well from the time";
  4133. 		mes "I was locked up in the factory.";
  4134. 	}
  4135. 	else if (KielHyreQuest == 64) {
  4136. 		cutin "kh_kyel01",2;
  4137. 		mes "[Kiel Hyre]";
  4138. 		mes "Hm? Did you";
  4139. 		mes "have something";
  4140. 		mes "that you wanted";
  4141. 		mes "to ask me?";
  4142. 		next;
  4143. 		mes "["+strcharinfo(0)+"]";
  4144. 		mes "I don't have enough";
  4145. 		mes "concrete evidence yet,";
  4146. 		mes "but I might have some";
  4147. 		mes "questions soon enough.";
  4148. 	}
  4149. 	else if (KielHyreQuest == 68) {
  4150. 		cutin "kh_kyel02",2;
  4151. 		mes "[Kiel Hyre]";
  4152. 		mes "Ah, "+strcharinfo(0)+".";
  4153. 		mes "It's you. So how can";
  4154. 		mes "I help you today?";
  4155. 		next;
  4156. 		select("About ^3355FFAllysia^000000...");
  4157. 		mes "["+strcharinfo(0)+"]";
  4158. 		mes "You know, I was looking";
  4159. 		mes "through this deserted house";
  4160. 		mes "in Juno, and discovered";
  4161. 		mes "an old portrait of a woman";
  4162. 		mes "that looks just like Allysia.";
  4163. 		next;
  4164. 		cutin "kh_kyel02",2;
  4165. 		mes "[Kiel Hyre]";
  4166. 		mes "Oh...";
  4167. 		mes "Is that all?";
  4168. 		mes "I thought you had";
  4169. 		mes "a robotics question.";
  4170. 		next;
  4171. 		cutin "kh_Kyel03",2;
  4172. 		mes "[Kiel Hyre]";
  4173. 		mes "Anyway, that's a";
  4174. 		mes "strange coincidence.";
  4175. 		mes "Well, I suppose it's";
  4176. 		mes "not so strange to find";
  4177. 		mes "look-a-likes for other people...";
  4178. 		next;
  4179. 		mes "["+strcharinfo(0)+"]";
  4180. 		mes "I don't think it's just";
  4181. 		mes "a coincidence. The woman";
  4182. 		mes "in that thirty year old portrait";
  4183. 		mes "was also named Allysia, and she";
  4184. 		mes "worked at Orsimier street";
  4185. 		mes "in Juno. Does that ring a bell?";
  4186. 		next;
  4187. 		cutin "kh_kyel02",2;
  4188. 		mes "[Kiel Hyre]";
  4189. 		mes "......";
  4190. 		mes ".........";
  4191. 		mes "............";
  4192. 		next;
  4193. 		cutin "kh_kyel01",2;
  4194. 		mes "["+strcharinfo(0)+"]";
  4195. 		mes "Then I thought that this";
  4196. 		mes "Allysia must have been the";
  4197. 		mes "woman that you loved, and";
  4198. 		mes "that you based your robot's";
  4199. 		mes "apperance on her.";
  4200. 		next;
  4201. 		cutin "kh_kyel02",2;
  4202. 		mes "[Kiel Hyre]";
  4203. 		mes "............";
  4204. 		next;
  4205. 		cutin "kh_kyel01",2;
  4206. 		mes "["+strcharinfo(0)+"]";
  4207. 		mes "I think this is what happened:";
  4208. 		mes "when you were a young, poor";
  4209. 		mes "man, you fell in love with";
  4210. 		mes "Allysia. However, she was";
  4211. 		mes "in love with Rosimier, who";
  4212. 		mes "was rich and powerful.";
  4213. 		next;
  4214. 		mes "["+strcharinfo(0)+"]";
  4215. 		mes "However, Rosimier was";
  4216. 		mes "betrothed to some other";
  4217. 		mes "woman, and he ended up";
  4218. 		mes "marrying his fiancee, thus";
  4219. 		mes "breaking Allysia's heart.";
  4220. 		next;
  4221. 		mes "["+strcharinfo(0)+"]";
  4222. 		mes "Feeling betrayed, her";
  4223. 		mes "heart broken, Allysia jumped";
  4224. 		mes "into a river. Then, you decided";
  4225. 		mes "to get revenge on Rosimier, so";
  4226. 		mes "you ended up joining";
  4227. 		mes "Rekenber Corporation!";
  4228. 		next;
  4229. 		cutin "kh_Kyel03",2;
  4230. 		mes "[Kiel Hyre]";
  4231. 		mes "Hahahahahahaha!";
  4232. 		mes "Oh, what an imagination~";
  4233. 		mes "That's very ridiculous...";
  4234. 		mes "Though, I admit, maybe";
  4235. 		mes "I did design Allysia after";
  4236. 		mes "seeing that woman long ago.";
  4237. 		next;
  4238. 		mes "[Kiel Hyre]";
  4239. 		mes "I'd almost forgotten";
  4240. 		mes "about her! I think we";
  4241. 		mes "were friends... Though,";
  4242. 		mes "where did you get the idea";
  4243. 		mes "that I might have";
  4244. 		mes "been in love with her?";
  4245. 		next;
  4246. 		select("Reveal Kiel's Portrait from Hut");
  4247. 		cutin "kh_kyel02",2;
  4248. 		mes "[Kiel Hyre]";
  4249. 		mes "Wh-what...";
  4250. 		mes "How did...";
  4251. 		mes "Where did you...?";
  4252. 		next;
  4253. 		mes "["+strcharinfo(0)+"]";
  4254. 		mes "Kiel Hyre, I found this";
  4255. 		mes "portrait of you as a young";
  4256. 		mes "man from the house of the";
  4257. 		mes "man that bought Allysia's ring.";
  4258. 		mes "I even spoke to the fisherman";
  4259. 		mes "that discovered Allysia's body.";
  4260. 		next;
  4261. 		mes "["+strcharinfo(0)+"]";
  4262. 		mes "You paid an awful lot";
  4263. 		mes "of money to buy Allysia's";
  4264. 		mes "ring. How can you not tell";
  4265. 		mes "me that you didn't love her?";
  4266. 		next;
  4267. 		cutin "kh_Kyel03",2;
  4268. 		mes "[Kiel Hyre]";
  4269. 		mes "*Sigh...*";
  4270. 		mes "You got me, you got me.";
  4271. 		mes "I didn't want you to learn";
  4272. 		mes "the truth. You are correct.";
  4273. 		mes "I loved Allysia, and designed";
  4274. 		mes "my robot to look just like her.";
  4275. 		next;
  4276. 		mes "[Kiel Hyre]";
  4277. 		mes "I could never forget her.";
  4278. 		mes "Ever. But I would never";
  4279. 		mes "do anything to harm the";
  4280. 		mes "Rosimiers! I'm a scientist!";
  4281. 		mes "I hated him when I was young,";
  4282. 		mes "but things are different now!";
  4283. 		next;
  4284. 		mes "[Kiel Hyre]";
  4285. 		mes "I shed no tears when the";
  4286. 		mes "Rosimiers fell, but I wasn't";
  4287. 		mes "responsible. Besides, I didn't";
  4288. 		mes "have the resources or the";
  4289. 		mes "capability to cause it...";
  4290. 		next;
  4291. 		cutin "kh_kyel02",2;
  4292. 		mes "["+strcharinfo(0)+"]";
  4293. 		mes "I'm afraid that the";
  4294. 		mes "evidence shows otherwise.";
  4295. 		next;
  4296. 		select("Reveal Portrait of Rosimiers");
  4297. 		mes "["+strcharinfo(0)+"]";
  4298. 		mes "Take a good look";
  4299. 		mes "at this portrait that";
  4300. 		mes "I found at the Rosimiers'";
  4301. 		mes "old house. Do you see";
  4302. 		mes "anything... incriminating?";
  4303. 		next;
  4304. 		cutin "kh_Kyel03",2;
  4305. 		mes "[Kiel Hyre]";
  4306. 		mes "Aside from that";
  4307. 		mes "James Rosimier, you";
  4308. 		mes "mean? No! I don't see";
  4309. 		mes "anything wrong with";
  4310. 		mes "this picture at all.";
  4311. 		next;
  4312. 		mes "["+strcharinfo(0)+"]";
  4313. 		mes "Take a good look";
  4314. 		mes "at the pocketwatch";
  4315. 		mes "in the portrait. That's";
  4316. 		mes "the pocketwatch you";
  4317. 		mes "wear today, isn't it?";
  4318. 		next;
  4319. 		cutin "kh_kyel02",2;
  4320. 		mes "[Kiel Hyre]";
  4321. 		mes "...!!!";
  4322. 		next;
  4323. 		mes "["+strcharinfo(0)+"]";
  4324. 		mes "You might not have caused";
  4325. 		mes "the downfall of the Rosimiers";
  4326. 		mes "yourself, but with the aid of";
  4327. 		mes "the Rekenber Corporation, I'd";
  4328. 		mes "say it was entirely possible!";
  4329. 		next;
  4330. 		cutin "kh_Kyel03",2; 
  4331. 		mes "[Kiel Hyre]";
  4332. 		mes "Well played, adventurer.";
  4333. 		mes "Well played. I don't regret";
  4334. 		mes "what I did: they killed my";
  4335. 		mes "Allysia! If James didn't betray";
  4336. 		mes "her, if only he didn't drive";
  4337. 		mes "her to commit suicide...";
  4338. 		next;
  4339. 		mes "["+strcharinfo(0)+"]";
  4340. 		mes "That's where you're wrong!";
  4341. 		mes "Allysia was killed, she didn't";
  4342. 		mes "commit suicide. Take a good";
  4343. 		mes "look at this note right here!";
  4344. 		next;
  4345. 		mes "[Kiel Hyre]";
  4346. 		mes "What?!";
  4347. 		next;
  4348. 		select("Show James's Note");
  4349. 		mes "[Kiel Hyre]";
  4350. 		mes "What does this prove?";
  4351. 		mes "This doesn't show that";
  4352. 		mes "James didn't betray Allysia.";
  4353. 		mes "How does this change anything?";
  4354. 		mes "She's dead, nothing I can do";
  4355. 		mes "will bring her back to me!";
  4356. 		next;
  4357. 		mes "["+strcharinfo(0)+"]";
  4358. 		mes "I never said James didn't";
  4359. 		mes "betray her. Look at the date";
  4360. 		mes "on the note. James made plans";
  4361. 		mes "to run away with her on August";
  4362. 		mes "20th. However, her body was";
  4363. 		mes "found on the same day.";
  4364. 		next;
  4365. 		mes "["+strcharinfo(0)+"]";
  4366. 		mes "Ergo, Allysia must have";
  4367. 		mes "died on August 19th. If she";
  4368. 		mes "was planning to run away with";
  4369. 		mes "her love on the next day, then";
  4370. 		mes "she had no reason to kill herself!";
  4371. 		next;
  4372. 		mes "[Kiel Hyre]";
  4373. 		mes "No, that's not right!";
  4374. 		mes "She probably couldn't";
  4375. 		mes "trust me! She must have";
  4376. 		mes "realized she was nothing";
  4377. 		mes "but another toy to him!";
  4378. 		next;
  4379. 		mes "["+strcharinfo(0)+"]";
  4380. 		mes "Oh yeah? I say she jumped";
  4381. 		mes "into the river because you";
  4382. 		mes "met her on that day. Now,";
  4383. 		mes "take a good look at this!";
  4384. 		next;
  4385. 		select("Show K.H.'s note");
  4386. 		mes "["+strcharinfo(0)+"]";
  4387. 		mes "This note was  written by";
  4388. 		mes "a man with your initials,";
  4389. 		mes "K.H. These initials were also";
  4390. 		mes "signed on her portrait. You";
  4391. 		mes "must have written this note:";
  4392. 		mes "there's too many coincidences!";
  4393. 		next;
  4394. 		mes "["+strcharinfo(0)+"]";
  4395. 		mes "According to this note,";
  4396. 		mes "you told Allysia that you";
  4397. 		mes "wanted to see her again";
  4398. 		mes "at the place you first met.";
  4399. 		mes "I think you did see her again...";
  4400. 		mes "on August 19th, the day she died!";
  4401. 		next;
  4402. 		mes "["+strcharinfo(0)+"]";
  4403. 		mes "I'm assuming the place you";
  4404. 		mes "two first met was near the";
  4405. 		mes "river. No more of your lies:";
  4406. 		mes "Tell me what really happened!";
  4407. 		next;
  4408. 		cutin "kh_kyel02",2;
  4409. 		mes "[Kiel Hyre]";
  4410. 		mes "............";
  4411. 		mes ".........";
  4412. 		mes "......";
  4413. 		next;
  4414. 		cutin "kh_Kyel03",2;
  4415. 		mes "[Kiel Hyre]";
  4416. 		mes "Hah... Ha ha ha...";
  4417. 		mes "Yes... That's right...";
  4418. 		mes "That horrible night.";
  4419. 		mes "I remember it well...";
  4420. 		mes ".....................";
  4421. 		next;
  4422. 		cutin "kh_kyel02",2;
  4423. 		mes "[Kiel Hyre]";
  4424. 		mes "That night, when she came";
  4425. 		mes "to the river to meet me as";
  4426. 		mes "I had asked, I begged her to";
  4427. 		mes "run away with me, instead";
  4428. 		mes "of waiting for that James.";
  4429. 		next;
  4430. 		mes "[Kiel Hyre]";
  4431. 		mes "She insisted that James";
  4432. 		mes "never betrayed her, and he";
  4433. 		mes "promised to take her away";
  4434. 		mes "with him the next day. Can";
  4435. 		mes "you imagine how that made";
  4436. 		mes "me feel? I was nothing to her.";
  4437. 		next;
  4438. 		mes "[Kiel Hyre]";
  4439. 		mes "My feelings didn't matter to";
  4440. 		mes "her at all! She kept fidgeting";
  4441. 		mes "with that ring...I lost control";
  4442. 		mes "and tried to take that damned";
  4443. 		mes "thing away from her, and";
  4444. 		mes "throw it into the river...";
  4445. 		next;
  4446. 		mes "[Kiel Hyre]";
  4447. 		mes "But you know what?";
  4448. 		mes "She struggled, she actually";
  4449. 		mes "fought me! It was just a small";
  4450. 		mes "fight, but then, before I knew";
  4451. 		mes "it, the ground underneath us";
  4452. 		mes "collapsed and... the rains...";
  4453. 		next;
  4454. 		select(".........");
  4455. 		mes "[Kiel Hyre]";
  4456. 		mes "I'm not sure what it";
  4457. 		mes "was. The rain weakened";
  4458. 		mes "the ground, something went";
  4459. 		mes "wrong... and she just... just...";
  4460. 		mes "The river swallowed her...";
  4461. 		mes "I felt empty. She was gone. ";
  4462. 		delitem 7499,1; //Family_Portrait
  4463. 		delitem 7500,1; //Elysia_Portrait
  4464. 		delitem 7501,1; //Kyll_Hyre_Letter2
  4465. 		delitem 7502,1; //Piece_Memo_Of_James
  4466. 		delitem 7503,1; //Man_Portrait
  4467. 		set KielHyreQuest,70;
  4468. 		close2;
  4469. 		cutin "",255;
  4470. 		end;
  4471. 	}
  4472. 	else if (KielHyreQuest <= 70) {
  4473. 		cutin "kh_kyel01",2;
  4474. 		mes "[Kiel Hyre]";
  4475. 		mes "You already know that";
  4476. 		mes "she was found dead the";
  4477. 		mes "next day. But what really";
  4478. 		mes "broke my heart was that";
  4479. 		mes "she held that ring so tightly";
  4480. 		mes "in her hand, even in death...";
  4481. 		next;
  4482. 		cutin "kh_kyel03",2;
  4483. 		mes "[Kiel Hyre]";
  4484. 		mes "His family had everything";
  4485. 		mes "while I had nothing. And";
  4486. 		mes "he had the audacity to take";
  4487. 		mes "Allysia away from me?!";
  4488. 		mes "How could that be right?";
  4489. 		next;
  4490. 		mes "[Kiel Hyre]";
  4491. 		mes "Even though she had passed";
  4492. 		mes "away, I still wanted to prove";
  4493. 		mes "to Allysia what kind of ugly";
  4494. 		mes "person James really was.";
  4495. 		mes "That was when I joined the";
  4496. 		mes "Rekenber Corporation.";
  4497. 		next;
  4498. 		mes "[Kiel Hyre]";
  4499. 		mes "I designed the very first";
  4500. 		mes "First Generation Robot, which";
  4501. 		mes "I named Allysia, and sold the";
  4502. 		mes "designs to Rekenber. I gave them";
  4503. 		mes "robots, and they gave me money,";
  4504. 		mes "power, obedient subordinates.";
  4505. 		next;
  4506. 		mes "[Kiel Hyre]";
  4507. 		mes "Of course I knew they'd use";
  4508. 		mes "my robots for spying and killing!";
  4509. 		mes "But you know what? It didn't";
  4510. 		mes "matter so long as they gave me";
  4511. 		mes "the means to my revenge. It was";
  4512. 		mes "the perfect partnership, really.";
  4513. 		next;
  4514. 		mes "[Kiel Hyre]";
  4515. 		mes "You've got me right";
  4516. 		mes "where you want me.";
  4517. 		mes "Who are you working";
  4518. 		mes "for, and what exactly";
  4519. 		mes "do you want? My designs?";
  4520. 		mes "My death? Everything...?";
  4521. 		next;
  4522. 		cutin "kh_kyel01",2;
  4523. 		mes "["+strcharinfo(0)+"]";
  4524. 		mes "Actually, I just want";
  4525. 		mes "to ask about the nature";
  4526. 		mes "of your professional";
  4527. 		mes "relationship with the";
  4528. 		mes "Rekenber Corporation.";
  4529. 		mes "And about Kiehl.";
  4530. 		next;
  4531. 		mes "[Kiel Hyre]";
  4532. 		mes "Kiehl, eh? After hearing";
  4533. 		mes "my crazy story, I'm guessing";
  4534. 		mes "that you already suspect the";
  4535. 		mes "truth about him... He's also";
  4536. 		mes "a robot, specifically the first";
  4537. 		mes "of the Second Generation models.";
  4538. 		next;
  4539. 		mes "[Kiel Hyre]";
  4540. 		mes "His mind was developed using.";
  4541. 		mes "an experimental, and unstable,";
  4542. 		mes "form of the Condensed Magic";
  4543. 		mes "Spell Scrolls. He was the only";
  4544. 		mes "Second Generation robot that";
  4545. 		mes "I was allowed to keep.";
  4546. 		next;
  4547. 		mes "[Kiel Hyre]";
  4548. 		mes "I've become very attached";
  4549. 		mes "to Kiehl. It's not surprising,";
  4550. 		mes "seeing that robotics have";
  4551. 		mes "become my life. I even raised";
  4552. 		mes "him as my own son, and taught";
  4553. 		mes "him everything about robotics";
  4554. 		next;
  4555. 		mes "[Kiel Hyre]";
  4556. 		mes "Kiehl is now a genius,";
  4557. 		mes "and has even developed the";
  4558. 		mes "Third Generation of robots.";
  4559. 		mes "Unfortunately, I failed to";
  4560. 		mes "properly raise him with";
  4561. 		mes "human morals and ethics.";
  4562. 		next;
  4563. 		select("......");
  4564. 		mes "[Kiel Hyre]";
  4565. 		mes "He's been transforming";
  4566. 		mes "the Third Generation robots";
  4567. 		mes "into killing machines. That's";
  4568. 		mes "why I tried to put them all";
  4569. 		mes "into the academy, so they";
  4570. 		mes "could learn human behavior.";
  4571. 		next;
  4572. 		mes "[Kiel Hyre]";
  4573. 		mes "Although the academy";
  4574. 		mes "has delayed Kiehl's plans,";
  4575. 		mes "he has succeeded into";
  4576. 		mes "converting all of the robots";
  4577. 		mes "into uncontrollable engines";
  4578. 		mes "of mass destruction.";
  4579. 		next;
  4580. 		mes "[Kiel Hyre]";
  4581. 		mes "Yes, he's been working";
  4582. 		mes "closely with Rekenber.";
  4583. 		mes "Their true objective is to";
  4584. 		mes "create killing machines";
  4585. 		mes "for Rekenber's use.";
  4586. 		next;
  4587. 		mes "[Kiel Hyre]";
  4588. 		mes "You know all the secrets";
  4589. 		mes "of my past now. I'm not";
  4590. 		mes "upset with you or anything,";
  4591. 		mes "but I do have something";
  4592. 		mes "that I want to ask of you.";
  4593. 		next;
  4594. 		mes "[Kiel Hyre]";
  4595. 		mes "Please! Stop Kiehl!";
  4596. 		mes "I don't want his madness";
  4597. 		mes "to destroy any more robots!";
  4598. 		mes "I see each and every one";
  4599. 		mes "of them as one of my children!";
  4600. 		next;
  4601. 		mes "[Kiel Hyre]";
  4602. 		mes "I know that I must take";
  4603. 		mes "full responsibility for all";
  4604. 		mes "that has happened. I promise";
  4605. 		mes "to take any punishment for";
  4606. 		mes "my actions once everything";
  4607. 		mes "has been resolved.";
  4608. 		next;
  4609. 		select("Accept:Okay:Nod");
  4610. 		mes "[Kiel Hyre]";
  4611. 		mes "Thank you so much!";
  4612. 		mes "You can find Kiehl";
  4613. 		mes "in the underground";
  4614. 		mes "level in this mansion.";
  4615. 		next;
  4616. 		mes "[Kiel Hyre]";
  4617. 		mes "He stays in the old room";
  4618. 		mes "where he was created, but";
  4619. 		mes "he reconstructed it as some";
  4620. 		mes "kind of cave to keep everyone";
  4621. 		mes "out, including me. Yes, he";
  4622. 		mes "doesn't trust anyone anymore...";
  4623. 		next;
  4624. 		mes "[Kiel Hyre]";
  4625. 		mes "When you find him, I want";
  4626. 		mes "you to take Allysia's ring";
  4627. 		mes "out of his heart. If you";
  4628. 		mes "remove it, that should stop";
  4629. 		mes "him from going berserk.";
  4630. 		next;
  4631. 		select("Allysia's Ring?");
  4632. 		mes "[Kiel Hyre]";
  4633. 		mes "Yes... Her ring is the";
  4634. 		mes "beginning of everything";
  4635. 		mes "I put that in his heart so";
  4636. 		mes "that I'd never forget what";
  4637. 		mes "the Rosimiers did to me.";
  4638. 		next;
  4639. 		mes "[Kiel Hyre]";
  4640. 		mes "I think Kiehl's grown";
  4641. 		mes "so powerful that normal";
  4642. 		mes "weapons might not work";
  4643. 		mes "on him anymore. Use this";
  4644. 		mes "device that will cause his";
  4645. 		mes "power supply to fluctuate.";
  4646. 		getitem 7504,1; //Toy_Motor
  4647. 		next;
  4648. 		cutin "kh_kyel03",2;
  4649. 		mes "[Kiel Hyre]";
  4650. 		mes "If you successfully attach";
  4651. 		mes "this to Kiehl's body, then";
  4652. 		mes "he won't be able to use his";
  4653. 		mes "body's full power. While he's";
  4654. 		mes "weakened, open up his chest";
  4655. 		mes "and get the ring from his heart.";
  4656. 		next;
  4657. 		mes "[Kiel Hyre]";
  4658. 		mes "Let me know once";
  4659. 		mes "you're ready. Then, I'll";
  4660. 		mes "guide you Kiehl's room.";
  4661. 		set KielHyreQuest,74;
  4662. 	}
  4663. 	else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 104)) {
  4664. 		mes "[Kiel Hyre]";
  4665. 		mes "Are you ready";
  4666. 		mes "to confront";
  4667. 		mes "Kiehl now?";
  4668. 		next;
  4669. 		switch(select("Yes:No")) {
  4670. 		case 1:
  4671. 			mes "[Kiel Hyre]";
  4672. 			mes "There... the secret";
  4673. 			mes "passage is open now.";
  4674. 			mes "Just go to the right of";
  4675. 			mes "me, but be careful. Kiehl";
  4676. 			mes "is extremely dangerous.";
  4677. 			close2;
  4678. 			enablenpc "Kiehl_Room_Warp";
  4679. 			donpcevent "Kiehl_Room_Warp::OnEnable";
  4680. 			cutin "",255;
  4681. 			end;
  4682. 			break;
  4683. 		case 2:
  4684. 			mes "[Kiel Hyre]";
  4685. 			mes "Please take your";
  4686. 			mes "time. I imagine that";
  4687. 			mes "it won't be easy.";
  4688. 			break;
  4689. 		}
  4690. 	}
  4691. 	else if ((KielHyreQuest >= 74) && (KielHyreQuest <= 106)) {
  4692. 		cutin "kh_kyel01",2;
  4693. 		mes "[Kiel Hyre]";
  4694. 		mes "You're back...!";
  4695. 		mes "So were you able";
  4696. 		mes "to retrieve Allysia's";
  4697. 		mes "Ring from Kiehl's heart?";
  4698. 		next;
  4699. 		if (countitem(7508) < 1) {
  4700. 			mes "[Kiel Hyre]";
  4701. 			mes "You mean... You don't have it?";
  4702. 			mes "Please, retrieve Allysia's Ring";
  4703. 			mes "from Kiehl's heart!";
  4704. 			next;
  4705. 			enablenpc "Kiehl_Room_Warp";
  4706. 			donpcevent "Kiehl_Room_Warp::OnEnable";
  4707. 			close2;
  4708. 			cutin "",255;
  4709. 			end;
  4710. 		}
  4711. 		mes "[Kiel Hyre]";
  4712. 		mes "Wh-what happened...?";
  4713. 		mes "Kiehl developed a new";
  4714. 		mes "body for himself? Th-that";
  4715. 		mes "would make him a Fourth";
  4716. 		mes "Generation robot. I had";
  4717. 		mes "no idea he was this smart.";
  4718. 		next;
  4719. 		mes "[Kiel Hyre]";
  4720. 		mes "Wait, now that I think about";
  4721. 		mes "it, I did see robot bodies that";
  4722. 		mes "looked like Kiehl when I was";
  4723. 		mes "locked in the factory. So he";
  4724. 		mes "was using those copies to";
  4725. 		mes "develop personal upgrades.";
  4726. 		next;
  4727. 		mes "[Kiel Hyre]";
  4728. 		mes "Here, please take this";
  4729. 		mes "Keycard which will let you";
  4730. 		mes "enter and investigate the";
  4731. 		mes "deepest levels of the factory.";
  4732. 		mes "I'll investigate Kiehl's room.";
  4733. 		getitem 7509,1; //Fancy_Key_Card
  4734. 		set KielHyreQuest,108;
  4735. 		next;
  4736. 		if (sex == 0) {
  4737. 			if (getpartnerid() == 0) set .@KHTitle$,"Miss";
  4738. 			else set .@KHSTitle$,"Mrs";
  4739. 		}
  4740. 		else set .@KHTitle$,"Mr";
  4741. 		mes "[Kiel Hyre]";
  4742. 		mes "Kiehl is my responsibility...";
  4743. 		mes "No matter what the cost may";
  4744. 		mes "be, I've got to stop him! Oh,";
  4745. 		mes "and here, please take this";
  4746. 		mes "with my thanks for all of";
  4747. 		mes "your help, "+.@KHTitle$+" "+strcharinfo(0)+".";
  4748. 		getitem 616,1;  //Old card Album
  4749. 		delitem 7508,1; //Elysia_Ring
  4750. 		getexp 100000,0;
  4751. 	}
  4752. 	else if (KielHyreQuest >= 108) {
  4753. 		mes "[Kiel Hyre]";
  4754. 		mes "......";
  4755. 		mes ".........";
  4756. 		mes "............";
  4757. 	}
  4758. 	close2;
  4759. 	cutin "",255;
  4760. 	end;
  4761. }
  4762.  
  4763.  
  4764. //----------------------------------------------------------------------------
  4765. // Allysia
  4766. //----------------------------------------------------------------------------
  4767. kh_mansion,18,30,4	script	Allysia	894,{
  4768. 	if (KielHyreQuest < 46) {
  4769. 		mes "[Allysia]";
  4770. 		mes "Who are you?";
  4771. 		mes "How did you get here?";
  4772. 		mes "Go away";
  4773. 		close;
  4774. 	}
  4775. 	cutin "kh_ellisia",2;
  4776. 	if (KielHyreQuest < 70) {
  4777. 		mes "[Allysia]";
  4778. 		mes "You must be surprised";
  4779. 		mes "by everything that's been";
  4780. 		mes "happening. Maybe everything";
  4781. 		mes "would be easier to understand";
  4782. 		mes "if I explained about robots?";
  4783. 		next;
  4784. 		switch(select("Yes:No")) {
  4785. 		case 1:
  4786. 			mes "[Allysia]";
  4787. 			mes "The robots you've been";
  4788. 			mes "encountering are automated";
  4789. 			mes "mechanical puppets that can";
  4790. 			mes "independantly think and operate.";
  4791. 			mes "Many sages have tried to develop";
  4792. 			mes "their own robots, but have failed.";
  4793. 			next;
  4794. 			mes "[Allysia]";
  4795. 			mes "My master, Kiel Hyre, has";
  4796. 			mes "been studying robotics since";
  4797. 			mes "he was twenty years old, and";
  4798. 			mes "has developed three different";
  4799. 			mes "generations of robots, the first,";
  4800. 			mes "second, and third generations.";
  4801. 			next;
  4802. 			switch(select("First Generation:Second Generation:Third Generation")) {
  4803. 			case 1:
  4804. 				mes "[Allysia]";
  4805. 				mes "I am a good example of one";
  4806. 				mes "of Kiel Hyre's First Generation";
  4807. 				mes "robots. I was constructed using";
  4808. 				mes "a heavy mechanical framework,";
  4809. 				mes "a robotic heart, and chemically";
  4810. 				mes "synthesized skin covering.";
  4811. 				next;
  4812. 				mes "[Allysia]";
  4813. 				mes "My central processing unit,";
  4814. 				mes "equivalent to your brain, is";
  4815. 				mes "essentially a Memory Scroll";
  4816. 				mes "based on the design of the";
  4817. 				mes "Magic Spell Scrolls that you";
  4818. 				mes "adventurers use in battle.";
  4819. 				next;
  4820. 				mes "[Allysia]";
  4821. 				mes "I'm the oldest type of";
  4822. 				mes "humanoid robot, so I weigh";
  4823. 				mes "a lot, and my mind can only";
  4824. 				mes "process a limited amount of";
  4825. 				mes "data. Therefore, I can't express";
  4826. 				mes "emotion similarly to a human.";
  4827. 				next;
  4828. 				break;
  4829. 			case 2:
  4830. 				mes "[Allysia]";
  4831. 				mes "The First Generation robots";
  4832. 				mes "were developed from mostly";
  4833. 				mes "mechanical parts, but the";
  4834. 				mes "Second Generation robots";
  4835. 				mes "incorporated Homunculus";
  4836. 				mes "science and technology.";
  4837. 				next;
  4838. 				mes "[Allysia]";
  4839. 				mes "Second Generation robots";
  4840. 				mes "are more life-like since they";
  4841. 				mes "have artifically created skin";
  4842. 				mes "and flesh, although they still";
  4843. 				mes "are constructed from a heavy";
  4844. 				mes "mechanical framework.";
  4845. 				next;
  4846. 				mes "[Allysia]";
  4847. 				mes "Sage elemental scroll";
  4848. 				mes "technology was also used";
  4849. 				mes "to develop the Condensed";
  4850. 				mes "Memory Scroll, a central";
  4851. 				mes "processing unit superior to that";
  4852. 				mes "used in First Generation robots.";
  4853. 				next;
  4854. 				mes "[Allysia]";
  4855. 				mes "Although Condensed Memory";
  4856. 				mes "Scrolls were 100,000 times";
  4857. 				mes "more powerful than ordinary";
  4858. 				mes "Memory Scrolls, they were";
  4859. 				mes "problematic and were prone";
  4860. 				mes "to too many error problems.";
  4861. 				next;
  4862. 				mes "[Allysia]";
  4863. 				mes "Second Generation robots";
  4864. 				mes "were capable of expressing";
  4865. 				mes "human-like emotion, but their";
  4866. 				mes "production halted after six";
  4867. 				mes "years because they were";
  4868. 				mes "considered faulty.";
  4869. 				next;
  4870. 				break;
  4871. 			case 3:
  4872. 				mes "[Allysia]";
  4873. 				mes "Third Generation robots";
  4874. 				mes "were mostly designed by";
  4875. 				mes "Kiel Hyre's son, Kiehl,";
  4876. 				mes "and don't use a mechanical";
  4877. 				mes "framework at all: the entire";
  4878. 				mes "body is basically a homunculus.";
  4879. 				next;
  4880. 				mes "[Allysia]";
  4881. 				mes "With their organic bodies";
  4882. 				mes "and advanced artificial hearts";
  4883. 				mes "made from imitation Ymir Heart";
  4884. 				mes "Pieces, they can experience";
  4885. 				mes "physiologic phenomena";
  4886. 				mes "just like ordinary humans.";
  4887. 				next;
  4888. 				mes "[Allysia]";
  4889. 				mes "Kiehl was able to develop";
  4890. 				mes "a more stable form of the";
  4891. 				mes "Condensed Memory Scroll";
  4892. 				mes "which does not suffer from";
  4893. 				mes "critical errors, and can be";
  4894. 				mes "cheaply mass processed.";
  4895. 				next;
  4896. 				mes "[Allysia]";
  4897. 				mes "Elly is actually a Third";
  4898. 				mes "Generation prototype. Once";
  4899. 				mes "we optimize the prototypes,";
  4900. 				mes "we will begin mass production.";
  4901. 				mes "In fact, the academy is our";
  4902. 				mes "prototype testing ground.";
  4903. 				next;
  4904. 				mes "[Allysia]";
  4905. 				mes "The fact that out prototype";
  4906. 				mes "robots can interact just like";
  4907. 				mes "real humans is proof of our";
  4908. 				mes "success in robotics.";
  4909. 				next;
  4910. 				break;
  4911. 			}
  4912. 		case 2:
  4913. 			mes "[Allysia]";
  4914. 			mes "Please let me know if";
  4915. 			mes "you'd like to learn more";
  4916. 			mes "about Kiel Hyre's robots.";
  4917. 			break;
  4918. 		}
  4919. 	}
  4920. 	else {
  4921. 		mes "[Allysia]";
  4922. 		mes "......";
  4923. 		mes ".........";
  4924. 		mes "............";
  4925. 	}
  4926. 	close2;
  4927. 	cutin "",255;
  4928. 	end;
  4929. }
  4930.  
  4931. //----------------------------------------------------------------------------
  4932. // Abduction triggering NPC
  4933. //----------------------------------------------------------------------------
  4934. lighthalzen,188,200,0	script	Abduction_trigger	-1,3,1,{
  4935. //OnTouch2:
  4936. OnTouch:
  4937. 	if (KielHyreQuest == 50) {
  4938. 		mes "^3355FFAs you walked out of";
  4939. 		mes "the mansion, something";
  4940. 		mes "smashed the top of your";
  4941. 		mes "head, and you instantly";
  4942. 		mes "lose consciousness...";
  4943. 		close2;
  4944. 		percentheal -99,0;
  4945. 		warp "kh_mansion",30,75;
  4946. 	}
  4947. 	end;
  4948. }
  4949.  
  4950. //----------------------------------------------------------------------------
  4951. // Mysterious Woman "Mitchell Layla"
  4952. //----------------------------------------------------------------------------
  4953. kh_mansion,25,79,4	script	Mysterious Woman#kh	727,3,3,{
  4954.  
  4955. //OnTouch2:
  4956. OnTouch:
  4957. 	if (KielHyreQuest == 50) {
  4958. 		mes "^3355FFYou awaken with your";
  4959. 		mes "head painfully throbbing,";
  4960. 		mes "and a mysterious woman";
  4961. 		mes "standing in front of you.^000000";
  4962. 		next;
  4963. 		mes "[??????]";
  4964. 		mes "Hm? Oh, you're awake";
  4965. 		mes "earlier than I thought.";
  4966. 		mes "You must feel confused,";
  4967. 		mes "but listen carefully. If you";
  4968. 		mes "don't, then I can't guarantee";
  4969. 		mes "your safety, okay? Alright.";
  4970. 		next;
  4971. 		mes "[??????]";
  4972. 		mes "All you need to know it";
  4973. 		mes "that I'm a secret agent for";
  4974. 		mes "the Schwaltzvalt Republic";
  4975. 		mes "government. We're investigating";
  4976. 		mes "abnormal activity between Kiel";
  4977. 		mes "Hyre and the Rekenber Corporation.";
  4978. 		next;
  4979. 		mes "[??????]";
  4980. 		mes "We saw you enter the";
  4981. 		mes "mansion and speak to";
  4982. 		mes "Kiel Hyre, so basically";
  4983. 		mes "you're here for questioning.";
  4984. 		mes "Now tell me the truth. How";
  4985. 		mes "do you know Kiel Hyre?";
  4986. 		next;
  4987. 		switch(select("I'll tell you everything!:I don't know nuthin'!")) {
  4988. 		case 2:
  4989. 			mes "[??????]";
  4990. 			mes "Don't...know...nuthin'?";
  4991. 			mes "You sure about that? Only";
  4992. 			mes "a select few can even speak";
  4993. 			mes "with Kiel Hyre in person. You";
  4994. 			mes "must have some connection";
  4995. 			mes "to him. I'm right, aren't it?";
  4996. 			next;
  4997. 			mes "["+strcharinfo(0)+"]";
  4998. 			mes "......";
  4999. 			mes ".........";
  5000. 			mes "............";
  5001. 			next;
  5002. 			mes "[??????]";
  5003. 			mes "Are you trying to protect";
  5004. 			mes "him? I think that you might";
  5005. 			mes "not understand what kind of";
  5006. 			mes "person you're really dealing";
  5007. 			mes "with here. I'll tell you what";
  5008. 			mes "I've learned about him...";
  5009. 			next;
  5010. 			mes "[??????]";
  5011. 			mes "Kiel Hyre. CEO of the";
  5012. 			mes "Kiel Hyre Foundation,";
  5013. 			mes "manufacturer of various";
  5014. 			mes "machinery. His company started";
  5015. 			mes "as a small Einbroch store whose";
  5016. 			mes "technology slowly grew famous.";
  5017. 			next;
  5018. 			mes "[??????]";
  5019. 			mes "Rekenber Corperation offered";
  5020. 			mes "a merger with the Kiel Hyre";
  5021. 			mes "Foundation. We're still not";
  5022. 			mes "sure why they wanted Kiel";
  5023. 			mes "Hyre in particular to repair";
  5024. 			mes "and develop their Guardians...";
  5025. 			next;
  5026. 			mes "[??????]";
  5027. 			mes "We're also not sure why";
  5028. 			mes "they wanted to suddenly";
  5029. 			mes "focus more on Guardian";
  5030. 			mes "development. Then, all";
  5031. 			mes "of a sudden, Kiel Hyre's son";
  5032. 			mes "appears from out of nowehre.";
  5033. 			next;
  5034. 			mes "[??????]";
  5035. 			mes "It's very suspicious.";
  5036. 			mes "There's no records of his";
  5037. 			mes "birth or anything. Still, maybe";
  5038. 			mes "Kiel Hyre really did have him";
  5039. 			mes "with his secretary, Allysia.";
  5040. 			mes "Well, no one is really sure.";
  5041. 			next;
  5042. 			mes "[??????]";
  5043. 			mes "In any case, Kiel Hyre's";
  5044. 			mes "son and heir, Kiehl, helped";
  5045. 			mes "his father establish this";
  5046. 			mes "special academy as their";
  5047. 			mes "way of giving back to society.";
  5048. 			next;
  5049. 			mes "[??????]";
  5050. 			mes "Almost every corporation and";
  5051. 			mes "organization tried to get their";
  5052. 			mes "spies to enter this academy,";
  5053. 			mes "but all of them were rejected.";
  5054. 			mes "it's strange. At least one of";
  5055. 			mes "them should have made it in.";
  5056. 			next;
  5057. 			mes "[??????]";
  5058. 			mes "And recently, Kiehl Hyre";
  5059. 			mes "has held a secret meeting with";
  5060. 			mes "Rekenber executives to announce";
  5061. 			mes "his new project. He intends to";
  5062. 			mes "create advanced humanoid robots";
  5063. 			mes "that will replace guardians!";
  5064. 			next;
  5065. 			mes "[??????]";
  5066. 			mes "Our spies reported that";
  5067. 			mes "Kiel Hyre was nowhere to";
  5068. 			mes "be seen at that meeting,";
  5069. 			mes "as well as his trusted";
  5070. 			mes "secretary, Allysia. He...";
  5071. 			mes "He just disappeared!";
  5072. 			next;
  5073. 			mes "[??????]";
  5074. 			mes "Then, Kiel Hyre pops back";
  5075. 			mes "in his mansion after all";
  5076. 			mes "this time as if nothing";
  5077. 			mes "happened! At the same time,";
  5078. 			mes "Kiehl disappears, under the";
  5079. 			mes "excuse of conducting research.";
  5080. 			next;
  5081. 			mes "[??????]";
  5082. 			mes "Rekenber is sponsoring";
  5083. 			mes "both Kiehl and Kiel, but";
  5084. 			mes "there's some kind of conflict";
  5085. 			mes "going on between father and";
  5086. 			mes "son, I just know it! Now tell";
  5087. 			mes "me, what's going on?";
  5088. 			next;
  5089. 			mes "[??????]";
  5090. 			mes "I'm not sure how well you";
  5091. 			mes "know this country, but the";
  5092. 			mes "fact that Rekenber is invoved";
  5093. 			mes "must tell you that these aren't";
  5094. 			mes "good people. Tell me what";
  5095. 			mes "you know about them!";
  5096. 			next;
  5097. 		case 1:
  5098. 			mes "^3355FFYou tell the woman^000000";
  5099. 			mes "^3355FFeverything you know^000000";
  5100. 			mes "^3355FFabout Kiel Hyre. Your^000000";
  5101. 			mes "^3355FFvoice quivers with sadness^000000";
  5102. 			mes "^3355FFwhenever you mention Elly.^000000";
  5103. 			next;
  5104. 			mes "[??????]";
  5105. 			mes "I see, I see...";
  5106. 			mes "That poor girl... So...";
  5107. 			mes "Your involvement in this";
  5108. 			mes "is a coincidence? In that";
  5109. 			mes "case, I want your help";
  5110. 			mes "in our investigation.";
  5111. 			next;
  5112. 			switch(select("Okay:......")) {
  5113. 			case 2:
  5114. 				mes "[??????]";
  5115. 				mes "If you don't cooperate,";
  5116. 				mes "then I can't guarantee";
  5117. 				mes "your safety, adventurer";
  5118. 				next;
  5119. 				mes "["+strcharinfo(0)+"]";
  5120. 				mes "Huh? What...?";
  5121. 				mes "What does that mean?";
  5122. 				mes "Are you threatening me?";
  5123. 				next;
  5124. 				select("Just do what she says.");
  5125. 			case 1:
  5126. 				mes "[??????]";
  5127. 				mes "Great.";
  5128. 				mes "I'm Agent Mitchell Layla.";
  5129. 				mes "From here on, you're working";
  5130. 				mes "for the Schwaltzvalt Republic!";
  5131. 				set KielHyreQuest,52;
  5132. 				close;
  5133. 			}
  5134. 		}
  5135. 	}
  5136. 	else if (KielHyreQuest == 52) {
  5137. 		mes "[Mitchell]";
  5138. 		mes "I've got some new";
  5139. 		mes "information for you.";
  5140. 		mes "There's an old lady in";
  5141. 		mes "Juno that knew a woman";
  5142. 		mes "named Allysia 30 years ago.";
  5143. 		next;
  5144. 		mes "[Mitchell]";
  5145. 		mes "The clincher is that this";
  5146. 		mes "Allysia from 30 years ago";
  5147. 		mes "commited suicide, and is";
  5148. 		mes "identical to Kiel Hyre's";
  5149. 		mes "secretary, who is also";
  5150. 		mes "named Allysia.";
  5151. 		next;
  5152. 		mes "[Mitchell]";
  5153. 		mes "This is too much of a";
  5154. 		mes "coincidence. I want you to";
  5155. 		mes "go to Juno and investigate.";
  5156. 		mes "When you're done, talk to";
  5157. 		mes "Kiel Hyre's steward, and";
  5158. 		mes "he'll send you over to me.";
  5159. 		next;
  5160. 		mes "[Mitchell]";
  5161. 		mes "Yeah, I know.";
  5162. 		mes "That guy actually";
  5163. 		mes "works for me. Anyway,";
  5164. 		mes "when you're ready to go";
  5165. 		mes "to Juno, let me know, and you";
  5166. 		mes "can board the federal airship.";
  5167. 		set KielHyreQuest,54;
  5168. 		close;
  5169. 	}
  5170. 	else if (KielHyreQuest == 54) {
  5171. 		mes "[Mitchell]";
  5172. 		mes "Are you ready?";
  5173. 		mes "I'll let you board";
  5174. 		mes "the federal Airship so";
  5175. 		mes "you can get to Juno, and";
  5176. 		mes "finish your mission quickly.";
  5177. 		next;
  5178. 		switch(select("Yes:No")) {
  5179. 		case 1:
  5180. 			mes "[Mitchell]";
  5181. 			mes "Good luck. Once you";
  5182. 			mes "complete your mission,";
  5183. 			mes "make sure that you report";
  5184. 			mes "to Kiel Hyre's steward so";
  5185. 			mes "that he can send you to me.";
  5186. 			close2;
  5187. 			warp "yuno",54,209;
  5188. 			end;
  5189. 		case 2:
  5190. 			mes "[Mitchell]";
  5191. 			mes "Take your time...";
  5192. 			mes "But keep in mind that";
  5193. 			mes "I'm not a patient woman!";
  5194. 			close;
  5195. 		}
  5196. 	}
  5197. 	else if (KielHyreQuest == 64) {
  5198. 		mes "[Mitchell]";
  5199. 		mes "Ah, you're back.";
  5200. 		mes "What do you have";
  5201. 		mes "to report from your";
  5202. 		mes "investigation?";
  5203. 		next;
  5204. 		mes "[Mitchell]";
  5205. 		mes ".....................";
  5206. 		mes "Ah, I see. Good work.";
  5207. 		mes "Why don't you go speak to Kiel";
  5208. 		mes "Hyre and confront him with";
  5209. 		mes "what you've learned about";
  5210. 		mes "his past? Yeah, grill him.";
  5211. 		next;
  5212. 		mes "[Mitchell]";
  5213. 		mes "Wear this hidden mic,";
  5214. 		mes "so we can send help if";
  5215. 		mes "you're endangered. I want";
  5216. 		mes "you to find out who Kiel";
  5217. 		mes "really is, and what's his";
  5218. 		mes "relationship to Rekenber.";
  5219. 		set KielHyreQuest,68;
  5220. 		next;
  5221. 		warp "kh_mansion",83,50;
  5222. 		end;
  5223. 	}
  5224. 	else if (KielHyreQuest >= 68) {
  5225. 		mes "[Mitchell]";
  5226. 		mes "Shouldn't you be";
  5227. 		mes "leaving about now?";
  5228. 		next;
  5229. 		warp "kh_mansion",83,50;
  5230. 		end;
  5231. 	}
  5232. }
  5233.  
  5234. //----------------------------------------------------------------------------
  5235. // Warp portal into Kiehl's 'Room'
  5236. // - Anyone can enter
  5237. // - After 30-40 seonds this NPC should be disabled.
  5238. //----------------------------------------------------------------------------
  5239. kh_mansion,29,27,0	script	Kiehl_Room_Warp	45,2,2,{
  5240. OnTouch:
  5241. 	warp "kh_kiehl01",10,31;
  5242. 	end;
  5243.  
  5244. OnEnable:
  5245. 	initnpctimer;
  5246. 	misceffect 215;
  5247. 	end;
  5248.  
  5249. OnTimer30000:
  5250. 	stopnpctimer;
  5251. 	misceffect 215;
  5252. 	disablenpc "Kiehl_Room_Warp";
  5253. 	end;
  5254.  
  5255. OnInit:
  5256. 	disablenpc "Kiehl_Room_Warp";
  5257. 	end;
  5258. }
  5259.  
  5260. //============================================================================
  5261.  
  5262. //============================================================================
  5263. // Rosimier NPCs and other Related NPCs
  5264. //============================================================================
  5265.  
  5266. //----------------------------------------------------------------------------
  5267. // Odd Grandma
  5268. //----------------------------------------------------------------------------
  5269. yuno,257,140,4	script	Odd Grandma	846,{
  5270. 	if (KielHyreQuest < 54) {
  5271. 		mes "[Grandma]";
  5272. 		mes "Where did you go,";
  5273. 		mes "my darling? Where";
  5274. 		mes "are you, my little dear?";
  5275. 		close;
  5276. 	}
  5277. 	else if (KielHyreQuest == 54) {
  5278. 		mes "[Grandma]";
  5279. 		mes "Lullabye...";
  5280. 		mes "Say goodnight...";
  5281. 		mes "Hush little baby...";
  5282. 		mes "Go to sleeeeep~";
  5283. 		next;
  5284. 		switch(select("What are you doing?:Um, I don't see a baby...")) {
  5285. 		case 1:
  5286. 			mes "[Grandma]";
  5287. 			mes "Oh? My baby won't stop";
  5288. 			mes "crying and can't seem";
  5289. 			mes "to sleep. She needs to";
  5290. 			mes "rest, so I can go to work.";
  5291. 			mes "The house is so messy,";
  5292. 			mes "and the boss is unhappy...";
  5293. 			set KielHyreQuest,56;
  5294. 			next;
  5295. 			select("Um, I don't see a baby...");
  5296. 			mes "[Grandma]";
  5297. 			mes "What, she's right--";
  5298. 			mes "Well. Darling, what";
  5299. 			mes "are you doing? Don't";
  5300. 			mes "misbehave in front of";
  5301. 			mes "our friend! Shhh, be";
  5302. 			mes "good, my little girl.";
  5303. 			//GetHEALTHSTATE VAR_CURSE 30
  5304. 			close;
  5305. 		case 2:
  5306. 			mes "[Grandma]";
  5307. 			mes "What are you...?";
  5308. 			mes "Oh, look at that.";
  5309. 			mes "You made my little";
  5310. 			mes "darling cry! Shhh,";
  5311. 			mes "hush, little ^0000FFAllysia^000000.";
  5312. 			mes "Go to sleeeeeeep~";
  5313. 			close;
  5314. 		}
  5315. 	}
  5316. 	else if ((KielHyreQuest >= 56) && (KielHyreQuest < 60)) {
  5317. 		mes "[Grandma]";
  5318. 		mes "Allysia...?!";
  5319. 		mes "Allysia, where did";
  5320. 		mes "you go? You were";
  5321. 		mes "supposed to come";
  5322. 		mes "home a while ago!";
  5323. 		if (countitem(7500) < 1) { 
  5324. 			close;
  5325. 		}
  5326. 		else {
  5327. 			next;
  5328. 			switch(select("Allysia? Isn't she...")) {
  5329. 			case 1:
  5330. 				cutin "kh_ellisia_port",1;
  5331. 				mes "^3355FFYou show Allysia's";
  5332. 				mes "portrait to the old woman.^000000";
  5333. 				next;
  5334. 				cutin "",255;
  5335. 				mes "[Grandma]";
  5336. 				mes "Oh, do you know";
  5337. 				mes "Allysia? She's been";
  5338. 				mes "missing! She left home";
  5339. 				mes "yesterday and hasn't";
  5340. 				mes "come back! C-can you";
  5341. 				mes "tell me where she is?!";
  5342. 				close;
  5343. 			}
  5344. 		}
  5345. 	}
  5346. 	else if (KielHyreQuest >= 60) {
  5347. 		mes "[Grandma]";
  5348. 		mes "Don't worry, Allysia...";
  5349. 		mes "Mommy will always be";
  5350. 		mes "here for you. There's no";
  5351. 		mes "need to be sad...";
  5352. 		close;
  5353. 	}
  5354. }
  5355.  
  5356. //----------------------------------------------------------------------------
  5357. // Old Lady; gives you the key to the Rosimier Mansion
  5358. //----------------------------------------------------------------------------
  5359. yuno,250,132,0	script	Old Lady#kh	711,{
  5360. 	if (KielHyreQuest < 56) {
  5361. 		mes "[Old Lady]";
  5362. 		mes "Oooh, my legs and back";
  5363. 		mes "are so sore. These old";
  5364. 		mes "bones ache all over...";
  5365. 		close;
  5366. 	}
  5367. 	else if (KielHyreQuest == 56) {
  5368. 		if (checkweight(7498,1) == 0) {
  5369. 			mes "^3355FFJust a second...";
  5370. 			mes "You're carrying too";
  5371. 			mes "many items with you";
  5372. 			mes "right now, so you'll";
  5373. 			mes "need to free up more";
  5374. 			mes "Inventory space first...^000000";
  5375. 			close;
  5376. 		}
  5377. 		mes "[Old Lady]";
  5378. 		mes "Goodness, I hate this";
  5379. 		mes "weather! Reminds me";
  5380. 		mes "of how old I've gotten!";
  5381. 		mes "It chills my bones, it does!";
  5382. 		next;
  5383. 		switch(select("......:Do you know that grandma?")) {
  5384. 		case 1:
  5385. 			mes "[Old Lady]";
  5386. 			mes "Damn it! If only I didn't";
  5387. 			mes "have all those adventures";
  5388. 			mes "in my youth! Then maybe";
  5389. 			mes "I wouldn't suffer so in";
  5390. 			mes "my advanced age!";
  5391. 			close;
  5392. 		case 2:
  5393. 			mes "[Old Lady]";
  5394. 			mes "Oh... Yes. She was";
  5395. 			mes "the mother of my best";
  5396. 			mes "friend, ^3355FFAllysia^000000. Ever since";
  5397. 			mes "she commited suicide, things";
  5398. 			mes "haven't been the same. Her";
  5399. 			mes "mother lost her sanity...";
  5400. 			next;
  5401. 			select("Was ^3355FFAllysia^000000...?");
  5402. 			mes "[Old Lady]";
  5403. 			mes "Oh, Allysia was such";
  5404. 			mes "a beautiful girl. So many";
  5405. 			mes "men wanted her, especially";
  5406. 			mes "that dashing James Rosimier.";
  5407. 			mes "I remember hearing that they";
  5408. 			mes "were going to get married...";
  5409. 			next;
  5410. 			mes "[Old Lady]";
  5411. 			mes "I was so happy for her!";
  5412. 			mes "But then, all of a sudden,";
  5413. 			mes "she killed herself. Well,";
  5414. 			mes "that's what they all say.";
  5415. 			mes "Even today, I'm still not";
  5416. 			mes "sure what happened.";
  5417. 			next;
  5418. 			select("Wait, who's James Rosimier?");
  5419. 			mes "[Old Lady]";
  5420. 			mes "Oh, James belonged to";
  5421. 			mes "one of the oldest and richest";
  5422. 			mes "families in Juno. Everything";
  5423. 			mes "was going great for them, but";
  5424. 			mes "some time after Allysia died,";
  5425. 			mes "the family went bankrupt.";
  5426. 			next;
  5427. 			mes "[Old Lady]";
  5428. 			mes "The city manages their";
  5429. 			mes "old residence now. For";
  5430. 			mes "some reason, they decided";
  5431. 			mes "to entrust me with the master";
  5432. 			mes "key to the Rosimier Mansion.";
  5433. 			next;
  5434. 			select("May I borrow the Master Key?");
  5435. 			mes "[Old Lady]";
  5436. 			mes "Well, I'm really not";
  5437. 			mes "supposed to give it to just";
  5438. 			mes "anyone, but I can tell that";
  5439. 			mes "you're working with Allysia's";
  5440. 			mes "best interests at heart.";
  5441. 			next;
  5442. 			mes "[Old Lady]";
  5443. 			mes "However, you've got to";
  5444. 			mes "make sure that you return";
  5445. 			mes "it to me before the people";
  5446. 			mes "from City Hall ask me for it.";
  5447. 			mes "Alright then, I hope you find";
  5448. 			mes "what you're looking for.";
  5449. 			getitem 7498,1; //Rosimier_Key
  5450. 			set KielHyreQuest,58;
  5451. 			close;
  5452. 		}
  5453. 	}
  5454.  
  5455. 	else if ((KielHyreQuest == 58) &&
  5456. 		(countitem(7499) < 1) || 
  5457. 		(countitem(7500) < 1) || 
  5458. 		(countitem(7501) < 1) || 
  5459. 		(countitem(7502) < 1)) {
  5460. 		mes "[Old Lady]";
  5461. 		mes "Please hurry and find";
  5462. 		mes "whatever you're searching";
  5463. 		mes "for in the Rosimier Mansion.";
  5464. 		mes "I might get in trouble if";
  5465. 		mes "the people from City Hall";
  5466. 		mes "come and ask me for the key...";
  5467. 		close;
  5468. 	}
  5469.  
  5470. 	else if ((KielHyreQuest == 58) &&
  5471. 		(countitem(7499) == 1) && 
  5472. 		(countitem(7500) == 1) && 
  5473. 		(countitem(7501) == 1) && 
  5474. 		(countitem(7502) == 1)) {
  5475. 		mes "[Old Lady]";
  5476. 		mes "Oh, you're finished";
  5477. 		mes "searching the mansion?";
  5478. 		mes "Depressing, isn't it?";
  5479. 		mes "The creditors basically";
  5480. 		mes "ransacked everything";
  5481. 		mes "a very long time ago.";
  5482. 		next;
  5483. 		select("Why did ^3355FFAllysia^000000...?");
  5484. 		mes "[Old Lady]";
  5485. 		mes "Well, I know that James";
  5486. 		mes "and Allysia were in love,";
  5487. 		mes "and he promised to marry";
  5488. 		mes "her. Now, supposedly his";
  5489. 		mes "family already betrothed";
  5490. 		mes "him to another woman.";
  5491. 		next;
  5492. 		mes "[Old Lady]";
  5493. 		mes "Time went by, and he";
  5494. 		mes "was forced to marry his";
  5495. 		mes "fiancee. Allysia was pretty";
  5496. 		mes "devastated. I think maybe";
  5497. 		mes "that's what she... you know...";
  5498. 		next;
  5499. 		mes "[Old Lady]";
  5500. 		mes "Listen, if you want to learn";
  5501. 		mes "more about what happened,";
  5502. 		mes "then I think you should talk";
  5503. 		mes "to the ^3355FFfisherman that lives^000000";
  5504. 		mes "^3355FFsouth of the Kiel Hyre Academy.^000000";
  5505. 		next;
  5506. 		mes "[Old Lady]";
  5507. 		mes "He's the one that found";
  5508. 		mes "Allysia's body in the river,";
  5509. 		mes "so he might have a better";
  5510. 		mes "idea of what had happened.";
  5511. 		delitem 7498,1; //Rosimier_Key 
  5512. 		set KielHyreQuest,60;
  5513. 		close;
  5514. 	}
  5515. 	else if (KielHyreQuest >= 60) {
  5516. 		mes "[Old Lady]";
  5517. 		mes "Yep, Rain's coming.";
  5518. 		mes "Can feel it in my bones.";
  5519. 		close;
  5520. 	}
  5521. }
  5522.  
  5523.  
  5524. //----------------------------------------------------------------------------
  5525. // Warp portal into Rosimier Mansion
  5526. //----------------------------------------------------------------------------
  5527. yuno,273,141,0	script	Rosimmir_Entrance	45,2,2,{
  5528. OnTouch:
  5529. 	if (countitem(7498) < 1) {
  5530. 		mes "That mansion seems to have";
  5531. 		mes "been destroyed by the time.";
  5532. 		mes "However, the door looks like";
  5533. 		mes "it'd be still operational if";
  5534. 		mes "you had the right key.";
  5535. 		close;
  5536. 	}
  5537. 	else {
  5538. 		warp "kh_rossi",20,92;
  5539. 	}
  5540. 	end;
  5541. }
  5542.  
  5543. //----------------------------------------------------------------------------
  5544. // Rosimier Mansion, first floor; Table
  5545. //----------------------------------------------------------------------------
  5546. kh_rossi,23,23,0	script	Table#khr2	111,{
  5547. 	if (checkweight(7499,1) == 0) {
  5548. 		mes "^3355FFJust a second...";
  5549. 		mes "You're carrying too";
  5550. 		mes "many items with you";
  5551. 		mes "right now, so you'll";
  5552. 		mes "need to free up more";
  5553. 		mes "Inventory space first...^000000";
  5554. 		close;
  5555. 	}
  5556. 	if (KielHyreQuest < 58) {
  5557. 		mes "^3355FFThere's nothing here";
  5558. 		mes "of importance to you.^000000";
  5559. 		close;
  5560. 	}
  5561. 	else if (KielHyreQuest < 60) {
  5562. 		if (countitem(7499) < 1) {
  5563. 			cutin "kh_family_port",1;
  5564. 			mes "^3355FFYou examine the table,";
  5565. 			mes "and find a framed portrait";
  5566. 			mes "inside the open drawer.^000000";
  5567. 			getitem 7499,1; //Family_Portrait
  5568. 		}
  5569. 		else {
  5570. 			mes "^3355FFThe open drawer of";
  5571. 			mes "this desk is now empty.^000000";
  5572. 		}
  5573. 	}
  5574. 	else{
  5575. 		mes "^3355FFThis was the desk in";
  5576. 		mes "which you obtained the";
  5577. 		mes "Rosimier family portrait.";
  5578. 		mes "Its drawers are empty now.^000000";
  5579. 		close;
  5580. 	}
  5581. 	close2;
  5582. 	cutin "",255;
  5583. 	end;
  5584. }
  5585.  
  5586. //----------------------------------------------------------------------------
  5587. // Rosimier Mansion, first floor; Shelf
  5588. //----------------------------------------------------------------------------
  5589. kh_rossi,92,40,0	script	Shelf#khr	111,{
  5590. 	if (checkweight(7500,1) == 0) {
  5591. 		mes "^3355FFJust a second...";
  5592. 		mes "You're carrying too";
  5593. 		mes "many items with you";
  5594. 		mes "right now, so you'll";
  5595. 		mes "need to free up more";
  5596. 		mes "Inventory space first...^000000";
  5597. 		close;
  5598. 	}
  5599. 	if (KielHyreQuest < 58) {
  5600. 		mes "^3355FFThere's nothing here";
  5601. 		mes "of importance to you.^000000";
  5602. 		close;
  5603. 	}
  5604. 	else if (KielHyreQuest < 60) {
  5605. 		if (countitem(7500) < 1) {
  5606. 			mes "^3355FFThere are locked";
  5607. 			mes "boxes on these bookshelves.";
  5608. 			mes "Perhaps if you used this";
  5609. 			mes "mansions's Master Key, you";
  5610. 			mes "might be able to open them.^000000";
  5611. 			next;
  5612. 			switch(select("Use Key:Pass")) {
  5613. 			case 1:
  5614. 				mes "^3355FFWhich box do you";
  5615. 				mes "want to try to open?^000000";
  5616. 				next;
  5617. 				switch(select("First Box:Second Box")) {
  5618. 				case 1:
  5619. 					mes "^3355FFYou use the Master Key to";
  5620. 					mes "unlock the box, and obtain";
  5621. 					mes "a portait of a woman that";
  5622. 					mes "looks just like Kiel Hyre's";
  5623. 					mes "assistant, Allysia.^000000";
  5624. 					next;
  5625. 					cutin "kh_ellisia_port",2;
  5626. 					mes "^3355FFThe message, ''To my love,";
  5627. 					mes "Allysia. From James.'' is";
  5628. 					mes "written on the back.^000000";
  5629. 					getitem 7500,1; //Elysia_Portrait
  5630. 					close2;
  5631. 					cutin "",255;
  5632. 					end;
  5633. 				case 2:
  5634. 					mes "^3355FFThis box is empty.^000000";
  5635. 					close;
  5636. 				}
  5637. 			case 2:
  5638. 				mes "^3355FFThis box is empty.^000000";
  5639. 				close;
  5640. 			}
  5641. 		}
  5642. 		else {
  5643. 			mes "^3355FFYou've found a woman's";
  5644. 			mes "portrait in one of the";
  5645. 			mes "boxes on this shelf.^000000";
  5646. 			close;
  5647. 		}
  5648. 	}
  5649. 	else {
  5650. 		mes "^3355FFYou've found a woman's";
  5651. 		mes "portrait in one of the";
  5652. 		mes "boxes on this shelf.";
  5653. 		mes "This box is now empty.^000000";
  5654. 		close;
  5655. 	}
  5656. }
  5657.  
  5658.  
  5659. //----------------------------------------------------------------------------
  5660. // Rosimier Mansion, top floor; Desk
  5661. //----------------------------------------------------------------------------
  5662. kh_rossi,144,286,0	script	Desk#khr3	111,{
  5663. 	if (checkweight(7501,1) == 0) {
  5664. 		mes "^3355FFJust a second...";
  5665. 		mes "You're carrying too";
  5666. 		mes "many items with you";
  5667. 		mes "right now, so you'll";
  5668. 		mes "need to free up more";
  5669. 		mes "Inventory space first...^000000";
  5670. 		close;
  5671. 	}
  5672. 	if (KielHyreQuest < 58) {
  5673. 		mes "^3355FFIt's just a desk.^000000";
  5674. 		close;
  5675. 	}
  5676. 	else if (KielHyreQuest < 60) {
  5677. 		mes "^3355FFThe desk has";
  5678. 		mes "three drawers.^000000";
  5679. 		next;
  5680. 		switch(select("First Drawer:Second Drawer:Third Drawer:Cancel")) {
  5681. 		case 1:
  5682. 			mes "^3355FFThe first drawer is locked.^000000";
  5683. 			close;
  5684. 		case 2:
  5685. 			if (countitem(7501) < 1) {
  5686. 				mes "^3355FFThere is a letter inside";
  5687. 				mes "this second drawer. It";
  5688. 				mes "was sent by a person";
  5689. 				mes "with the initials, K.H.,";
  5690. 				mes "and addressed to Allysia.^000000";
  5691. 				getitem 7501,1; //Kyll_Hyre_Letter2
  5692. 				close;
  5693. 			}
  5694. 			else {
  5695. 				mes "^3355FFThis drawer is now empty.^000000";
  5696. 				close;
  5697. 			}
  5698. 		case 3:
  5699. 			mes "^3355FFThere is a small note";
  5700. 			mes "inside this third drawer.";
  5701. 			mes "It's written by James, and";
  5702. 			mes "mentions that he wants to";
  5703. 			mes "marry Allysia, and that she";
  5704. 			mes "received an engagement ring.^000000";
  5705. 			close;
  5706. 		case 4:
  5707. 			mes "......";
  5708. 			mes ".........";
  5709. 			mes "............";
  5710. 			close;
  5711. 		}
  5712. 	}
  5713. 	else{
  5714. 		mes "^3355FFThis is the desk where";
  5715. 		mes "you found a letter written";
  5716. 		mes "by K.H., and a note scribbled";
  5717. 		mes "by James Rosimier. Both of";
  5718. 		mes "these are addressed to";
  5719. 		mes "the same woman, Allysia.^000000";
  5720. 		close;
  5721. 	}
  5722. }
  5723.  
  5724. //----------------------------------------------------------------------------
  5725. // Rosimier Mansion, top floor; Bookshelf
  5726. //----------------------------------------------------------------------------
  5727. kh_rossi,148,288,0	script	Bookshelf#khr	111,{
  5728. 	if (checkweight(7502,1) == 0) {
  5729. 		mes "^3355FFJust a second...";
  5730. 		mes "You're carrying too";
  5731. 		mes "many items with you";
  5732. 		mes "right now, so you'll";
  5733. 		mes "need to free up more";
  5734. 		mes "Inventory space first...^000000";
  5735. 		close;
  5736. 	}
  5737. 	if (KielHyreQuest < 58) {
  5738. 		mes "^3355FFYou encounter a dusty";
  5739. 		mes "bookshelf filled with";
  5740. 		mes "numerous books.^000000";
  5741. 		close;
  5742. 	}
  5743. 	else if (KielHyreQuest < 60) {
  5744. 		if (countitem(7502) < 1) {
  5745. 			mes "^3355FFYou encounter a dusty";
  5746. 			mes "bookshelf filled with";
  5747. 			mes "numerous books. You";
  5748. 			mes "find a folded note between";
  5749. 			mes "the books as you examine them.^000000";
  5750. 			getitem 7502,1; //Piece_Memo_Of_James
  5751. 			close;
  5752. 		}
  5753. 		else {
  5754. 			mes "^3355FFYou encounter a dusty";
  5755. 			mes "bookshelf filled with";
  5756. 			mes "numerous books.^000000";
  5757. 			close;
  5758. 		}
  5759. 	}
  5760. 	else{
  5761. 		mes "^3355FFYou encounter a dusty";
  5762. 		mes "bookshelf filled with";
  5763. 		mes "numerous books.^000000";
  5764. 		close;
  5765. 	}
  5766. }
  5767.  
  5768. //----------------------------------------------------------------------------
  5769. // Rosimier Mansion, top floor; Bed
  5770. //----------------------------------------------------------------------------
  5771. kh_rossi,154,286,0	script	Bed#khr	111,{
  5772. 	if (KielHyreQuest < 58) {
  5773. 		mes "^3355FFYou found a well made";
  5774. 		mes "bed that has collected";
  5775. 		mes "a thick layer of dust";
  5776. 		mes "after years of disuse.^000000";
  5777. 		close;
  5778. 	}
  5779. 	else if (KielHyreQuest < 60) {
  5780. 		mes "^3355FFYou found a well made";
  5781. 		mes "bed that has collected";
  5782. 		mes "a thick layer of dust";
  5783. 		mes "after years of disuse.^000000";
  5784. 		next;
  5785. 		switch(select("Check Bedsheets:Check Under Bed")) {
  5786. 		case 1:
  5787. 			mes "^3355FFYou brush the bed's";
  5788. 			mes "surface with your hand,";
  5789. 			mes "causing a cloud of nasty";
  5790. 			mes "dust to irritate your nose";
  5791. 			mes "and throat. Eww, yucky!^000000";
  5792. 			percentheal -10,0;
  5793. 			close;
  5794. 		case 2:
  5795. 			mes "^3355FFYou search underneath";
  5796. 			mes "the bed, and find an empty";
  5797. 			mes "engagement ring box.^000000";
  5798. 			close;
  5799. 		}
  5800. 	}
  5801. 	else {
  5802. 		mes "^3355FFThis is a dirty bed.^000000";
  5803. 		close;
  5804. 	}
  5805. }
  5806.  
  5807. //----------------------------------------------------------------------------
  5808. // Fisherman
  5809. //----------------------------------------------------------------------------
  5810. yuno_fild12,232,222,0	script	Old Fisherman	709,{
  5811. 	if (KielHyreQuest < 60) {
  5812. 		mes "[Fisherman]";
  5813. 		mes "These days, it's much";
  5814. 		mes "harder to catch and fish.";
  5815. 		mes "Ever since they built";
  5816. 		mes "this factory, the fish";
  5817. 		mes "have started to change,";
  5818. 		mes "and they look different too...";
  5819. 		close;
  5820. 	}
  5821. 	else if (KielHyreQuest == 60) {
  5822. 		mes "[Fisherman]";
  5823. 		mes "Eh? You want something?";
  5824. 		mes "Heh, youngsters! I know";
  5825. 		mes "how much you love handouts,";
  5826. 		mes "but you're not getting any.";
  5827. 		mes "Now, if you bring me some";
  5828. 		mes "Raw Fish, I'd be more friendly~";
  5829. 		if (countitem(544) >= 10)  {
  5830. 			next;
  5831. 			mes "[Fisherman]";
  5832. 			mes "Oh, is all this fish";
  5833. 			mes "for me? Heh, how very";
  5834. 			mes "generous of you. If you're";
  5835. 			mes "going to be so kind, then";
  5836. 			mes "I suppose I have to repay";
  5837. 			mes "the favor. Ask me anything~";
  5838. 			next;
  5839. 			select("30 years ago, a woman killed herself...");
  5840. 			mes "[Fisherman]";
  5841. 			mes "Oh? Ohh. Oh yeah.";
  5842. 			mes "I remember that. Yeah.";
  5843. 			mes "it was August 20th, my";
  5844. 			mes "wife's birthday. That day,";
  5845. 			mes "instead of catching fish,";
  5846. 			mes "I caught a dead woman.";
  5847. 			next;
  5848. 			mes "[Fisherman]";
  5849. 			mes "Of course, I reported it";
  5850. 			mes "to the Juno Police!  They told";
  5851. 			mes "me she killed herself since";
  5852. 			mes "she was betrayed by her lover,";
  5853. 			mes "who also happened to be her";
  5854. 			mes "employer. Really tragic stuff.";
  5855. 			next;
  5856. 			mes "[Fisherman]";
  5857. 			mes "Anyway, when they were";
  5858. 			mes "moving her body out of the";
  5859. 			mes "river, her hand dropped";
  5860. 			mes "some ring. I picked it up,";
  5861. 			mes "hoping to sell it later for";
  5862. 			mes "some zeny. I know, I know...";
  5863. 			next;
  5864. 			mes "[Fisherman]";
  5865. 			mes "I was pretty lucky the";
  5866. 			mes "police didn't see me take";
  5867. 			mes "it. Later that day, some guy";
  5868. 			mes "came up to me and offered";
  5869. 			mes "me a lot of money for it.";
  5870. 			mes "I guess it was my lucky day!";
  5871. 			next;
  5872. 			mes "[Fisherman]";
  5873. 			mes "I found out later that he was";
  5874. 			mes "some mechanical repairman--";
  5875. 			mes "something. He sold everything";
  5876. 			mes "to buy that ring, so I guess";
  5877. 			mes "he wanted it desperately.";
  5878. 			mes "Then he just dissapeared.";
  5879. 			next;
  5880. 			select("Do you remember his name?");
  5881. 			mes "[Fisherman]";
  5882. 			mes "His name...?";
  5883. 			mes "It was something like...";
  5884. 			mes "Heil? Hyre? Anyway, it";
  5885. 			mes "was a long time ago. Oh,";
  5886. 			mes "his old house is still around.";
  5887. 			next;
  5888. 			mes "[Fisherman]";
  5889. 			mes "If you're going to be";
  5890. 			mes "that curious, you might";
  5891. 			mes "as well check it out.";
  5892. 			mes "Let's see, he lived in";
  5893. 			mes "a hut near the northeast";
  5894. 			mes "forest guard camp.";
  5895. 			delitem 544,10; //Fish_Slice
  5896. 			set KielHyreQuest,62;
  5897. 			close;
  5898. 		}
  5899. 		else {
  5900. 			close;
  5901. 		}
  5902. 	}
  5903. 	else if (KielHyreQuest >= 62) {
  5904. 		mes "[Fisherman]";
  5905. 		mes "Don't you remember";
  5906. 		mes "what I told you? That";
  5907. 		mes "guy lived in a hut near";
  5908. 		mes "the northeast forest";
  5909. 		mes "guard camp! Why don't";
  5910. 		mes "you check that place out?";
  5911. 		close;
  5912. 	}
  5913. }
  5914.  
  5915. //----------------------------------------------------------------------------
  5916. // Kiel Hyre's hut; Wooden Board
  5917. //----------------------------------------------------------------------------
  5918. yuno_fild09,158,217,0	script	Wooden Board#kh	111,{
  5919. 	if (checkweight(7503,1) == 0) {
  5920. 		mes "^3355FFJust a second...";
  5921. 		mes "You're carrying too";
  5922. 		mes "many items with you";
  5923. 		mes "right now, so you'll";
  5924. 		mes "need to free up more";
  5925. 		mes "Inventory space first...^000000";
  5926. 		close;
  5927. 	}
  5928. 	if ((KielHyreQuest < 62) || (KielHyreQuest >= 64)) {
  5929. 		mes "^3355FFIt's a useless";
  5930. 		mes "wooden board";
  5931. 		mes "in the bushes.^000000";
  5932. 		close;
  5933. 	}
  5934. 	else if (KielHyreQuest == 62) {
  5935. 		mes "^3355FFYou found a long";
  5936. 		mes "wooden board carved";
  5937. 		mes "with the initials, ''K.H.''^000000";
  5938. 		next;
  5939. 		cutin "kh_kyel_port",2;
  5940. 		mes "^3355FFYou find a portrait of";
  5941. 		mes "a young man, that looks";
  5942. 		mes "like a younger version";
  5943. 		mes "of Kiel Hyre, in a broken";
  5944. 		mes "picture frame underneath";
  5945. 		mes "the old wooden board.^000000";
  5946. 		getitem 7503,1;	//Man_Portrait
  5947. 		set KielHyreQuest,64;
  5948. 		next;
  5949. 		cutin "",255;
  5950. 		mes "^3355FFYou have enough";
  5951. 		mes "information by now,";
  5952. 		mes "so you should report";
  5953. 		mes "back to Mitchell.^000000";
  5954. 		close;
  5955. 	}
  5956. }
  5957.  
  5958. //============================================================================
  5959. // Kiehl Hyre's Room and Boss NPCs
  5960. //============================================================================
  5961. // Beyond here the NPC for the final areas.
  5962. // Now, this area is not someplace you wanna slow down so
  5963. // you can pick up dialog. I used packet logging to pull
  5964. // what I could and for the sake of the two people with me,
  5965. // did not bother doing all the proper NPC positioning
  5966. // or some of the 'error/wrong option' dialogs.
  5967. // All the doors are kind of weird.
  5968. //============================================================================
  5969.  
  5970. //----------------------------------------------------------------------------
  5971. // Kiehl's Room; Receiver (Gives black keycards upon killing mobs)
  5972. //----------------------------------------------------------------------------
  5973. kh_kiehl01,17,39,0	script	Receiver#kh	111,{
  5974. 	if (mobcount("kh_kiehl01","Receiver#kh::OnMyMobDead") < 1) {
  5975. 		mes "^333333*BBBZZZ*^000000";
  5976. 		if (KielHyreQuest == 74) {
  5977. 			next;
  5978. 			mes "[????]";
  5979. 			mes "^333333*Bzzzz...*";
  5980. 			mes "I've never seen you";
  5981. 			mes "before. Did Father send";
  5982. 			mes "you to kill me? We'll just";
  5983. 			mes "see about that! Go ahead,";
  5984. 			mes "try to find me, adventurer.^000000.";
  5985. 			set KielHyreQuest,76;
  5986. 		}
  5987. 		close2;
  5988. 		monster "kh_kiehl01",16,32,"Alicel",1739,1,"Receiver#kh::OnMyMobDead";
  5989. 		monster "kh_kiehl01",18,31,"Aliot",1740,1,"Receiver#kh::OnMyMobDead";
  5990. 		end;
  5991. 	}
  5992.  
  5993. 	else {
  5994. 		end;
  5995. 	}
  5996.  
  5997. OnMyMobDead:
  5998. 	if (mobcount("kh_kiehl01","Receiver#kh::OnMyMobDead") <1) { 
  5999. 		makeitem 7506,1,"this",19,36;
  6000. 	}
  6001. 	end;
  6002. }
  6003.  
  6004. //----------------------------------------------------------------------------
  6005. // Kiehl's Room; Flower Vase (Gives...password...for Box)
  6006. //----------------------------------------------------------------------------
  6007. kh_kiehl01,13,40,0	script	Flower Vase#kh1	111,{
  6008. 	if (KielHyreQuest < 74) {
  6009. 		mes "^3355FFYou found";
  6010. 		mes "a flower vase.^000000";
  6011. 		close;
  6012. 	}
  6013. 	if (KielHyreQuest >= 74) {
  6014. 		mes "^3355FFYou found";
  6015. 		mes "a flower vase.^000000";
  6016. 		next;
  6017. 		switch(select("Pick Up Vase:Break Vase:Turn Vase Upside-down")) {
  6018. 		case 1:
  6019. 			mes "^3355FFThe vase is empty.^000000";
  6020. 			close;
  6021. 		case 2:
  6022. 			mes "^3355FFYou can't destroy";
  6023. 			mes "this vase, even by";
  6024. 			mes "striking it with all your";
  6025. 			mes "might. It must have been";
  6026. 			mes "specially manufactured by";
  6027. 			mes "the Rekenber Corporation.^000000";
  6028. 			close;
  6029. 		case 3:
  6030. 			mes "^3355FFThe following words";
  6031. 			mes "are written at the";
  6032. 			mes "bottom of the vase.^000000";
  6033. 			next;
  6034. 			mes "[Vase Message]";
  6035. 			mes "''The rabbit often";
  6036. 			mes "observes the door";
  6037. 			mes "The night eats the";
  6038. 			mes "pickled orange.''";
  6039. 			close;
  6040. 		}
  6041. 	}
  6042. 	else{
  6043. 		mes "^3355FFThe following words";
  6044. 		mes "are written at the";
  6045. 		mes "bottom of the vase.^000000";
  6046. 		next;
  6047. 		mes "[Vase Message]";
  6048. 		mes "''The rabbit often";
  6049. 		mes "observes the door.";
  6050. 		mes "The night eats the";
  6051. 		mes "pickled orange.''";
  6052. 		close;
  6053. 	}
  6054. }
  6055.  
  6056.  
  6057. //----------------------------------------------------------------------------
  6058. // Kiehl's Room; Box
  6059. //----------------------------------------------------------------------------
  6060. kh_kiehl01,19,25,0	script	Box#kh1	111,{
  6061. 	if (checkweight(7505,1) == 0) {
  6062. 		mes "^3355FFJust a second...";
  6063. 		mes "You're carrying too";
  6064. 		mes "many items with you";
  6065. 		mes "right now, so you'll";
  6066. 		mes "need to free up more";
  6067. 		mes "Inventory space first...^000000";
  6068. 		close;
  6069. 	}
  6070. 	if (KielHyreQuest < 74) {
  6071. 		mes "^3355FFYou found a box with";
  6072. 		mes "a button for each letter";
  6073. 		mes "of the alphabet on top of it.^000000";
  6074. 		next;
  6075. 		input .@KHInput$;
  6076. 		mes "^3355FFNothing happened.^000000";
  6077. 		close;
  6078. 	}
  6079. 	if (KielHyreQuest >= 74) {
  6080. 		if (countitem(7505) < 1) {
  6081. 			mes "^3355FFYou found a box with";
  6082. 			mes "a button for each letter";
  6083. 			mes "of the alphabet on top of it.^000000";
  6084. 			next;
  6085. 			input .@KHInput$;
  6086. 			if (.@KHInput$ == "open the door") {
  6087. 				mes "^3355FFAs soon as you enter the";
  6088. 				mes "password, the nearby door";
  6089. 				mes "emits a pleasant chiming";
  6090. 				mes "sound, and the box pops";
  6091. 				mes "open to reveal a small key.^000000";
  6092. 				getitem 7505,1; //Toy_Key
  6093. 				close;
  6094. 			}
  6095. 			else {
  6096. 				mes "^3355FFNothing happened.^000000";
  6097. 				close;
  6098. 			}
  6099. 		}
  6100. 		else {
  6101. 			mes "^3355FFThis is where you";
  6102. 			mes "found the Toy key^000000";
  6103. 			close;
  6104. 		}
  6105. 	}
  6106. 	else{
  6107. 		mes "^3355FFThe box is wide";
  6108. 		mes "open, and there";
  6109. 		mes "is nothing in it.^000000";
  6110. 		close;
  6111. 	}
  6112. }
  6113.  
  6114. //----------------------------------------------------------------------------
  6115. // Kiehl's Room; Big Door, (First)
  6116. // - Anyone can pass through this door
  6117. // - Consume one Black KeyCard when opened.
  6118. // - Only one person actually needs to open it.
  6119. //----------------------------------------------------------------------------
  6120. kh_kiehl01,44,33,0	script	Big Door#BigDoorKHQ1	111,{
  6121. 	if (.KHDoor1Opened == 0) {
  6122. 		mes "^3355FFThe door is locked,";
  6123. 		mes "but there is a narrow";
  6124. 		mes "slot next to the doorknob.^000000";
  6125. 		next;
  6126. 		input .@KHInput$;
  6127. 		if (.@KHInput$ == "Black Keycard") {
  6128. 			if (countitem(7506) >= 1) {
  6129. 				mes "^3355FFYou insert the";
  6130. 				mes "Black Keycard into the";
  6131. 				mes "slot, and successfully";
  6132. 				mes "unlock and open the door.^000000";
  6133. 				delitem 7506,1; //Black_Key_Card
  6134. 				donpcevent "Big_Door_1_Warp::OnEnable";
  6135. 				enablenpc "Big_Door_1_Warp";
  6136. 				set .KHDoor1Opened,1;
  6137. 				close;
  6138. 			}
  6139.  
  6140. 		}
  6141. 		mes "^3355FFYou try to push the";
  6142. 		mes "door open with all";
  6143. 		mes "your might, but fail";
  6144. 		mes "to make it budge.^000000";
  6145. 		close;
  6146. 	}
  6147.  
  6148. 	else {
  6149. 		mes "^3355FFThe door is open.^000000";
  6150. 		close;
  6151. 	}
  6152. }
  6153.  
  6154. kh_kiehl01,43,33,0	script	Big_Door_1_Warp	45,1,1,{
  6155. OnEnable:
  6156. 	initnpctimer;
  6157. 	misceffect 215;
  6158. 	end;
  6159.  
  6160. OnInit:
  6161. 	disablenpc "Big_Door_1_Warp";
  6162. 	end;
  6163.  
  6164. OnTimer30000:
  6165. 	stopnpctimer;
  6166. 	misceffect 215;
  6167. 	disablenpc "Big_Door_1_Warp";
  6168. 	set getvariableofnpc(.KHDoor1Opened,"Big Door#BigDoorKHQ1"),0;
  6169. 	end;
  6170.  
  6171. OnTouch:
  6172. 	warp "kh_kiehl01",55,33;
  6173. 	end;
  6174. }
  6175.  
  6176. //----------------------------------------------------------------------------
  6177. // Kiehl's Room; Big Door, (second)
  6178. // - Consume Toy Key when opened.
  6179. // - Only one person actually needs to open it.
  6180. //----------------------------------------------------------------------------
  6181. kh_kiehl01,174,40,0	script	Big Door#BigDoorKHQ2	111,{
  6182. 	if (.KHDoor2Opened == 0) {
  6183. 		mes "^3355FFThe door is locked,";
  6184. 		mes "but there is a small";
  6185. 		mes "keyhole next to the knob.^000000";
  6186. 		next;
  6187. 		input .@KHInput$;
  6188. 		if (.@KHInput$ == "Toy Key") {
  6189. 			if (countitem(7505) >= 1) {
  6190. 				mes "^3355FFYou insert the key into";
  6191. 				mes "the keyhole, and the door";
  6192. 				mes "unlocks with a click as";
  6193. 				mes "you turn the key.^000000";
  6194. 				delitem 7505,1; //Toy_Key
  6195. 				donpcevent "Big_Door_2_Warp::OnEnable";
  6196. 				enablenpc "Big_Door_2_Warp";
  6197. 				set .KHDoor2Opened,1;
  6198. 				close;
  6199. 			}
  6200.  
  6201. 		}
  6202. 		mes "^3355FFYou try to push the";
  6203. 		mes "door open with all";
  6204. 		mes "your might, but fail";
  6205. 		mes "to make it budge.^000000";
  6206. 		close;
  6207. 	}
  6208. 	else {
  6209. 		mes "^3355FFThe door is open.^000000";
  6210. 		close;
  6211. 	}
  6212. }
  6213.  
  6214. kh_kiehl01,174,39,0	script	Big_Door_2_Warp	45,1,1,{
  6215. OnEnable:
  6216. 	initnpctimer;
  6217. 	misceffect 215;
  6218. 	end;
  6219.  
  6220. OnInit:
  6221. 	disablenpc "Big_Door_2_Warp";
  6222. 	end;
  6223.  
  6224. OnTimer30000:
  6225. 	stopnpctimer;
  6226. 	misceffect 215;
  6227. 	disablenpc "Big_Door_2_Warp";
  6228. 	set getvariableofnpc(.KHDoor2Opened,"Big Door#BigDoorKHQ2"),0;
  6229. 	end;
  6230.  
  6231. OnTouch:
  6232. 	warp "kh_kiehl01",173,52;
  6233. 	end;
  6234. }
  6235.  
  6236. //----------------------------------------------------------------------------
  6237. // Kiehl's Room; Big Door, (Third)
  6238. // - Consume one Black KeyCard when opened.
  6239. // - Only one person actually needs to open it.
  6240. //----------------------------------------------------------------------------
  6241. kh_kiehl01,77,108,0	script	Big Door#BigDoorKHQ3	111,{
  6242. 	if (.KHDoor3Opened == 0) {
  6243. 		mes "^3355FFThe door is locked,";
  6244. 		mes "but there is a narrow";
  6245. 		mes "slot next to the doorknob.^000000";
  6246. 		next;
  6247. 		input .@KHInput$;
  6248. 		if (.@KHInput$ == "Black Keycard") {
  6249. 			if (countitem(7506) >= 1) {
  6250. 				mes "^3355FFYou insert the";
  6251. 				mes "Black Keycard into the";
  6252. 				mes "slot, and successfully";
  6253. 				mes "unlock and open the door.^000000";
  6254. 				delitem 7506,1; //Black_Key_Card
  6255. 				donpcevent "Big_Door_3_Warp::OnEnable";
  6256. 				enablenpc "Big_Door_3_Warp";
  6257. 				set .KHDoor3Opened,1;
  6258. 				close;
  6259. 			}
  6260.  
  6261. 		}
  6262. 		mes "^3355FFYou try to push the";
  6263. 		mes "door open with all";
  6264. 		mes "your might, but fail";
  6265. 		mes "to make it budge.^000000";
  6266. 		close;
  6267. 	}
  6268. 	else {
  6269. 		mes "^3355FFThe door is open.^000000";
  6270. 		close;
  6271. 	}
  6272. }
  6273.  
  6274. kh_kiehl01,78,108,0	script	Big_Door_3_Warp	45,1,1,{
  6275. OnEnable:
  6276. 	initnpctimer;
  6277. 	misceffect 215;
  6278. 	end;
  6279.  
  6280. OnInit:
  6281. 	disablenpc "Big_Door_3_Warp";
  6282. 	end;
  6283.  
  6284. OnTimer30000:
  6285. 	stopnpctimer;
  6286. 	misceffect 215;
  6287. 	disablenpc "Big_Door_3_Warp";
  6288. 	set getvariableofnpc(.KHDoor3Opened,"Big Door#BigDoorKHQ3"),0;
  6289. 	end;
  6290.  
  6291. OnTouch:
  6292. 	warp "kh_kiehl01",68,108;
  6293. 	end;
  6294. }
  6295.  
  6296. //----------------------------------------------------------------------------
  6297. // Kiehl's Room; Big Door, (Fourth)
  6298. // - Consume TWO Black KeyCard when opened.
  6299. // - Only one person actually needs to open it.
  6300. //----------------------------------------------------------------------------
  6301. kh_kiehl01,42,177,0	script	Big Door#BigDoorKHQ4	111,{
  6302. 	if (.KHDoor4Opened == 0) {
  6303. 		mes "^3355FFThe door is locked,";
  6304. 		mes "but there is a narrow";
  6305. 		mes "slot next to the doorknob.^000000";
  6306. 		next;
  6307. 		input .@KHInput$;
  6308. 		if (.@KHInput$ == "Black Keycard") {
  6309. 			if (countitem(7506) >= 2) {
  6310. 				mes "^3355FFYou insert the";
  6311. 				mes "Black Keycard into the";
  6312. 				mes "slot, and successfully";
  6313. 				mes "unlock and open the door.^000000";
  6314. 				delitem 7506,2; //Black_Key_Card
  6315. 				donpcevent "Big_Door_4_Warp::OnEnable";
  6316. 				enablenpc "Big_Door_4_Warp";
  6317. 				set .KHDoor4Opened,1;
  6318. 				close;
  6319. 			}
  6320. 		}
  6321. 		mes "^3355FFYou try to push the";
  6322. 		mes "door open with all";
  6323. 		mes "your might, but fail";
  6324. 		mes "to make it budge.^000000";
  6325. 		close;
  6326. 	}
  6327.  
  6328. 	else {
  6329. 		mes "^3355FFThe door is open.^000000";
  6330. 		close;
  6331. 	}
  6332. }
  6333.  
  6334. kh_kiehl01,41,177,0	script	Big_Door_4_Warp	45,1,1,{
  6335. OnEnable:
  6336. 	initnpctimer;
  6337. 	misceffect 215;
  6338. 	end;
  6339.  
  6340. OnInit:
  6341. 	disablenpc "Big_Door_4_Warp";
  6342. 	end;
  6343.  
  6344. OnTimer30000:
  6345. 	stopnpctimer;
  6346. 	misceffect 215;
  6347. 	disablenpc "Big_Door_4_Warp";
  6348. 	set getvariableofnpc(.KHDoor4Opened,"Big Door#BigDoorKHQ4"),0;
  6349. 	end;
  6350.  
  6351. OnTouch:
  6352. 	warp "kh_kiehl01",49,177;
  6353. 	end;
  6354. }
  6355.  
  6356. //----------------------------------------------------------------------------
  6357. // Kiehl's Room; Robots
  6358. //----------------------------------------------------------------------------
  6359. kh_kiehl01,15,179,0	script	Robots#kh1	111,{
  6360. 	if (mobcount("kh_kiehl01","Robots#kh1::OnMyMobDead") < 1) {
  6361. 		mes "^3355FFAs soon as you";
  6362. 		mes "touch the test tube,";
  6363. 		mes "a bunch of robots";
  6364. 		mes "suddenly appeared.^000000.";
  6365. 		close2;
  6366. 		monster "kh_kiehl01",18,181,"Aliot",1740,1,"Robots#kh1::OnMyMobDead";
  6367. 		monster "kh_kiehl01",18,180,"Alicel",1739,1,"Robots#kh1::OnMyMobDead";
  6368. 		monster "kh_kiehl01",18,179,"Aliot",1740,1,"Robots#kh1::OnMyMobDead";
  6369. 		monster "kh_kiehl01",18,178,"Alicel",1739,1,"Robots#kh1::OnMyMobDead";
  6370. 		end;
  6371. 	}
  6372. 	else  {
  6373. 		end;
  6374. 	}
  6375.  
  6376. OnMyMobDead:
  6377. 	if (mobcount("kh_kiehl01","Robots#kh1::OnMyMobDead") < 1) { 
  6378. 		makeitem 7506,1,"this",18,180;
  6379. 		}
  6380. 	end;
  6381. }
  6382.  
  6383. //----------------------------------------------------------------------------
  6384. // Kiehl's Room; Dummy Robots
  6385. //----------------------------------------------------------------------------
  6386. kh_kiehl01,15,177,0	script	Robots#kh2::RobotsKHQ	111,{
  6387. 	end;
  6388. }
  6389. kh_kiehl01,15,180,0	duplicate(RobotsKHQ)	Robots#kh3	111
  6390. kh_kiehl01,15,182,0	duplicate(RobotsKHQ)	Robots#kh4	111
  6391. kh_kiehl01,35,187,0	duplicate(RobotsKHQ)	Robots#kh5	111
  6392. kh_kiehl01,37,187,0	duplicate(RobotsKHQ)	Robots#kh6	111
  6393. kh_kiehl01,39,187,0	duplicate(RobotsKHQ)	Robots#kh7	111
  6394. kh_kiehl01,41,187,0	duplicate(RobotsKHQ)	Robots#kh8	111
  6395.  
  6396. //----------------------------------------------------------------------------
  6397. // Kiehl's Room; Big Door, (Fifth, and final)
  6398. // - Anyone can pass through this door
  6399. // - Consumes 4 Solid Iron Pieces
  6400. //----------------------------------------------------------------------------
  6401. kh_kiehl01,166,187,0	script	Big Door#BigDoorKHQ5	111,{
  6402. 	if (($@KHQuestBusy == 0) && (KielHyreQuest >= 74) && (KielHyreQuest <= 106)) {
  6403. 		if (KielHyreQuest < 86) {
  6404. 			mes "^3355FFThis large door..";
  6405. 			mes "is closed shut.";
  6406. 			mes "If you listen carefully,";
  6407. 			mes "you can hear the door";
  6408. 			mes "hinges slightly squeak.^000000";
  6409. 			next;
  6410. 			select("Push Door:Kick Door:Shake Door:Pull Door:Lift Door");
  6411. 			mes "^3355FFA group of monsters";
  6412. 			mes "suddenly appeared as";
  6413. 			mes "soon as you applied";
  6414. 			mes "pressure to the door.";
  6415. 			mes "This must be some";
  6416. 			mes "kind of security device.^000000";
  6417. 			close2;
  6418. 			set @KHDoorPushAttempt,@KHDoorPushAttempt+1;
  6419. 			monster "kh_kiehl01",163,183,"Alicel",1739,1;
  6420. 			monster "kh_kiehl01",163,179,"Aliot",1740,1;
  6421. 			monster "kh_kiehl01",169,183,"Alicel",1739,1;
  6422. 			monster "kh_kiehl01",169,179,"Aliot",1740,1;
  6423. 			if (@KHDoorPushAttempt >= 3) { 
  6424. 				set KielHyreQuest,86; 
  6425. 			}
  6426. 			end;
  6427. 		}
  6428. 		else if ((KielHyreQuest > 84) && (KielHyreQuest < 94)) {
  6429. 			mes "^3355FFYou apply some";
  6430. 			mes "pressure to the door,";
  6431. 			mes "and find that you can";
  6432. 			mes "budge it slightly, but";
  6433. 			mes "you can't fully open it.^000000";
  6434. 			next;
  6435. 			mes "^3355FFIf you wedged something";
  6436. 			mes "into the gap between the";
  6437. 			mes "door and its frame, and";
  6438. 			mes "fully leveraged it, then you";
  6439. 			mes "should be able to open it.^000000";
  6440. 			next;
  6441. 			switch(select("Steel:Rusty Iron Piece:Solid Iron Piece:Iron Piece:Screw:Cancel")) {
  6442. 			case 1:
  6443. 				set .@KHPryingItem$,"Steel";
  6444. 				break;
  6445. 			case 2:
  6446. 				set .@KHPryingItem$,"Rusty Iron Piece";
  6447. 				break;
  6448. 			case 3:
  6449. 				if (countitem(7507) >= 1) {
  6450. 					if (KielHyreQuest < 92) {
  6451. 						mes "^3355FFYou insert one end of";
  6452. 						mes "a Solid Iron Piece into the";
  6453. 						mes "door's gap in a strenuous";
  6454. 						mes "effort to pry the door open";
  6455. 						mes "The gap widens a little bit,";
  6456. 						mes "but you break one of your";
  6457. 						mes "Solid Iron Pieces.^000000";
  6458. 						delitem 7507,1; //Hard_Piece_of_Steel
  6459. 						set KielHyreQuest,KielHyreQuest+2;
  6460. 						close;
  6461. 					}
  6462. 					else if (KielHyreQuest == 92) {
  6463. 						mes "^3355FFWith a mighty heave,";
  6464. 						mes "you pry a Solid Iron";
  6465. 						mes "Piece into the door jamb,";
  6466. 						mes "and fling the door wide open";
  6467. 						mes "Unable the withstand the";
  6468. 						mes "awesome force, this Solid";
  6469. 						mes "Iron Piece shatters into dust.^000000";
  6470. 						delitem 7507,1; //Hard_Piece_of_Steel
  6471. 						set KielHyreQuest,94;
  6472. 						close;
  6473. 					}
  6474. 				}
  6475. 				else {
  6476. 					mes "^3355FFIf only you had a Solid";
  6477. 					mes "Iron Piece you could use to";
  6478. 					mes "pry open this door.^000000";
  6479. 					close;
  6480. 				}
  6481. 			case 4:
  6482. 				set .@KHPryingItem$,"Iron Piece";
  6483. 				break;
  6484. 			case 5:
  6485. 				set .@KHPryingItem$,"Screw";
  6486. 				break;
  6487. 			case 6:
  6488. 				mes "^3355FFLet's look for something";
  6489. 				mes "heavy we can use to pry";
  6490. 				mes "open this door.^000000";
  6491. 				close;
  6492. 			}
  6493.  
  6494. 			mes "^3355FFThis "+.@KHPryingItem$+" is far";
  6495. 			mes "to weak for what you're using it for";
  6496. 			mes "and breaks.^000000";
  6497. 			close;
  6498. 		}
  6499. 		else if ((KielHyreQuest >= 94) && (KielHyreQuest <= 104)) {
  6500. 			if (.KHDoor5Opened == 0) {
  6501. 				mes "^3355FFThe large door";
  6502. 				mes "is wide open, and.";
  6503. 				mes "you may now enter.^000000";
  6504. 				next;
  6505. 				switch(select("Yes:No")) {
  6506. 				case 1:
  6507. 					close2;
  6508. 					donpcevent "Big_Door_5_Warp::OnEnable";
  6509. 					enablenpc "Big_Door_5_Warp";
  6510. 					set .KHDoor5Opened,1;
  6511. 					end;
  6512. 				case 2:
  6513. 					mes "^3355FFWho knows what is on the";
  6514. 					mes "other side of this door. Let's";
  6515. 					mes "think about it before barging in..^000000";
  6516. 					close;
  6517. 				}
  6518. 			}
  6519. 			else {
  6520. 				mes "^3355FFThe door is open.^000000";
  6521. 				close;
  6522. 			}
  6523. 		}
  6524. 		else {
  6525. 			mes "^3355FFThis large door..";
  6526. 			mes "is closed shut.";
  6527. 			mes "If you listen carefully,";
  6528. 			mes "you can hear the door";
  6529. 			mes "hinges slightly squeak.^000000";
  6530. 			close;
  6531. 		}
  6532. 	}
  6533. 	else {
  6534. 		mes "^3355FFThis large door..";
  6535. 		mes "is closed shut.";
  6536. 		mes "If you listen carefully,";
  6537. 		mes "you can hear the door";
  6538. 		mes "hinges slightly squeak.^000000";
  6539. 		close;
  6540. 	}
  6541. }
  6542.  
  6543. kh_kiehl01,166,186,0	script	Big_Door_5_Warp	45,1,1,{
  6544. 	end;
  6545.  
  6546. OnEnable:
  6547. 	initnpctimer;
  6548. 	misceffect 215;
  6549. 	end;
  6550.  
  6551. OnTimer30000:
  6552. 	stopnpctimer;
  6553. 	misceffect 215;
  6554. 	disablenpc "Big_Door_5_Warp";
  6555. 	set getvariableofnpc(.KHDoor5Opened,"Big Door#BigDoorKHQ5"),0;
  6556. 	end;
  6557.  
  6558. OnInit:
  6559. 	disablenpc "Big_Door_5_Warp";
  6560. 	end;
  6561.  
  6562. OnTouch:
  6563. 	if (KielHyreQuest >= 46)
  6564. 		warp "kh_kiehl02",50,7;
  6565. 	else
  6566. 		warp "kh_kiehl01",166,183;
  6567. 	end;
  6568. }
  6569.  
  6570. //----------------------------------------------------------------------------
  6571. // Kiehl's Room; Kiehl_Room_Trap (Entry way trap)
  6572. //----------------------------------------------------------------------------
  6573. kh_kiehl02,49,10,0	script	Kiehl_Room_Trap	-1,5,3,{
  6574. 	end;
  6575.  
  6576. OnTouch:
  6577. 	if (.KHTrapSprung < 1) {
  6578. 		set .KHTrapSprung,1;
  6579. 		set $@KHQuestBusy,1;
  6580. 		initnpctimer;
  6581. 		monster "kh_kiehl02",47,13,"Aliot",1740,1;
  6582. 		monster "kh_kiehl02",45,13,"Alicel",1739,1;
  6583. 		monster "kh_kiehl02",49,13,"Constant",1745,1;
  6584. 		monster "kh_kiehl02",51,13,"Aliot",1740,1;
  6585. 		monster "kh_kiehl02",53,13,"Alicel",1739,1;
  6586. 		monster "kh_kiehl02",49,13,"Constant",1745,1;
  6587. 	}
  6588. 	end;
  6589.  
  6590. OnTimer300000:
  6591. OnTimer600000:
  6592. OnTimer900000:
  6593. 	if (getmapusers("kh_kiehl02") == 0) {
  6594. 		donpcevent "KiehlRoom::OnReset";
  6595. 		stopnpctimer;
  6596. 	}
  6597. 	end;
  6598.  
  6599. OnTimer1200000:
  6600. 	donpcevent "KiehlRoom::OnReset";
  6601. 	stopnpctimer;
  6602. 	end;
  6603.  
  6604. OnGlobalTimerOff:
  6605. 	stopnpctimer;
  6606. 	end;
  6607. }
  6608.  
  6609. //----------------------------------------------------------------------------
  6610. // Kiehl's Room; Kiehl
  6611. // - Timer will drop to 3 minutes once Kiehl is defeated.
  6612. //----------------------------------------------------------------------------
  6613. kh_kiehl02,50,52,4	script	Kiehl#Original	902,{
  6614. 	if (checkweight(908,200) == 0) {
  6615. 		mes "^3355FFJust a second...";
  6616. 		mes "You're carrying too";
  6617. 		mes "many items with you";
  6618. 		mes "right now, so you'll";
  6619. 		mes "need to free up more";
  6620. 		mes "Inventory space first...^000000";
  6621. 		close;
  6622. 	}
  6623. 	cutin "kh_kiel01",2;
  6624. 	if ((KielHyreQuest < 94) || (KielHyreQuest >= 106)) {
  6625. 		mes "[Kiehl]";
  6626. 		mes "......";
  6627. 		mes ".........";
  6628. 		mes "............";
  6629. 		close2;
  6630. 		cutin "",255;
  6631. 		end;
  6632. 	}
  6633. 	if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") < 5)) {
  6634. 		mes "[Kiehl]";
  6635. 		mes "I'm surprised you made";
  6636. 		mes "it this far, adventurer~";
  6637. 		mes "I bid you welcome to my";
  6638. 		mes "humble room. I assume that";
  6639. 		mes "you've come for the Condensed";
  6640. 		mes "Memory Scroll... my mind.";
  6641. 		next;
  6642. 		mes "[Kiehl]";
  6643. 		mes "You can understand";
  6644. 		mes "why I can't let you have it,";
  6645. 		mes "so if you really want the";
  6646. 		mes "Condensed Memory Scroll,";
  6647. 		mes "then show me what you've got!";
  6648. 		close2;
  6649. 		cutin "",255;
  6650. 		set getvariableofnpc(.KHKilled,"KiehlRoom"),0;
  6651. 		monster "kh_kiehl02",50,52,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead";
  6652. 		monster "kh_kiehl02",50,52,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead";
  6653. 		monster "kh_kiehl02",50,52,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead";
  6654. 		monster "kh_kiehl02",50,52,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead";
  6655. 		monster "kh_kiehl02",50,52,"Alicel",1739,1,"KiehlRoom::OnKiehlMobDead";
  6656. 		monster "kh_kiehl02",50,52,"Constant",1745,1,"KiehlRoom::OnKiehlMobDead";
  6657. 		monster "kh_kiehl02",50,52,"Aliot",1740,1,"KiehlRoom::OnKiehlMobDead";
  6658. 		hideonnpc "Kiehl#Original";
  6659. 		end;
  6660. 	}
  6661. 	else if ((KielHyreQuest == 94) && (getvariableofnpc(.KHKilled,"KiehlRoom") >= 5)) {
  6662. 		cutin "kh_kiel03",2;
  6663. 		mes "[Kiehl]";
  6664. 		mes "Hmpf! You're pretty good.";
  6665. 		mes "Father must have spent";
  6666. 		mes "a lot of money to hire";
  6667. 		mes "you. So has he sent";
  6668. 		mes "you to kill me?";
  6669. 		next;
  6670. 		mes "["+strcharinfo(0)+"]";
  6671. 		mes "Kiel Hyre sent me to ask";
  6672. 		mes "you to stop turning all of";
  6673. 		mes "the Third Generation robots";
  6674. 		mes "into killing machines! How";
  6675. 		mes "can do something like that";
  6676. 		mes "to other robots like you?";
  6677. 		next;
  6678. 		cutin "kh_kiel01",2;
  6679. 		mes "[Kiehl]";
  6680. 		mes "Why not? It's said that man";
  6681. 		mes "was made in the image of God.";
  6682. 		mes "Well, robots were made in the";
  6683. 		mes "image of man. You humans kill";
  6684. 		mes "each other as much as you";
  6685. 		mes "like, as far as I can tell.";
  6686. 		next;
  6687. 		mes "[Kiehl]";
  6688. 		mes "It might not be ethical";
  6689. 		mes "for me to provide weapons";
  6690. 		mes "to humans that need them...";
  6691. 		mes "But that's what they are.";
  6692. 		mes "Weapons. It's more humane";
  6693. 		mes "for robots to fight than humans.";
  6694. 		next;
  6695. 		mes "[Kiehl]";
  6696. 		mes "Robots don't naturally";
  6697. 		mes "feel pain or emotions...";
  6698. 		mes "Not unless they're specially";
  6699. 		mes "programmed. Sorry, but I don't";
  6700. 		mes "plans to stop what I'm doing.";
  6701. 		next;
  6702. 		cutin "kh_kiel04",2;
  6703. 		mes "[Kiehl]";
  6704. 		mes "I am sorry, but I don't have a plan to stop what I am doing.";
  6705. 		mes "Aside from that, my father showed me a great example of";
  6706. 		mes "how far a human could go for his own selfinishness by destroying a family.";
  6707. 		mes "And therefore I don't think that he could create better robots than mine.";
  6708. 		next;
  6709. 		mes "["+strcharinfo(0)+"]";
  6710. 		mes "Humankind may not be";
  6711. 		mes "perfect, but think about";
  6712. 		mes "who you're working with!";
  6713. 		mes "Rekenber is the epitome of";
  6714. 		mes "human evil! How can you";
  6715. 		mes "support them like this?";
  6716. 		next;
  6717. 		cutin "kh_kiel02",2;
  6718. 		mes "[Kiehl]";
  6719. 		mes "I've had a long relationship";
  6720. 		mes "with Rekenber. I'm fully aware";
  6721. 		mes "of their capabilities. Do you";
  6722. 		mes "remember the first room you";
  6723. 		mes "passed on your way here, the";
  6724. 		mes "one with all the toys?";
  6725. 		next;
  6726. 		mes "[Kiehl]";
  6727. 		mes "I bet you didn't know that there";
  6728. 		mes "were 5 Second Generation";
  6729. 		mes "robots. Me, and my four other";
  6730. 		mes "brothers and sisters. Father";
  6731. 		mes "built that room so that all";
  6732. 		mes "five of us could live together.";
  6733. 		next;
  6734. 		cutin "kh_kiel03",2;
  6735. 		mes "[Kiehl]";
  6736. 		mes "I was the only one to";
  6737. 		mes "survive. I returned to";
  6738. 		mes "Father and even got a";
  6739. 		mes "name. But yes, I know";
  6740. 		mes "how bad Rekenber really is...";
  6741. 		next;
  6742. 		mes "[Kiehl]";
  6743. 		mes "I don't... I don't want";
  6744. 		mes "to talk about this any more.";
  6745. 		mes "You've made me... Just leave.";
  6746. 		mes "I think I will let you live.";
  6747. 		next;
  6748. 		cutin "",255;
  6749. 		mes "[Mitchell]";
  6750. 		mes "Freeze!";
  6751. 		mes "Kiehl Hyre, you're";
  6752. 		mes "under arrest for creating";
  6753. 		mes "and trading illegal weapons!";
  6754. 		set KielHyreQuest,100;
  6755. 		hideoffnpc "Mitchell#KiehlRoom";
  6756. 		hideoffnpc "Agent#KHAgent1";
  6757. 		hideoffnpc "Agent#KHAgent2";
  6758. 		hideoffnpc "Agent#KHAgent3";
  6759. 		hideoffnpc "Agent#KHAgent4";
  6760. 		next;
  6761. 	}
  6762. 	if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") < 1)) {
  6763. 		set getvariableofnpc(.KHKilledBoss,"KiehlRoom"),0;
  6764. 		cutin "kh_kiel01",2;
  6765. 		mes "[Kiehl]";
  6766. 		mes "Ah, Schwaltzvalt Republic";
  6767. 		mes "agents. Heh. I haven't had";
  6768. 		mes "this many guests before.";
  6769. 		mes "Well, I guess this means";
  6770. 		mes "we'll have to fight after";
  6771. 		mes "all, you and I. *Sigh* Pity.";
  6772. 		next;
  6773. 		mes "[Kiehl]";
  6774. 		mes "First, in all fairness,";
  6775. 		mes "let me take care of these";
  6776. 		mes "nuisances. They're just";
  6777. 		mes "mindlessly doing their";
  6778. 		mes "jobs--sort of like robots-- but";
  6779. 		mes "don't worry, they won't be hurt.";
  6780. 		next;
  6781. 		donpcevent "::OnKHSpiderWeb";
  6782. 		mes "[Mitchell]";
  6783. 		mes "Nooooo!";
  6784. 		next;
  6785. 		cutin "kh_kiel03",2;
  6786. 		mes "[Kiehl]";
  6787. 		mes "And now, you and I can";
  6788. 		mes "have a proper duel, human.";
  6789. 		mes "I'm interested in seeing just";
  6790. 		mes "how strong you really are~";
  6791. 		close2;
  6792. 		cutin "",255;
  6793. 		monster "kh_kiehl02",50,52,"Kiehl",1733,1,"KiehlRoom::OnKiehlDead";
  6794. 		hideonnpc "Kiehl#Original";
  6795. 		end;
  6796. 	}
  6797. 	else if ((KielHyreQuest == 100) && (getvariableofnpc(.KHKilledBoss,"KiehlRoom") == 1)) {
  6798. 		cutin "kh_kiel02",2;
  6799. 		mes "[Kiehl]";
  6800. 		mes "D-damn...!";
  6801. 		mes "Well played, adventurer.";
  6802. 		mes "Well played. I should have";
  6803. 		mes "known that Father would send";
  6804. 		mes "the very best after me. Still,";
  6805. 		mes "you've failed to truly defeat me.";
  6806. 		next;
  6807. 		cutin "kh_kiel03",2;
  6808. 		mes "[Kiehl]";
  6809. 		mes "I still have a few";
  6810. 		mes "trump cards left";
  6811. 		mes "I think... I'll take you";
  6812. 		mes "to hell with me... Well,";
  6813. 		mes "if robots can go there~";
  6814. 		next;
  6815. 		mapannounce "kh_kiehl02","*Jeeeezzzgggg~ Geezzz~ Grrrr~ Clank~*",bc_map,"0xFF0000";
  6816. 		mes "[Mitchell]";
  6817. 		mes "No...! We're locked";
  6818. 		mes "in the room! We're...";
  6819. 		mes "We're trapped in here!";
  6820. 		next;
  6821. 		mes "[Kiehl]";
  6822. 		mes "Yay~ Let's burn";
  6823. 		mes "everything down~";
  6824. 		next;
  6825. 		mes "[Mitchell]";
  6826. 		mes "Quick, "+strcharinfo(0)+",";
  6827. 		mes "use Kiel Hyre's power";
  6828. 		mes "device, the one that's";
  6829. 		mes "supposed to mess with";
  6830. 		mes "Kiehl's power supply!";
  6831. 		mes "Hurry, use it right now!";
  6832. 		next;
  6833. 		mapannounce "kh_kiehl02","*Gzzzz~ Gzzzz~*",bc_map,"0xFF0000";
  6834. 		mes "[Kiehl]";
  6835. 		mes "Wh-what? I c-can't";
  6836. 		mes "move! This day is just";
  6837. 		mes "full of surprises. Oh, well.";
  6838. 		mes "I guess it's time for me to";
  6839. 		mes "use my other trump card.";
  6840. 		next;
  6841. 		mes "[Mitchell]";
  6842. 		mes "What...?";
  6843. 		mes "How many trump";
  6844. 		mes "cards do you have?";
  6845. 		next;
  6846. 		mes "[????]";
  6847. 		mes "I'm so disappointed...";
  6848. 		mes "I can't believe none";
  6849. 		mes "of you thought of this.";
  6850. 		next;
  6851. 		mes "[Mitchell]";
  6852. 		mes "Who are you...?";
  6853. 		mes "Show yourself!";
  6854. 		next;
  6855. 		mes "[????]";
  6856. 		mes "Please.";
  6857. 		mes "Don't insult me.";
  6858. 		mes "You know this voice.";
  6859. 		mes "It's been talking to";
  6860. 		mes "you this entire time~";
  6861. 		next;
  6862. 		mes "[Mitchell]";
  6863. 		mes "Impossible...";
  6864. 		mes "How can there";
  6865. 		mes "be two of you...?!";
  6866. 		next;
  6867. 		hideoffnpc "Kiehl#Copy";
  6868. 		next;
  6869. 		cutin "kh_kiel01",0;
  6870. 		mes "[Kiehl]";
  6871. 		mes "Hahahahaha!";
  6872. 		mes "I'm a robot!";
  6873. 		mes "I can make extra";
  6874. 		mes "bodies, switch brains";
  6875. 		mes "with them. It's awfully";
  6876. 		mes "convenient, let me tell you.";
  6877. 		next;
  6878. 		cutin "kh_kiel03",2;
  6879. 		mes "[Kiehl]";
  6880. 		mes "Anyway, I don't mean to show";
  6881. 		mes "off, but I suppose I better";
  6882. 		mes "reveal to you my final trump";
  6883. 		mes "card. First of all, I know all";
  6884. 		mes "about you, Ms. Mitchell Layla~";
  6885. 		next;
  6886. 		mes "[Mitchell]";
  6887. 		mes "What? How do you";
  6888. 		mes "know my name?";
  6889. 		next;
  6890. 		mes "[Kiehl]";
  6891. 		mes "Well, I have a few";
  6892. 		mes "spies of my own...";
  6893. 		mes "I'll allow him to explain...";
  6894. 		next;
  6895. 		mes "[Masked Man]";
  6896. 		mes "Mitchell...";
  6897. 		mes "I'm sorry that";
  6898. 		mes "you had to get";
  6899. 		mes "involved in all this...";
  6900. 		next;
  6901. 		mes "[Mitchell]";
  6902. 		mes "Wolkeus? Wolkeus Kaiser?!";
  6903. 		mes "You're the spy?! But you risked";
  6904. 		mes "your life to save our president!";
  6905. 		mes "No! Oh, God! How can this be";
  6906. 		mes "happening?! Everything's just...";
  6907. 		mes "This is all crazy! All of it!";
  6908. 		next;
  6909. 		mes "[Wolkeus]";
  6910. 		mes "This is just the result";
  6911. 		mes "of elaborate plans that";
  6912. 		mes "were made years ago. I didn't";
  6913. 		mes "expect you to be this surprised,";
  6914. 		mes "Mitchell. It's the way the game";
  6915. 		mes "is played. You know that.";
  6916. 		next;
  6917. 		mes "[Mitchell]";
  6918. 		mes "Mister President...";
  6919. 		mes "I failed you... I'm sorry...";
  6920. 		next;
  6921. 		mes "[Kiehl]";
  6922. 		mes "Well, Kaiser, she took";
  6923. 		mes "it pretty badly, but at least";
  6924. 		mes "you're being gentlemanly";
  6925. 		mes "about it. Well, I'd like for";
  6926. 		mes "all of us to get better";
  6927. 		mes "acquainted, but...";
  6928. 		next;
  6929. 		cutin "kh_kiel01",2;
  6930. 		mes "[Kiehl]";
  6931. 		mes "We'd better say our";
  6932. 		mes "farewells here. This";
  6933. 		mes "place will be gone in";
  6934. 		mes "five minutes. Ah, and";
  6935. 		mes "Ms. Layla, you're coming";
  6936. 		mes "with us. We have questions~";
  6937. 		next;
  6938. 		mes "[Kiehl]";
  6939. 		mes "I'm curious as to what";
  6940. 		mes "the president's plans are.";
  6941. 		mes "Mister Kaiser, if you'll";
  6942. 		mes "escort Ms. Layla, please...";
  6943. 		next;
  6944. 		mes "[Wolkeus Kaiser]";
  6945. 		mes "...............................";
  6946. 		mes "Sorry, Mitchell.";
  6947. 		mes "I gotta do it.";
  6948. 		next;
  6949. 		mes "[Mitchell]";
  6950. 		mes "No, get away! Let me go!";
  6951. 		mes "Let go of me, Wolkeus!";
  6952. 		hideonnpc "Mitchell#KiehlRoom";
  6953. 		hideonnpc "Agent#KHAgent1";
  6954. 		hideonnpc "Agent#KHAgent2";
  6955. 		hideonnpc "Agent#KHAgent3";
  6956. 		hideonnpc "Agent#KHAgent4";
  6957. 		next;
  6958. 		cutin "kh_kiel02",2;
  6959. 		mes "[Kiehl]";
  6960. 		mes "Great, we're done with";
  6961. 		mes "that ugly business. Now,";
  6962. 		mes "where was I? Ah, right.";
  6963. 		mes "Yes. I'm sorry. We don't";
  6964. 		mes "have any more time to play.";
  6965. 		next;
  6966. 		mes "[Kiehl]";
  6967. 		mes "Here, adventurer.";
  6968. 		mes "I'm aware that my father";
  6969. 		mes "sent you here to get this.";
  6970. 		mes "Consider it my final gift";
  6971. 		mes "to him. I'm surprised he left";
  6972. 		mes "this ring inside me, though...";
  6973. 		next;
  6974. 		cutin "kh_kiel04",2;
  6975. 		mes "[Kiehl]";
  6976. 		mes "I imagine that it must";
  6977. 		mes "be precious to him. But";
  6978. 		mes "I wonder why he placed";
  6979. 		mes "it inside me? Well, anyway,";
  6980. 		mes "I have a message I'd like";
  6981. 		mes "for you to deliver to him.";
  6982. 		next;
  6983. 		cutin "kh_kiel01",2;
  6984. 		mes "[Kiehl]";
  6985. 		mes "First... I guess we";
  6986. 		mes "should get rid of this";
  6987. 		mes "old thing. It was a good";
  6988. 		mes "body, and it's served me";
  6989. 		mes "well for 23 years. I'll miss";
  6990. 		mes "it. Rest well, old Kiehl.";
  6991. 		next;
  6992. 		specialeffect EF_DEVIL;
  6993. 		next;
  6994. 		mes "[Kiehl]";
  6995. 		mes "Now, this was the body";
  6996. 		mes "that my father made.";
  6997. 		mes "Please tell him that";
  6998. 		mes "this means that we're";
  6999. 		mes "no longer related to";
  7000. 		mes "each other at all.";
  7001. 		next;
  7002. 		mes "[Kiehl]";
  7003. 		mes "The body I'm using right now?";
  7004. 		mes "I made it myself with the most";
  7005. 		mes "advanced technology. Consider";
  7006. 		mes "it... a Fourth Generation robot";
  7007. 		mes "body if you will. Father will";
  7008. 		mes "understand what I mean.";
  7009. 		next;
  7010. 		mes "[Kiehl]";
  7011. 		mes "Anyway, please tell him";
  7012. 		mes "that, and get his old ring";
  7013. 		mes "out of my old robot body,";
  7014. 		mes "and then give it to him. For";
  7015. 		mes "now, let's get out of here: we";
  7016. 		mes "just have 3 minutes to evacuate.";
  7017. 		next;
  7018. 		mes "[Kiehl]";
  7019. 		mes "You're a worthy opponent,";
  7020. 		mes "and a human I respect.";
  7021. 		mes "I don't know if we'll meet";
  7022. 		mes "again, but who knows?";
  7023. 		mes "Anyway, I'll open up the";
  7024. 		mes "exit for you. Farewell~";
  7025. 		delitem 7504,1; //Toy_Motor
  7026. 		set KielHyreQuest,104;
  7027. 		hideonnpc "Kiehl#Copy";
  7028. 		donpcevent "Kiehl_Room_Exit::OnEnable";
  7029. 		enablenpc "Kiehl_Room_Exit";
  7030. 		initnpctimer;
  7031. 		cutin "",255;
  7032. 		close;
  7033. 	}
  7034. 	if (KielHyreQuest == 104) {
  7035. 		cutin "kh_kiel02",2;
  7036. 		mes "^3355FFYou retrieve the";
  7037. 		mes "ring from the heart of";
  7038. 		mes "Kiehl's old robotic body.^000000";
  7039. 		getitem 7508,1; //Elysia_Ring
  7040. 		set KielHyreQuest,106;
  7041. 		close2;
  7042. 		cutin "",255;
  7043. 		end;
  7044. 	}
  7045. 	else{
  7046. 		cutin "kh_kiel02",2;
  7047. 		mes "^3355FFKiehl's old";
  7048. 		mes "robotic body";
  7049. 		mes "stands alone,";
  7050. 		mes "lifeless and silent.^000000";
  7051. 		close2;
  7052. 		cutin "",255;
  7053. 		end;
  7054. 	}
  7055.  
  7056.  
  7057. OnTimer180000:
  7058. 	stopnpctimer;
  7059. 	mapannounce "kh_kiehl02","Beeeeeeeeeeeeep~",bc_npc,0xFF0000;
  7060. 	donpcevent "KiehlRoom::OnReset";
  7061. 	end;
  7062.  
  7063. OnTimer179000:
  7064. 	mapannounce "kh_kiehl02","1 second remaining until detonation",bc_npc,0xFF0000;
  7065. 	end;
  7066.  
  7067. OnTimer178000:
  7068. 	mapannounce "kh_kiehl02","2 seconds remaining until detonation",bc_npc,0xFF0000;
  7069. 	end;
  7070.  
  7071. OnTimer177000:
  7072. 	mapannounce "kh_kiehl02","3 seconds remaining until detonation",bc_npc,0xFF0000;
  7073. 	end;
  7074.  
  7075. OnTimer176000:
  7076. 	mapannounce "kh_kiehl02","4 seconds remaining until detonation",bc_npc,0xFF0000;
  7077. 	end;
  7078.  
  7079. OnTimer175000:
  7080. 	mapannounce "kh_kiehl02","5 seconds remaining until detonation",bc_npc,0xFF0000;
  7081. 	end;
  7082.  
  7083. OnTimer170000:
  7084. 	mapannounce "kh_kiehl02","10 seconds remaining until detonation",bc_npc,0xFF0000;
  7085. 	end;
  7086.  
  7087. OnTimer160000:
  7088. 	mapannounce "kh_kiehl02","20 seconds remaining until detonation",bc_npc,0xFF0000;
  7089. 	end;
  7090.  
  7091. OnTimer150000:
  7092. 	mapannounce "kh_kiehl02","30 seconds remaining until detonation",bc_npc,0xFF0000;
  7093. 	end;
  7094.  
  7095. OnTimer120000:
  7096. 	mapannounce "kh_kiehl02","1 minute remaining until detonation.",bc_npc,0xFF0000;
  7097. 	end;
  7098.  
  7099. OnTimer60000:
  7100. 	mapannounce "kh_kiehl02","2 minutes remaining until detonation.",bc_npc,0xFF0000;
  7101. 	end;
  7102.  
  7103. OnTimer1000:
  7104. 	mapannounce "kh_kiehl02","3 minutes remaining until detonation.",bc_npc,0xFF0000;
  7105. 	end;
  7106. }
  7107.  
  7108. //----------------------------------------------------------------------------
  7109. // Kiehl's Room; NPC for mob control, timers, and other junk.
  7110. //----------------------------------------------------------------------------
  7111. kh_kiehl02,1,1,0	script	KiehlRoom	-1,{
  7112. 	end;
  7113.  
  7114. OnKiehlMobDead:
  7115. 	set .KHKilled,.KHKilled+1;
  7116. 	if (.KHKilled == 5) { 
  7117. 		hideoffnpc "Kiehl#Original"; 
  7118. 	}
  7119. 	end;
  7120.  
  7121. OnKiehlDead:
  7122. 	set .KHKilledBoss,1;
  7123. 	hideoffnpc "Kiehl#Original";
  7124. 	end;
  7125.  
  7126. OnReset:
  7127. 	donpcevent "Kiehl_Room_Trap::OnGlobalTimerOff";
  7128. 	if (getmapusers("kh_kiehl02") > 0)
  7129. 		mapwarp "kh_kiehl02","lighthalzen",192,200;
  7130. 	killmonsterall "kh_kiehl02";
  7131. 	disablenpc "Kiehl_Room_Exit";
  7132. 	hideonnpc "Mitchell#KiehlRoom";
  7133. 	hideonnpc "Agent#KHAgent1";
  7134. 	hideonnpc "Agent#KHAgent2";
  7135. 	hideonnpc "Agent#KHAgent3";
  7136. 	hideonnpc "Agent#KHAgent4";
  7137. 	hideonnpc "Kiehl#Copy";
  7138. 	hideoffnpc "Kiehl#Original"; 
  7139. 	set .KHKilledBoss,0;
  7140. 	set .KHKilled,0;
  7141. 	set getvariableofnpc(.KHTrapSprung,"Kiehl_Room_Trap"),0;
  7142. 	set $@KHQuestBusy,0;
  7143. 	end;
  7144. }
  7145.  
  7146. //----------------------------------------------------------------------------
  7147. // Kiehl's Room; Mitchell and Agents. (Floating NPC + Duplicates)
  7148. //----------------------------------------------------------------------------
  7149. kh_kiehl02,49,55,6	script	Mitchell#KiehlRoom	727,{
  7150. 	end;
  7151. OnInit:
  7152. 	hideonnpc "Mitchell#KiehlRoom";
  7153. 	end;
  7154.  
  7155. OnKHSpiderWeb:
  7156. 	misceffect 404;
  7157. 	end;
  7158. }
  7159.  
  7160. kh_kiehl02,53,52,4	script	Agent#KHAgent1	880,{
  7161. 	end;
  7162. OnInit:
  7163. 	hideonnpc "Agent#KHAgent1";
  7164. 	end;
  7165.  
  7166. OnKHSpiderWeb:
  7167. 	misceffect 404;
  7168. 	end;
  7169. }
  7170.  
  7171. kh_kiehl02,51,49,1	script	Agent#KHAgent2	880,{
  7172. 	end;
  7173. OnInit:
  7174. 	hideonnpc "Agent#KHAgent2";
  7175. 	end;
  7176.  
  7177. OnKHSpiderWeb:
  7178. 	misceffect 404;
  7179. 	end;
  7180. }
  7181.  
  7182. kh_kiehl02,47,50,0	script	Agent#KHAgent3	880,{
  7183. 	end;
  7184. OnInit:
  7185. 	hideonnpc "Agent#KHAgent3";
  7186. 	end;
  7187.  
  7188. OnKHSpiderWeb:
  7189. 	misceffect 404;
  7190. 	end;
  7191. }
  7192.  
  7193. kh_kiehl02,46,53,6	script	Agent#KHAgent4	880,{
  7194. 	end;
  7195. OnInit:
  7196. 	hideonnpc "Agent#KHAgent4";
  7197. 	end;
  7198.  
  7199. OnKHSpiderWeb:
  7200. 	misceffect 404;
  7201. 	end;
  7202. }
  7203.  
  7204.  
  7205. //----------------------------------------------------------------------------
  7206. // Kiehl's Room; Copy of Kiehl.
  7207. //----------------------------------------------------------------------------
  7208. kh_kiehl02,48,53,6	script	Kiehl#Copy	902,{
  7209. 	end;
  7210.  
  7211. OnInit:
  7212. 	hideonnpc "Kiehl#Copy";
  7213. 	end;
  7214. }
  7215.  
  7216. //----------------------------------------------------------------------------
  7217. // Kiehl's Room; Kiehl_Room_Exit
  7218. //----------------------------------------------------------------------------
  7219. kh_kiehl02,50,59,0	script	Kiehl_Room_Exit	45,1,1,{
  7220. OnTouch:
  7221. 	if (getmapusers("kh_kiehl02") < 1)
  7222. 		donpcevent "KiehlRoom::OnReset";
  7223. 	warp "lighthalzen",193,202;
  7224. 	end;
  7225.  
  7226. OnEnable:
  7227. 	misceffect 215;
  7228. 	end;
  7229.  
  7230. OnInit:
  7231. 	disablenpc "Kiehl_Room_Exit";
  7232. 	end;
  7233. }
  7234.  
  7235. //============================================================================
Viewed 1446 times, submitted by Guest.