1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
|
function script fixHeadStyles {
callfunc "getHeadStyles";
if (!HELLOWORLD)
goto L_RandomHair;
set @style, getlook(LOOK_HAIR); // FIXME: this needs to be a param in the future
set @color, getlook(LOOK_HAIR_COLOR); // FIXME: this needs to be a param in the future
debugmes "Login OK";
return;
if (@color >= 123 && @color <= HC_WHITE) // convert shock white
@color = (HC_WHITE - Class) + 1;
if (@color < 105 && ((@color - (15 * (Class - 1))) < 0 || @color > ((15 * (Class - 1)) + (getarraysize(@HairColors$) - 1))))
set @color, 15 * (Class - 1); // it is possible to style color 0 but not style 0 since style is treated as an item
setlook LOOK_HAIR_COLOR, @color; // FIXME: this needs to be a param in the future
return;
L_RandomHair:
HELLOWORLD=true;
//resetstatus; // <= important! gives 48 stat points
debugmes "Set random look....";
setlook LOOK_HAIR, rand(1, getarraysize(@HairStyles$));
setlook LOOK_HAIR_COLOR, rand(15);
return;
}
// Hairstyle config
// set array of style and colors
- script hairstyle_config NPC_HIDDEN,{
end;
OnInit:
setarray $@hairstyle$[0], "(none)", "Bald", "Flat Ponytail", "Bowl Cut", // 3
"Combed back", "Emo", "Mohawk", "Pompadour", "Center parting", // 8
"Long and Slick", "Short and Curly", "Pigtails", "Long and Curly", // 12
"Parted", "Perky Ponytail", "Wave", "Mane", "Bun", // 17
"Shoulder Length and Flick", "Fizzy", "Long and Clopped", "Bunches", // 21
"Long Ponytail", "Indefinitely long";
setarray $@haircolor$[0], "Light Brown", "Green", "Red",
"Purple", "Gray", "Yellow", "Blue",
"Light Red", "Light Blue", "Dark Purple", "Black",
"Pink", "Brown", "Dark";
setarray $@REFEXP[0], 400, 900, 2250, 6500, 15000;
end;
}
|