summaryrefslogtreecommitdiff
path: root/world/map/npc/001-1/entertainer.txt
blob: 5fe8cbc3f93de3de5b019282a390a645c4869a19 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
// 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", -;
    goto L_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", -;
    goto L_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 an emote shortcut-bar with the F12 button\"";
    goto L_Close;

L_Has:
    mes "[Entertainer]";
    mes "\"The entertainment life is a hard life...\" *sigh*";
    goto L_Close;

L_Close:
    set @EMOTE_SKILL, 0;
    close;

OnTimer3000:
    emotion rand(EMOTE_DISGUST, EMOTE_PERTURBED);
    setnpctimer 0;

OnInit:
    initnpctimer;
}