summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
Diffstat (limited to 'npc')
-rw-r--r--npc/Changelog.txt2
-rw-r--r--npc/quests/quests_prontera.txt146
-rw-r--r--npc/quests/skills/alchemist_skills.txt815
3 files changed, 835 insertions, 128 deletions
diff --git a/npc/Changelog.txt b/npc/Changelog.txt
index 62a2912ce..4a33678fa 100644
--- a/npc/Changelog.txt
+++ b/npc/Changelog.txt
@@ -2,6 +2,8 @@ Date Added
======
2007/06/20
* Reverted wrong fix in Ninja Job quest. [SinSloth]
+ * Updated "Ph.D Quest" Dialogs. [Samuray22]
+ * Updated "Elemental Potion Creation Quest" to the official one. [Samuray22]
2007/06/19
* Fixed Some variables like ".@item", and changed to "@item". [Samuray22]
* Fixed another minor bug for Ninja Quest. [Samuray22]
diff --git a/npc/quests/quests_prontera.txt b/npc/quests/quests_prontera.txt
index 07aa12b05..9bcc20c2c 100644
--- a/npc/quests/quests_prontera.txt
+++ b/npc/quests/quests_prontera.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= kobra_k88; L0ne_W0lf
//===== Current Version: =====================================
-//= 1.6
+//= 1.7
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
@@ -28,6 +28,7 @@
//= 1.5 Culvert has been rescripted from the ground up. [L0ne_W0lf]
//= 1.6 Added Gaebolg Family Curse quest. [L0ne_W0lf]
//= 1.6a Fixed a couple spelling mistakes. [L0ne_W0lf]
+//= 1.7 Updated "Ph.D Quest" Dialogs. [Samuray22]
//============================================================
// Prontera Culvert
@@ -147,85 +148,78 @@ prt_fild05,270,212,5 script Culvert Guardian 105,{
// Ph.D Hat Quest
//============================================================
-prt_in,38,108,4 script Teacher#01 53,{
- if(countitem(710) >= 1 && countitem(703) >= 1 && countitem(704) >= 1 && countitem(708) >= 1) goto L_Start;//Items: Illusion Flower, Hinalle, Aloe, Ment,
- mes "Don't you think.... ^4444FF'flowers'^000000 are pretty?";
- next;
- menu "Talk.",-, "End Conversation.",M_End;
-
- mes "[Teacher]";
- mes "When I was young, I didn't play with friends like the other children. Instead, I spent time studing by myself.";
- next;
- mes "[Teacher]";
- mes "Sometimes I regret that decision.... but it doesn't really matter now. Through hard work, I was able to finish school earlier than my classmates.";
- next;
- mes "[Teacher]";
- mes "I was very lonely however..... when things got rough I had no one to talk to about my feelings.";
- next;
- mes "[Teacher]";
- mes "Then one day, I found my best friend.";
- next;
+prt_in,38,108,3 script Teacher 53,{
+ if(countitem("Illusion_Flower") > 0 && countitem("Hinalle") > 0 && countitem("Aloe") > 0 && countitem("Ment") > 0) {
mes "[Teacher]";
- mes "It was when I saw this pretty flower blooming in an abandoned garden.... I realised that it was just like me and in it, I found my best friend.";
+ mes "My God! The Flower you are holding...";
next;
- mes "[Teacher]";
- mes "Even though, to others it was just a common flower.... for me this flower meant much more. This flower gave me the strength to continue my studies.";
- mes "I could achieve my goals because of her.";
- next;
- mes "[Teacher]";
- mes "So.. now... I am trying to repay to her. I have started studying Flowers, and It is my goal to cover the whole world in Flowers!";
- next;
- mes "[Teacher]";
- mes "To accomplish my work.. I need a great deal of flowers. Unfortunately because of my studies, I can rarely go outside.";
- mes "It is really hard to find as many flowers as I need.";
- next;
- mes "[Teacher]";
- mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000...";
- mes "If you can bring these flowers to me, I would be willing to give you a special item...";
- close;
-
- M_End:
- mes "[Teacher]";
- mes "One of these days I will cover whole world in Flowers!.....";
- close;
-
-L_Start:
+ switch( select( "Show him the flowers.","Give him the flowers.","Cancel.")) {
+ case 1:
+ mes "[Teacher]";
+ mes "Are those the Flowers I've been looking for...";
+ mes "Would you give them to me?";
+ next;
+ mes "[Teacher]";
+ mes "If you give them to me... I... I will give my precious item...";
+ close;
+ case 2:
+ if(countitem("Illusion_Flower") > 0 && countitem("Hinalle") > 0 && countitem("Aloe") > 0 && countitem("Ment") > 0) {
+ delitem "Illusion_Flower",1;
+ delitem "Hinalle",1;
+ delitem "Aloe",1;
+ delitem "Ment",1;
+ getitem "Ph.D_Hat",1;
+ mes "[Teacher]";
+ mes "Thank you so much! First time in my life someone is nice to me!";
+ mes "I will give you my precious item like I promised you.";
+ mes "This is the cap I wore when I graduated, it is full of my school memory.";
+ mes "Please take it... I hope you would cherish it like me.";
+ close;
+ }
+ mes "[Teacher]";
+ mes "... After a closer look I realized those are not the flowers I want...";
+ mes "Ha! Ha! I have really bad eyesight...";
+ close;
+ case 3:
+ close;
+ }
+ }
mes "[Teacher]";
- mes "Oh... Those Flowers in your hand are....";
- M_Menu:
+ mes "Those flowers are pretty... Right?";
next;
- menu "Show Flowers",-, "Give Flowers",M_Give, "Cancel",M_End;
-
- mes "[Teacher]";
- mes "Ah... How wonderful!! These are definately the 4 kinds of Flowers I was looking for ..";
- mes "The ^3355FFIllusion Flower, Hinalle, Aloe, and Ment^000000. Would you give them to me?...";
- next;
- mes "[Teacher]";
- mes "If you do I'd be willing to give you a special item.....";
- goto M_Menu;
-
- M_Give:
- if(countitem(710) < 1 || countitem(703) < 1 || countitem(704) < 1 || countitem(708) < 1) goto L_Cheater;//Items: Illusion Flower, Hinalle, Aloe, Ment,
- delitem 710,1;//Items: Illusion Flower,
- delitem 703,1;//Items: Hinalle,
- delitem 704,1;//Items: Aloe,
- delitem 708,1;//Items: Ment,
- mes "[Teacher]";
- mes "I really, really appreciate what you've done for me!! I trully am grateful! I will give you a very special item as I promised.";
- emotion e_thx;
- next;
- mes "[Teacher]";
- mes "This is the hat I wore at my Graduation Ceremony. It is a reminder of my joyfull school days at the University.";
- mes "Please take it...";
- getitem 5012,1;//Items: Ph.D Hat,
- close;
-
- L_Cheater:
- mes "[Teacher]";
- mes "I won't give a special item to a cheater...";
- mes "Now go away!";
- emotion e_bzz;
- close;
+ switch( select( "Continue talking.","Cancel.")) {
+ case 1:
+ mes "[Teacher]";
+ mes "I seldom go out with anyone when I was young, I was studying all the time.";
+ mes "Sometimes I think I've wasted my youth ... But I don't regret it. Because I study hard, I got good education and become who I am today!";
+ next;
+ mes "[Teacher]";
+ mes "But honestly... I feel sad sometimes for not having good friends...";
+ mes "When I get tired of studying... I don't even have a friend to talk to...";
+ mes "Luckily, I found the true friend of my life at last.";
+ next;
+ mes "[Teacher]";
+ mes "When I walked into that garden and saw all the beautiful flowers...";
+ mes "I suddenly feel I am sharing the same fate as these flowers, so they become my best friends ever.";
+ next;
+ mes "[Teacher]";
+ mes "For others, they are just flowers... But for me, they are my source of strength.";
+ mes "I can't have achieved anything without their company.";
+ next;
+ mes "[Teacher]";
+ mes "That's why I start to think about doing something to repay the people who had given me the flowers.";
+ mes "We have done so much research about flowers here... We even want to build a place full of flowers... for a better world!";
+ next;
+ mes "[Teacher]";
+ mes "So... We really need a large amount of flowers...";
+ mes "But I never go out anywhere... It is hard for me to find any!";
+ mes "If you can find me ^3355FFIllusion Flower^000000, ^3355FFHinalle^000000, ^3355FFAloe^000000 and ^3355FFMent^000000 and bring them to me, I will give you my treasure.";
+ close;
+ case 2:
+ mes "[Teacher]";
+ mes "One day I will use a lot of flowers to make the most pretty place in the world...";
+ close;
+ }
}
// Gaebolg Family Curse
diff --git a/npc/quests/skills/alchemist_skills.txt b/npc/quests/skills/alchemist_skills.txt
index 7b1b50057..2f0bec125 100644
--- a/npc/quests/skills/alchemist_skills.txt
+++ b/npc/quests/skills/alchemist_skills.txt
@@ -22,69 +22,780 @@
//= Quest too [Lupus]
//= 1.5 Removed duplicates [Toms] 1.5a fixed typo [Lupus]
//= 1.6 Moved some NPCs related to Lighthalzen quests. [SinSloth]
+//= 1.7 Updated "Elemental Potion Creation Quest" to the official one. [Samuray22]
//============================================================
//============================================================
// ALCHEMIST - ELEMENTAL POTION CREATION
//============================================================
-yuno_in04,33,108,5 script Pislik 750,{
- mes "[Pislik]";
- if(BaseJob != Job_Alchem) goto L_noalche;
- if(countitem(7434)) goto L_alreadyhave;//Items: Elemental_Potion_Creation_Guide,
- if(JobLevel<40) goto L_nojob;
-
- mes "I'll teach you all I know, but";
- mes "you have to bring me some things";
- mes "first.";
- mes "5 Yellow Gemstones,";
- mes "4 Empty Potion Bottles,";
- mes "10 Hearts of Mermaid,";
- mes "10 Moth Dust,";
- mes "20 Maneater Blossoms and";
- mes "1 Geek Glasses";
- next;
-
- mes "[Pislik]";
- mes "Let me check your items.";
- next;
-
- if(countitem(715)<5 || countitem(1093)<4 || countitem(950)<10 || countitem(1057)<10 || countitem(1032)<20 || countitem(2243)<1) goto L_noitems;//Items: Yellow_Gemstone, Empty_Potion_Bottle, Heart_of_Mermaid, Moth_Dust, Maneater_Blossom, Geek_Glasses,
- delitem 715, 5;//Items: Yellow_Gemstone,
- delitem 1093, 4;//Items: Empty_Potion_Bottle,
- delitem 950, 10;//Items: Heart_of_Mermaid,
- delitem 1057, 10;//Items: Moth_Dust,
- delitem 1032, 20;//Items: Maneater_Blossom,
- delitem 2243, 1;//Items: Geek_Glasses,
- getitem 7434, 1;//Items: Elemental_Potion_Creation_Guide,
-
- mes "[Pislik]";
- mes "I see you have what you need,";
- mes "so I'll give you my manual.";
- close;
-
-L_noitems:
- mes "[Pislik]";
- mes "You don't have enough items.";
- mes "Come back when you have all";
- mes "the required items for me.";
- close;
-
-L_noalche:
- mes "Sorry, but my knowledge is only about alchemy.";
- mes "I can't help you.";
- emotion e_gasp;
+yuno_in04,33,108,6 script Pisruik Quv 883,{
+ if (Class == Job_Alchem || Class == Job_Creator) {
+ if (JobLevel < 40 && Class == Job_Alchem) {
+ mes "[Pisruik]";
+ mes "Achoo!";
+ mes "Sigh";
+ mes "I can't afford the medicine..";
+ mes "You need Job level 40!";
+ close;
+ } else if(ALCHE_SK == 0) {
+ mes "[Pisruik]";
+ mes "Achoo!~";
+ mes "Mixing chemical is so fun~ Achoo!";
+ mes "Oi?";
+ mes "What are you doing looking at other people's experiments!";
+ set ALCHE_SK, 1;
+ next;
+ mes "[Pisruik]";
+ mes "Kids these days..";
+ mes "Sigh..";
+ close;
+ } else if(ALCHE_SK == 1) {
+ mes "[Pisruik]";
+ mes "Hey you are back!";
+ mes "Hmm... it doesn't look like";
+ mes "you are here to steal work";
+ mes "what bring you to ";
+ mes "places like this?";
+ next;
+ switch( select( "What kind of experiment are you conducting?", "Im...well...")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "Can't you tell?";
+ mes "...I guess its no use.";
+ mes "Do you remember how I yelled";
+ mes "last time because you were looking at my work?";
+ next;
+ mes "[Pisruik]";
+ mes "As you can see, this is a shared laboratory.";
+ mes "It's for poor scientists";
+ mes "who can't afford a private lab";
+ mes "We pay a set amount of money to rent";
+ mes "a part of the laboratory";
+ mes "..and I'm one of them.";
+ next;
+ mes "[Pisruik]";
+ mes "Because the space is shared by so many, its scary here.";
+ mes "There are people here who stole work from others";
+ mes "and published them,";
+ mes "and... it gets even worse. But";
+ mes "since we are all poor, we can't do much about it.";
+ next;
+ mes "[Pisruik]";
+ mes "Its not like we have";
+ mes "other means of earning money,";
+ mes "like that alchemist from far, far away";
+ mes "who can earn money by";
+ mes "selling items to villagers.";
+ next;
+ mes "[Pisruik]";
+ mes "Items...";
+ mes "Oh, I know";
+ mes "You are an adventurer right?";
+ mes "What's your name?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "I am "+strcharinfo(0)+"...";
+ next;
+ mes "[Pisruik]";
+ mes "If you can get me";
+ mes "some items I need for experiments,";
+ mes "I'll tell you what I'm making";
+ mes "Since I know that we won't be doing";
+ mes "experiments in the same area..";
+ next;
+ set ALCHE_SK, 2;
+ mes "[Pisruik]";
+ mes "Thing that I need right now are,";
+ mes "5 Yellow Gemstones,";
+ mes "4 Empty Potion Bottle,";
+ mes "10 Heart of Mermaid,";
+ mes "10 Powder of Butterfly.";
+ mes "So come back when you've got the items.";
+ close;
+ case 2:
+ mes "[Pisruik]";
+ mes "You can buy them at the toolshop.";
+ mes "Things in here are all";
+ mes "personal properties.";
+ close;
+ }
+ } else if(ALCHE_SK == 2) {
+ mes "[Pisruik]";
+ mes "Hey, "+strcharinfo(0)+"";
+ mes "The items that I asked for are...";
+ mes "4 Empty Potion Botles";
+ mes "and... er....";
+ mes "What were they again?";
+ next;
+ switch( select( "5 Yellow Gemstones,", "5 Blue Gemstones,", "5 Red Gemstones,")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "5 Yellow Gemstones";
+ mes "And...";
+ next;
+ switch( select( "10 Heart of Mermaid,", "10 Large Jellopy,")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "10 Heart of Mermaid";
+ mes "And...";
+ next;
+ switch( select( "10 Snake Scales.", "10 Powders of Butterfly")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "Hmmmm no I don't really need that.";
+ mes "I have a friend who gave me a bunch";
+ mes "and I still have some left...";
+ mes "What was it?";
+ close;
+ case 2:
+ mes "[Pisruik]";
+ mes "Yes ,";
+ mes "5 Yellow Gemstones,";
+ mes "4 Empty Potion Bottle,";
+ mes "10 Heart of Mermaid,";
+ mes "10 Powder of Butterfly.";
+ mes "Do you have all of them with you?";
+ next;
+ switch( select( "No.", "Yes!")) {
+ case 1:
+ set .@fhit, rand(1,5);
+ if (.@fhit == 1) {
+ mes "[Pisruik]";
+ mes "If you don't want to do it then tell me.";
+ mes "I'm a busy person too!";
+ close;
+ }
+ mes "[Pisruik]";
+ mes "Hmmm...";
+ mes "If you can, please hurry.";
+ mes "Well, you don't have to do this, you know...";
+ close;
+ case 2:
+ mes "[Pisruik]";
+ mes "Let's see...";
+ next;
+ if (countitem("Yellow_Gemstone") > 4 && countitem("Empty_Potion") > 3 && countitem("Heart_Of_Mermaid") > 9 && countitem("Powder_Of_Butterfly") > 9) {
+ delitem "Yellow_Gemstone", 5;
+ delitem "Empty_Potion", 4;
+ delitem "Heart_Of_Mermaid", 10;
+ delitem "Powder_Of_Butterfly",10;
+ set ALCHE_SK, 3;
+ mes "[Pisruik]";
+ mes "Good.";
+ mes "It doesn't seem like they are in a bad shape...";
+ mes "Well I'll accept them.";
+ mes "Let's see.. hmm";
+ mes "What do you think I am making with all these?";
+ next;
+ switch( select( "Medicine?", "Bomb?")) {
+ case 1:
+ set ALCHE_SK, 4;
+ mes "[Pisruik]";
+ mes "Yes. It's medicine.";
+ goto Alc_Exp;
+ case 2:
+ set ALCHE_SK, 4;
+ mes "[Pisruik]";
+ mes "Bomb? Hahaha. No.";
+ mes "It's a medicine.";
+ next;
+ mes "[Pisruik]";
+ mes "Of course, I could earn a lot of money";
+ mes "by making bombs....BUT";
+ mes "I don't want to end up dead";
+ mes "because one of them blows up";
+ mes "while I'm making it.";
+ next;
+ mes "[Pisruik]";
+ mes "I just don't have";
+ mes "a good place to do experiments.";
+ mes "that's one of the reasons";
+ mes "why we can't make powerful bombs";
+ next;
+ mes "[Pisruik]";
+ mes "Well, not like I want to make it myself.";
+ next;
+ mes "[Pisruik]";
+ }
+ Alc_Exp:
+ mes "You see,";
+ mes "If this medicine can react";
+ mes "in the body,";
+ next;
+ mes "[Pisruik]";
+ mes "The body's composition changes";
+ mes "very rapidly.";
+ mes "Let's see. For example,";
+ mes "if we are talking about high temperatures..";
+ mes "Originally, human body can't stand";
+ mes "high temperatures.";
+ next;
+ mes "[Pisruik]";
+ mes "Of course we can't stand in fire,";
+ mes "but the reason why when we get burnt";
+ mes "that part of skin dies, is because";
+ mes "a part of body which transports material";
+ mes "gets BBQ'ed and dies.";
+ next;
+ mes "[Pisruik]";
+ mes "It's the same reason why we die";
+ mes "from high fever.";
+ mes "The experiments I'm conducting right now";;
+ mes "will produce medicine";
+ mes "which will make us immune to";
+ mes "getting damaged by heat.";
+ next;
+ mes "[Pisruik]";
+ mes "But there are side effects.";
+ mes "You are going to be weak to";
+ mes "the opposite property.";
+ mes "Not like we can do much about it";
+ mes "since we are doing this mechanically";
+ next;
+ mes "[Pisruik]";
+ mes "'Creating' something implies";
+ mes "that you are ready to take responsibilities";
+ mes "of things that you didn't mean to do";
+ mes "but happens anyways..";
+ next;
+ mes "[Pisruik]";
+ mes "Anyways....";
+ mes "I am going to need one more favor...";
+ mes "because I need.. about 20 of";
+ mes "Maneater Blossom to perform experiments on.";
+ next;
+ mes "[Pisruik]";
+ mes "Could you go get them for me?";
+ next;
+ switch( select( "Sorry.. but I'm busy.", "Yup I'll do them for you.", "What am I going to get in return?")) {
+ case 1:
+ goto L_no;
+ case 2:
+ goto L_do;
+ case 3:
+ goto L_return;
+ }
+ } else {
+ mes "[Pisruik]";
+ mes "You just told me that you would";
+ mes "bring me the items and";
+ mes "you didn't collect any?";
+ mes "Argh...";
+ mes "If you didn't want to do it";
+ mes "you could have told me.";
+ next;
+ mes "[Pisruik]";
+ mes "Nevermind.";
+ mes "I don't care whether if you come or not.";
+ close;
+ }
+ }
+ }
+ case 2:
+ mes "[Pisruik]";
+ mes "Oh, right. Large Jellopy.";
+ mes "...wasn't what I asked for.";
+ mes "I already have enough Large Jellopy";
+ mes "with me right now...";
+ mes "I asked for something else.";
+ close;
+ }
+ case 2:
+ mes "[Pisruik]";
+ mes "Blue Gemstones...";
+ mes "Did I ask for them?";
+ mes "I'm sure that until yesterday I was making";
+ mes "a medicine which would increase immunity to certain elements...";
+ mes "Sigh...how would I continue the research with memory like this?";
+ close;
+ case 3:
+ mes "[Pisruik]";
+ mes "Red Gemstones...";
+ mes "Did I ask for these?";
+ mes "I'm sure that until yesterday I was making";
+ mes "a medicine which would increase immunity to certain elements...";
+ mes "Sigh...how would I continue the research with memory like this?";
+ close;
+ }
+ } else if(ALCHE_SK == 3) {
+ mes "[Pisruik]";
+ mes "?";
+ mes "Where did you wander off to";
+ mes "in the middle of my explanation?";
+ next;
+ set ALCHE_SK, 4;
+ mes "[Pisruik]";
+ mes "I am making a medicine right now.";
+ close;
+ } else if(ALCHE_SK == 4) {//When you stopped listening to his explanation
+ mes "[Pisruik]";
+ mes "I told you that I am making a medicine...";
+ mes "Do you need me to explain ?";
+ next;
+ switch( select( "No", "Yes")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "Well never mind then.";
+ mes "I am really busy right now.";
+ close;
+ case 2:
+ goto L_do;
+ }
+ } else if(ALCHE_SK == 5) { //When you replied "no"
+ mes "[Pisruik]";
+ mes "I told you I'm busy right?";
+ mes "and if you keep wandering around here";
+ mes "without any business";
+ mes "people are going to turn hostile";
+ mes "towards you. Okay?";
+ next;
+ switch( select( "Okay okay.", "I was wondering if I could help.")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "...";
+ mes "Then go already.";
+ close;
+ case 2:
+ mes "[Pisruik]";
+ mes "...I don't know why you changed your mind";
+ mes "But it doesn't matter as long as.";
+ mes "I can continue my research";
+ mes "Cough, Cough";
+ next;
+ mes "[Pisruik]";
+ mes "...Sigh.";
+ mes "If I didn't have any fits";
+ mes "I could finish very quickly...";
+ mes ".....is it asking for too much from my body?.";
+ mes "hahaha...";
+ next;
+ set ALCHE_SK, 6;
+ mes "[Pisruik]";
+ mes "20 Maneater Blossoms.";
+ mes "That's all I need.";
+ if (Sex == 0) {
+ mes "...Please.";
+ mes "It'd be great if you could bring it to me as soon as possible.";
+ }
+ close;
+ }
+ } else if(ALCHE_SK == 6) { //Second Item
+ if (countitem("Blossom_Of_Maneater") > 19) {
+ delitem "Blossom_Of_Maneater", 20;
+ set ALCHE_SK, 7;
+ mes "[Pisruij]";
+ mes "...Thanks a lot.";
+ if (Sex == 0) {
+ mes "Thanks so much.. Doing all these for me...";
+ }
+ mes "Okay, now if I add these blossoms to the clover brew";
+ mes "Then...";
+ mes "OY...";
+ next;
+ set ALCHE_SK, 9;
+ misceffect 183;
+ mes "[Pisruik]";
+ mes "AHH!";
+ next;
+ mes "[Pisruik]";
+ mes "Are you hurt anywhere?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "...Your glasses...";
+ mes "They are broken in to pieces...";
+ mes "....";
+ next;
+ if (Sex == 0) {
+ mes " == The glasses he wore fell ==";
+ mes " == and broke into pieces. ==";
+ mes " == It was unbelievable that ==";
+ mes " == The face underneath that glass ==";
+ mes " == was that of a grumpy alchemist... ==";
+ } else {
+ mes " == I could not believe. ==";
+ mes " == the difference between the face ==";
+ mes " == which I was staring into, ==";
+ mes " == and the one I just saw minutes ago ==";
+ }
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "....well.... errr...";
+ next;
+ mes "[Pisruik]";
+ mes "Are you sure you are okay?";
+ mes "Sorry, I can't see well without glasses";
+ mes "So I can't really do anything except for";
+ mes "Checking that there is no blood.";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "...Yeah I'm fine.";
+ mes "But..Your glasses...";
+ next;
+ mes "[Pisruik]";
+ mes "....What am I going to do.";
+ mes "I don't have a spare one right now...";
+ mes "...";
+ next;
+ mes "[Pisruik]";
+ mes "Hey. "+strcharinfo(0)+" ";
+ mes "I'm sorry but could you go and";
+ mes "get me a set of glasses just like the one";
+ mes "I was wearing?";
+ next;
+ mes "[Pisruik]";
+ mes "I can't move without my glasses";
+ mes "So if you could get me a set";
+ mes "I'd be really greatful...";
+ mes "....Truly.";
+ mes "Please?.";
+ close;
+ }
+ mes "[Pisruik]";
+ mes "Hmm...";
+ mes "I need 20 more";
+ mes "Maneater Blossom to do experiment...";
+ next;
+ mes " == Mesmerized in a deep thouht ==";
+ mes " == While looking at the test tube. ==";
+ close;
+ } else if(ALCHE_SK == 7) {
+ set ALCHE_SK, 8;
+ mes "[Pisruik]";
+ mes "...Sigh it's not working as well as I thought it would.";
+ mes "Could you get me another Maneater Blossom?...";
+ mes "Please..?";
+ close;
+ } else if(ALCHE_SK == 8) {
+ if (countitem("Blossom_Of_Maneater") > 0) {
+ delitem "Blossom_Of_Maneater", 1;
+ set ALCHE_SK, 7;
+ mes "[Pisruik]";
+ mes "...Thanks.";
+ if (Sex == 0) {
+ mes "..Looks like I've placed another burden on you.";
+ mes "Sorry.";
+ }
+ mes "Well then, all I have to do is add this and..";
+ mes "Aha!...";
+ next;
+ set ALCHE_SK, 9;
+ donpcevent "Pisruik Quv::OnExplosion";
+ mes "[Pisruik]";
+ mes "AHH!";
+ next;
+ mes "[Pisruik]";
+ mes "Are you hurt anywhere?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "...Your glasses...";
+ mes "They are broken in to pieces...";
+ mes "....";
+ next;
+ if (Sex == 0) {
+ mes " == The glasses he wore fell ==";
+ mes " == and broke into pieces. ==";
+ mes " == It was unbelievable that ==";
+ mes " == The face underneath that glass ==";
+ mes " == was that of a grumpy alchemist... ==";
+ } else {
+ mes " == I could not believe. ==";
+ mes " == the difference between the face ==";
+ mes " == which I was staring into, ==";
+ mes " == and the one I just saw minutes ago ==";
+ }
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "....well.... errr...";
+ next;
+ mes "[Pisruik]";
+ mes "Are you sure you are okay?";
+ mes "Sorry, I can't see well without glasses";
+ mes "So I can't really do anything except for";
+ mes "Checking that there is no blood.";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "...Yeah I'm fine.";
+ mes "But..Your glasses...";
+ next;
+ mes "[Pisruik]";
+ mes "....What am I going to do.";
+ mes "I don't have a spare one right now...";
+ mes "...";
+ next;
+ mes "[Pisruik]";
+ mes "Hey. "+strcharinfo(0)+" ";
+ mes "I'm sorry but could you go and";
+ mes "get me a set of glasses just like the one";
+ mes "I was wearing?";
+ next;
+ mes "[Pisruik]";
+ mes "I can't move without my glasses";
+ mes "So if you could get me a set";
+ mes "I'd be really greatful...";
+ mes "....Truly.";
+ mes "Please?.";
+ close;
+ }
+ mes "[Pisruik]";
+ mes "Hmm...";
+ mes "I think I could do this";
+ mes "If I had just one more";
+ mes "Maneater Blossom...";
+ next;
+ mes " == Thinks very hard ==";
+ mes " == While looking at the test tube. ==";
+ close;
+ } else if(ALCHE_SK == 9) {
+ mes " == He is squinting at the ==";
+ mes " == Remains of his broken glasses. ==";
+ mes " == It seems like that no matter how you look at it ==";
+ mes " == he looks much, much better ==";
+ mes " == without his glasses. ==";
+ next;
+ switch( select( "Give'Something'.", "Don't give him anything.")) {
+ case 1:
+ if (countitem("Glasses") > 0) {
+ delitem "Glasses", 1;
+ set ALCHE_SK, 10;
+ mes " == I gave him the set of glasses ==";
+ next;
+ mes "[Pisruik]";
+ mes "Hm?";
+ mes "Who? ..A, "+strcharinfo(0)+"?";
+ mes "Thanks.";
+ mes "Let's see...";
+ mes "It did blow up but the test tube didn't break..";
+ next;
+ mes "[Pisruik]";
+ mes "Haha..I was surprized";
+ mes "For no reason then.";
+ mes "Let's see the result...";
+ mes "...";
+ next;
+ mes "[Pisruik]";
+ mes "...Good Good.";
+ mes "I think in theory, I have succeeded.";
+ mes "Although it might have problems";
+ mes "because of the ethics involved with";
+ mes "giving chemicals to";
+ mes "humans for purposes like this..";
+ next;
+ mes "[Pisruik]";
+ mes "It's not like there haven't been";
+ mes "those types of experiments so";
+ mes "I think it'd be fine but.";
+ mes "Oh...right.";
+ mes ""+strcharinfo(0)+".";
+ mes "Would you like to try this?";
+ next;
+ mes "[Pisruik]";
+ mes "You are someone who would like to";
+ mes "go out side and run around";
+ mes "so you will have times when you";
+ mes "can put this to a good use";
+ next;
+ switch( select( "Certainly!", "no...")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "Well then could you read this";
+ mes "Paper over for me?";
+ mes "It was perfect in theory";
+ mes "So I've already submitted my paper,";
+ mes "so this is just a copy";
+ next;
+ mes " == He gave me a long lecture ==";
+ mes " == about dangers and side effects ==";
+ mes " == of the medicine ==";
+ next;
+ set ALCHE_SK, 11;
+ getitem "Elemental_Create_Book", 1;
+ mes "[Pisruik]";
+ mes "...I think that";
+ mes "You can put this to a good use.";
+ mes "You have probably given it a good thought";
+ mes "While collecting the items so";
+ mes "You could understand it better than I do";
+ next;
+ mes "[Pisruik]";
+ if (Sex == 1) {
+ mes "If you visit me again";
+ mes "I'll probably have another favor for you.";
+ } else {
+ mes "...Thanks for being here to talk to me.";
+ }
+ mes "Cough.. Cough";
+ mes "Sigh. Well then, should I get started on the next experiement...";
+ close;
+ case 2:
+ mes "[Pisruik]";
+ mes "....Well too bad.";
+ mes "If you change your mind";
+ mes "Then come back later.";
+ if (Sex == 0) {
+ next;
+ mes " == He looked a lot waner ==";
+ mes " == and a lot more tired ==";
+ mes " == than usual. ==";
+ }
+ close;
+ }
+ }
+ mes " == Don't have much to give to him. ==";
+ close;
+ case 2:
+ mes "["+strcharinfo(0)+"]";
+ mes "...I think you look so much better without glasses...";
+ next;
+ mes "[Pisruik]";
+ mes "Hmm?";
+ mes "What did you just say?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "Erm.. hahahaha.";
+ mes "Nothing nothing!";
+ close;
+ }
+ } else if(ALCHE_SK == 10) {
+ mes "[Pisruik]";
+ mes "I think in theory it's a success,";
+ mes "Do you want to learn how to make it?";
+ next;
+ switch( select( "Yes!", "No...")) {
+ case 1:
+ mes "[Pisruik]";
+ mes "Well then could you read this";
+ mes "Paper over for me?";
+ mes "It was perfect in theory";
+ mes "So I've already submitted my paper,";
+ mes "so this is just a copy";
+ next;
+ mes " == He gave me a long lecture ==";
+ mes " == about dangers and side effects ==";
+ mes " == of the medicine ==";
+ next;
+ set ALCHE_SK, 11;
+ getitem "Elemental_Create_Book", 1;
+ mes "[Pisruik]";
+ mes "...I think that";
+ mes "You can put this to a good use.";
+ mes "You have probably given it a good thought";
+ mes "While collecting the items so";
+ mes "You could understand it better than I do";
+ next;
+ mes "[Pisruik]";
+ if (Sex == 1) {
+ mes "If you visit me again";
+ mes "I'll probably have another favor for you.";
+ } else {
+ mes "...Thanks for being here to talk to me.";
+ }
+ mes "Cough.. Cough";
+ mes "Sigh. Well then should I get started on the next experiement...";
+ close;
+ case 2:
+ mes "[Pisruik]";
+ mes "....Well too bad.";
+ mes "If you change your mind";
+ mes "Then come back later.";
+ if (Sex == 0) {
+ next;
+ mes " == He looked a lot waner ==";
+ mes " == and a lot more tired ==";
+ mes " == than usual. ==";
+ }
+ close;
+ }
+ } else if(ALCHE_SK == 11) {
+ if (countitem("Elemental_Create_Book") == 0) {
+ mes "[Pisruik]";
+ mes "....I guess,";
+ mes "You haven't found much use for that item.";
+ close;
+ } else if(countitem("Elemental_Create_Book") == 1) {
+ mes "[Pisruik]";
+ mes "Has the item been very helpful to you?";
+ close;
+ } else if(countitem("Elemental_Create_Book") > 1) {
+ mes "[Pisruik]";
+ mes "....";
+ mes "Well....I'm selling these but";
+ mes "It's not like I'll sign the books";
+ mes "if you bring them in truckloads.";
+ close;
+ }
+ }
+ mes "[Pisruik]";
+ mes "?";
+ close;
+ }
+ mes "[Pisruik]";
+ mes "What are you looking at!";
+ mes "Go away!";
close;
-L_alreadyhave:
- mes "I've already given you";
- mes "my Elemental Potion Creation Guide...";
+L_no:
+ set ALCHE_SK, 5;
+ mes "[Pisruik]";
+ mes "Well, too bad.";
+ mes "I guess I'll have to go get them myself...";
+ mes "Well I kept my part of the deal";
+ mes "So, you don't have anymore business with me";
+ mes "right?";
close;
-L_nojob:
- mes "Come back when you've learned";
- mes "more about being an Alchemist.";
+L_do:
+ set ALCHE_SK, 6;
+ mes "[Pisruik]";
+ mes "Thanks a lot.";
+ mes "I'll be waiting for you.";
+ mes "Brewing clovers...";
+ next;
+ switch( select( "Oh, what's that for?")) {
+ case 1:
+ }
+ mes "[Pisruik]";
+ mes "Where do you use this?";
+ mes "Well..its not brewing just clovers...";
+ next;
+ mes "[Pisruik]";
+ mes "It has some herbs in them as well,";
+ mes "I don't have much experiences with adventuring";
+ mes "so I can't get good quality herbs so";
+ mes "I just dig them out from nearby";
+ mes "and use them.";
+ next;
+ mes "[Pisruik]";
+ mes "As you can see I have bad eyesight,";
+ mes "and really bad heart";
+ mes "so I have to avoid working too hard";
+ mes "but these experiments are the only joy for me...";
+ if (Sex == 0) {
+ mes "...I don't know if you understand.";
+ }
+ next;
+ mes "[Pisruik]";
+ mes "I can get herbs myself";
+ mes "But I can't really get";
+ mes "Maneater Blossoms";
+ mes "So I am asking for a favor from you.";
+ mes "Please have a safe trip.";
close;
+
+L_return:
+ mes "[Pisruik]";
+ mes "Oh, are you trying to one up me now eh?";
+ mes "Okay. I am a very poor guy but";
+ mes "if I ever succeed with this";
+ mes "I'll teach you the secrets for free.";
+ mes "How's that?";
+ next;
+ switch( select( "Well I'm too busy...", "Well okay then...")) {
+ case 1:
+ goto L_no;
+ case 2:
+ goto L_do;
+ }
}
//============================================================