From 6979b1d621c2e5c6dab882e3825c4a867d19ba98 Mon Sep 17 00:00:00 2001
From: euphyy <euphyy@54d463be-8e91-2dee-dedb-b68131a5f0ec>
Date: Fri, 1 Jun 2012 02:36:44 +0000
Subject: /custom/ folder overhaul:

==== Script Changes ====
* Warper replaced with Euphy's Warper v1.2
* Stylist replaced with a much more efficient script
* Healer replaced with more efficient script
* MVP Arena heavily condensed, and text edited
* Removed logout suggestion in Reset NPC (why was that there?)
* Quest Warper added to scripts_custom.conf [bug fix]

==== Reorganization ====
* All folders in root directory removed except "battleground", "events", "quests"
* All non-essential scripts in root directory moved to "etc" folder
* A few files renamed for easier identification
* scripts_custom.conf reordered for easier identification

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

(limited to 'npc/custom/stylist.txt')

diff --git a/npc/custom/stylist.txt b/npc/custom/stylist.txt
new file mode 100644
index 000000000..c91853b32
--- /dev/null
+++ b/npc/custom/stylist.txt
@@ -0,0 +1,33 @@
+//===== rAthena Script =======================================
+//= Stylist
+//===== By: ==================================================
+//= Euphy
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= Changes your hair style, hair color, and cloth color.
+//============================================================
+
+prontera,170,180,1	script	Stylist#custom_stylist	122,{
+
+	setarray .@Styles[1],553,37,250;	// Maximum dye, hair style, and hair color
+
+	setarray .@Look[1],7,1,6;
+	set .@s, select(" ~ Cloth color: ~ Hairstyle: ~ Hair color");
+	set .@Revert, getlook(.@Look[.@s]); set .@Style,1;
+	while(1) {
+		setlook .@Look[.@s], .@Style;
+		message strcharinfo(0),"This is style #"+.@Style+".";
+		set .@menu$, " ~ Next (^0055FF"+((.@Style!=.@Styles[.@s])?.@Style+1:1)+"^000000): ~ Previous (^0055FF"+((.@Style!=1)?.@Style-1:.@Styles[.@s])+"^000000): ~ Jump to...: ~ Revert to original (^0055FF"+.@Revert+"^000000)";
+		switch(select(.@menu$)) {
+			case 1: set .@Style, ((.@Style!=.@Styles[.@s])?.@Style+1:1); break;
+			case 2: set .@Style, ((.@Style!=1)?.@Style-1:.@Styles[.@s]); break;
+			case 3: message strcharinfo(0),"Choose a style between 1 - "+.@Styles[.@s]+".";
+				input .@Style,0,.@Styles[.@s];
+				if (!.@Style) set .@Style, rand(1,.@Styles[.@s]);
+				break;
+			case 4: set .@Style, .@Revert; setlook .@Look[.@s], .@Revert; break; }
+	} end;
+}
\ No newline at end of file
-- 
cgit v1.2.3-60-g2f50