summaryrefslogtreecommitdiff
path: root/world/map/npc/functions/headstyles.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/functions/headstyles.txt')
-rw-r--r--world/map/npc/functions/headstyles.txt112
1 files changed, 0 insertions, 112 deletions
diff --git a/world/map/npc/functions/headstyles.txt b/world/map/npc/functions/headstyles.txt
deleted file mode 100644
index f5f2ea82..00000000
--- a/world/map/npc/functions/headstyles.txt
+++ /dev/null
@@ -1,112 +0,0 @@
-// headstyles config file
-// author: meko
-
-function|script|fixHeadStyles
-{
- callfunc "getHeadStyles";
- if ((TUT_var < 1 || QL_BEGIN < 1) && StatusPoint < 1 && BaseLevel == 1)
- goto L_RandomHair; // on first login
- set @style, getlook(LOOK_HAIR_STYLE); // 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
- if (@style < 1 || @style > getarraysize(@HairStyles$)) // leftover from previous attempt at classes
- setlook LOOK_HAIR_STYLE, 1; // FIXME: this needs to be a param in the future
- if (@color >= 120 && @color <= HC_WHITE) // convert shock white
- set @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:
- resetstatus; // <= important! gives 48 stat points
- setlook LOOK_HAIR_STYLE, rand(1, getarraysize(@HairStyles$));
- setlook LOOK_HAIR_COLOR, rand((15 * (Class - 1)),((15 * (Class - 1)) + (getarraysize(@HairColors$) - 1)));
- return;
-}
-
-function|script|getHeadStyles
-{
- cleararray @HairStyles$, "", getarraysize(@HairStyles$);
- cleararray @HairColors$, "", getarraysize(@HairColors$);
-
- if (Class == 2) goto L_Tritan;
- elif (Class == 3) goto L_Ifriton;
- elif (Class == 4) goto L_Gispaan;
- elif (Class == 5) goto L_Sparron;
- elif (Class == 6) goto L_Headless;
- else set Class, 1; // we can not style custom classes, so reset when using the barber
- goto L_Talpan;
-
-L_Talpan:
- set @species$, "Talpan";
- setarray @HairStyles$[0],
- "Bald", "Flat ponytail", "Bowl cut", "Combed back", "Emo", "Mohawk",
- "Pompadour", "Center parting/Short and slick", "Long and slick",
- "Short and curly", "Pigtails", "Long and curly", "Parted",
- "Perky ponytail", "Wave", "Mane", "Bun", "Shoulder Length Flick",
- "Fizzy", "Long and Clipped";
- setarray @HairColors$[0],
- "Brunette", "Green", "Dark red", "Light purple", "Gray", "Blonde",
- "Teal", "Light red", "Blue", "Dark purple", "Black", "Pink",
- "Brown";//, "(free slot)", "(free slot)";
- return;
-
-L_Headless:
- if (Class == 6) set @species$, "Undead";
- setarray @HairStyles$[0],
- "Plain", "Flat ponytail", "Bowl cut", "Combed back", "Emo", "Mohawk",
- "Pompadour", "Center parting/Short and slick", "Long and slick",
- "Short and curly", "Pigtails", "Long and curly", "Parted",
- "Perky ponytail", "Wave", "Mane", "Bun", "Shoulder Length Flick",
- "Fizzy", "Long and Clipped";
- setarray @HairColors$[0],
- "Brunette", "Green", "Dark red", "Light purple", "Gray", "Blonde",
- "Teal", "Light red", "Blue", "Dark purple", "Black", "Pink",
- "Brown";//, "(free slot)", "(free slot)";
- return;
-
-L_Tritan:
- set @species$, "Tritan";
- setarray @HairStyles$[0],
- "Finless", "Mohawk", "Dorsal", "Translucid", "Spiky",
- "Dual dorsal", "Intricate", "Lateral";
- setarray @HairColors$[0],
- "Midori", "Aqua", "Mauve", "Magenta", "Jet";
- return;
-
-L_Gispaan:
- set @species$, "Gispaan";
- setarray @HairStyles$[0],
- "1", "2", "3", "4", "5",
- "6", "7", "8", "9", "10",
- "11", "12", "13", "14", "15",
- "16", "17", "18", "19", "20";
- setarray @HairColors$[0],
- "1", "2", "3", "4", "5",
- "6", "7", "8", "9", "10",
- "11", "12", "13", "14", "15";
- return;
-
-L_Sparron:
- set @species$, "Sparron";
- setarray @HairStyles$[0],
- "1", "2", "3", "4", "5",
- "6", "7", "8", "9", "10",
- "11", "12", "13", "14", "15",
- "16", "17", "18", "19", "20";
- setarray @HairColors$[0],
- "1", "2", "3", "4", "5",
- "6", "7", "8", "9", "10",
- "11", "12", "13", "14", "15";
- return;
-
-L_Ifriton:
- set @species$, "Ifriton";
- setarray @HairStyles$[0],
- "Plain", "Horny", "Kinky", "Fiendish", "Modest",
- "Spiky";
- setarray @HairColors$[0],
- "Natural", "Fiery", "Bold", "Blazing", "Spunky",
- "Gloomy";
- return;
-}