homun_s.txt 42 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363
  1. //===== rAthena Script =======================================
  2. //= Homunculus S Mutation Quest
  3. //===== By: ==================================================
  4. //= Euphy
  5. //===== Current Version: =====================================
  6. //= 1.2
  7. //===== Compatible With: =====================================
  8. //= rAthena Project
  9. //===== Description: =========================================
  10. //= [Official Conversion]
  11. //= Genetic quest to mutate a level 99 evolved Homunculus
  12. //= into a Homunculus S.
  13. //===== Additional Comments: =================================
  14. //= 1.0 First Version, entirely custom. [Masao]
  15. //= 1.1 Cleaning. [Euphy]
  16. //= 1.2 Replaced with official script. [Euphy]
  17. //============================================================
  18. // Main NPCs :: Homun_S
  19. //============================================================
  20. job3_gen01,12,44,3 script Viorel#job3_gen01 542,{
  21. if (countitem(6415)) {
  22. if (Class == Job_Genetic || Class == Job_Genetic_T || Class == Job_Baby_Genetic) {
  23. disable_items;
  24. if (checkquest(4159) == -1 && checkquest(4160) == -1) {
  25. mes "[Viorel]";
  26. mes "Why are you here?";
  27. mes "Shouldn't you be at ^005DFFJeyna^000000's house?";
  28. close2;
  29. for(set .@i,4154; .@i<=4160; set .@i,.@i+1) {
  30. if (checkquest(.@i) > -1)
  31. erasequest .@i;
  32. }
  33. setquest 4154;
  34. setquest 4159;
  35. morphembryo;
  36. if (countitem(6415) == 0)
  37. getitem 6415,1; //Strange_Embryo
  38. else if (countitem(6415) > 1)
  39. delitem 6415, (countitem(6415) - 1); //Strange_Embryo
  40. warp "que_house_s",63,41;
  41. end;
  42. }
  43. enable_items;
  44. } else if (Class == Job_Novice_High || Class == Job_Merchant_High || Class == Job_Alchemist || Class == Job_Creator) {
  45. emotion ET_QUESTION;
  46. mes "[Viorel]";
  47. mes "I don't know what's going on, but the way I remember it you were supposed to be qualified to research ^FF4800Homunculus^000000.";
  48. next;
  49. mes "[Viorel]";
  50. mes "Whatever the reason, you're not able to continue the research on ^FF4800Homunculus^000000.";
  51. mes "Come back after you become a ^005DFFGenetic^000000 and have obtained a ^0000FFBioethics^000000.";
  52. close;
  53. } else {
  54. delitem 6415, countitem(6415); //Strange_Embryo
  55. mes "[Viorel]";
  56. mes "Wait, that embryo you have seems a little strange.";
  57. next;
  58. mes "[Viorel]";
  59. mes "Unless you have a job researching ^FF4800Homunculus^000000....";
  60. mes "It will be of no help to you what so ever.";
  61. next;
  62. mes "[Viorel]";
  63. mes "I'm in charge of managing ^0000FFStrange Embryo^000000 so I'll take care of that for you.";
  64. mes "No offense, and I'm not doing anything bad here.";
  65. close;
  66. }
  67. }
  68. if ((Class == Job_Genetic || Class == Job_Genetic_T || Class == Job_Baby_Genetic) && (checkquest(4154) > -1)) {
  69. if ((checkquest(4155) > -1) || (checkquest(4160) > -1)) {
  70. mes "[Viorel]";
  71. mes "Weather's great.";
  72. next;
  73. callsub L_CheckHomunculus;
  74. mes "[Viorel]";
  75. mes "Ready to go to my house?";
  76. next;
  77. switch(select("Go to ^005DFFViorel^000000's house.:Don't go.")) {
  78. case 1:
  79. mes "[Viorel]";
  80. mes "Good choice.";
  81. mes "Now, close your eyes for a second...";
  82. close2;
  83. warp "que_house_s",19,42;
  84. end;
  85. case 2:
  86. mes "[Viorel]";
  87. mes "Come back when you're ready.";
  88. mes "You must come with the ^FF4800Homunculus^000000.";
  89. close;
  90. }
  91. } else {
  92. mes "[Viorel]";
  93. mes "Why are you here?";
  94. mes "Shouldn't you be at ^005DFFJeyna^000000's house?";
  95. next;
  96. callsub L_CheckHomunculus;
  97. mes "[Viorel]";
  98. mes "Now, ready to go to ^005DFFJeyna^000000?";
  99. next;
  100. switch(select("Go to ^005DFFJeyna^000000's room.:Don't go.")) {
  101. case 1:
  102. mes "[Viorel]";
  103. mes "Good choice.";
  104. mes "Now, close your eyes for a second...";
  105. close2;
  106. warp "que_house_s",63,41;
  107. end;
  108. case 2:
  109. mes "[Viorel]";
  110. mes "Come back when you're ready.";
  111. mes "You must come with the ^FF4800Homunculus^000000.";
  112. close;
  113. }
  114. }
  115. }
  116. if (BaseJob == Job_Merchant) {
  117. mes "[Viorel]";
  118. mes "I used to be a merchant once, just like you.";
  119. mes "I'm researching on ^FF4800Homunculus^000000.";
  120. next;
  121. mes "[Viorel]";
  122. mes "If you're interested in ^FF4800Homunculus^000000, become an ^005DFFAlchemist^000000 or a ^005DFFCreator^000000.";
  123. close;
  124. } else if (BaseJob == Job_Alchemist && Class < Job_Genetic) {
  125. mes "[Viorel]";
  126. mes "I've spent lots of time and energy on Homunculus.";
  127. mes "If you feel like you're at a dead end, come back next time with a ^FF4800Homunculus^000000.";
  128. next;
  129. mes "[Viorel]";
  130. mes "Oh. Of course you need to have the suitable potentials. You could probably prove yourself once you become a ^FF4800Genetic^000000.";
  131. close;
  132. } else if (Class == Job_Genetic || Class == Job_Genetic_T || Class == Job_Baby_Genetic) {
  133. if (gethominfo(6) >= 99 && (gethominfo(1) >= 6009 && gethominfo(1) <= 6016)) { // Level 99+ evolved Homunculus
  134. mes "[Viorel]";
  135. mes "Oh, great~!";
  136. mes "You have a ^FF4800Homunculus^000000.";
  137. mes "With passion invested in its research we can make them better.";
  138. next;
  139. mes "[Viorel]";
  140. mes "I must speak to you in private. Would you mind going to my house with me?";
  141. next;
  142. switch(select("Go to ^005DFFViorel^000000's home.:Stay here.")) {
  143. case 1:
  144. mes "[Viorel]";
  145. mes "Good choice.";
  146. mes "Now, close your eyes for a second...";
  147. close2;
  148. setquest 4154;
  149. setquest 4155;
  150. warp "que_house_s",19,42;
  151. end;
  152. case 2:
  153. mes "[Viorel]";
  154. mes "If you feel like you're at a dead end, come back next time with a ^FF4800Homunculus^000000.";
  155. close;
  156. }
  157. } else if (gethominfo(6) >= 99 && (gethominfo(1) >= 6048 && gethominfo(1) <= 6052)) { // Level 99+ mutated Homunculus-S
  158. mes "[Viorel]";
  159. mes "Hello again.";
  160. mes "Perhaps you may be interested";
  161. mes "in the newly created ^FF4800Homunculus^000000,";
  162. mes "born from the new ^006400Homunculus Mutation System^000000?";
  163. next;
  164. switch(select("Nope. Good bye.:Please, I'm busy.:That's exactly what I wanted to hear.:Why are you always standing there?")) {
  165. case 1:
  166. emotion ET_SMILE;
  167. mes "[Viorel]";
  168. mes "Okay.";
  169. mes "Good seeing you.";
  170. mes "Good bye then~!";
  171. close;
  172. case 2:
  173. emotion ET_HUK;
  174. mes "[Viorel]";
  175. mes "!!!!";
  176. mes "I... I see.";
  177. mes "I thought you were here to see me.";
  178. close;
  179. case 3:
  180. emotion ET_AHA;
  181. mes "[Viorel]";
  182. mes "Just as I thought.";
  183. mes "Let's have a look at the notes my dear friend Jeyna left.";
  184. next;
  185. playbgm "30.mp3"; // One Step Closer
  186. callfunc "F_HomMutateInfo","[Memo Pad Notes]";
  187. mes "[Viorel]";
  188. mes "Hmm.";
  189. mes "Well, that's all there is to it.";
  190. mes "It's up to you to find out more.";
  191. close2;
  192. playbgm "08.mp3"; // Theme of Prontera
  193. end;
  194. case 4:
  195. emotion ET_SWEAT;
  196. mes "[Viorel]";
  197. mes "No, I do not stand here every day.";
  198. mes "But why do YOU stand there every day?";
  199. next;
  200. mes "[Viorel]";
  201. mes "What?";
  202. mes "No, the way I see it";
  203. mes "you seem to be here every time I'm here.";
  204. close;
  205. }
  206. } else {
  207. if (gethominfo(1) >= 6009) { // Evolved Homunculus
  208. mes "[Viorel]";
  209. mes "Hmm, you seem to have a special bond with your ^FF4800Homunculus^000000.";
  210. next;
  211. mes "[Viorel]";
  212. mes "Come back to me when that ^FF4800Homunculus^000000 reaches ^0000FFlevel 99^000000.";
  213. close;
  214. } else {
  215. mes "[Viorel]";
  216. mes "You do not yet possess an evolved ^FF4800Homunculus^000000...";
  217. mes "As you may well know about evolution:";
  218. next;
  219. mes "[Viorel]";
  220. mes "Using the ^0000FFStone of Sage^000000 when intimacy level is above ^006400Intimate^000000, the ^FF4800Homunculus^000000 goes through ^006400Evolution^000000.";
  221. close;
  222. }
  223. }
  224. }
  225. mes "[Viorel]";
  226. mes "^FF4800Homunculus^000000 research requires a lot of time and funding.";
  227. mes "However, I believe passion is the most important factor.";
  228. next;
  229. switch(select("End conversation.:What are you talking about?:Why are you always standing there?")) {
  230. case 1:
  231. mes "[Viorel]";
  232. mes "So long~!";
  233. close;
  234. case 2:
  235. mes "[Viorel]";
  236. mes "You see, ^006400Alchemists^000000 have an inquisitive nature.";
  237. mes "People like me, especially, even think of creating life itself.";
  238. next;
  239. mes "[Viorel]";
  240. mes "You'd have to research ^FF4800Homunculus^000000 to understand.";
  241. mes "Now, if you'll excuse me~!";
  242. close;
  243. case 3:
  244. emotion ET_SWEAT;
  245. mes "[Viorel]";
  246. mes "What, is it so strange to see an Alchemist in their own lab?";
  247. mes "How so?";
  248. close;
  249. }
  250. end;
  251. L_CheckHomunculus:
  252. if (gethominfo(6) < 99 || (gethominfo(1) < 6009 || gethominfo(1) > 6016)) { // Not level 99+ evolved Homunculus
  253. mes "[Viorel]";
  254. mes "Huh?";
  255. mes "Where's the ^FF4800Homunculus^000000 you used to have?";
  256. mes "Perhaps I've mistaken it for something else...";
  257. next;
  258. mes "[Viorel]";
  259. mes ".......";
  260. mes " ";
  261. mes "(Seems to be thinking about something.)";
  262. next;
  263. emotion ET_SMILE;
  264. mes "[Viorel]";
  265. mes "Ha ha~";
  266. mes "I think I've mistaken you for someone else.";
  267. mes "If you'll excuse me.";
  268. close;
  269. }
  270. return;
  271. }
  272. que_house_s,24,47,3 script Viorel#homun_s 542,{
  273. if (checkquest(4155) > -1) {
  274. emotion ET_HUM;
  275. mes "[Viorel]";
  276. mes "Good.";
  277. mes "I see that you mean business.";
  278. next;
  279. playbgm "33.mp3"; // Yuna Song
  280. mes "[Viorel]";
  281. mes "Maybe you'll agree.";
  282. mes "Currently, your ^FF4800Homunculus^000000 is not in its perfect state.";
  283. next;
  284. mes "[Viorel]";
  285. mes "These days, studies on the growth of the ^FF4800Homunculus^000000 are actively taking place.";
  286. mes "But, I do believe that I have found something special.";
  287. next;
  288. mes "[Viorel]";
  289. mes "In order to break the current limitations of the ^FF4800Homunculus^000000, mutations need to happen.";
  290. next;
  291. switch(select("Like, biological experiments...?!:Well, yeah, naturally.:I don't want to hurt my Homunculus!")) {
  292. case 1:
  293. emotion ET_PROFUSELY_SWEAT;
  294. mes "[Viorel]";
  295. mes "Don't look so surprised.";
  296. mes "Ethics in biology are kind of blurry right now, right?";
  297. mes "I mean...";
  298. next;
  299. mes "[Viorel]";
  300. mes "It's my duty to study the true potential of the ^FF4800Homunculus^000000.";
  301. next;
  302. mes "[Viorel]";
  303. mes "So far, Homunculus haven't demonstrated their full potential, but I know that I am close to a breakthrough.";
  304. next;
  305. break;
  306. case 2:
  307. emotion ET_OHNO;
  308. mes "[Viorel]";
  309. mes "Yes.";
  310. mes "I'm glad you're not upset.";
  311. mes "Mutation,";
  312. mes "a word that sparks evil in the minds of the ordinary,";
  313. mes "which made my research very difficult to proceed with.";
  314. next;
  315. mes "[Viorel]";
  316. mes "Do you remember?";
  317. mes "^005DFFKellasus^000000 of ^8B4513Lighthalzen^000000, the pioneer of ^FF4800Homunculus^000000 research.";
  318. next;
  319. mes "[Viorel]";
  320. mes "I believe that this research fulfills the promise made with ^005DFFKellasus^000000, the giver of knowledge and belief.";
  321. next;
  322. break;
  323. case 3:
  324. emotion ET_SWEAT;
  325. mes "[Viorel]";
  326. mes "I understand your concern.";
  327. mes "But I want to assure you that this Mutation does not harm or hurt your ^FF4800Homunculus^000000.";
  328. next;
  329. mes "[Viorel]";
  330. mes "On the contrary, the ^FF4800Homunculus^000000 of today are in pain from imperfection, unable to live up to their supposed potentials.";
  331. mes "Moreover, those ^FF4800Homunculus^000000 were often abandoned.";
  332. next;
  333. mes "[Viorel]";
  334. mes "Don't get me wrong, I study the ^FF4800Homunculus^000000 because I love them.";
  335. next;
  336. break;
  337. }
  338. mes "[Viorel]";
  339. mes "Well, by the way...";
  340. mes "I have found this new mutation to be quite stable.";
  341. next;
  342. mes "[Viorel]";
  343. mes "^006400The technology exists,";
  344. mes "and they will likely have new";
  345. mes "skills when mutated...^000000";
  346. next;
  347. mes "[Viorel]";
  348. mes "The minor side effect...";
  349. mes "^006400Their appearance will change^000000.";
  350. mes "But I think you'll find that pretty satisfying.";
  351. next;
  352. mes "[Viorel]";
  353. mes "I quote from ^005DFFKassibian^000000, an expert in ^FF4800Homunculus^000000 techniques,";
  354. mes "^006400The truth is not in a single form~!^000000";
  355. mes "Ha ha.";
  356. next;
  357. emotion ET_SPARK;
  358. mes "[Viorel]";
  359. mes "I know it's a little abrupt, but...";
  360. mes "How about changing your ^FF4800Homunculus^000000 into something incredible with my marvelous achievement, the ^006400Homunculus Mutation System^000000?";
  361. next;
  362. switch(select("Explore the ^006400Homunculus Mutation System^000000.:Cancel.")) {
  363. case 1:
  364. emotion ET_BEST;
  365. mes "[Viorel]";
  366. mes "Good choice.";
  367. mes "Success lurks outside the box of conventional thinking, right?";
  368. next;
  369. mes "[Viorel]";
  370. mes "The first person to help with the research is ^005DFFJeyna^000000.";
  371. mes "I'll send you to ^005DFFJeyna^000000.";
  372. mes "There, you'll learn more about the new ^0000FFHomunculus^000000.";
  373. close2;
  374. setquest 4156;
  375. erasequest 4155;
  376. warp "que_house_s",63,41;
  377. end;
  378. case 2:
  379. emotion ET_THINK;
  380. mes "[Viorel]";
  381. mes "I don't see why you hesitate.";
  382. mes "I am not trying to deceive you.";
  383. mes "Maybe you need some time to think about it?";
  384. next;
  385. switch(select("Think about it.:I'm just going to walk away.")) {
  386. case 1:
  387. mes "[Viorel]";
  388. mes "We'll talk in a bit then.";
  389. close;
  390. case 2:
  391. emotion ET_OTL;
  392. mes "[Viorel]";
  393. mes "Shame.";
  394. mes "However, I respect your opinion.";
  395. mes "I'll send you back to the ^8B4513Laboratory^000000.";
  396. close2;
  397. erasequest 4154;
  398. erasequest 4155;
  399. warp "job3_gen01",12,47;
  400. end;
  401. }
  402. }
  403. } else if (checkquest(4160) > -1) {
  404. playbgm "33.mp3"; // Yuna Song
  405. mes "[Viorel]";
  406. mes "The ^FF4800Homunculus^000000 I saw before has returned to its ^0000FFembryo^000000 state.";
  407. mes "A little strange, but...";
  408. mes "You don't have to worry about it.";
  409. next;
  410. mes "[Viorel]";
  411. mes "By the way...";
  412. mes "I forgot to tell you something.";
  413. mes "In order to stabilize the Mutation process, I need some materials first.";
  414. next;
  415. mes "[Viorel]";
  416. mes "Fortunately, you don't have to find them yourself because I have them here already..";
  417. mes "But, I'll need ^FF000050,000 zeny^000000, you know, as a service fee.";
  418. next;
  419. mes "[Viorel]";
  420. mes "I wish that I could do it for free but I'm not exactly made of money, you know.";
  421. mes "That and I lack any investors to support my research at the moment.";
  422. next;
  423. mes "[Viorel]";
  424. mes "In fact, if I had enough zeny to continue my research, then I could solve a lot of my problems...";
  425. next;
  426. mes "[Viorel]";
  427. mes "Anyways, you can try to do this with or without the stabilization process. It's all up to you.";
  428. next;
  429. mes "[Viorel]";
  430. mes "If you choose the unstable";
  431. mes "mutation, I can't guarentee what kind of Homunculus you're going to get.";
  432. mes "Anyways, it's up to you.";
  433. next;
  434. switch(select("Mutation stabilization (50,000 zeny):Unstable mutation")) {
  435. case 1:
  436. if (Zeny < 50000) {
  437. mes "[Viorel]";
  438. mes "I don't think you have ^FF000050 thousand Zeny^000000 with you right now.";
  439. mes "Please bring enough Zeny.";
  440. mes "I'll be waiting.";
  441. mes "Want me to send you back to the ^8B4513Laboratory^000000?";
  442. next;
  443. switch(select("No thanks.:Yes. Send me back to the Lab.")) {
  444. case 1:
  445. mes "[Viorel]";
  446. mes "Alright.";
  447. mes "I'll see you in a bit.";
  448. close;
  449. case 2:
  450. mes "[Viorel]";
  451. mes "Alright.";
  452. mes "I'll be waiting at the ^8B4513Laboratory^000000.";
  453. close2;
  454. warp "job3_gen01",12,47;
  455. end;
  456. }
  457. }
  458. emotion ET_BEST;
  459. playbgm "19.mp3"; // Under the Ground
  460. mes "[Viorel]";
  461. mes "Good choice.";
  462. mes "Choose from the different types of ^0000FFHomunculus^000000.";
  463. next;
  464. switch(select("Eira:Sera:Dieter:Bayeri:Eleanor")) {
  465. case 1:
  466. cutin "Mer_Eira_Card",3;
  467. set .@Homunculus,6048; //MER_EIRA
  468. break;
  469. case 2:
  470. cutin "Mer_Sera_Card",3;
  471. set .@Homunculus,6050; //MER_SERA
  472. break;
  473. case 3:
  474. cutin "Mer_Dieter_Card",3;
  475. set .@Homunculus,6051; //MER_DIETER
  476. break;
  477. case 4:
  478. cutin "Mer_Bayeri_Card",3;
  479. set .@Homunculus,6049; //MER_BAYERI
  480. break;
  481. case 5:
  482. cutin "Mer_Eleanor_Card",3;
  483. set .@Homunculus,6052; //MER_ELEANOR
  484. break;
  485. }
  486. mes "[Viorel]";
  487. mes "Are you sure?";
  488. next;
  489. if(select("Yes.:No.") == 2) {
  490. cutin "",255;
  491. playbgm "33.mp3"; // Yuna Song
  492. mes "[Viorel]";
  493. mes "I see.";
  494. mes "Give it more time to think.";
  495. close;
  496. }
  497. cutin "",255;
  498. mes "[Viorel]";
  499. mes "Excellent!";
  500. mes "Let's get on with it.";
  501. next;
  502. specialeffect2 EF_BASH;
  503. mes "[Viorel]";
  504. mes "Now focus~!";
  505. mes "You... need...";
  506. mes "... concentration.";
  507. next;
  508. specialeffect2 EF_PROVIDENCE;
  509. mes "[Viorel]";
  510. mes "Good. Almost done!";
  511. next;
  512. specialeffect2 EF_SUI_EXPLOSION;
  513. set Zeny, Zeny - 50000;
  514. hommutate .@Homunculus;
  515. break;
  516. case 2:
  517. emotion ET_SCRATCH;
  518. mes "[Viorel]";
  519. mes "So, your choice is the Unstable Mutation Process.";
  520. mes "You believe in destiny?";
  521. mes "Seriously...";
  522. mes "Do you really wish to proceed";
  523. mes "with the process of random outcome?";
  524. next;
  525. if(select("Go ahead. (Random Mutation):Cancel.") == 2) {
  526. playbgm "33.mp3"; // Yuna Song
  527. mes "[Viorel]";
  528. mes "I see.";
  529. mes "Give it more time to think.";
  530. close;
  531. }
  532. emotion ET_THINK;
  533. mes "[Viorel]";
  534. mes "Hmm...";
  535. mes "The exploration of knowledge";
  536. mes "is full of surprises.";
  537. mes ".......";
  538. next;
  539. emotion ET_SMILE;
  540. mes "[Viorel]";
  541. mes "Ha ha.";
  542. mes "Hey, I feel like a Blacksmith!";
  543. mes "Now let's get on with it.";
  544. next;
  545. specialeffect2 EF_BASH;
  546. mes "[Viorel]";
  547. mes "Now focus~!";
  548. mes "You... need...";
  549. mes "... concentration.";
  550. next;
  551. specialeffect2 EF_PRESSURE;
  552. mes "[Viorel]";
  553. mes "Concentrate a little more!";
  554. next;
  555. specialeffect2 EF_PROVIDENCE;
  556. mes "[Viorel]";
  557. mes "Good. Almost done!";
  558. next;
  559. specialeffect2 EF_SUI_EXPLOSION;
  560. hommutate;
  561. break;
  562. }
  563. erasequest 4160;
  564. erasequest 4154;
  565. emotion ET_DELIGHT;
  566. playbgm "64.mp3"; // One Fine Day
  567. mes "[Viorel]";
  568. mes "Okay, Mutation Complete.";
  569. mes "Phew... Didn't skip a heartbeat, did you?";
  570. next;
  571. mes "[Viorel]";
  572. mes "Remember what ^005DFFKellasus^000000 said?";
  573. mes "To the doorstep of the truth...";
  574. mes "We must see for ourselves";
  575. mes "the path that leads to it.";
  576. next;
  577. mes "[Viorel]";
  578. mes "^0000FF" + strcharinfo(0) + "^000000,";
  579. mes "I haven't known you";
  580. mes "for a very long time,";
  581. mes "but I get the feeling that";
  582. mes "you'll achieve great things.";
  583. next;
  584. mes "[Viorel]";
  585. mes "Good luck on you adventures.";
  586. mes "I hope that your new ^FF4800Homunculus^000000 will excel under your care.";
  587. next;
  588. mes "[Viorel]";
  589. mes "And don't you forget.";
  590. mes "Our research";
  591. mes "has only just begun~!";
  592. close;
  593. } else {
  594. for(set .@i,4154; .@i<=4160; set .@i,.@i+1) {
  595. if (checkquest(.@i) > -1)
  596. erasequest .@i;
  597. }
  598. mes "[Viorel]";
  599. mes "Now that all the work is done, I ask you to take your leave.";
  600. mes "I need to recuperate.";
  601. close2;
  602. warp "job3_gen01",12,47;
  603. end;
  604. }
  605. }
  606. que_house_s,80,42,3 script Jeyna#homun_s 558,{
  607. if (checkquest(4156) > -1) {
  608. playbgm "28.mp3"; // You're in Ruins
  609. emotion ET_SURPRISE;
  610. mes "[Jeyna]";
  611. mes "Welcome.";
  612. mes "I just got word from ^005DFFViorel^000000 that you were coming.";
  613. next;
  614. emotion ET_SCRATCH;
  615. mes "[Jeyna]";
  616. mes "By the way...";
  617. mes "Did he convince you to do something...?";
  618. mes "He does have a way with words.";
  619. next;
  620. mes "[Jeyna]";
  621. mes "He needs them because Alchemists are such awkward people.";
  622. emotion ET_OHNO;
  623. next;
  624. mes "[Jeyna]";
  625. mes "Anyways~";
  626. mes "^0000FF"+strcharinfo(0)+"^000000 and ^005DFFViorel^000000 seem like two peas in a pod.";
  627. next;
  628. emotion ET_SMILE;
  629. mes "[Jeyna]";
  630. mes "Hahaha~ No offense.";
  631. mes "I think it's a good thing.";
  632. mes "Oh, yes.";
  633. mes "You're here for the ^FF4800Homunculus^000000 Mutation.";
  634. next;
  635. mes "[Jeyna]";
  636. mes "While I do some preparation,";
  637. mes "why don't you take a look at that board?";
  638. mes "The ^006400Homunculus Mutation System^000000 has ^0000FF5 different types^000000 of new mutations.";
  639. next;
  640. emotion ET_SURPRISE, getnpcid(0, "Magic Board#homun_s");
  641. mes "[Jeyna]";
  642. mes "Your ^FF4800Homunculus^000000 can mutate into any of the 5 different forms.";
  643. next;
  644. emotion ET_AHA;
  645. mes "[Jeyna]";
  646. mes "Let's see...";
  647. mes "The ^006400Homunculus Mutation System^000000 includes new evolutions of the normal ^0000FFHomunculus^000000.";
  648. mes "After they mutate, all previously learned skills will also remain.";
  649. next;
  650. mes "[Jeyna]";
  651. mes "In other words...";
  652. mes "Even if you change the magic wielder ^FF4800Vanilmirth^000000 to a fighter type,";
  653. mes "skills such as Caprice will be";
  654. mes "^006400retained and usable even after Mutation^000000.";
  655. next;
  656. emotion ET_SURPRISE, getnpcid(0, "Magic Board#homun_s");
  657. mes "[Jeyna]";
  658. mes "Take a look at the Magic Board behind me and decide for yourself.";
  659. close2;
  660. setquest 4157;
  661. erasequest 4156;
  662. end;
  663. } else if (checkquest(4157) > -1) {
  664. emotion ET_QUESTION;
  665. mes "[Jeyna]";
  666. mes "Take a look at the board behind me, on the right.";
  667. close2;
  668. emotion ET_SURPRISE, getnpcid(0, "Magic Board#homun_s");
  669. end;
  670. } else if (checkquest(4158) > -1) {
  671. playbgm "28.mp3"; // You're in Ruins
  672. disable_items;
  673. mes "[Jeyna]";
  674. mes "Okay, I'm ready too.";
  675. mes "In order to revert the process now, I need the Homunculus in its embryo form.";
  676. next;
  677. callsub L_CheckHomunculus;
  678. if (checkweight(6415,1) == 0) {
  679. mes "[Jeyna]";
  680. mes "But,";
  681. mes "You don't have enough space to carry an ^0000FFembryo^000000.";
  682. mes "Please come back with enough space in your bag.";
  683. next;
  684. mes "[Jeyna]";
  685. mes "Please return to the ^8B4513Laboratory^000000.";
  686. mes "You can find ^005DFFViorel^000000 at the ^8B4513Laboratory^000000 once you empty your bag.";
  687. next;
  688. mes "[Jeyna]";
  689. mes "When you're done with emptying your bag, ask ^005DFFViorel^000000 to send you back here.";
  690. mes "Go on and empty your bag~!";
  691. close2;
  692. warp "job3_gen01",12,47;
  693. end;
  694. }
  695. mes "[Jeyna]";
  696. mes "Now's about time for a decision.";
  697. mes "To go through the Mutation to the new ^0000FFHomunculus^000000 with the Homunculus Mutation System,";
  698. mes "you need to go through the process of regression to turn the Homunculus back to its ^0000FFembryo^000000 state.";
  699. next;
  700. mes "[Jeyna]";
  701. mes "And...";
  702. mes "^006400You cannot use the ability Call Homunculus until the process is complete.^000000";
  703. mes "It won't take long, so don't wander off.";
  704. next;
  705. mes "[Jeyna]";
  706. mes "So, please decide.";
  707. mes "Do you want to proceed with the new ^0000FFHomunculus Mutation System^000000?";
  708. next;
  709. switch(select("Yes, I do.:I need to think more.")) {
  710. case 1:
  711. if (checkhomcall() == 1) {
  712. mes "[Jeyna]";
  713. mes "Oh, wait a minute.";
  714. mes "To proceed with the Mutation, you need to wake up the Homunculus from the state of Vaporization.";
  715. next;
  716. mes "[Jeyna]";
  717. mes "Come back after you've done that.";
  718. close;
  719. }
  720. emotion ET_BEST;
  721. mes "[Jeyna]";
  722. mes "Good thinking.";
  723. mes "It is unacceptable for Alchemists like us to fear challenge.";
  724. next;
  725. playbgm "01.mp3"; // Title
  726. mes "[Jeyna]";
  727. mes "Now I need you to focus.";
  728. next;
  729. specialeffect2 EF_ABSORBSPIRITS;
  730. mes "[Jeyna]";
  731. mes "We need to...";
  732. mes "Stabilize a little more.";
  733. mes ".......";
  734. next;
  735. specialeffect2 EF_CURE;
  736. mes "[Jeyna]";
  737. mes "In a few moments, the ^FF4800Homunculus^000000 will return to its embryo state.";
  738. next;
  739. specialeffect2 EF_HOLYHIT;
  740. mes "[Jeyna]";
  741. mes "Into a special embryo...";
  742. next;
  743. callsub L_CheckHomunculus;
  744. specialeffect2 EF_BLESSING;
  745. morphembryo;
  746. setquest 4159;
  747. erasequest 4158;
  748. emotion ET_DELIGHT;
  749. mes "[Jeyna]";
  750. mes "Phew~ All done.";
  751. mes "Hmm, its state is a little strange.";
  752. next;
  753. emotion ET_SMILE;
  754. mes "[Jeyna]";
  755. mes "I guess it'll be just fine.";
  756. mes "Don't lose that ^0000FFStrange Embryo^000000.";
  757. mes "Also...";
  758. next;
  759. mes "[Jeyna]";
  760. mes "Don't do anything like changing jobs or anything like that before the process is over.";
  761. mes "If so, you, ^0000FF"+strcharinfo(0)+"^000000 might lose all the abilities you have over the Homunculus.";
  762. next;
  763. mes "[Jeyna]";
  764. mes "All that concentration made me tired.";
  765. mes "I'll just take a glass of water.";
  766. close;
  767. case 2:
  768. playbgm "28.mp3"; // You're in Ruins
  769. emotion ET_OHNO;
  770. mes "[Jeyna]";
  771. mes "Maybe I shouldn't have asked in the first place.";
  772. close;
  773. }
  774. } else if (checkquest(4159) > -1 || checkquest(4160) > -1) {
  775. playbgm "28.mp3"; // You're in Ruins
  776. mes "[Jeyna]";
  777. mes "^005DFFViorel^000000 will finish the mutation process.";
  778. mes "Now it's my time to say good bye.";
  779. next;
  780. mes "[Jeyna]";
  781. mes "It was short, but it was nice to meet you.";
  782. mes "We'll see each other again some time.";
  783. next;
  784. mes "[Jeyna]";
  785. mes "Best of luck~!";
  786. close2;
  787. setquest 4160;
  788. erasequest 4159;
  789. warp "que_house_s",19,42;
  790. end;
  791. } else {
  792. if (checkquest(4154) > -1)
  793. erasequest 4154;
  794. mes "[Jeyna]";
  795. mes "Hey, how did you get in here?";
  796. mes "Please get out. I'm changing~!";
  797. close2;
  798. warp "job3_gen01",12,47;
  799. end;
  800. }
  801. end;
  802. L_CheckHomunculus:
  803. if (gethominfo(6) < 99 || (gethominfo(1) < 6009 || gethominfo(1) > 6016)) { // Not level 99+ evolved Homunculus
  804. mes "[Jeyna]";
  805. mes "Hey, wait.";
  806. mes "The condition of the ^FF4800Homunculus^000000 is not suitable.";
  807. mes "That was close.";
  808. next;
  809. mes "[Jeyna]";
  810. mes "To use the Homunculus Mutation System";
  811. mes "to change to the new";
  812. mes "^FF4800Homunculus^000000,";
  813. mes "the ^006400Homunculus must be above level 99 and evolved^000000.";
  814. next;
  815. mes "[Jeyna]";
  816. mes "Come back to ^005DFFViorel^000000 when you're ready.";
  817. mes "I'll see you later then~!";
  818. close2;
  819. erasequest 4154;
  820. erasequest 4158;
  821. warp "job3_gen01",12,47;
  822. end;
  823. }
  824. return;
  825. }
  826. // Magic Board
  827. //============================================================
  828. que_house_s,83,47,3 script Magic Board#homun_s 857,{
  829. playbgm "26.mp3"; // Everlasting Wanderers
  830. callfunc "F_HomMutateInfo","[Magic Board Posts]";
  831. mes "[Magic Board Posts]";
  832. mes ":: ^0000FFHomunculus^000000 research is";
  833. mes ":: so much fun.";
  834. mes ":: Be an Alchemist";
  835. mes ":: who always enjoys";
  836. mes ":: one's research.";
  837. next;
  838. mes "[Magic Board Posts]";
  839. mes ":: Oh, and Viorel...";
  840. mes ":: About what you said";
  841. mes ":: yesterday...";
  842. mes "::";
  843. mes "::";
  844. next;
  845. mes "--------------------------";
  846. mes "The rest is sealed because it seems to be a private message.";
  847. close2;
  848. if (checkquest(4157) > -1) {
  849. setquest 4158;
  850. erasequest 4157;
  851. }
  852. end;
  853. }
  854. function script F_HomMutateInfo {
  855. .@npc_name$ = getarg(0);
  856. mes .@npc_name$;
  857. mes ":: The ability of the mutated";
  858. mes ":: ^0000FFHomunculus^000000 clearly goes";
  859. mes ":: beyond the previous state.";
  860. mes ":: In addition, its appearance";
  861. mes ":: will evolve as well.";
  862. next;
  863. mes .@npc_name$;
  864. mes ":: ^0000FFHomunculus^000000 appearances of the";
  865. mes ":: new types can be classified";
  866. mes ":: based on different species.";
  867. mes ":: Creatures of the same species";
  868. mes ":: generally have a similar";
  869. mes ":: appearance.";
  870. next;
  871. mes .@npc_name$;
  872. mes ":: The category, appearance and";
  873. mes ":: ability of the ^0000FFHomunculus^000000";
  874. mes ":: via the Homunculus Mutation";
  875. mes ":: System are as follows:";
  876. next;
  877. cutin "Mer_Eira_Card",3;
  878. mes .@npc_name$;
  879. mes ":: The first of the five";
  880. mes ":: is called ^FF4800Eira^000000.";
  881. mes ":: Beautiful and graceful.";
  882. next;
  883. mes .@npc_name$;
  884. mes ":: ^FF4800Eira^000000 uses";
  885. mes ":: ^006400Wind Element^000000 Magic Attacks and";
  886. mes ":: Support Skills.";
  887. mes ":: It even has the ability";
  888. mes ":: to revive its";
  889. mes ":: fallen master.";
  890. next;
  891. mes .@npc_name$;
  892. mes ":: ^FF4800Eira^000000 eats";
  893. mes ":: ^0000FFSmall Snow Flower^000000.";
  894. mes ":: Surprising how it survives on";
  895. mes ":: such a small amount.";
  896. mes ":: ^0000FFSmall Snow Flower^000000 can be bought";
  897. mes ":: from ^005DFFTaming Merchants^000000.";
  898. next;
  899. cutin "",255;
  900. cutin "Mer_Sera_Card",3;
  901. mes .@npc_name$;
  902. mes ":: The second of the five";
  903. mes ":: is known as ^FF4800Sera^000000.";
  904. mes ":: It looks just like ^FF0000Mistress^000000 but";
  905. mes ":: it doesn't run away.";
  906. next;
  907. mes .@npc_name$;
  908. mes ":: ^FF4800Sera^000000";
  909. mes ":: specializes in ^006400Poison Attacks^000000.";
  910. mes ":: Also, it uses distinct";
  911. mes ":: Support Skills using poisons.";
  912. next;
  913. mes .@npc_name$;
  914. mes ":: ^FF4800Sera^000000 eats";
  915. mes ":: ^0000FFApple Pudding^000000.";
  916. mes ":: It prefers sweet food.";
  917. mes ":: ^0000FFApple Pudding^000000 can be bought";
  918. mes ":: from ^005DFFTaming Merchants^000000.";
  919. next;
  920. cutin "",255;
  921. cutin "Mer_Dieter_Card",3;
  922. mes .@npc_name$;
  923. mes ":: The third of the five";
  924. mes ":: is ^FF4800Dieter^000000.";
  925. mes ":: It looks unusual but it";
  926. mes ":: has a good demeanor.";
  927. next;
  928. mes .@npc_name$;
  929. mes ":: ^FF4800Dieter^000000 uses";
  930. mes ":: ^FF0000Fire^000000 based Attacks and";
  931. mes ":: Support Skills.";
  932. mes ":: It is just as fragile...";
  933. mes ":: ah, reliable, as it looks.";
  934. next;
  935. mes .@npc_name$;
  936. mes ":: ^FF4800Dieter^000000 eats";
  937. mes ":: ^0000FFBig Cell^000000.";
  938. mes ":: ^0000FFBig Cell^000000 can be bought";
  939. mes ":: from ^005DFFTaming Merchants^000000.";
  940. next;
  941. cutin "",255;
  942. cutin "Mer_Bayeri_Card",3;
  943. mes .@npc_name$;
  944. mes ":: The fourth of the five";
  945. mes ":: is ^FF4800Bayeri^000000.";
  946. mes ":: Bayeri has the form of a";
  947. mes ":: unicorn.";
  948. next;
  949. mes .@npc_name$;
  950. mes ":: It has a powerful dash skill";
  951. mes ":: and uses ^006400Holy Element^000000 magic.";
  952. mes ":: Unfortunately,";
  953. mes ":: they won't let you ride them.";
  954. mes ":: Not all four-legged creatures";
  955. mes ":: can be ridden.";
  956. next;
  957. mes .@npc_name$;
  958. mes ":: ^FF4800Bayeri^000000 eats";
  959. mes ":: ^0000FFFresh Plant^000000.";
  960. mes ":: No matter how hungry it";
  961. mes ":: never feeds on rotten greens.";
  962. mes ":: ^0000FFFresh Plant^000000 can be bought";
  963. mes ":: from ^005DFFTaming Merchants^000000.";
  964. next;
  965. cutin "",255;
  966. cutin "Mer_Eleanor_Card",3;
  967. mes .@npc_name$;
  968. mes ":: The last of the five";
  969. mes ":: is ^FF4800Eleanor^000000.";
  970. mes ":: It has a feminine appearance";
  971. mes ":: and outstanding physical skill.";
  972. next;
  973. mes .@npc_name$;
  974. mes ":: ^FF4800Eleanor^000000";
  975. mes ":: uses ^006400Strike or Grapple Attacks^000000";
  976. mes ":: sequentially in battle.";
  977. mes ":: Absolutely stunning.";
  978. next;
  979. mes .@npc_name$;
  980. mes ":: ^FF4800Eleanor^000000 eats";
  981. mes ":: ^0000FFKid's Dumpling^000000.";
  982. mes ":: Don't confuse it with a normal";
  983. mes ":: dumpling.";
  984. mes ":: ^0000FFKid's Dumpling^000000 can be bought";
  985. mes ":: from ^005DFFTaming Merchants^000000.";
  986. next;
  987. cutin "",255;
  988. return;
  989. }
  990. // Books
  991. //============================================================
  992. que_house_s,13,52,3 script Open Book#01homun_s 111,{
  993. switch(rand(1,7)) {
  994. case 1:
  995. mes "[Bookcase Notes]";
  996. mes "Insanity and Genius are the same in concept in that they are both abnormal phenomenon.";
  997. mes "Observing the chemist ^005DFFMorgenstein^000000 of ^8B4513Geffen^000000, I consider them equal.";
  998. next;
  999. mes "[Bookcase Notes]";
  1000. mes "Once I had to visit...";
  1001. mes "the strange ^005DFFMorgenstein^000000 for research purposes.";
  1002. next;
  1003. mes "[Bookcase Notes]";
  1004. mes "I had a meat stew before I met ^005DFFMorgenstein^000000,";
  1005. mes "surprisingly enough, he muttered that he smelled meat even before I was close.";
  1006. next;
  1007. mes "[Bookcase Notes]";
  1008. mes "I never thought that chemists had a great sense of smell.";
  1009. mes "The next time I give";
  1010. mes "^005DFFMorgenstein^000000 a visit,";
  1011. mes "I'll eat some other meal.";
  1012. close;
  1013. case 2:
  1014. mes "[Bookcase Notes]";
  1015. mes "^005DFFDe Bris^000000 thinks the enthusiasm of Alchemists has lately dropped <Dramatically>...";
  1016. next;
  1017. mes "[Bookcase Notes]";
  1018. mes "He especially didn't like the fact that I was bound tightly to ^FF4800Homunculus^000000 research.";
  1019. mes "He didn't say such a thing when we studied together in ^8B4513Rune Midgarts^000000.";
  1020. next;
  1021. mes "[Bookcase Notes]";
  1022. mes "One day, I'll show ^005DFFDe Bris^000000 my ^FF4800Homunculus^000000 research data.";
  1023. mes "I love watching him jump out of his skin.... I look forward to the day.";
  1024. close;
  1025. case 3:
  1026. mes "[Bookcase Notes]";
  1027. mes "^005DFFDe Bris^000000' passion for the ^57007FGenetic^000000 arts is amazing.";
  1028. next;
  1029. mes "[Bookcase Notes]";
  1030. mes "Recently, the Alchemist Union offered me the chance to join the ^57007FGenetic^000000 through a letter.";
  1031. mes "I wonder what ^005DFFDe Bris^000000 said to the union...";
  1032. next;
  1033. mes "[Bookcase Notes]";
  1034. mes "Well, I appreciate it...";
  1035. mes "However, for me right now";
  1036. mes "my research is of utmost priority.";
  1037. close;
  1038. case 4:
  1039. mes "[Bookcase Notes]";
  1040. mes "There's something funny ^005DFFDarcia^000000 said to me.";
  1041. mes "It was about when ^005DFFJeyna^000000 first came to learn about potion combination......";
  1042. next;
  1043. mes "[Bookcase Notes]";
  1044. mes "She did good up to the stage of pouring water into the mixture.";
  1045. mes "She just had to put it into an empty bottle...";
  1046. next;
  1047. mes "[Bookcase Notes]";
  1048. mes "^005DFFDarcia^000000 watched what she would do with the last stage,";
  1049. mes "and the confused ^005DFFJeyna^000000 drank the mixture out of the bowl and told her that it healed well.";
  1050. next;
  1051. mes "[Bookcase Notes]";
  1052. mes "To think that even ^005DFFJeyna^000000,";
  1053. mes "now a master of potion combination,";
  1054. mes "had her rookie mistakes";
  1055. mes "shows how hard it is to imagine";
  1056. mes "and forecast one's past and future.";
  1057. close;
  1058. case 5:
  1059. mes "[Bookcase Notes]";
  1060. mes "^005DFFVincent^000000, I think I did it.";
  1061. mes "I will never forget your words of courage ";
  1062. mes "and I am grateful that I now get to pay you back.";
  1063. next;
  1064. mes "[Bookcase Notes]";
  1065. mes "It was indeed a long process.";
  1066. mes "When many of the union";
  1067. mes "considered my research insignificant";
  1068. mes "... Though I did not lose my belief";
  1069. mes "it did heart deep inside.";
  1070. next;
  1071. mes "[Bookcase Notes]";
  1072. mes "The few friends who believed me";
  1073. mes "especially ^005DFFJeyna^000000";
  1074. mes "and you ^005DFFVincent^000000 ...";
  1075. mes "I am sincerely thankful with all my soul.";
  1076. next;
  1077. mes "[Bookcase Notes]";
  1078. mes "They say that,";
  1079. mes "the end justifies the means.";
  1080. mes "At first,";
  1081. mes "I did not know what it meant...";
  1082. next;
  1083. mes "[Bookcase Notes]";
  1084. mes "Now I know.";
  1085. mes "I know how important it is";
  1086. mes "to follow one's heart.";
  1087. next;
  1088. mes "[Bookcase Notes]";
  1089. mes "I'll drop by very soon.";
  1090. mes "Be well until then.";
  1091. close;
  1092. case 6:
  1093. mes "[Bookcase Notes]";
  1094. mes "A game called ^0000FFThe Epic Battle 2^000000, similar to chess, was intriguing.";
  1095. next;
  1096. mes "[Bookcase Notes]";
  1097. mes "Some time ago, I met a ^0000FFFruit Seller^000000 who excelled in The Epic Battle 2.";
  1098. mes "He even overcame the infamous ^006400Grizzly Shockwave Strategy^000000 and ^006400God of Death Terror^000000 with ease.";
  1099. next;
  1100. mes "[Bookcase Notes]";
  1101. mes "To overcome those in the early stages of the battle of the ^0000FFPriest Faction^000000...";
  1102. mes "It is difficult for me, since I need to combine the pieces and use some luring skills.";
  1103. next;
  1104. mes "[Bookcase Notes]";
  1105. mes "I wonder when I'll become a 3 Carat Diamond level player.";
  1106. close;
  1107. case 7:
  1108. mes "[Bookcase Notes]";
  1109. mes "There are many Alchemists who like the ^FF4800Vanilmirth^000000.";
  1110. next;
  1111. mes "[Bookcase Notes]";
  1112. mes "But I prefer the ^FF4800Amistr^000000.";
  1113. mes "It's cute when it wags its tale with those shiny eyes.";
  1114. next;
  1115. mes "[Bookcase Notes]";
  1116. mes "My Amistr Jonathan is clever and mellow, making it ever so lovable.";
  1117. mes "We're good friends, aren't we Jonathan?";
  1118. close;
  1119. }
  1120. }
  1121. que_house_s,16,52,3 script Open Book#02homun_s 111,{
  1122. switch(rand(1,8)) {
  1123. case 1:
  1124. mes "[Bookcase Notes]";
  1125. mes "What should I write to ^005DFFDe Bris^000000.";
  1126. mes ":: To my noted ";
  1127. mes ":: Genetic friend De Bris.";
  1128. mes ":: How's Lighthalzen?";
  1129. mes ":: Do they have enough of those";
  1130. mes ":: cookies you oh so love?";
  1131. next;
  1132. mes "[Bookcase Notes]";
  1133. mes ":: I'll drop by soon";
  1134. mes ":: with some cookies.";
  1135. mes ":: When we meet,";
  1136. mes ":: I'll introduce you to my";
  1137. mes ":: ^006400New Homunculus^000000.";
  1138. next;
  1139. mes "[Bookcase Notes]";
  1140. mes ":: No need to be alert.";
  1141. mes ":: Unlike you,";
  1142. mes ":: they aren't interested in ";
  1143. mes ":: what others have to eat.";
  1144. mes ":: I'll see you soon~!";
  1145. mes ":: Dare close the door on me.";
  1146. close;
  1147. case 2:
  1148. mes "[Bookcase Notes]";
  1149. mes "The last time I visited the Alchemist Union, there was an interesting debate on the table.";
  1150. mes "I think it was something to do with ^006400Negligence of Homunculus in public places^000000.";
  1151. next;
  1152. mes "[Bookcase Notes]";
  1153. mes "While the master dozed off,";
  1154. mes "one of the ^FF4800Homunculus^000000 off its leash";
  1155. mes "caused some sort of problem.";
  1156. next;
  1157. mes "[Bookcase Notes]";
  1158. mes "I will make sure that my Homunculus Jonathan...";
  1159. mes "is trained well not to cause trouble around other people.";
  1160. close;
  1161. case 3:
  1162. mes "[Bookcase Notes]";
  1163. mes "There's a new toy me and ^005DFFJeyna^000000 have grown fond of.";
  1164. mes "It's relatively new,";
  1165. mes "called... ^0000FF'Helo'^000000, I think?";
  1166. next;
  1167. mes "[Bookcase Notes]";
  1168. mes "There was a related song to it, sung by some ^57007FMinstrel^000000.";
  1169. mes "The lyrics were something like ^006400'Ahhh~Ahh~Ahhhhhhhh'^000000.";
  1170. next;
  1171. mes "[Bookcase Notes]";
  1172. mes "The entertainment itself is fun,";
  1173. mes "but the music is also excellent,";
  1174. mes "and when I listen to it";
  1175. mes "it feels like my SP is restored significantly.";
  1176. next;
  1177. mes "[Bookcase Notes]";
  1178. mes "I must say,";
  1179. mes "entertainment is crucial when resting";
  1180. mes "to boost morale for research.";
  1181. mes "^006400For Homunculus~!^000000";
  1182. close;
  1183. case 4:
  1184. mes "[Bookcase Notes]";
  1185. mes "From what I heard from the union member";
  1186. mes "^005DFFParmy^000000,";
  1187. mes "^005DFFRaspuchin^000000 is still his own weird self.";
  1188. next;
  1189. mes "[Bookcase Notes]";
  1190. mes "It may not be such a good idea";
  1191. mes "to drive those energetic souls";
  1192. mes "coming to change jobs";
  1193. mes "with such enthusiasm.";
  1194. close;
  1195. case 5:
  1196. mes "[Bookcase Notes]";
  1197. mes "A friend of mine who was into painting,";
  1198. mes "suggested making a <Graphic Novel> called";
  1199. mes "^0000FFMUTATIONER^000000";
  1200. mes "after he heard about my research";
  1201. mes "and my works.";
  1202. next;
  1203. mes "[Bookcase Notes]";
  1204. mes "The story begins...";
  1205. mes "With an alien";
  1206. mes "^FF4800Homunculus^000000";
  1207. mes "visiting our world.";
  1208. next;
  1209. mes "[Bookcase Notes]";
  1210. mes "The visiting alien";
  1211. mes "^FF4800Homunculus^000000 can survive";
  1212. mes "without a master";
  1213. mes "and it could change into";
  1214. mes "various creatures that";
  1215. mes "roam our world.";
  1216. next;
  1217. mes "[Bookcase Notes]";
  1218. mes "These alien^FF4800Homunculus^000000";
  1219. mes "have two opposing factions";
  1220. mes "divided by political differences.";
  1221. mes "In our world, we call them";
  1222. mes "^006400Aut-homun^000000 and ";
  1223. mes "^006400Decept-homun^000000";
  1224. next;
  1225. mes "[Bookcase Notes]";
  1226. mes "The ^006400Aut-homun^000000 are our friends.";
  1227. mes "Their leader,";
  1228. mes "called ^005DFFOptimus Poring^000000,";
  1229. mes "is built and so cool";
  1230. mes "for a poring,";
  1231. mes "and it summons a cart at will!";
  1232. next;
  1233. mes "[Bookcase Notes]";
  1234. mes "The opposing side, the ^006400Decept-homun^000000,";
  1235. mes "is led by ^005DFFMegatroll^000000";
  1236. mes "and they use all means ";
  1237. mes "to destroy our world.";
  1238. next;
  1239. mes "[Bookcase Notes]";
  1240. mes "The hero of this story";
  1241. mes "is one from ^8B4513Alberta^000000 called ^005DFFJam Wicky^000000,";
  1242. mes "who meets ^005DFFOptimus Poring^000000";
  1243. mes "while shopping for a cart,";
  1244. mes "as if it was his destiny.";
  1245. next;
  1246. mes "[Bookcase Notes]";
  1247. mes "And so thus";
  1248. mes "unfolds an epic battle";
  1249. mes "in the ^8B4513Moroc Desert^000000";
  1250. mes "where the fate of our world";
  1251. mes "lies in his hands...";
  1252. next;
  1253. mes "[Bookcase Notes]";
  1254. mes "Enough of that~!";
  1255. mes "The rest of the story can be";
  1256. mes "checked in the published copy.";
  1257. mes "^0000FFMUTATIONER^000000";
  1258. mes "It's going to be awesome~!";
  1259. close;
  1260. case 6:
  1261. mes "[Bookcase Notes]";
  1262. mes "The Union sent a special gift to its members.";
  1263. mes "It's called a ^0000FFHigh Clip 4^000000.";
  1264. next;
  1265. mes "[Bookcase Notes]";
  1266. mes "It is originally used as a tool to allow easy whispering between members, but it also has other useful functions.";
  1267. next;
  1268. mes "[Bookcase Notes]";
  1269. mes "A guild invented this. I recall that their emblem had an image of an apple.";
  1270. close;
  1271. case 7:
  1272. mes "[Bookcase Notes]";
  1273. mes "Homunculus is indeed worthy.";
  1274. mes "However, like everyone else, I sometimes question its meaning and future.";
  1275. next;
  1276. mes "[Bookcase Notes]";
  1277. mes "I believe that life given by nature was supposed to be used for oneself.";
  1278. mes "However...";
  1279. next;
  1280. mes "[Bookcase Notes]";
  1281. mes "The research to give the Homunculus life is, in reality, for the benefit of man.";
  1282. mes "Perhaps mankind is not ready ethically to create life.";
  1283. close;
  1284. case 8:
  1285. mes "[Bookcase Notes]";
  1286. mes "Some time ago, ^005DFFJeyna^000000 introduced me to someone.";
  1287. mes "She is from ^8B4513Geffen^000000,";
  1288. mes "and she introduced herself as a ^005DFFChicken Researcher^000000.";
  1289. next;
  1290. mes "[Bookcase Notes]";
  1291. mes "She is an expert on something called the ^006400Legendary Bijofnil^000000.";
  1292. mes "She finds it offensive that people think that the Bijofnil is a hawk.";
  1293. next;
  1294. mes "[Bookcase Notes]";
  1295. mes "She said something about somewhere in ^8B4513Hvergilmir's Fountain^000000";
  1296. mes "there exists a ^005DFFtalking chicken^000000 and other stories...";
  1297. mes "Well, it went on like that";
  1298. mes "and it was interesting.";
  1299. close;
  1300. }
  1301. }
  1302. // Notifiers
  1303. //============================================================
  1304. que_house_s,11,52,3 script #03homun_s 111,{
  1305. end;
  1306. OnInit:
  1307. initnpctimer;
  1308. end;
  1309. OnTimer6000:
  1310. emotion ET_SURPRISE;
  1311. end;
  1312. OnTimer7000:
  1313. emotion ET_SURPRISE, getnpcid(0, "#04homun_s");
  1314. stopnpctimer;
  1315. initnpctimer;
  1316. end;
  1317. }
  1318. que_house_s,14,52,3 script #04homun_s 111,{
  1319. end;
  1320. }
  1321. // Researcher's Pet
  1322. //============================================================
  1323. que_house_s,24,46,3 script Jonathan#homun_s 6002,{
  1324. end;
  1325. }
  1326. que_house_s,23,46,3 script #05homun_s 111,{
  1327. emotion ET_STARE_ABOUT, getnpcid(0, "Jonathan#homun_s");
  1328. if (gethominfo(1) < 6048 || gethominfo(1) > 6052) { // Not mutated Homunculus-S
  1329. mes "[Jonathan]";
  1330. mes "Hwang~ Hwang!";
  1331. next;
  1332. mes ":: It seems to be Viorel's";
  1333. mes ":: Homunculus.";
  1334. mes ":: It is wearing a small necklace";
  1335. mes ":: with the name Jonathan engraved";
  1336. mes ":: on it.";
  1337. close;
  1338. } else {
  1339. mes "[Jonathan]";
  1340. mes "Hwang~?!";
  1341. next;
  1342. emotion ET_PROFUSELY_SWEAT, getnpcid(0, "Jonathan#homun_s");
  1343. mes "[Jonathan]";
  1344. mes "*Sniff* ...";
  1345. next;
  1346. mes ":: This Amistr";
  1347. mes ":: called Jonathan";
  1348. mes ":: seems to be surprised by my";
  1349. mes ":: new Homunculus.";
  1350. close;
  1351. }
  1352. }