1 files changed, 46 insertions, 0 deletions
diff --git a/npc/functions/headstyles.txt b/npc/functions/headstyles.txt
new file mode 100644
index 00000000..c56eb900
--- /dev/null
+++ b/npc/functions/headstyles.txt
@@ -0,0 +1,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;
+}