> Reorganization:

* Cleaned up "Custom Scripts" configuration file (scripts_custom.conf)
* Moved "Event King Items" scripts from events to quests (custom\quests\kings_items.txt)
* Moved "p_track" from events to etc (custom\etc\p_track.txt)
* Renamed "lvl99_quest" to "jewel_case" for easier identification (custom\quests\jewel_case.txt)
* Deleted "2006_dogs_year" event script (pointless and incomplete)

> Script changes:
* Cleaned/standardized "Valentine Event Script" (events\valentinesday.txt)
* Cleaned "Slotted Sunglasses Quest" (custom\quests\sunglasses.txt)
* Optimized "Lord Kaho's Horns Quest" (custom\quests\kahohorn.txt)
* Cleaned and optimized "Balmung & Lord Kaho's Horns Quest" (custom\quests\kaho_balmung.txt)

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16313 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 67 insertions, 0 deletions

diff --git a/npc/custom/etc/p_track.txt b/npc/custom/etc/p_track.txt
new file mode 100644
index 000000000..87794ac28
--- /dev/null
+++ b/npc/custom/etc/p_track.txt
@@ -0,0 +1,67 @@
+//===== rAthena Script =======================================
+//= Poring Track Main NPCs
+//===== By: ==================================================
+//= erKURITA
+//===== Current Version: =====================================
+//= 1.3
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= Poring Track core NPCs and warpers.
+//===== Additional Comments: =================================
+//= 1.2 Removed Duplicates [Silent]
+//= 1.3 Merged and cleaned. [Euphy]
+//============================================================
+
+hugel,58,72,5	script	Yan#track1	86,{
+	callfunc "P_TrackEnt","[Yan]","p_track01";
+	end;
+}
+hugel,62,68,1	script	Yalmire#track1	86,{
+	callfunc "P_TrackEnt","[Yalmire]","p_track02";
+	end;
+}
+
+function	script	P_TrackEnt	{
+	mes getarg(0);
+	mes "Hi "+strcharinfo(0)+", welcome to the Poring Track!";
+	next;
+	switch(select("Information:I want to try it!:Not today.")) {
+		case 1:
+			mes getarg(0);
+			mes "Well... it's quite fun, that's all I can say. Try it!";
+			close;
+		case 2:
+			mes getarg(0);
+			mes "The entrance fee is 500z. would you like to go in?";
+			next;
+			if(select("Yes, please!:No thanks.")==2) {
+				mes getarg(0);
+				mes "You're missing out!";
+				close; }
+			mes getarg(0);
+			if (Zeny < 500) {
+				mes "You can't enter without paying."; close; }
+			mes "Here we go!";
+			close2;
+			set Zeny, Zeny-500;
+			warp getarg(1),75,41;
+			end;
+		case 3:
+			mes getarg(0);
+			mes "See you later!";
+			close;
+	}
+}
+
+p_track01,76,36,2	script	Yan#track2	86,{ end; }
+p_track01,41,57,5	script	Lady#track1::P_track	845,{ end; }
+p_track01,67,34,6	script	Erudite::P_Spectator1	107,{ end; }
+p_track01,44,49,3	script	Edward	881,{ end; }
+p_track01,27,47,3	script	Yuri#P_track	853,{ end; }
+
+p_track02,76,36,2	script	Yalmire#track2	86,{ end; }
+p_track02,30,45,3	script	Nagya	755,{ end; }
+p_track02,42,49,3	script	Asgahrd	733,{ end; }
+p_track02,67,33,1	script	Blacksmith#track1	726,{ end; }
+p_track02,41,57,5	duplicate(P_track)	Lady#track2	845
\ No newline at end of file