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

1 files changed, 172 insertions, 0 deletions

diff --git a/npc/merchants/inn.txt b/npc/merchants/inn.txt
new file mode 100644
index 000000000..dfc0e7c3c
--- /dev/null
+++ b/npc/merchants/inn.txt
@@ -0,0 +1,172 @@
+//===== eAthena Script ======================================= 

+//= Inn Npcs

+//===== By: ================================================== 

+//= Darkchild (1.1)

+//===== Current Version: ===================================== 

+//= 1.1a

+//===== Compatible With: ===================================== 

+//= eAthena 1.0+

+//===== Description: ========================================= 

+//= Inn Npcs, Save and Heal

+//=====================================================

+//= variables:

+//= arg0 - name of npc

+//= arg1 - name of the inn

+//= arg2 - map to save at

+//= arg3, arg4 - x and y cord. to save at

+//= @cost - cost of renting a room

+//===== Additional Comments: ================================= 

+//= 1.1 Blind Effect By Kobra_k88 (Taken from his old script)

+//= I added it to all of them though [Darkchild]

+//= 1.1a Minor bug fixes and optimizations. Switched from @variables 

+//= to arguments.[kobra_k88]

+//============================================================ 

+

+

+//======================== Prontera ===================================

+// West Side Inn -------------------

+prt_in.gat,244,135,2	script	Inn Maid::Sammy	53,{

+

+	callfunc "F_InnMaid","[Sammy]","West Inn","prt_in.gat",238,130;

+	addtimer 3900, "Sammy::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "prt_in.gat",237,102;

+	sc_end SC_BLIND;

+	end;

+}

+// East Side Inn ------------------

+prt_in.gat,61,141,2	script	Inn Maid::Ahlma	53,{

+

+	callfunc "F_InnMaid","[Ahlma]","East Inn","prt_in.gat",64,136;

+	addtimer 3900, "Ahlma::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "prt_in.gat",49,173;

+	sc_end SC_BLIND;

+	end;

+}

+

+//======================== Alberta ====================================

+// North --------------------------

+alberta_in.gat,32,142,5	script	Inn Maid::Moira	53,{

+

+	callfunc "F_InnMaid","[Moira]","North Inn","alberta_in.gat",26,138;

+	addtimer 3900, "Moira::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "alberta_in.gat",18,188;

+	sc_end SC_BLIND;

+	end;

+}

+// South -----------------------------

+alberta_in.gat,55,142,8	script	Inn Maid::Tina	53,{

+

+	callfunc "F_InnMaid","[Tina]","South Inn","alberta_in.gat",60,140;

+	addtimer 3900, "Tina::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "alberta_in.gat",68,188;

+	sc_end SC_BLIND;

+	end;

+}

+

+//====================== Geffen ======================================

+geffen_in.gat,70,64,5	script	Inn Maid::Betty	53,{

+

+	callfunc "F_InnMaid","[Betty]","Inn","geffen_in.gat",74,60;

+	addtimer 3900, "Betty::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "geffen_in.gat",106,106;

+	sc_end SC_BLIND;

+	end;

+}

+

+//======================= Payon ======================================

+payon_in01.gat,131,62,5	script	Inn Maid::SunHee	53,{

+

+	callfunc "F_InnMaid","[Sun Hee]","Inn","payon_in01.gat",132,56;

+	addtimer 3900, "SunHee::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "payon_in01.gat",140,15;

+	sc_end SC_BLIND;

+	close;

+}

+

+//======================== Morocc ====================================

+// North East --------------------------

+morocc_in.gat,147,138,5	script	Inn Maid::Suzie	53,{

+

+	callfunc "F_InnMaid","[Suzie]","North East Inn","morocc_in.gat",142,140;

+	addtimer 3900, "Suzie::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "morocc_in.gat",174,144;

+	sc_end SC_BLIND;

+	end;

+}

+// South --------------------------------

+morocc_in.gat,80,100,5	script	Inn Maid::Shala	53,{

+

+	callfunc "F_InnMaid","[Shala]","South Inn","morocc_in.gat",78,95;

+	addtimer 3900, "Shala::OnTimerWarp";

+	close;

+

+OnTimerWarp:

+	warp "morocc_in.gat",74,128;

+	sc_end SC_BLIND;

+	end;

+}

+

+//======================= Inn Function ==============================

+function	script	F_InnMaid	{

+	mes getarg(0);

+	mes "Welcome to Nenkaras " + getarg(1) + ".  What can I do for you?";

+	next;

+	menu "Save",Msave, "Rent a Room",Mrent, "Nothing",Mend;

+

+	Msave:

+		mes getarg(0);

+		mes "Location Saved.";

+		mes "I am waiting for another job to do.";

+		savepoint getarg(2),getarg(3),getarg(4);

+		close;

+	Mrent:

+		set @cost,50;

+		if(BaseLevel > 15) set @cost,100;

+		if(BaseLevel > 30) set @cost,200;

+		if(BaseLevel > 50) set @cost,300;

+		if(BaseLevel > 75) set @cost,400;

+		mes getarg(0);

+		mes "It will cost " + @cost + " zeny to rent a room for 1 night.";

+		mes "In the morning your HP and SP will be fully recovered.";

+		next;

+		menu "Ok.",-,"No thanks.",Mend;

+		

+		mes getarg(0);

+		mes "Thank you and enjoy your stay here.";

+		emotion 15;

+		if(Zeny < @cost) goto NoZeny;

+		set Zeny,Zeny - @cost;

+		sc_start SC_BLIND,500000,1;

+		percentheal 100,100;

+		return;

+

+		NoZeny:

+			mes getarg(0);

+			mes "I'm sorry but you don't have enough money.";

+			close;

+	Mend:

+		mes getarg(0);

+		mes "I am waiting for a job to do.";

+		close;

+}