summaryrefslogtreecommitdiff
path: root/npc/merchants/grandpa_pharmacist.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/merchants/grandpa_pharmacist.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/merchants/grandpa_pharmacist.txt')
-rw-r--r--npc/merchants/grandpa_pharmacist.txt186
1 files changed, 186 insertions, 0 deletions
diff --git a/npc/merchants/grandpa_pharmacist.txt b/npc/merchants/grandpa_pharmacist.txt
new file mode 100644
index 000000000..35e662a85
--- /dev/null
+++ b/npc/merchants/grandpa_pharmacist.txt
@@ -0,0 +1,186 @@
+//===== eAthena Script =======================================
+//= Grandpa Pharmacist
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= trade in items for potions
+//===== Additional Comments: =================================
+//= Fully working
+//= 1.1 Negative input bug fixed [Lupus]
+//============================================================
+
+
+
+
+alberta_in.gat,16,28,4 script Grampa Pharmacist 61,
+{
+ set @count, 0;
+
+ mes "[Grampa Pharmacist]";
+ mes "Hmmm... what do you want...?";
+ next;
+ menu "Make Potion",M_Make, "Talk",M_Talk, "Information",M_Info, "Cancel",M_End;
+
+ M_Make:
+ if(countitem(713) < 1) goto ssL_NdBottle;
+ mes "[Grampa Pharmacist]";
+ mes "Did you prepare all the items needed? If so what potion do you want?";
+ M_Menu:
+ next;
+ menu "Red Potion",M_0, "Orange Potion",M_1, "Yellow Potion",M_2, "White Potion",M_3, "Blue Potion",M_4, "Green Potion",M_5,
+ "Nah, I change my mind.",M_End;
+
+ M_0:
+ set @pot$, "red";
+ set @pot, 501;
+ set @item1, 507;
+ set @zeny, 3;
+ goto sL_Make;
+ M_1:
+ if(countitem(507)<1 || countitem(508)<1) goto ssL_NdHerbs;
+ if(Zeny < 5) goto ssL_NdZeny;
+ set @pot$, "orange";
+ set @pot, 502;
+ mes "[Grampa Pharmacist]";
+ mes "How many?";
+ next;
+ menu "As many as possible.",sM_1a, "I will set the amount.",sM_1b, "Nah, forget about it",M_Menu;
+
+ sM_1a:
+ if(countitem(507)<1 || countitem(508)<1 || countitem(713)<1 || Zeny< 5) goto ssL_End;
+ set @count, @count +1;
+ delitem 507, 1;
+ delitem 508, 1;
+ delitem 713, 1;
+ set Zeny, Zeny - 5;
+ goto sM_1a;
+
+ sM_1b:
+ input @count;
+ if(@count<1) goto ssL_NdNegative;
+ if(countitem(507)<@count || countitem(508)<@count) goto ssL_NdHerbs;
+ if(countitem(713) < @count) goto ssL_NdBottle;
+ if(Zeny<(5*@count)) goto ssL_NdZeny;
+ delitem 507, @count;
+ delitem 508, @count;
+ delitem 713, @count;
+ set Zeny, Zeny - (@zeny*@count);
+ goto ssL_End;
+
+ M_2:
+ set @pot$, "yellow";
+ set @pot, 503;
+ set @item1, 508;
+ set @zeny, 10;
+ goto sL_Make;
+ M_3:
+ set @pot$, "white";
+ set @pot, 504;
+ set @item1, 509;
+ set @zeny, 20;
+ goto sL_Make;
+ M_4:
+ set @pot$, "blue";
+ set @pot, 505;
+ set @item1, 510;
+ set @zeny, 30;
+ goto sL_Make;
+ M_5:
+ set @pot$, "green";
+ set @pot, 506;
+ set @item1, 511;
+ set @zeny, 3;
+
+ sL_Make:
+ if(countitem(@item1) < 2) goto ssL_NdHerbs;
+ if(Zeny < @zeny) goto ssL_NdZeny;
+
+ mes "[Grampa Pharmacist]";
+ mes "How many?";
+ next;
+ menu "As many as possible.",sM_0a, "I will set the amount.",sM_0b, "Nah, forget about it",M_Menu;
+
+ sM_0a:
+ if((countitem(@item1) < 2) || (countitem(713) < 1) || (Zeny < @zeny)) goto ssL_End;
+ set @count, @count +1;
+ delitem @item1, 2;
+ delitem 713, 1;
+ set Zeny, Zeny - @zeny;
+ goto sM_0a;
+
+ sM_0b:
+ input @count;
+ if(@count<1) goto ssL_NdNegative;
+ if(countitem(@item1) < (2*@count)) goto ssL_NdHerbs;
+ if(countitem(713) < @count) goto ssL_NdBottle;
+ if(Zeny < (@zeny*@count)) goto ssL_NdZeny;
+ delitem @item1, (2*@count);
+ delitem 713, @count;
+ set Zeny, Zeny - (@zeny*@count);
+
+ ssL_End:
+ mes "[Grampa Pharmacist]";
+ mes "Here are your "+@pot$+" potions.";
+ getitem @pot, @count;
+ close;
+
+ ssL_NdBottle:
+ mes "[Grampa Pharmacist]";
+ mes "You don't have enough empty tubes to put the medicine in you idiot!!";
+ close;
+
+ ssL_NdHerbs:
+ mes "[Grampa Pharmacist]";
+ mes "You rascal! What did you expect from me? You didn't even bring all of the right herbs!";
+ mes "Get lost!";
+ close;
+
+ ssL_NdNegative:
+ mes "[Grampa Pharmacist]";
+ mes "You dirty cheater! What did you expect from me? Next time set positive amount of the potions!";
+ mes "Get off!";
+ close;
+
+ ssL_NdZeny:
+ mes "[Gramp Pharmacist]";
+ mes "You don't have enough zeny for potions.";
+ close;
+
+ M_Talk:
+ mes "[Grampa Pharmacist]";
+ mes "The right type of medicinal Herbs can replenish a person's HP or SP.";
+ mes "~Sigh~ I'm starting to reminisce about my youth.... a sign that I must be getting old.....";
+ next;
+ mes "[Grampa Pharmacist]";
+ mes "Anyways, a potion is merely an, 'easy to use', form of medicinal Herbs..... nothing more and nothing less.";
+ close;
+ M_Info:
+ mes "[Grampa Pharmacist]";
+ mes "~Sigh~... you young ones can be quite bothersome... Fine, I will explain to you how potions work....";
+ next;
+ mes "[Grampa Pharmacist]";
+ mes "Though the bennefits from consuming the various Herbs found around Rune-Midgard are great......";
+ mes "By refining them into potions, the effects of the Herbs are dramatically enhanced.";
+ next;
+ mes "[Grampa Pharmacist]";
+ mes "The process of refining herbs into potions is a special one that I created. For a small fee I can make any potion you desire.";
+ next;
+ mes "[Grampa Pharmacist]";
+ mes "^FF5533Red Potion^000000 - 2 Red Herbs, 1 Empty Bottle, 2 Zeny fee.";
+ mes "^FF8000Orange Potion^000000 - 1 Red Herb, 1 Yellow Herb, 1 Empty Bottle, 5 Zeny fee.";
+ mes "^E8CF20Yellow Potion^000000 - 2 Yellow Herbs, 1 Empty Bottle, 10 Zeny fee.";
+ next;
+ mes "[Grampa Pharmacist]";
+ mes "^999999White Potion^000000 - 2 White Herbs, 1 Empty Bottle, 20 Zeny fee.";
+ mes "^3355FFBlue Potion^000000 - 2 Blue Herbs, 1 Empty Bottle, 30 Zeny fee.";
+ mes "^00B000Green Potion^000000 - 2 Green Herbs, 1 Empty Bottle, 3 Zeny fee.";
+ close;
+ M_End:
+ mes "[Grampa Pharmacist]";
+ mes "Didn't you have something to say?!";
+ close;
+}