bacchus: change NPC id, fix some labels to uppercase

1 files changed, 131 insertions, 0 deletions

diff --git a/npc/000-2-2/bacchus.txt b/npc/000-2-2/bacchus.txt
new file mode 100644
index 00000000..05375095
--- /dev/null
+++ b/npc/000-2-2/bacchus.txt
@@ -0,0 +1,131 @@
+// Evol scripts.
+// Authors:
+//    Vasily_Makarov
+
+
+000-2-2.gat,32,29,0,1	script	Bacchus	NPC_BACCHUS,{
+
+    mesn;
+    mesq l("Hahahaha!");
+    mesq l("Happy Halloween!!");
+    next;
+
+L_Intro:
+    mesq l("Let me introduce myself, I'm Bacchus, the ladies man, the sir of your dream, the pumpkin of the jack, the star of the your sky, the...");
+    next;
+
+    menu
+        rif(countitem("Pumpkin") > 0, l("I have a pumpkin!")), L_DoHat,
+        l("Where did you get that hat?"), L_Hat,
+        l("Forgive me, but... who are you?"), -,
+        l("Where can I find this pumpkin?"), L_Where,
+        l("Goodbye..."), L_Bye;
+
+    mes "";
+    mesn;
+    mesq l("I... I said you, I'm the ladies man, the...");
+    next;
+
+    menu
+        l("No, not this."), -,
+        l("Ok, see you."), L_Bye;
+
+    mes "";
+    mesn;
+    mesq l("The sir of your dream?");
+    next;
+    mesq l("The pumpkin of the jack?");
+    next;
+
+    menu
+        l("Could you just tell me who you are?"), -,
+        l("Pumpkin of the jack."), L_Hat,
+        l("Nothing..."), L_Bye;
+
+    mes "";
+    mesn;
+    mesq l("You're not funny...");
+    next;
+    mesq l("I'm Bacchus! The...");
+    next;
+    mesq l("Ok, that's enough.");
+    next;
+    mesq l("I'm just a random stranger, just passing by this ship, in this wonderful day of Halloween.");
+    next;
+    mesq l("Hmm...");
+    next;
+    mesq l("Who're you?");
+    next;
+    goto L_Intro;
+
+L_Hat:
+    mes "";
+    mesn;
+    mesq l("My hat! do you like it? I do love it, I made it by myself, it's such a beauty, isn't it? Oh wait, I can light fire inside, it's the most beautiful!");
+    next;
+    mesq l("Do you want one as well?");
+    next;
+
+    menu
+        l("I would like one too, indeed."), -,
+        l("No thanks, I think that I'll leave you alone..."), L_Bye;
+
+    mes "";
+    mesn;
+    mesq l("You would like... ? So I think that's... Possible, let's say... yes! Yes, it's possible.");
+    next;
+    mesq l("You just need to bring me... one @@, that's all. I'll carve it myself.", getitemlink("Pumpkin"));
+    next;
+
+    menu
+        l("Deal! I'll bring you one."), -,
+        l("Where can I find this pumpkin?"), L_Where,
+        l("I changed my mind, I don't want it anymore."), L_Bye;
+
+    mes "";
+    mesn;
+    mesq l("Nice! I'll wait you here.");
+
+    close;
+
+L_Where:
+    mes "";
+    mesn;
+    mesq l("Oh... That's a hard thing to find, only the Cuco can give it to you...");
+    next;
+    mesq l("It's an evil pumpkin, and... You're half lucky, there's one here!");
+    next;
+    mesq l("Don't be scared, he's on the other room, nobody is there.");
+    next;
+    mesq l("Just go to the left, you'll see a rusty door, knock it hard, and defeat this vegetable!");
+
+    close;
+
+L_Bye:
+    mes "";
+    mesn;
+    mesq l("You miss something...");
+
+    close;
+
+L_DoHat:
+    mes "";
+    mesn;
+    mesq l("Nice nice... Wait few seconds...");
+    next;
+
+    mesn "Narrator";
+    mes "The squary pumpkinman is sculpting your pumpkin while talking to you.";
+    next;
+
+    if (countitem("Pumpkin") > 0) delitem "Pumpkin", 1;
+    getitem "PumpkinHat", 1;
+
+    mesn;
+    mesq l("Did I told you that a long time ago... Oh, I'm done.");
+    next;
+    mesq l("That's remarkable, I've never made anything like that one before, consider yourself lucky!");
+
+    close;
+
+}