npc/001-2-12/oscar.txt


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

// Evol scripts.
// Authors:
//    Reid
// Description:
//    Old man living in the rich hill, can bleach clothes.

001-2-12,38,30,0	script	Oscar#001-2-12	NPC_OSCAR,{

    .@hour = gettime(GETTIME_HOUR);
    speech 4, (.@hour > 6 && .@hour < 18) ? l("Good day to you.") : lg("Good night milady.", "Good evening sir.");

    do
    {
        menuint
            l("Could you bleach my clothes?"), 1,
            l(menuaction(l("Quit"))), 2;

        switch (@menuret)
        {
            case 1:
                speech 5, l("Oh my...");
                break;
            case 2:
                speech 5, l("I wish you a good time in town.");
                break;
        }

    } while (@menuret != 2);

    closedialog;
    goodbye;
    close;

OnInit:
    .sex = G_MALE;
    .distance = 3;
    end;
}