29749ceaa8
git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@16195 54d463be-8e91-2dee-dedb-b68131a5f0ec
34 lines
1.5 KiB
Plaintext
34 lines
1.5 KiB
Plaintext
//===== 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;
|
|
}
|