summaryrefslogtreecommitdiff
path: root/npc/pre-re/jobs/2-2/alchemist.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/pre-re/jobs/2-2/alchemist.txt')
-rw-r--r--npc/pre-re/jobs/2-2/alchemist.txt2002
1 files changed, 2002 insertions, 0 deletions
diff --git a/npc/pre-re/jobs/2-2/alchemist.txt b/npc/pre-re/jobs/2-2/alchemist.txt
new file mode 100644
index 000000000..fd0f077f5
--- /dev/null
+++ b/npc/pre-re/jobs/2-2/alchemist.txt
@@ -0,0 +1,2002 @@
+//===== rAthena Script =======================================
+//= Alchemist Job Quest
+//===== By: ==================================================
+//= nestor_zulueta (Fusion), converted by Darkchild
+//===== Current Version: =====================================
+//= 3.0
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Job quest for Alchemist classes
+//===== Additional Comments: =================================
+//= 2.5 Rescripted to Aegis 10.3 stadards. [L0ne_W0lf]
+//= No longer uses function "F_BlockHigh"
+//= 2.6 Corrected a bug in advanced class checking. [L0ne_W0lf]
+//= 2.7 Added missing checkweights. [L0ne_W0lf]
+//= 2.8 Fixed minor typo in test section. [L0ne_W0lf]
+//= 2.9 Added Quest Log commands. [Kisuka]
+//= 3.0 Removed the need for use of 'goto.' [L0ne_W0lf]
+//============================================================
+
+alde_alche,27,185,5 script Alchemist Guildsman#am 744,{
+ mes "[Parmy Gianino]";
+ if (Upper == 1) {
+ mes "Welcome to the";
+ mes "Alchemist Unio--";
+ mes "I-Impossible! How c-can";
+ mes "something like this happen?";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Wait, wait...";
+ mes "I'm sorry. I was confused,";
+ mes "that's all. You look just like";
+ mes "someone I used to know. ";
+ mes "Still, I get this weird";
+ mes "feeling about you...";
+ close;
+ }
+ if (BaseJob != Job_Merchant) {
+ if (BaseJob == Job_Alchemist) {
+ mes "Welcome, " + strcharinfo(0) + ".";
+ mes "The Alchemist Union";
+ mes "is busy today, like always.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Everyone is busy with their";
+ mes "own research, but recently, some headway has been made in the field of biotechnology.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Everyone is hoping that the biotechnological studies will yield positive results. Speaking of which, I wonder how the Alchemists working on artificial life are doing...";
+ close;
+ }
+ else if (BaseClass == Job_Novice) {
+ mes "Welcome to the";
+ mes "Alchemist Union.";
+ mes "We are recruiting";
+ mes "talented people";
+ mes "with novel ideas.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "If you're interested in working with chemistry, visit us later when you become more knowledgable.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Just one thing:";
+ mes "You've got to have";
+ mes "knowledge of items";
+ mes "as a Merchant first.";
+ close;
+ }
+ mes "Welcome to the";
+ mes "Alchemist Union.";
+ mes "We are recruiting";
+ mes "talented people";
+ mes "with novel ideas.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "If you know any exceptional Merchants, by all means, please refer them to us. Those types of people tend to have a talent for Alchemy and experimentation~";
+ close;
+ }
+ if (ALCH_Q == 0) {
+ mes "Welcome to the";
+ mes "Alchemist Union.";
+ mes "How may I help you?";
+ next;
+ switch(select("I would like to learn about Alchemists.:I want to become an Alchemist.:Nothing.")) {
+ case 1:
+ mes "[Parmy Gianino]";
+ mes "Alchemists study and create new substances and items out of existing materials. Our knowledge allows us to change the properties of chemicals at the atomic level.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Most people think our final goal";
+ mes "is to create gold, but that's not the entire truth. We also want to create things like medicines";
+ mes "and new materials.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "A few of us research the";
+ mes "creation of life, although many of us consider that god's territory. That field is so complex, most of us deal with slightly less complicated projects anyway.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "If you are interested in becoming an Alchemist, I recommend that you first get a lot of experience as a Merchant. Being a Merchant is a great opportunity to learn about materials as you deal with them.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Whether or not you try to become";
+ mes "an Alchemist is your decision. The road to becoming an Alchemist is very challenging, and you'll need to focus on experimentation and research, instead of commerce.";
+ close;
+ case 2:
+ mes "[Parmy Gianino]";
+ mes "Is that so?";
+ mes "Nice to meet you.";
+ mes "My name is Parmy Gianino";
+ mes "of the Alchemist Union.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "If you join our Union and";
+ mes "complete the training, you";
+ mes "will be officially recognized";
+ mes "as an Alchemist and be able";
+ mes "to contribute to our research.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "But we don't accept everyone.";
+ mes "You must have a lot of tenacity";
+ mes "and sincere devotion in exploring";
+ mes "the various fields of science.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "There are a couple";
+ mes "of requirements to join";
+ mes "the Alchemist Union, but";
+ mes "we'll discuss that";
+ mes "after you apply.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Well then, would";
+ mes "you like to apply";
+ mes "for registration?";
+ next;
+ if (select("I would like to apply.:I'll do it later.") == 1) {
+ if (JobLevel < 40) {
+ mes "[Parmy Gianino]";
+ mes "Hmmm...";
+ mes "Just a moment.";
+ mes "I'm sorry to say that";
+ mes "you're not experienced";
+ mes "enough as a Merchant to";
+ mes "join us right now.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "You must be at least";
+ mes "^551A8BJob Level 40^000000 to become";
+ mes "an Alchemist. Come back";
+ mes "later when you meet the";
+ mes "Job Level requirement, okay?";
+ close;
+ }
+ mes "[Parmy Gianino]";
+ mes "Alright, your application has been accepted. Now, you must pay the 50,000 Zeny application fee and bring some items before you can begin your formal training.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "But if you bring an ^551A8BOld Magic Book^000000 and ^551A8BHammer of Blacksmith^000000,";
+ mes "we will accept that as a substitute for the item requirement.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Now...";
+ mes "Please sign";
+ mes "the application.";
+ next;
+ select(strcharinfo(0));
+ mes "[Parmy Gianino]";
+ mes "Good, good. Now, if you have";
+ mes "the Zeny for your application fee ready, I will tell you which items you will need to bring. Now, pay attention.";
+ next;
+ if (Zeny < 50000) {
+ mes "[Parmy Gianino]";
+ mes "Uh oh. You don't";
+ mes "seem to have enough Zeny.";
+ mes "Come back to me when you have 50,000 Zeny, otherwise we can't process your application.";
+ close;
+ }
+ set zeny,zeny-50000;
+ mes "[Parmy Gianino]";
+ mes "Let's see.";
+ mes "" + strcharinfo(0);
+ mes "needs to bring...";
+ switch(rand(1,3)) {
+ case 1:
+ set ALCH_Q,1;
+ setquest 2028;
+ mes "^551A8B7 Berserk Potions^000000.";
+ break;
+ case 2:
+ set ALCH_Q,2;
+ setquest 2029;
+ mes "^551A8B100 Mini Furnaces^000000.";
+ break;
+ case 3:
+ set ALCH_Q,3;
+ setquest 2030;
+ mes "^551A8B7,500 Fire Arrows^000000.";
+ }
+ next;
+ mes "[Parmy Gianino]";
+ mes "Once you've gathered";
+ mes "those items, come back";
+ mes "to me and your training";
+ mes "as an Alchemist will begin.";
+ mes "See you soon~";
+ close;
+ }
+ mes "[Parmy Gianino]";
+ mes "Talented Merchants";
+ mes "are always welcome here.";
+ mes "Please come back soon.";
+ close;
+ case 3:
+ mes "[Parmy Gianino]";
+ mes "Umm...";
+ mes "Please let me know";
+ mes "if you need anything.";
+ close;
+ }
+ }
+ else if (ALCH_Q >= 1 && ALCH_Q <= 3) {
+ if (countitem(1006) > 0 && countitem(1005) > 0) {
+ mes "Well now~!";
+ mes "You've brought an";
+ mes "Old Magic Book and";
+ mes "a Hammer of Blacksmith.";
+ mes "We'll put these items";
+ mes "to good use.";
+ next;
+ delitem 1006,1; //Old_Magic_Book
+ delitem 1005,1; //Hammer_Of_Blacksmith
+ mes "[Parmy Gianino]";
+ mes "Okay, now you need to learn";
+ mes "the basics to being an Alchemist and learn the procedures for mixing chemicals and medicines.";
+ set ALCH_Q,4;
+ if(checkquest(2028) != -1) {
+ changequest 2028,2031;
+ }
+ else if(checkquest(2029) != -1) {
+ changequest 2029,2031;
+ }
+ else {
+ changequest 2030,2031;
+ }
+ next;
+ mes "[Parmy Gianino]";
+ mes "But before all of that, you need to speak to Raspuchin. I'm not really sure what you'll be talking about with him...";
+ next;
+ mes "[Parmy Gianino]";
+ mes "It shouldn't be anything extraordinary, but you're still required to speak to Raspuchin, since apparently he's a part of the Alchemist selection process.";
+ close;
+ }
+ switch(ALCH_Q) {
+ case 1: setarray .@items[0],657,7; break;
+ case 2: setarray .@items[0],612,100; break;
+ case 3: setarray .@items[0],1752,7500; break;
+ }
+ if (countitem(.@items[0]) >= .@items[1]) {
+ mes "Seems like";
+ mes "you're all ready.";
+ mes "The Union will put";
+ mes "these items to good use.";
+ next;
+ delitem .@items[0],.@items[1];
+ mes "[Parmy Gianino]";
+ mes "Okay, now you need to learn";
+ mes "the basics to being an Alchemist and learn the procedures for mixing chemicals and medicines.";
+ set ALCH_Q,4;
+ if(checkquest(2028) != -1) {
+ changequest 2028,2031;
+ }
+ else if(checkquest(2029) != -1) {
+ changequest 2029,2031;
+ }
+ else {
+ changequest 2030,2031;
+ }
+ next;
+ mes "[Parmy Gianino]";
+ mes "But before all of that, you need to speak to Raspuchin. I'm not really sure what you'll be talking about with him...";
+ next;
+ mes "[Parmy Gianino]";
+ mes "It shouldn't be anything extraordinary, but you're still required to speak to Raspuchin, since apparently he's a part of the Alchemist selection process.";
+ close;
+ }
+ mes "Aren't you ready?";
+ mes "Like I said before,";
+ mes "you must bring";
+ mes "^551A8B"+.@items[1]+" "+getitemname(.@items[0])+"s^000000.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Come back when you";
+ mes "have prepared the";
+ mes "required items.";
+ close;
+ }
+ else if (ALCH_Q == 4) {
+ mes "Go and talk to";
+ mes "Mr. Raspuchin.";
+ mes "He's involved in the";
+ mes "Alchemist selection process, whatever that might mean.";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Hopefully, it";
+ mes "won't be too much of";
+ mes "a problem. I guess he'll just interview you, and ask you";
+ mes "some simple questions.";
+ close;
+ }
+ else {
+ mes "Ah, I'm sorry, but";
+ mes "I'm busy right now~";
+ next;
+ mes "[Parmy Gianino]";
+ mes "Why don't you ask";
+ mes "someone else if you're";
+ mes "not sure who to visit";
+ mes "next? Good luck~";
+ close;
+ }
+}
+
+alde_alche,175,107,3 script Fastidious Alchemist#am 749,{
+ mes "[Raspuchin Gregory]";
+ if (BaseJob != Job_Merchant) {
+ if (BaseJob == Job_Alchemist) {
+ mes "Heeheehee";
+ mes "keheheh~!";
+ mes "Eh? What do you want?!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "You're not here to steal my experimental results or plagiarize my work, are you? How dare you consider intellectual theft!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "You're not, are you?";
+ mes "Well, as a colleague,";
+ mes "let me just warn you";
+ mes "that such tricks aren't";
+ mes "tolerated here in the";
+ mes "Alchemist Union!";
+ close;
+ }
+ else if (BaseClass == Job_Novice) {
+ mes "Heeheehee";
+ mes "keheheh~!";
+ mes "How cute, you've come";
+ mes "all this way just to play...";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "I'll let you";
+ mes "go this time...";
+ mes "But next time, don't";
+ mes "expect to leave so easily...";
+ close;
+ }
+ else {
+ mes "What is it?!";
+ mes "You're curious as";
+ mes "to what I'm doing?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Heehee";
+ mes "keheheh~!";
+ mes "Why, I'm busy";
+ mes "researching,";
+ mes "of course!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Once this";
+ mes "potion is complete...";
+ mes "You can use it to take";
+ mes "over an entire nation!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Hee hee hee!";
+ mes "Something this";
+ mes "dangerous has to";
+ mes "be kept a secret!";
+ mes "Understand?";
+ close;
+ }
+ }
+ if (ALCH_Q == 0) {
+ mes "Heeheehee";
+ mes "keheheh~!";
+ mes "What do you";
+ mes "want, kid?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "A Merchant should go and set up shop and vend items. Why are you wandering in a place like this?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Heheheh~!";
+ mes "Go vend somwhere else!";
+ mes "And leave me to my";
+ mes "dark enterprise!";
+ close;
+ }
+ else if (ALCH_Q >= 1 && ALCH_Q <= 3) {
+ mes "Heeheehee";
+ mes "keheheh~!";
+ mes "What do you";
+ mes "want, kid?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "What...?";
+ mes "Learn Alchemy?!";
+ mes "Don't even speak";
+ mes "such nonsense!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Even if you tried studying for a thousand years, maybe even more, it'd be useless to you! Forget about it and just worry about your store!";
+ close;
+ }
+ else if ((ALCH_Q == 4) || (ALCH_Q == 5)) {
+ if (ALCH_Q == 4) {
+ mes "Heeheehee";
+ mes "keheheh~!";
+ mes "What do you";
+ mes "want, kid?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "What...?";
+ mes "Join the Union!?";
+ mes "I don't like it...";
+ mes "I just don't...!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Nowadays, anyone thinks they can";
+ mes "be Alchemists just by knowing how to mix a few herbs. That's why my interview is necessary.";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Heeheehee";
+ mes "keheheh~!";
+ mes "I plan on weeding out all the dumb and incompetent, and chase them";
+ mes "all away! We don't need morons!";
+ next;
+ if (JobLevel == 50) {
+ mes "[Raspuchin Gregory]";
+ mes "Wait...";
+ mes "Maybe I've";
+ mes "misjudged you.";
+ if (sex == 1) {
+ mes "You might be a pretty boy,";
+ mes "but I can tell you're smart";
+ mes "from your eyes.";
+ }
+ else {
+ mes "Huh. You're a cutie alright,";
+ mes "but I can tell you've got brains.";
+ }
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "You're not just some stupid kid.";
+ mes "I can tell youve gone through some rough times as a Merchant. Excellent. Keh heh heh~";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Fine, just so we don't insult each other's intelligence, I'll just let you pass the interview.";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "So hurry up, become an Alchemist, do some good research, and you might turn out to be of some help to me. Hahahahahaha~!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Now go to Darwin!";
+ mes "He'll teach you how to do the experiments. Just tell him that";
+ mes "I sent you.";
+ set ALCH_Q,6;
+ close;
+ }
+ else {
+ mes "[Raspuchin Gregory]";
+ mes "Surprised, are you?";
+ mes "Keheheh~ If you thought";
+ mes "becoming an Alchemist was";
+ mes "just a matter of changing";
+ mes "your clothes, then you're";
+ mes "sadly mistaken.";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Now, try solving";
+ mes "all these problems.";
+ mes "Let's see how smart";
+ mes "really are.";
+ }
+ }
+ else if (ALCH_Q == 5) {
+ mes "What...?!";
+ mes "You want to take";
+ mes "the test again?!";
+ mes "I thought I told";
+ mes "you to leave!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "I don't like it...";
+ mes "I don't like this!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Fine...";
+ mes "I'll try to overlook your pitiful performance last time and give";
+ mes "you another chance. Don't screw";
+ mes "up again, got it?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Now then,";
+ mes "give me all the";
+ mes "^551A8Bright^000000 answers";
+ mes "this time.";
+ }
+ next;
+ switch(rand(1,3)) {
+ case 1:
+ mes "[Raspuchin Gregory]";
+ mes "12 + 23 + 34 + 45 = ?";
+ next;
+ input .@input;
+ if (.@input != 114) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "1000 - 36 - 227 - 348 = ?";
+ next;
+ input .@input;
+ if (.@input != 389) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "14 * 17 * 3 = ?";
+ next;
+ input .@input;
+ if (.@input != 714) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "9765 / 3 / 5 / 7 = ?";
+ next;
+ input .@input;
+ if (.@input != 93) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(47 * 28) - (1376 / 4) = ?";
+ next;
+ input .@input;
+ if (.@input != 972) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(2646 / 7) + (13 * 28) = ?";
+ next;
+ input .@input;
+ if (.@input != 742) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "How much do";
+ mes "12 Red Potions,";
+ mes "1 Butterfly Wing";
+ mes "and 5 Fly Wings cost";
+ mes "after a 24 % discount?";
+ next;
+ input .@input;
+ if (.@input != 909) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total weight of";
+ mes "3 Scimiters, 2 Helms";
+ mes "and 1 Long Coat?";
+ next;
+ input .@input;
+ if (.@input != 450) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total defense of";
+ mes "a Biretta, Mantle,";
+ mes "Opera Mask, Ribbon,";
+ mes "Muffler, Boots, and";
+ mes "Ear Muffs?";
+ next;
+ input .@input;
+ if (.@input != 20) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "If you buy 5 Helms";
+ mes "with a 24 % discount";
+ mes "and sell it at 20";
+ mes "how much profit";
+ mes "do you earn?";
+ next;
+ input .@input;
+ if (.@input != 8800) set .@w_point,.@w_point+1;
+ break;
+ case 2:
+ mes "[Raspuchin Gregory]";
+ mes "13 + 25 + 37 + 48 = ?";
+ next;
+ input .@input;
+ if (.@input != 123) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "1000 - 58 - 214 - 416 = ?";
+ next;
+ input .@input;
+ if (.@input != 312) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "12 * 24 * 3 = ?";
+ next;
+ input .@input;
+ if (.@input != 864) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "10530 / 3 / 5 / 2 = ?";
+ next;
+ input .@input;
+ if (.@input != 351) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(35 * 19) - (1792 / 7) = ?";
+ next;
+ input .@input;
+ if (.@input != 409) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(2368 / 8) + (24 * 17) = ?";
+ next;
+ input .@input;
+ if (.@input != 704) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(2646 / 7) + (13 * 28) = ?";
+ next;
+ input .@input;
+ if (.@input != 742) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total price of";
+ mes "15 Green Potions,";
+ mes "6 Magnifiers and";
+ mes "4 Traps after";
+ mes "a 24 % discount?";
+ next;
+ input .@input;
+ if (.@input != 934) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total weight of";
+ mes "3 Ring Pommel Sabers,";
+ mes "4 Caps, and 2 Boots?";
+ next;
+ input .@input;
+ if (.@input != 550) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total defense of";
+ mes "a Buckler, Long Coat,";
+ mes "Gas Mask, Big Ribbon,";
+ mes "Cute Ribbon, Sakkat,";
+ mes "and Glasses?";
+ next;
+ input .@input;
+ if (.@input != 16) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "How much profit do you";
+ mes "make if you buy Tights";
+ mes "at a 24 % discount and";
+ mes "sell it at 20 % of";
+ mes "the normal price?";
+ next;
+ input .@input;
+ if (.@input != 8520) set .@w_point,.@w_point+1;
+ break;
+ case 3:
+ mes "[Raspuchin Gregory]";
+ mes "12 + 23 + 34 + 45 = ?";
+ next;
+ input .@input;
+ if (.@input != 114) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "1000 - 58 - 214 - 416 = ?";
+ next;
+ input .@input;
+ if (.@input != 312) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "14 * 17 * 3 = ?";
+ next;
+ input .@input;
+ if (.@input != 714) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "10530 / 3 / 5 / 2 = ?";
+ next;
+ input .@input;
+ if (.@input != 351) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(47 * 28) - (1376 / 4) = ?";
+ next;
+ input .@input;
+ if (.@input != 972) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "(2646 / 7) + (13 * 28) = ?";
+ next;
+ input .@input;
+ if (.@input != 742) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total cost of";
+ mes "6 Red Potions,";
+ mes "7 Green Potions,";
+ mes "and 8 Fly Wings";
+ mes "after a 24 % discount?";
+ next;
+ input .@input;
+ if (.@input != 798) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total weight of";
+ mes "2 Ring Pommel Sabers,";
+ mes "3 Caps, and 3 boots?";
+ next;
+ input .@input;
+ if (.@input != 480) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "What is the";
+ mes "total defense of";
+ mes "a Mirror Shield, Mr. Smile, Leather Jacket, Silk Robe, Wedding Veil, Muffler, and Eye Patch?";
+ next;
+ input .@input;
+ if (.@input != 12) set .@w_point,.@w_point+1;
+ mes "[Raspuchin Gregory]";
+ mes "If you buy 4 Padded Armors";
+ mes "at a 24% discount and sell";
+ mes "them at 20% of the original";
+ mes "price, how much profit would";
+ mes "you make from this sale?";
+ next;
+ input .@input;
+ if (.@input != 7680) set w_point,w_point+1;
+ }
+ if (.@w_point == 0) {
+ mes "[Raspuchin Gregory]";
+ mes "Ooh...";
+ mes "Excellent! Great!";
+ mes "You got them all correct!?";
+ mes "Keheheh, I have no choice but to acknowledge you...";
+ next;
+ }
+ else if (.@w_point == 1) {
+ mes "[Raspuchin Gregory]";
+ mes "You got one wrong!";
+ mes "But I'll let it slide.";
+ mes "You pass the interview!";
+ next;
+ }
+ else if (.@w_point == 2 && ALCH_Q == 5) {
+ mes "[Raspuchin Gregory]";
+ mes "You've got serious";
+ mes "weaknesses in math,";
+ mes "but I'll let you go this time...";
+ next;
+ }
+ else {
+ set ALCH_Q,5;
+ mes "[Raspuchin Gregory]";
+ mes "Keheheh! Idiot!";
+ mes "Just listening to your";
+ mes "answers is making me feel";
+ mes "stupider! You might as well";
+ mes "have got them all wrong!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "How can a person that";
+ mes "can't even answer all of";
+ mes "these simple questions think";
+ mes "of becoming an Alchemist?!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Hm...?";
+ mes "Did you get";
+ mes "any right?";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Fool! Even if you make one little mistake, everything goes wrong";
+ mes "in Alchemy! Now get out of here!";
+ mes "You make me sick!";
+ close;
+ }
+ mes "[Raspuchin Gregory]";
+ mes "So hurry up, become an Alchemist, do some good research, and you might turn out to be of some help to me. Hahahahahaha~!";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Now go to Darwin!";
+ mes "He'll teach you how to do the experiments. Just tell him that";
+ mes "I sent you.";
+ set ALCH_Q,6;
+ changequest 2031,2032;
+ close;
+ }
+ else if (ALCH_Q == 6) {
+ mes "What are you doing?";
+ mes "Go and find Darwin now.";
+ next;
+ mes "[Raspuchin Gregory]";
+ mes "Keheheheheheheheh~";
+ mes "Don't think this is the end of it!";
+ close;
+ }
+ mes "Keheheheheheheheh~";
+ mes "Don't think this is the end of it!";
+ close;
+}
+
+alde_alche,13,15,7 script Studying Man#am 750,{
+ if (checkweight(1201,1) == 0) {
+ mes "- Wait a minute! -";
+ mes "- Currently you are carrying -";
+ mes "- too many items with you. -";
+ mes "- Please come back again -";
+ mes "- after you store some items into kafra storage. -";
+ close;
+ }
+ mes "[Darwin]";
+ if (BaseJob != Job_Merchant) {
+ if (BaseJob == Job_Alchemist) {
+ mes "Ah...";
+ mes "You...";
+ mes "You've become";
+ mes "an Alchemist.";
+ next;
+ mes "[Darwin]";
+ mes "Remember...";
+ mes "In your quest";
+ mes "to make your";
+ mes "dreams come true,";
+ mes "do not lose what";
+ mes "you cherish.";
+ next;
+ mes "[Darwin]";
+ mes "Ah...";
+ mes "Harmona...";
+ mes "My love...";
+ close;
+ }
+ else {
+ mes "When you have";
+ mes "your dreams, you";
+ mes "have everything.";
+ mes "Without them, you have";
+ mes "nothing more to lose.";
+ next;
+ mes "[Darwin]";
+ mes "These cursed eyes...";
+ mes "They've lost sight of";
+ mes "my dreams a long time ago.";
+ mes "Ha ha ha ha...";
+ next;
+ mes "[Darwin]";
+ mes "Does paradise";
+ mes "really exist...?";
+ mes "Not without my love...";
+ mes "Not without Harmona...";
+ close;
+ }
+ }
+ if (ALCH_Q == 6) {
+ mes "...";
+ next;
+ mes "[Darwin]";
+ mes "...";
+ mes "......";
+ next;
+ mes "[Darwin]";
+ mes "...";
+ mes "......";
+ mes "Who is it...?";
+ next;
+ monster "alde_alche",13,15,"Wolf",1013,1;
+ killmonsterall "alde_alche";
+ mes "[Darwin]";
+ mes "A wolf?";
+ mes "Or a human?";
+ mes "You must be seeking";
+ mes "something, are you not?";
+ next;
+ mes "[Darwin]";
+ mes "After all...";
+ mes "Everyone has desires";
+ mes "to fulfill. Be be careful.";
+ mes "Do not be like the wild";
+ mes "wolf drawn to the flowers.";
+ next;
+ mes "[Darwin]";
+ mes "In your efforts to gain something else, you may end up sacrificing something precious to you.";
+ next;
+ mes "[Darwin]";
+ mes "Cultivating joy and happiness";
+ mes "is much like cultivating flowers.";
+ mes "If something is missing, the";
+ mes "flower will wilt away...";
+ next;
+ mes "[Darwin]";
+ mes "What brings you";
+ mes "to this kind of place?";
+ next;
+ switch(select("I want to learn how to experiment.:Tell me more about flowers.:Nothing.")) {
+ case 1:
+ mes "[Darwin]";
+ mes "You wish to";
+ mes "learn Alchemy?";
+ mes "Everything I know,";
+ mes "I've learned for the";
+ mes "sake of making my";
+ mes "dream come true...";
+ next;
+ mes "[Darwin]";
+ mes "I'll teach";
+ mes "you the basics...";
+ mes "But everything you";
+ mes "learn afterwards must";
+ mes "be directed through";
+ mes "your own motivations.";
+ next;
+ mes "[Darwin]";
+ mes "I will teach you";
+ mes "how to make simple";
+ mes "medicine. So please";
+ mes "bring the following";
+ mes "materials right away.";
+ next;
+ mes "[Darwin]";
+ mes "^551A8B3 Medicine Bowls^000000,";
+ mes "^551A8B3 Empty Bottles^000000,";
+ mes "^551A8B1 Red Herb^000000,";
+ mes "^551A8B1 Yellow Herb^000000 and";
+ mes "^551A8B1 White Herb^000000.";
+ set ALCH_Q,7;
+ changequest 2032,2033;
+ next;
+ mes "[Darwin]";
+ mes "Once you have";
+ mes "prepared everything,";
+ mes "return to me.";
+ close;
+ case 2:
+ mes "[Darwin]";
+ mes "Flowers...?";
+ mes "In the darkest";
+ mes "recesses of my mind,";
+ mes "there is a blossum";
+ mes "that I faintly remember...";
+ next;
+ mes "[Darwin]";
+ mes "For the one that";
+ mes "I love, I put all";
+ mes "of my efforts into";
+ mes "researching that one thing.";
+ next;
+ mes "[Darwin]";
+ mes "I won't tell you the details,";
+ mes "but I was basically researching";
+ mes "the relationship between";
+ mes "wolves and flowers.";
+ next;
+ mes "[Darwin]";
+ mes "But yes...";
+ mes "It was a flower.";
+ mes "With its shine, it was said";
+ mes "to let you see paradise.";
+ mes "The ^551A8BIllusion Flower^000000...";
+ next;
+ mes "[Darwin]";
+ mes "I even made";
+ mes "a Homunculus,";
+ mes "but no one believed that I could create new life from a flower...";
+ next;
+ mes "[Darwin]";
+ mes "Then...";
+ mes "Well, some other things happened, and now I have nothing left. Time no longer has any meaning for me.";
+ next;
+ mes "[Darwin]";
+ mes "Ahh...";
+ mes "Harmona...";
+ mes "Where have you gone?";
+ mes "I hope you're in a field";
+ mes "of beautiful flowers...";
+ close;
+ case 3:
+ mes "[Darwin]";
+ mes "Consider what";
+ mes "is most precious";
+ mes "to you. It cannot";
+ mes "be protected if you";
+ mes "do not recognize it.";
+ close;
+ }
+ }
+ else if (ALCH_Q == 7) {
+ mes "...";
+ mes "......";
+ next;
+ mes "[Darwin]";
+ mes "...";
+ mes "......";
+ mes "Who is it...?";
+ next;
+ mes "[Darwin]";
+ mes "Ah...";
+ mes "You are the one who";
+ mes "wishes to learn Alchemy.";
+ mes "Have you prepared everything?";
+ next;
+ if (countitem(710) > 0) {
+ mes "[Darwin]";
+ mes "Wait.";
+ mes "That Illusion Flower.";
+ mes "How did you get that?";
+ next;
+ mes "[Darwin]";
+ mes "Where did you find it?!";
+ mes "The flower that slowly";
+ mes "blooms under the";
+ mes "moonlight?";
+ mes "It's beautiful...!";
+ next;
+ mes "[Darwin]";
+ mes "Th-That flower...";
+ mes "Please let me see it.";
+ mes "The Illusion Flower!";
+ mes "Uwaaaaaaah!!";
+ next;
+ mes "[Darwin]";
+ mes "Would you be so kind";
+ mes "as to let me have this flower?";
+ mes "I'm sure that this is the Moonlight Flower that I've been seeking!";
+ next;
+ if (select("Sorry, I can't give it to you.:I brought it to give to you.") == 1) {
+ mes "[Darwin]";
+ mes "I understand.";
+ mes "You can't give";
+ mes "such a precious";
+ mes "flower to just anyone.";
+ mes "Well... It's okay.";
+ next;
+ mes "[Darwin]";
+ mes "It just brought back old memories. I shouldn't have asked in the first place. In any case, please bring what is needed for the experiment.";
+ next;
+ mes "[Darwin]";
+ mes "Please leave that flower";
+ mes "somewhere else. It brings";
+ mes "back too many memories...";
+ close;
+ }
+ mes "[Darwin]";
+ mes "Are you";
+ mes "serious?!";
+ mes "Thank you!";
+ mes "Such a precious flower.";
+ mes "Ah, Harmona, my love...";
+ next;
+ mes "[Darwin]";
+ mes "Yes...";
+ mes "I shall repay you for this.";
+ mes "I shall plant all of my knowledge of Alchemy directly into your mind...";
+ next;
+ mes "[Darwin]";
+ mes "Open your eyes wide,";
+ mes "and look into my eyes!!";
+ mes "Don't stop until the end!!";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ mes "Aenean fermentum ullamcorper.";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ mes "Aenean fermentum ullamcorper.";
+ mes "Vestibulum ante ipsum primis in";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ mes "Aenean fermentum ullamcorper.";
+ mes "Vestibulum ante ipsum primis in";
+ mes "faucibus orci luctus et ultrices";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ mes "Aenean fermentum ullamcorper.";
+ mes "Vestibulum ante ipsum primis in";
+ mes "faucibus orci luctus et ultrices";
+ mes "posuere cubilia Curae; Morbi";
+ next;
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ mes "Aenean fermentum ullamcorper.";
+ mes "Vestibulum ante ipsum primis in";
+ mes "faucibus orci luctus et ultrices";
+ mes "posuere cubilia Curae; Morbi";
+ mes "massa, fermentum vitae...";
+ next;
+ delitem 710,1; //Illusion_Flower
+ mes "[Darwin]";
+ mes "^666666*Gasp...*^000000";
+ mes "You are now";
+ mes "an Alchemist!!";
+ mes "Go to the Union";
+ mes "and cast away the last";
+ mes "vestiges of Merchant life!!";
+ set ALCH_Q,40;
+ close;
+ }
+ else if (countitem(7134) > 2 && countitem(713) > 2 && countitem(507) > 0 && countitem(508) > 0 && countitem(509) > 0) {
+ mes "[Darwin]";
+ mes "Seems like you have everything ready. As promised, I will teach you how to make simple medicine.";
+ next;
+ mes "[Darwin]";
+ mes "First, prepare the Medicine Bowl. Then, you put the Herbs inside, like this, and slowly crush them.";
+ next;
+ mes "[Darwin]";
+ mes "Pour small amounts";
+ mes "of clean water and stir";
+ mes "the mixture until it thickens.";
+ mes "Afterwards, add some more Herbs.";
+ next;
+ mes "[Darwin]";
+ mes "That's how you make it. If you think you have enough, gently pour the mixture into an empty bottle.";
+ delitem 7134,3; //Medicine_Bowl
+ delitem 713,3; //Empty_Bottle
+ delitem 507,1; //Red_Herb
+ delitem 508,1; //Yellow_Herb
+ delitem 509,1; //White_Herb
+ next;
+ mes "[Darwin]";
+ mes "There you go,";
+ mes "it's complete.";
+ mes "Now, make some medicine";
+ mes "using the simple procedure";
+ mes "I just explained to you.";
+ set w_point,0;
+ next;
+ switch(select("Prepare the Medicine Bowl.:Put the Medicine Bowl on your head.:Kick the Medicine Bowl.")) {
+ case 1:
+ break;
+ case 2:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "What...?";
+ next;
+ break;
+ case 3:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "No!";
+ next;
+ break;
+ }
+ switch(select("Put some dirt in the Medicine Bowl.:Put some Herbs in the Medicine Bowl.:Put a Harp in the Medicine Bowl.")) {
+ case 1:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "...Eh!?";
+ mes "That's not";
+ mes "medicine!";
+ next;
+ break;
+ case 2:
+ break;
+ case 3:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "A Harp?";
+ mes "And how would";
+ mes "you do that?";
+ next;
+ break;
+ }
+ switch(select("Crush the Herbs.:Crush the Medicine Bowl.:Crush Darwin's foot.")) {
+ case 1:
+ break;
+ case 2:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "Wh-What are";
+ mes "you doing!?";
+ next;
+ break;
+ case 3:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "Agh...!";
+ mes "What do you";
+ mes "think you're";
+ mes "doing?!";
+ next;
+ break;
+ }
+ switch(select("Spray clean water.:Drink clean water.:Pour clean water.")) {
+ case 1:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "Huh?";
+ mes "What are you doing?";
+ next;
+ break;
+ case 2:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "W-wait...";
+ mes "Are you";
+ mes "taking a break?";
+ next;
+ break;
+ case 3:
+ break;
+ }
+ switch(select("Continue crushing the Herbs.:Continue eating the Herbs.:Continue dancing and singing.")) {
+ case 1:
+ break;
+ case 2:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "Eat the Herbs?";
+ mes "I think you need";
+ mes "to focus on the";
+ mes "task at hand...";
+ next;
+ break;
+ case 3:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "Singing and";
+ mes "dancing? Alchemists";
+ mes "don't do that, have";
+ mes "you gone crazy?";
+ next;
+ break;
+ }
+ switch(select("Put noodles in and fry it.:Pour it in an empty bottle.:Hold the Medicine Bowl and drink it.")) {
+ case 1:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "We're Alchemists,";
+ mes "not restaurant chefs.";
+ next;
+ break;
+ case 2:
+ break;
+ case 3:
+ set .@w_point,.@w_point+1;
+ mes "[Darwin]";
+ mes "Huh...";
+ mes "Pretty sloppy...";
+ next;
+ break;
+ }
+ if (.@w_point > 0) {
+ mes "[Darwin]";
+ mes "...";
+ mes "......";
+ next;
+ mes "[Darwin]";
+ mes "You messed up the mixture";
+ mes "since you didn't follow the procedure! Get some more ingredients so you can try it";
+ mes "again until you get it right.";
+ close;
+ }
+ getitem 501,1; //Red_Potion
+ getitem 503,1; //Yellow_Potion
+ getitem 504,1; //White_Potion
+ mes "[Darwin]";
+ mes "Good job.";
+ mes "It came out pretty well considering it's your first time. Go ahead and keep the medicines that you've just made.";
+ set ALCH_Q,8;
+ changequest 2033,2035;
+ next;
+ mes "[Darwin]";
+ mes "Now, go into the next room";
+ mes "and speak to Van Helmont to";
+ mes "continue your training.";
+ next;
+ mes "[Darwin]";
+ mes "Never forget...";
+ mes "You must always protect";
+ mes "what is most precious to you.";
+ close;
+ }
+ else {
+ mes "[Darwin]";
+ mes "Have you forgotten";
+ mes "what you need to bring?";
+ mes "Let me remind you once";
+ mes "again. You must come";
+ mes "back with...";
+ next;
+ mes "[Darwin]";
+ mes "^551A8B3 Medicine Bowls^000000,";
+ mes "^551A8B3 Empty Bottle^000000,";
+ mes "^551A8B1 Red Herb^000000,";
+ mes "^551A8B1 Yellow Herb^000000 and";
+ mes "^551A8B1 White Herb^000000.";
+ next;
+ mes "[Darwin]";
+ mes "Come back";
+ mes "when you are";
+ mes "ready...";
+ close;
+ }
+ }
+ else if (ALCH_Q == 8) {
+ mes "I said to go";
+ mes "to Van Helmont.";
+ mes "I'd like to teach you";
+ mes "more, but I can't.";
+ next;
+ mes "[Darwin]";
+ mes "Aah...";
+ mes "Harmona, my love.";
+ mes "I can't even see the flower anymore. My soul quietly";
+ mes "withers as well..";
+ close;
+ }
+ else if (ALCH_Q == 40) {
+ mes "I have already given you all of my knowledge and have nothing more";
+ mes "to teach you.";
+ next;
+ mes "[Darwin]";
+ mes "Go to the second floor and talk to speak to our Union Leader. Once";
+ mes "you do that, your life as an Alchemist will begin.";
+ close;
+ }
+ else {
+ mes "When you have";
+ mes "your dreams, you";
+ mes "have everything.";
+ mes "Without them, you have";
+ mes "nothing more to lose.";
+ next;
+ mes "[Darwin]";
+ mes "These cursed eyes...";
+ mes "They've lost sight of";
+ mes "my dreams a long time ago.";
+ mes "Ha ha ha ha...";
+ next;
+ mes "[Darwin]";
+ mes "Does paradise";
+ mes "really exist...?";
+ mes "Not without my love...";
+ mes "Not without Harmona...";
+ close;
+ }
+}
+
+alde_alche,79,19,5 script Experiment Expert#am 748,{
+ mes "[Van Helmont]";
+ if (BaseJob != Job_Merchant) {
+ if (BaseJob == Job_Alchemist) {
+ mes "What do you want?";
+ mes "I'm busy!! Don't";
+ mes "bother me and get";
+ mes "on your way.";
+ next;
+ mes "[Van Helmont]";
+ mes "Now, come on...";
+ mes "You'll never get";
+ mes "any research completed if you just slack off. Go out and learn all that you can.";
+ next;
+ mes "[Van Helmont]";
+ mes "Reading science journals and performing experiments. That's what Alchemy is all about. Now, let me get back to work!";
+ close;
+ }
+ else {
+ mes "Just a little...";
+ mes "A little bit more...";
+ mes "Nooo! Just a little";
+ mes "bit more and it";
+ mes "would've been done!";
+ next;
+ mes "[Van Helmont]";
+ mes "Why...?!";
+ mes "Why, another failure?!";
+ mes "My calculations were";
+ mes "all correct! W-Wait...!";
+ next;
+ mes "[Van Helmont]";
+ mes "Perhaps, if I capacitated the thermal flux by using the neutronic gradient, it just might work...!";
+ close;
+ }
+ }
+ if (ALCH_Q == 8) {
+ mes "Arrrrgh...!";
+ mes "Why isn't this formula working? What's wrong? In theory, it's all correct, but there must be an error in the formula somewhere...";
+ next;
+ mes "[Van Helmont]";
+ mes "I pour it in here, and it should stop. Wait, this is the wrong solution! How could I make such";
+ mes "a dumb mistake?! When did these";
+ mes "get switched?!";
+ next;
+ mes "[Van Helmont]";
+ mes "Okay, okay...";
+ mes "I just need to fix this part.";
+ mes "No need to start over. I just";
+ mes "need to fix it... But wait. Wait...";
+ next;
+ mes "[Van Helmont]";
+ mes ".................";
+ next;
+ mes "[Van Helmont]";
+ mes "Um...";
+ mes "Who are you?";
+ next;
+ if (select("I want to become an Alchemist.:.......") == 2) {
+ mes "[Van Helmont]";
+ mes "Hmm...?";
+ mes "What, did you just want to watch? Fine, fine, but do it quietly and leave right when you're done.";
+ next;
+ mes "[Van Helmont]";
+ mes "Stay out of my way and don't go around touching stuff. There might be some volatile materials, so it'd be dangerous to have any accidents.";
+ close;
+ }
+ mes "[Van Helmont]";
+ mes "You...?";
+ mes "An Alchemist?";
+ mes "What a funny Merchant.";
+ next;
+ mes "[Van Helmont]";
+ mes "Well, that's nice, but I have very urgent experiments that require";
+ mes "my attention, so don't get";
+ mes "in the way.";
+ next;
+ if (select("Teach me something.:...") == 1) {
+ mes "[Van Helmont]";
+ mes "Argh...!";
+ mes "Didn't I just tell you not to bother me? What's so hard to understand about that?";
+ next;
+ mes "[Van Helmont]";
+ mes "Fine, fine. I'll give you an assignment. Learn something";
+ mes "new and come back. Let's see.";
+ mes "What would be good...";
+ next;
+ mes "[Van Helmont]";
+ mes "Okay, I got it.";
+ mes "Go learn how to make";
+ mes "a Counteragent and Mixture";
+ mes "from Molgenstein.";
+ next;
+ mes "[Van Helmont]";
+ mes "You don't need to bring anything. Just go watch him at work and have him tell you how he makes those solutions. Got it?";
+ next;
+ mes "[Van Helmont]";
+ set ALCH_Q,9;
+ changequest 2035,2036;
+ mes "Well then, see you later.";
+ mes "You'd better get going as";
+ mes "soon as you can.";
+ close;
+ }
+ mes "[Van Helmont]";
+ mes "...";
+ next;
+ mes "[Van Helmont]";
+ mes "...";
+ mes "......";
+ next;
+ mes "[Van Helmont]";
+ mes "...";
+ mes "......";
+ next;
+ mes "[Van Helmont]";
+ mes "So if I recalibrate the combustion rate of this compound, that should negate any cohesive tendencies in this particle flux...";
+ next;
+ mes "[Van Helmont]";
+ mes "But what am I going to do";
+ mes "about all of this spontaneous";
+ mes "crystallization?! I can't very well remove this matrix, I need it for the catalyst to reach the triple point.";
+ next;
+ mes "[Van Helmont]";
+ mes "Damn!";
+ mes "What am";
+ mes "I going to do?!";
+ close;
+ }
+ else if (ALCH_Q == 9) {
+ mes "Alright, if I make an incision here in the Tentacle, and add a Jellopy and Sticky Mucus solution into the... Where the hell did my Medicine Bowl go?";
+ next;
+ mes "[Van Helmont]";
+ mes "Did I use them all at a time like this?! I wonder if Nicholas has any left. Ugh, what a pain. Wait. Wait a minute...";
+ next;
+ mes "[Van Helmont]";
+ mes "...";
+ next;
+ mes "[Van Helmont]";
+ mes "...";
+ mes "......";
+ mes "Who are you?";
+ next;
+ if (select("I want to become an Alchemist?:.......") == 2) {
+ mes "[Van Helmont]";
+ mes "Hmm...?";
+ mes "What, did you just want to watch? Fine, fine, but do it quietly and leave right when you're done.";
+ next;
+ mes "[Van Helmont]";
+ mes "Stay out of my way and don't go around touching stuff. There might be some volatile materials, so it'd be dangerous to have any accidents.";
+ close;
+ }
+ mes "[Van Helmont]";
+ mes "Ah, of course. The Merchant from before. So what did you learn from Molgenstein? I didn't just send you there for fun, you know.";
+ next;
+ mes "[Van Helmont]";
+ mes "Let me ask you";
+ mes "some questions to";
+ mes "check what you've";
+ mes "learned.";
+ next;
+ if(MISC_QUEST & 4) {
+ mes "[Van Helmont]";
+ mes "Which item is not";
+ mes "necessary to make";
+ mes "a Counteragent?";
+ next;
+ if (select("Karvodailnirol:Detrimindexta:Alcohol") != 1) set .@w_point,.@w_point+1;
+ mes "[Van Helmont]";
+ mes "What item is not";
+ mes "necessary to make";
+ mes "a Mixture?";
+ next;
+ if (select("Karvodailnirol:Detrimindexta:Alcohol") != 2) set .@w_point,.@w_point+1;
+ if (.@w_point > 0) {
+ mes "[Van Helmont]";
+ mes "Weren't you listening to Molgenstein at all? Maybe you";
+ mes "have to watch him make it again.";
+ next;
+ mes "[Van Helmont]";
+ mes "If you can't tell the exact items that you need in an experiment,";
+ mes "you might end up hurting yourself!";
+ close;
+ }
+ mes "[Van Helmont]";
+ mes "Good, you've learned well.";
+ mes "Okay, now you know something about experimentation. You're done here, so now I can continue with my experiments.";
+ next;
+ mes "[Van Helmont]";
+ mes "Go out and find the room next";
+ mes "to this one and talk to Nicholas. He'll continue your training.";
+ next;
+ set ALCH_Q,20;
+ changequest 2036,2037;
+ mes "[Van Helmont]";
+ mes "What are you";
+ mes "still doing here?";
+ mes "Go! We both have";
+ mes "more important";
+ mes "things to do!";
+ close;
+ }
+ else {
+ mes "[Van Helmont]";
+ mes "What item do";
+ mes "you need to make";
+ mes "a Counteragent?";
+ next;
+ select("Feather:Sticky Mucus:Animal Gore");
+ mes "[Van Helmont]";
+ mes "What item do";
+ mes "you need to make";
+ mes "a Mixture?";
+ next;
+ select("Monster Feed:Ancient Lips:Rotten Bandage");
+ mes "[Van Helmont]";
+ mes "Be honest. You don't know, do you?! Didn't I say to go to Molgenstein and have him teach you?!";
+ next;
+ mes "[Van Helmont]";
+ mes "Don't even think about coming back until you talk to him! Now stop bothering me and get out of here!";
+ close;
+ }
+ }
+ else if (ALCH_Q == 20) {
+ mes "What...?";
+ mes "I thought I told you to";
+ mes "talk to Nicholas next door?";
+ next;
+ mes "[Van Helmont]";
+ mes "I need to continue my research,";
+ mes "and you need to finish becoming an Alchemist. Come on, get moving!";
+ close;
+ }
+ else {
+ mes "Just a little...";
+ mes "A little bit more...";
+ mes "Nooo! Just a little";
+ mes "bit more and it";
+ mes "would've been done!";
+ next;
+ mes "[Van Helmont]";
+ mes "Why...?!";
+ mes "Why, another failure?!";
+ mes "My calculations were";
+ mes "all correct! Wait...";
+ next;
+ mes "[Van Helmont]";
+ mes "Perhaps, if I capacitated the thermal flux by using the neutronic gradient, it just might work...";
+ close;
+ }
+}
+
+alde_alche,101,184,4 script Master Alchemist#am 122,{
+ cutin "job_alche_vincent",2;
+ mes "[Vincent Carsciallo]";
+ if (Upper == 1) {
+ mes "You have transcended...";
+ mes "Excellent, excellent.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "You don't belong here.";
+ mes "Go and explore the wide world, my friend.";
+ close2;
+ cutin "",255;
+ end;
+ }
+ if (BaseJob != Job_Merchant) {
+ if (BaseJob == Job_Alchemist) {
+ mes "Welcome!";
+ mes "So how is your";
+ mes "research coming along?";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "At times you get results that are unexpected from an experiment. Although these may be setbacks in your research, such results can also lead to new discoveries.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "If you discover something new,";
+ mes "come and tell us. Don't forget that we are all working together to unlock the mysteries of science!";
+ }
+ else if (BaseClass == Job_Novice) {
+ mes "Hm...";
+ mes "A Novice?";
+ mes "You shouldn't be";
+ mes "playing in a place";
+ mes "like this.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "There are a lot of volatile chemicals and dangerous";
+ mes "materials in this building. It'd be a lot better if you just played outside.";
+ }
+ else {
+ mes "Hmm...?";
+ mes "What's an adventurer";
+ mes "doing here in the";
+ mes "Alchemist Union?";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "I'm afraid there's";
+ mes "not much we can offer";
+ mes "you here if you're not";
+ mes "a member of our Union.";
+ }
+ close2;
+ cutin "",255;
+ end;
+ }
+ if (ALCH_Q == 0) {
+ mes "Hmm...?";
+ mes "A Merchant?";
+ mes "Are you interested";
+ mes "in learning Alchemy?";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "This is the Alchemist Union.";
+ mes "We research and experiment with many different substances in order to create new materials without using magic.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "Someday, we hope to unlock";
+ mes "the secret of life, as well as the other mysteries of science.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "After being traveling as a Merchant for a long time, you must have developed some scientific curiosity. If you'd like to learn Alchemy, why don't you try joining the Alchemist Union?";
+ close2;
+ cutin "",255;
+ end;
+ }
+ else if (ALCH_Q == 40) {
+ if (JobLevel < 40) {
+ set ALCH_Q,0;
+ mes "Hmm...you don't seem to be qualified yet.";
+ mes "Remember, you must reach at least job level 40 to become an Alchemist.";
+ close2;
+ cutin "",255;
+ end;
+ }
+ if (SkillPoint) {
+ mes "Ah, you're almost";
+ mes "ready to become an";
+ mes "Alchemist, but you must";
+ mes "first allocate your unused";
+ mes "Skill Points.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "Talk to me again";
+ mes "once you have spent";
+ mes "all of your extra";
+ mes "Skill Points.";
+ close2;
+ cutin "",255;
+ end;
+ }
+ if(checkquest(2039) != -1) {
+ changequest 2039,2040;
+ }
+ mes "Ah, well done.";
+ mes "I can see that you";
+ mes "have learned all of";
+ mes "the basics of Alchemy.";
+ next;
+ set ALCH_Q,0;
+ completequest 2040;
+ set .@jlevel,JobLevel;
+ callfunc "Job_Change",Job_Alchemist;
+ callfunc "F_ClearJobVar";
+ mes "[Vincent Carsciallo]";
+ mes "Henceforth, you are";
+ mes "now a member of our";
+ mes "illustrious Union.";
+ mes "I hope you learn a lot...";
+ next;
+
+ if (.@jlevel == 50) {
+ getitem 7133,1; //Slim_Potion_Create_Book
+ mes "[Vincent Carsciallo]";
+ mes "Let me give you";
+ mes "something special.";
+ mes "You can use this to";
+ mes "begin your life";
+ mes "of research.";
+ }
+ else {
+ switch(rand(1,6)) {
+ case 1:
+ getitem 7127,1; //Alcol_Create_Book
+ break;
+ case 2:
+ getitem 7128,1; //FireBottle_Create_Book
+ break;
+ case 3:
+ getitem 7129,1; //Acid_Create_Book
+ break;
+ case 4:
+ getitem 7130,1; //Plant_Create_Book
+ break;
+ case 5:
+ getitem 7131,1; //Mine_Create_Book
+ break;
+ case 6:
+ getitem 7144,1; //Normal_Potion_Book
+ }
+ mes "[Vincent Carsciallo]";
+ mes "And...";
+ mes "Here's a little";
+ mes "something to help";
+ mes "you begin your";
+ mes "research.";
+ }
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "I'll see";
+ mes "you later then...";
+ mes "Remember to carry";
+ mes "yourself with pride";
+ mes "as an Alchemist!";
+ close2;
+ cutin "",255;
+ end;
+ }
+ else {
+ mes "Ah...";
+ mes "I believe you've";
+ mes "already registered";
+ mes "for training to become";
+ mes "an Alchemist.";
+ next;
+ mes "[Vincent Carsciallo]";
+ mes "Please listen to the";
+ mes "other Alchemists and follow their instructions carefully. You will learn much from them.";
+ close2;
+ cutin "",255;
+ end;
+ }
+}
+
+alde_alche,145,19,1 script Chief Researcher#am 57,{
+ if (checkweight(1201,1) == 0) {
+ mes "- Wait a minute! -";
+ mes "- Currently you are carrying -";
+ mes "- too many items with you. -";
+ mes "- Please come back again -";
+ mes "- after you store some items into kafra storage. -";
+ close;
+ }
+ if (ALCH_Q > 19 && ALCH_Q < 22) {
+ if (ALCH_Q == 20) {
+ mes "[Nicholas Flamel]";
+ mes "Ooh...";
+ mes "You're the upstart";
+ mes "Merchant that wants";
+ mes "to become an Alchemist?";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Not just anyone can become an Alchemist, you know. You've got to have motivation and clear goals and a strong sense of focus.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Alchemists must memorize many chemical equations, scientific laws and a lot of other information. It's actually pretty tough.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "If you can't focus, you'll be confused later when you look at Alchemy charts. My test will judge your ability to do just that.";
+ next;
+ }
+ mes "[Nicholas Flamel]";
+ mes "Find the words scrambled";
+ mes "in the group of letters I give you. They can be made by using some";
+ mes "or all of the letters.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "You pass if you";
+ mes "choose the word";
+ mes "that is ^551A8BIN^000000 the puzzle.";
+ next;
+ switch(rand(1,3)) {
+ case 1:
+ mes "t m y a n y e o b n e g p r i";
+ next;
+ if (select("Brake:Brass:Bug:Broken:Brigan?") == 5) set .@alch_t,.@alch_t+10;
+ mes "o n c u t a p j l e r s v m u";
+ next;
+ if (select("vendor:storage:weapon:simple:streetshop") == 1) set .@alch_t,.@alch_t+10;
+ mes "t v a r m e g p h e u b o y l";
+ next;
+ if (select("molasses:party:leader:sweets:treacle") == 2) set .@alch_t,.@alch_t+10;
+ mes "q z a h n a i n b r d p t n c";
+ next;
+ if (select("partisan:partizan:pato:paros:pack") == 2) set .@alch_t,.@alch_t+10;
+ break;
+ case 2:
+ mes "m p d i c f a r o g n k w a s";
+ next;
+ if (select("packman:sunshine:ragnarok:wonderland:frost") == 1) set .@alch_t,.@alch_t+10;
+ mes "g b n o p r e f a r e t a s k";
+ next;
+ if (select("purple:smoker:ragnarok:bolt:burnt wood") == 3) set .@alch_t,.@alch_t+10;
+ mes "u g n i s j e k c e o g n d p";
+ next;
+ if (select("scab:kinship:donate:source:opening") == 5) set .@alch_t,.@alch_t+10;
+ mes "r o e h n r o m c a i n p t t";
+ next;
+ if (select("forgemerchant:potionmerchant:dcmerchant:vendingmerchant:battlemerchant") == 2) set .@alch_t,.@alch_t+10;
+ break;
+ case 3:
+ mes "s m i e x b w u n e t a g l r";
+ next;
+ if (select("tiger:wolf:pumpkin:tripped:tore") == 1) set .@alch_t,.@alch_t+10;
+ mes "n i e g b o p d s o a u w r v";
+ next;
+ if (select("bash:provoke:endure:stun:abracadabra") == 3) set .@alch_t,.@alch_t+10;
+ mes "l r m g r e x t a v i n e d e";
+ next;
+ if (select("alberta:latifoliate:crimson:maple:evergreen") == 5) set .@alch_t,.@alch_t+10;
+ mes "r o e h n r o m c a i n p t t";
+ next;
+ if (select("forgemerchant:potionmerchant:dcmerchant:vendingmerchant:battlemerchant") == 2) set .@alch_t,.@alch_t+10;
+ break;
+ }
+ mes "[Nicholas Flamel]";
+ mes "Ah, you finished.";
+ mes "Now, let's see...";
+ if (.@alch_t > 30) {
+ set ALCH_Q,22;
+ mes "Excellent job!";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Great, you found all of those hidden words. With that kind of concentration, you should have no problem memorizing information.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Come back in a little bit while";
+ mes "I prepare the next assignment";
+ mes "for your training.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Oh, and before you talk to";
+ mes "me again, make sure you have";
+ mes "^551A8Bplenty of room in your inventory^000000.";
+ close;
+ }
+ else {
+ set ALCH_Q,21;
+ mes "^666666*Gasp!*^000000 H-horrible!";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Judging from these results, you obviously have a problem with concentrating.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "If you can't even solve these easy word puzzles, how can you keep track of your experiments and research?";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Why don't you relax";
+ mes "and rest a bit before";
+ mes "you take the test again?";
+ close;
+
+ }
+ }
+ else if (ALCH_Q == 22) {
+ set .@now_weight,MaxWeight-Weight;
+ if (.@now_weight < 1370) {
+ mes "[Nicholas Flamel]";
+ mes "Whoa...";
+ mes "You're carrying too much stuff! First, put some of your things in Kafra Storage.";
+ close;
+ }
+ mes "[Nicholas Flamel]";
+ mes "Alright...";
+ mes "For your next";
+ mes "assignment, you'll";
+ mes "need to travel to ^551A8BJuno^000000.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "There, you'll need to talk to ^551A8BBain^000000 and ^551A8BBajin^000000. Those two are doing Alchemy research with the Sages";
+ mes "in Juno. You'll learn something by assisting them with their project.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Come back here to me after you";
+ mes "help them out. They'll need all of these items to continue their experiments.";
+ next;
+ set ALCH_Q,23;
+ changequest 2037,2038;
+ mes "[Nicholas Flamel]";
+ mes "1 Mixture,";
+ mes "5 Burnt Tree,";
+ mes "5 Fine Sand,";
+ mes "3 Rough Oridecon";
+ mes "and 3 Rough Elunium.";
+ getitem 974,1; //Mixture
+ getitem 7068,5; //Burn_Tree
+ getitem 7043,5; //Fine_Sand
+ getitem 756,3; //Oridecon_Stone
+ getitem 757,3; //Elunium_Stone
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Alright.";
+ mes "Have a safe trip";
+ mes "and come back in";
+ mes "one piece.";
+ close;
+ }
+ else if (ALCH_Q == 23) {
+ mes "[Nicholas Flamel]";
+ mes "Didn't I say to";
+ mes "go to Juno and help";
+ mes "Bain and Bajin with";
+ mes "their Alchemy research?";
+ close;
+ }
+ else if (ALCH_Q == 24) {
+ set ALCH_Q,40;
+ changequest 2038,2039;
+ mes "[Nicholas Flamel]";
+ mes "Ah, you're back!";
+ mes "I just got a message from Bain";
+ mes "and Bajin. They let me know that they were very happy with your assistance.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "If you were good enough";
+ mes "to help out those brothers,";
+ mes "you definitely qualify to be";
+ mes "an Alchemist.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Good work!";
+ mes "All you have to do now is speak to the Union Leader on the 2nd floor! Congratulations, you'll become an Alchemist very soon!";
+ close;
+ }
+ else if (ALCH_Q == 40 && BaseJob == Job_Merchant) {
+ mes "[Nicholas Flamel]";
+ mes "All you have to do now is speak to the Union Leader on the 2nd floor! Congratulations, you'll become an Alchemist very soon!";
+ close;
+ }
+ else {
+ mes "[Nicholas Flamel]";
+ mes "Lorem ipsum dolor sit amet,";
+ mes "consectetuer adipiscing elit.";
+ mes "Vivamus sem. Sed metus";
+ mes "lacus, viverra id, rutrum eget,";
+ mes "rhoncus sit amet, lectus.";
+ next;
+ mes "[Nicholas Flamel]";
+ mes "Suspendisse sit amet urna in";
+ mes "nisl fringilla faucibus. Nulla scelerisque eros...";
+ mes "^666666*Mumble Mumble*^000000";
+ close;
+ }
+}
+
+//============================================================
+// Old changelog
+//============================================================
+//= v1.0 Working.
+//= npc/quests/counteragent_mixture.txt Also Needed
+//= npc/quests/quests_yuno.txt Also Needed [Darkchild]
+//= v1.1 Fixed some minor bugs. Optimized some lines. Re-organized the script a bit.
+//= Giving Parmry NPC, Hammer and Old Book now waves the 50000 fee. (based of mRO website)
+//= Having a joblvl of 50 allows you to skip Rasputin's test. (based of mRO website) [kobra_k88]
+//= 1.2 fixed a few typos (have to hunt more) [Lupus]
+//= 1.3 Added Baby Class Support [Lupus]
+//= 1.6 Added a func which prevent advanced classes passing
+//= 2nd Job Quests again. It also guides adv classes where
+//= to go. [Lupus]
+//= 1.6a fixed some wrong answers, thanks to zlider for info [Lupus]
+//= 2.0 Changed numbers to constants. [Vicious]
+//= 2.2 Got rid of 'al_morgen' var. Now uses (MISC_QUEST & 4) [Lupus]
+//= 2.3 Optimized, changed job numbers to constants. Fixed some spelling [Lupus]
+//= 2.4 Added alternative prizes according to JobLevel [Lupus]
+//= 2.4a Fixed 2 wrong answers in Rasputin's test [Lupus]