summaryrefslogtreecommitdiff
path: root/npc/006-2-1/miltaco.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/006-2-1/miltaco.txt')
-rw-r--r--npc/006-2-1/miltaco.txt55
1 files changed, 55 insertions, 0 deletions
diff --git a/npc/006-2-1/miltaco.txt b/npc/006-2-1/miltaco.txt
new file mode 100644
index 000000000..427b9a47a
--- /dev/null
+++ b/npc/006-2-1/miltaco.txt
@@ -0,0 +1,55 @@
+// TMW2 scripts.
+// Authors:
+// Saulc
+// Jesusalva
+// Reid
+// Travolta
+// Modified by:
+// +seeds
+// Description:
+// Miltaco is the barber.
+
+006-2-1,85,67,0 script Miltaco NPC_PIOU_BARBER,{
+ mesn;
+ mesq l("Hi! I'm Miltaco, a piou specialist in humanoid hairstyles. Do you want a hair cut?");
+
+ do
+ {
+ select
+ l("What is my current hairstyle and hair color?"),
+ l("I'd like to get a different style."),
+ l("Can you do something with my color?"),
+ l("I'm allergic to pious, goodbye.");
+
+ switch (@menu)
+ {
+ case 1:
+ BarberSayStyle 2;
+ break;
+ case 2:
+ BarberChangeStyle;
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("Enjoy your new style.");
+ l("Anything else?");
+ break;
+ case 3:
+ BarberChangeColor;
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("I hope you like this color.");
+ l("Anything else?");
+ break;
+ case 4:
+ speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
+ l("Come and visit again!");
+
+ goodbye;
+ }
+ } while (1);
+ close;
+
+
+OnInit:
+ .sex = G_OTHER;
+ .distance = 5;
+ end;
+}