Adds the entertainer, one who teachs the Emote skill

1 files changed, 44 insertions, 0 deletions

diff --git a/npc/001-1_Tulimshar/entertainer.txt b/npc/001-1_Tulimshar/entertainer.txt
new file mode 100644
index 00000000..798ba534
--- /dev/null
+++ b/npc/001-1_Tulimshar/entertainer.txt
@@ -0,0 +1,44 @@
+// Emote NPC allows for players to learn the emote skill
+
+001-1.gat,30,45,0	script	Entertainer	165,{
+	set @EMOTE_SKILL, 1;
+	if (getskilllv(@EMOTE_SKILL) > 0) goto L_Has;
+
+	mes "[Entertainer]";
+	mes "\"Yes how can I help you?\"";
+	menu
+		"What are those emotions above your head?", L_Learn,
+		"Nothing I guess", -;
+	close;
+
+L_Learn:
+	mes "[Entertainer]";
+	mes "\"They are called emotes, I use them to express how I am feeling";
+	mes "I can teach you to do them too\"";
+	menu
+		"Ok sure", L_Learn2,
+		"Why would I need to that", -;
+	close;
+
+L_Learn2:
+	setskill @EMOTE_SKILL, 1;
+	mes "[Entertainer]";
+	mes "\"All you have to do is press alt and a number";
+	mes "The number determines what emotion will be showned";
+	mes "Some clients will also show a emote shortcut-bar with the F12 button\"";
+	close;
+
+L_Has:
+	mes "[Entertainer]";
+	mes "\"The entertainment life is a hard life...\" *sigh*";
+	close;
+
+
+OnTimer3000:
+	emotion rand(0,11);
+	setnpctimer 0;
+
+OnInit:
+	initnpctimer;
+
+}