summaryrefslogtreecommitdiff
path: root/npc/test/npc1.txt
blob: fc7392209179459ba2bcb928ec58855cb337492d (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
66
67
68
69
70
71
72
// Evol scripts.
// Authors:
//    4144
// Description:
//    test npc1

test,10,10,0	script	npc1#door	32767,0,1,{
OnTouch:
    warp "test", 20, 20;
    close;
OnUnTouch:
    doevent "npc1::OnUnTouch";
}

test,10,10,0	script	npc1	800,3,3,{
    function areatest
    {
        mesn;
        mes "getareausers(\"test\", 7, 7, 13, 13): " + getareausers("test", 7, 7, 13, 13);
        mes "getareausers(7, 7, 13, 13): " + getareausers(7, 7, 13, 13);
        mes "getareausers(\"test\"): " + getareausers("test");
        mes "getareausers(): " + getareausers();
        mes "getareausers(\"test\", 1): " + getareausers("test", 1);
        mes "getareausers(1): " + getareausers(1);
        next;
        return;
    }

    switch (select("show area:change sex:change npc direction:add cart|remove cart"))
    {
        case 1:
            areatest;
            break;
        case 2:
            changecharsex;
            break;
        case 3:
            for (.@f = 0; .@f < 9; .@f ++)
            {
                mes "" + .@f;
                setnpcdir .@f;
                next;
            }
            break;
        case 4:
            setcart 1;
            break;
        case 5:
            setcart 0;
            break;
    }

    close;

OnTouch:
    doorTouch;

OnUnTouch:
    doorUnTouch;

OnTimer340:
    doorTimer;

OnInit:
    setnpcsex G_MALE;
    setnpcdistance 5;
    end;

OnWhisperGlobal:
    mes "cmd: " + @whispervar0$;
    close;
}