summaryrefslogtreecommitdiff
path: root/npc/quests/juice_maker.txt
diff options
context:
space:
mode:
author(no author) <(no author)@54d463be-8e91-2dee-dedb-b68131a5f0ec>2004-11-04 23:25:09 +0000
committer(no author) <(no author)@54d463be-8e91-2dee-dedb-b68131a5f0ec>2004-11-04 23:25:09 +0000
commit195dffc20af1fb32c7e4119988911b72955aeabc (patch)
treeb60d2a5e72d64dc5fc21eb9ce0962631e774a4c9 /npc/quests/juice_maker.txt
downloadhercules-195dffc20af1fb32c7e4119988911b72955aeabc.tar.gz
hercules-195dffc20af1fb32c7e4119988911b72955aeabc.tar.bz2
hercules-195dffc20af1fb32c7e4119988911b72955aeabc.tar.xz
hercules-195dffc20af1fb32c7e4119988911b72955aeabc.zip
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/athena@2 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/quests/juice_maker.txt')
-rw-r--r--npc/quests/juice_maker.txt308
1 files changed, 308 insertions, 0 deletions
diff --git a/npc/quests/juice_maker.txt b/npc/quests/juice_maker.txt
new file mode 100644
index 000000000..877622c56
--- /dev/null
+++ b/npc/quests/juice_maker.txt
@@ -0,0 +1,308 @@
+//===== eAthena Script =======================================
+//= Juice Maker Quest
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.3
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//=
+//===== Additional Comments: =================================
+//= Fully working
+//= 1.1 fixed input number check [Lupus]
+//= 1.2 fixed misplaced Grape<->Carrot juices [Lupus]
+//= 1.3 added a loopless menu 'as many as possible' [Lupus]
+//============================================================
+
+
+
+
+// Morrison ------------------------------------------------
+prt_in.gat,47,173,2 script Morrison 97,
+{
+ if(MEAT > 10) goto L_Candy;
+ if(MARIANNE == 10) goto L_GoAway;
+
+ mes "[Little Morrison]";
+ mes "Wahhhhh!!! Wahh... NO more! NO more!";
+ mes "I won't... eat anymore stupid ^0000ffFruit^000000 things!!";
+ next;
+ menu "Talk",M_Talk,"Cancel",M_End;
+
+ M_Talk:
+ if(countitem(517) > 0) goto L_Meat; //Meat
+
+ mes "[Little Morrison]";
+ mes "Arhhggg!! I'VE HAD ENOUGH!!! I can't eat anymore ^0000ffFruits^000000!";
+ mes "They taste so SOUR..... I have to PEEL them before I can eat them.....they feel sticky and squishy...... it's really ANNOYING!!!!";
+ next;
+ mes "[LIttle Morrison]";
+ mes "I just HATE FRUIT! I can't even get full off of the stuff.(~sigh~)";
+ mes "Give me something more edible..... give me some...... ^ff0000MEAT^000000!!!";
+ close;
+
+ L_Meat:
+ mes "[Little Morrison]";
+ mes "...(sniff)....(sniff)(sniff).... Oh! Is that ^ff0000Meat^000000???";
+ next;
+ mes "[Little Morrison]";
+ mes "Do you have some ^ff0000Meat^000000?!!!~(drools)~";
+ mes "Umm... that yummy smell is making me SOOO HUNGRYYYY!!!l";
+ next;
+ mes "[Little Morrison]";
+ mes "... Umm... excuse me..... could you give me some of that meat PLEEAASSSE?";
+ next;
+ menu "Give him some",sM_Give,"Ignore him",sM_Ignore;
+
+ sM_Give:
+ set MORRISON,1;
+ set MEAT,MEAT + 1;
+ delitem 517,1; //Meat
+
+ mes "[Little Morrison]";
+ mes "Whoah~!!! It's real Meat, Meat!";
+ mes "Mmmm! It makes my mouth water.";
+ mes "Oh thank you. Now I feel happy. Yum Yum...";
+ close;
+ sM_Ignore:
+ set MORRISON,2;
+
+ mes "[Little Morrison]";
+ mes "Boo...";
+ mes "Boo... Fine... Alright, Alright~!!! Selfish meanie!";
+ close;
+ M_End:
+ mes "[Little Morrison]";
+ mes "Wahhhhh!!! No matter how hard I try, I just can't eat Vegetables or ^0000ffFruit^000000! They're plain disgusting!!";
+ close;
+
+L_GoAway:
+ mes "[Little Morrison]";
+ mes "Pffff... Leave me alone! You DON'T CARE about me! I'm gonna DIE because of these stupid Veggies and Fuits so MIND your own business!";
+ close;
+L_Candy:
+ mes "[Little Morrison]";
+ mes "Ah..I am full now.";
+ mes "You don't have to feed me any more. I think I am gonna BURST if i keep eating more.";
+ next;
+ mes "[Little Morrison]";
+ mes "And... um... Take this.";
+ next;
+ getitem 529,3;
+ getitem 530,1;
+ set MEAT,0;
+
+ mes "[Little Morrison]";
+ mes "It is from my secret stash of Candy that I hide from my Mom. Since you gave me some Meat, I will give you some candy." ;
+ close;
+
+}
+
+// Housewife Marianne ---------------------------------------------------
+prt_in.gat,49,172,2 script Housewife Marianne 53,
+{
+ if(MORRISON == 1) goto L_GaveMeat;
+ if(MORRISON == 2) goto L_Juice;
+
+ mes "[Housewife Marianne]";
+ mes "Morrison!! Please eat some fruit will ya? Fruit~!";
+ mes "*Sob*~!! Like father like son...";
+ next;
+ menu "Talk",M_Talk,"Cancel",M_Cancel;
+ close;
+
+ M_Talk:
+ mes "[Housewife Marianne]";
+ mes "(~Sigh~)...This is Morrison... My one and only son.";
+ mes "He's going through some kinda faze and doesn't want to eat any ^0000ffFruits^000000 or vegetables. Look at his face, it turns sour just hearing about ^0000fffFruit^000000...";
+ next;
+ mes "[Housewife Marianne]";
+ mes "All he wants to eat is but ^ff0000Meat^000000... (sigh)...he needs ^0000ffFruits^000000 and vegetables for a proper diet.";
+ next;
+ close;
+
+ M_Cancel:
+ mes "[Housewife Marianne]";
+ mes "Morrison!! I will get mad at you if you keep doing this!";
+ close;
+
+L_GaveMeat:
+ set MORRISON,0;
+
+ mes "[Housewife Marianne]";
+ mes "Oh MY GOD!!... Oh lord...";
+ next;
+ mes "[Housewife Marianne]";
+ mes "WHAT ARE YOU DOING!! HOW DARE YOU feed my son!! And ^ff0000MEAT^000000 of all things!!!";
+ next;
+ mes "[Housewife Marianne]";
+ mes "Arrrgh~~!! Get Lost right now!!!!!!";
+ close;
+
+L_Juice:
+ set MORRISON,0;
+ set MARIANNE,1;
+
+ mes "[Housewife Marianne]";
+ mes "Thank you for not giving my son any meat. I'm trying to feed him ^0000ffFruits^000000 and vegetables, but this child doesn't want to eat anything except Meat...";
+ next;
+ mes "[Housewife Marianne]";
+ mes "What if I could turn ^0000ffFruits^000000 into a ^0000ffJuice^000000... for example...Orange juice... Would my child like it?";
+ next;
+ mes "[Housewife Marianne]";
+ mes "Ah! Now I remember..There is a town where you can get a variety of ^0000ffFruit^000000 turned into ^0000ffFruit Juices^000000.";
+ next;
+ mes "[Housewife Marianne]";
+ mes "... Was is it...^ff0000Payon^000000...or ^ff0000Morroc^000000...?";
+ next;
+ close;
+
+}
+
+// Juicer Marx Hansen -----------------------------------------------------------------------
+payon_in01.gat,5,48,3 script Juicer Marx Hansen 86,
+{
+ mes "[Juicer Marx Hansen]";
+ if(MARIANNE == 1) goto L_Juice;
+ mes "Welcome to my shop. What brings you here?";
+ next;
+ menu "Conversation",M_0a,"I am just looking around",M_0b;
+
+ M_0a:
+ mes "[Juicer Marx Hansen]";
+ mes "In the earliest years of humanity, fruits were the only substanace availble for people to eat.";
+ mes "Fruits were vital for survival and without them people faced certain death.";
+ mes "During that time Mother Nature was worshiped for her generous offerering.";
+ next;
+ mes "[Juicer Marx Hansen]";
+ mes "Nowadays food is plentifull and it comes in a variety of flavors and forms.";
+ mes "With so many other things to eat, fruits aren't consumed as much as they used to be.";
+ mes "This is especially true among kids who'd rather eat pizza and candy.";
+ next;
+ mes "[Juicer Marx Hansen]";
+ mes "Because of this I wanted to find a way to make young people realize the importance of fuit.";
+ mes "I found that when fruits were turned into juices, they became more digestive and even tasty enough for kids.";
+ close;
+ M_0b:
+ mes "[Juicer Marx Hansen]";
+ mes "Ok then.";
+ close;
+
+L_Juice:
+ mes "Welcome to my shop. Do you come here to process Fruits like the rest?";
+ next;
+
+ menu "Yes, I do.",M_1a,"How do you make fruit juice?",M_1b,"No, I don't.",M_1End;
+
+ M_1a:
+ mes "[Juicer Marx Hansen]";
+ mes "So what kind of fruit juice would you like to process?";
+ next;
+ menu "Apple Juice",sM_1a,"Banana Juice",sM_1b,"Grape Juice",sM_1c,"Carrot Juice",sM_1d,"Nope, I'm fine.",sM_1End;
+
+ sM_1a:
+ set @FRUIT,512;
+ set @JUICE,531;
+ goto sL_Make;
+ sM_1b:
+ set @FRUIT,513;
+ set @JUICE,532;
+ goto sL_Make;
+ sM_1c:
+ set @FRUIT,514;
+ set @JUICE,533;
+ goto sL_Make;
+ sM_1d:
+ set @FRUIT,515;
+ set @JUICE,534;
+
+ sL_Make:
+ mes "[Juicer Marx Hansen]";
+ mes "How many bottles would you like?";
+ next;
+ menu "I'll tell you.",sL_Make_InputN, "As many as possible",-, "I've changed my mind.",sM_1End;
+
+ set @FRUITNUM,100; //max possible amount of Juice
+ //calc max possible # juices
+ if(Zeny/3 < @FRUITNUM) set @FRUITNUM,Zeny/3;
+ if(countitem(@FRUIT) < @FRUITNUM) set @FRUITNUM,countitem(@FRUIT);
+ if(countitem(713) < @FRUITNUM) set @FRUITNUM,countitem(713);
+ if(@FRUITNUM > 0) goto sL_Make_Max;
+ mes "[Juicer Marx Hansen]";
+ mes "Doh! You don't have enough ingredients for a single bottle of juice.";
+ emotion 0;
+ close;
+
+ sL_Make_Max:
+ delitem @FRUIT,@FRUITNUM; //del Fruit
+ delitem 713,@FRUITNUM; //del Empty Bottle
+ set Zeny,Zeny-@FRUITNUM*3;
+ getitem @JUICE,@FRUITNUM; //get Juice
+ goto sL_Make_Got;
+
+ sL_Make_InputN:
+ mes "[Juicer Marx Hansen]";
+ mes "Very well then. How many bottles would you like?";
+ mes "Enter 0 if you don't want any.";
+ next;
+ input @input;
+
+ if(@input < 1) goto sM_1End;
+ set @FRUITNUM,(3*@input);
+ set @ZENYNUM,(3*@input);
+ if(countitem(@FRUIT) < @FRUITNUM) goto sl_Fruits;
+ if(countitem(713) < @input) goto sl_Bottles;
+ if(Zeny < @ZENYNUM) goto sl_Zeny;
+
+ delitem @FRUIT,@FRUITNUM; //del Fruit
+ delitem 713,@input; //del Empty Bottle
+ set Zeny,Zeny - @ZENYUM; //get Juice
+ getitem @JUICE,@input;
+ sL_Make_Got:
+ mes "[Juicer Marx Hansen]";
+ mes "Here you are. Take it.";
+ close;
+
+
+ sl_Fruits:
+ mes "[Juicer Marx Hansen]";
+ mes "You don't have enough fruit.";
+ if (@FRUIT == 512) mes "You need "+@FRUITNUM+" apples to make that much apple juice.";
+ if (@FRUIT == 513) mes "You need "+@FRUITNUM+" bannanas to make that much bannana juice.";
+ if (@FRUIT == 514) mes "You need "+@FRUITNUM+" grapes to make that much grape juice.";
+ if (@FRUIT == 515) mes "You need "+@FRUITNUM+" carrots to make that much carrot juice.";
+ next;
+ goto M_1a;
+ close;
+
+ sl_Bottles:
+ mes "[Juicer Marx Hansen]";
+ mes "You don't have enough bottles. You need "+@input+" empty bottle(s) to make that many juice drinks.";
+ next;
+ goto M_1a;
+
+ sl_Zeny:
+ mes "[Juicer Marx Hansen]";
+ mes "You don't have enough zeny. You need "+@ZENYNUM+" zeny, to make that many juice drinks.";
+ next;
+ goto M_1a;
+
+ sM_1End:
+ mes "[Juicer Marx Hansen]";
+ mes "Oh well... see you next time.";
+ close;
+
+ M_1b:
+ mes "[Juicer Marx Hansen]";
+ mes "# Fruit Juice Info #";
+ mes "Apple Juice - Apple x 3 ea, Empty Bottle x 1 ea, 3 zeny.";
+ mes "Banane Juice - Banana x 3 ea, Empty Bottle x 1 ea, 3 zeny.";
+ mes "Carrot Juice - Carrot x 3 ea, Empty Bottle x 1 ea, 3 zeny.";
+ mes "Grape Juice - Grape x 3 ea, Empty Bottle x 1 ea, 3 zeny.";
+ close;
+
+ M_1End:
+ close;
+}
+