summaryrefslogtreecommitdiff
path: root/npc/functions/barber.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/functions/barber.txt')
-rw-r--r--npc/functions/barber.txt66
1 files changed, 66 insertions, 0 deletions
diff --git a/npc/functions/barber.txt b/npc/functions/barber.txt
new file mode 100644
index 00000000..0edaab73
--- /dev/null
+++ b/npc/functions/barber.txt
@@ -0,0 +1,66 @@
+//
+
+function script Barber {
+ menu
+ "Change my style", L_Style,
+ "Change my color", L_Color,
+ "Nah, I'm fine", L_Done;
+
+L_Style:
+ if (Sex == 0) goto L_Style_Female;
+
+L_Style_Male:
+ menu
+ "Bald", -,
+ "Ponytail", -,
+ "Bowl cut", -,
+ "Combed back", -,
+ "Emo", -,
+ "Mohawk", -,
+ "Pompadour", -,
+ "Center parting", -,
+ "Supprise me", -,
+ "Nah, I'm fine", close;
+ goto L_Process_Style;
+
+L_Style_Female:
+ menu
+ "Bald", -,
+ "Long and slick", -,
+ "Short and curly", -,
+ "Ponytail", -,
+ "Pigtails", -,
+ "Long and curly", -,
+ "Parted", -,
+ "Short and slick", -,
+ "Supprise me", -,
+ "Nah, I'm fine", L_Done;
+
+L_Process_Style:
+ set @style, @menu - 1;
+ if (@style == 8) set @style, rand(8);
+ setlook 1, @style;
+ return;
+
+L_Color:
+ menu
+ "Brunette", -,
+ "Green", -,
+ "Dark red", -,
+ "Light purple", -,
+ "Gray", -,
+ "Blonde", -,
+ "Teal", -,
+ "Light red", -,
+ "Blue", -,
+ "Dark purple", -,
+ "Supprise me", -,
+ "Nah, I'm fine", L_Done;
+ set @color, @menu - 1;
+ if (@color == 10) set @color, rand(10);
+ setlook 6, @color;
+ return;
+
+L_Done:
+ return;
+}