hello limit hairstyle like this ? or you want specific range ?
//===== rAthena Script =======================================
//= Stylist
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.1
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Changes your hair style, hair color, and cloth color.
//===== Additional Comments: =================================
//= 1.0 Initial script.
//= 1.1 Switched to 'getbattleflag', credits to Saithis. [Euphy]
//============================================================
ragnarok,68,78,5 script Stylist#custom_stylist 640,{
//cutin "gc_mayssel01",2;
mes "^0000FF Stella^000000";
mes "I'm Stylist Stella.";
mes "I am happy to serve you Master.";
setarray .@Styles[1],
getbattleflag("max_cloth_color"),
getbattleflag("max_hair_style"),
getbattleflag("max_hair_color");
setarray .@Look[1],
LOOK_CLOTHES_COLOR,
LOOK_HAIR,
LOOK_HAIR_COLOR;
set .@maxhairstyle,10; // Max Limit for Hairstyle
set .@s, select(" ~ Cloth color: ~ Hairstyle: ~ Hair color");
set .@Revert, getlook(.@Look[.@s]);
set .@Style,1;
switch(.@s){
case 2:
mes "MaxHairstyles ^ff0000"+.@maxhairstyle+"^000000";
input .@hairstyle;
if (.@hairstyle > .@maxhairstyle) {
mes "Please input correctly.";
close3;
}
if (.@hairstyle < 0 || .@hairstyle > .@maxhairstyle) set .@hairstyle,0; {
setlook 1,.@hairstyle;
close3;
}
}
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;
}
}
close3;
}
note : you can use close3 instead close2 + cutin.