summaryrefslogtreecommitdiff
path: root/npc/000-1/tarlan.txt
blob: 17ffeea0f99d95f92999bd07dd6f026759799106 (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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
// Evol scripts.
// Author:
//    Reid
// Description:
//    Sailor hitting a crocotree, then being struck by a falling croconut.

000-1,33,37,0	script	Tarlan	415,{
    setnpcdir 2;

    mesn;
    set .@a, rand(4);
    if (.@a == 0) goto L_HardToHit;
    if (.@a == 1) goto L_Aouch;
    if (.@a == 2) goto L_DoYou;

    mesq l("Hey you!");
    next;
    mesq l("What are you looking for?");
    next;

    menu
        l("Some food."), L_Food,
        l("Nothing, just hanging around."), -;

    closedialog;
    npctalk3 l("Ok, see you then!");
    goto L_Quit;

L_Food:
    mes " ";
    mesn;
    mesq l("You can yaye some @@s by hitting these crocotrees.", getitemlink("Croconut"));
    next;
    mesq l("Yeye be careful with wild animal's food, some of them are yeyery dangerous, especially the crocs.");

    goto L_Quit;

L_HardToHit:
    mesq l("These crocotrees are full of yaying @@, but they are so hard to hit...", getitemlink("Croconut"));

    goto L_Quit;

L_Aouch:
    mesq l("Ayouyouch! My head...");
    next;
    mesq l("Damn @@.", getitemlink("Croconut"));

    goto L_Quit;

L_DoYou:
    mesq l("Do you want to try?");
    next;
    mesq l("Just hit the trunk, and it will yeye a @@.", getitemlink("Croconut"));

    goto L_Quit;

L_Quit:
    setnpcdir 4;
    close;

OnInit:
    setnpcsex G_MALE;
    setnpcdistance 2;
    end;
}