From 620e60eebce2c1f35c5c9a82f6ca365b316587f5 Mon Sep 17 00:00:00 2001
From: Valaris <Valaris@54d463be-8e91-2dee-dedb-b68131a5f0ec>
Date: Sun, 29 Jan 2006 16:10:48 +0000
Subject: AS OF SVN REV. 5901, WE ARE NOW USING TRUNK.  ALL UNTESTED
 BUGFIXES/FEATURES GO INTO TRUNK. IF YOU HAVE A WORKING AND TESTED BUGFIX PUT
 IT INTO STABLE AS WELL AS TRUNK.  EVERYTHING ELSE GOES INTO TRUNK AND WILL BE
 MERGED INTO STABLE BY VALARIS AND WIZPUTER. -- VALARIS

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@5094 54d463be-8e91-2dee-dedb-b68131a5f0ec
---
 npc/merchants/milk_trader.txt | 61 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 61 insertions(+)
 create mode 100644 npc/merchants/milk_trader.txt

(limited to 'npc/merchants/milk_trader.txt')

diff --git a/npc/merchants/milk_trader.txt b/npc/merchants/milk_trader.txt
new file mode 100644
index 000000000..f81c6f90f
--- /dev/null
+++ b/npc/merchants/milk_trader.txt
@@ -0,0 +1,61 @@
+//===== eAthena Script =======================================
+//= Milk Trader
+//===== By: ==================================================
+//= kobra_k88
+//===== Current Version: =====================================
+//= 1.2a
+//===== Compatible With: =====================================
+//= eAthena 7.15 +
+//===== Description: =========================================
+//= trades bottles for milk
+//===== Additional Comments: =================================
+//= Fully working
+//= 1.1 Negative input bug fixed [Lupus]
+//= 1.2 Raised the price to close zeny exploit [Lupus]
+//= 1.2a Switched to Lupus's "loopless" technique.[kobra_k88]
+//============================================================
+
+
+// Milk Trader -------------------------------------------------------------
+prontera.gat,71,131,7	script	Milk Trader	86,{
+	mes "[Milk Trader]";
+	mes "If you bring me an empty bottle and 20 Zeny, I will exchange it for 1 bottle of milk.";
+	next;
+	menu "-Exchange as many as possible.",M_0, "-Let me set the amount.",M_1, "-Cancel",M_End;
+
+	M_0:
+		set @amount, 1000;
+		if(zeny/20 < @amount) set @amount, zeny/20;
+		if(countitem(713) < @amount) set @amount, countitem(713);
+		if(@amount > 0) goto L_Milk;
+		mes "[Milk Trader]";
+		mes "..... Are you trying to make a fool of me.... ?";
+		close;
+
+	M_1:
+		input @amount;
+		if(@amount < 1 || @amount > 1000) goto M_End;
+		if(countitem(713) < @amount) goto L_NoBottle;
+		if(zeny < (@amount*20)) goto L_NoZeny;
+
+	L_Milk:
+		getitem 519, @amount;
+		delitem 713, @amount;
+		set zeny, zeny - (@amount*20);
+
+	M_End:
+		mes "[Milk Trader]";
+		mes "Come back anytime.";
+		close;
+
+	L_NoBottle:
+		mes "[Milk Trader]";
+		mes "Ok, empty bottle please! Empty Bottle!!";
+		mes "... Aww.. you don't have enough...?";
+		close;
+
+	L_NoZeny:
+		mes "[Milk Trader]";
+		mes "You need more zeny.";
+		close;
+}
-- 
cgit v1.2.3-60-g2f50