summaryrefslogtreecommitdiff
path: root/npc/000-1/muller.txt
blob: 6ddb9cf7f51fac65a6d4c94af4dcd52ef91b6a74 (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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
// Evol scripts.
// Authors:
//    Hal9000
//    Reid
// Description:
//    Sailor part of the Gugli's quest.
//    Plushroom box.

000-1,35,69,0	script	Q'Muller	NPC_ORC_MAN,{
    if (getq(General_Narrator) > 0)
    {
        sailortalk;
    }

    .@g = getq(ShipQuests_Gugli);
    if (.@g == 0) goto L_NoTask;

    .@q = getq(ShipQuests_QMuller);
    if (.@q == 1) goto L_CallFunc;

    mesn;
    mesq l("Can't you see I'm working?!");
    next;

    select
        l("Well I'm working too! Don't you want me to carry one of these boxes back to Gugli?");

    mes "";
    mesn;
    mesq l("Oh I see... Sailors are not able to do their job anymore, is it like that?!");
    next;

    menu
        l("Indeed! Goodbye."), L_Quit,
        l("Yes, it is true! You are not able at all. Nard has been waiting for the food for too long already. Hurry up, you lazy sailors!"), -;

    mes "";
    mesn;
    mesq l("Are you blind? Do you really think these boxes are light and soft as a piou's feather?!");
    next;

    select
        lg("I am sure that I can run with one of them on my shoulder.");

    mes "";
    mesn;
    mesq l("Well then... Take this one!");
    next;

    inventoryplace PlushroomBox, 1;

    setq ShipQuests_QMuller, 1;
    getitem PlushroomBox, 1;

    mes "";
    mesn;
    mesq l("And now I want to see you run!");

    close;

L_CallFunc:
    sailorfood;

    menu
        rif(getq(ShipQuests_Gugli) > 1, l("Task is done.")), L_TaskDone,
        rif(getq(ShipQuests_QMuller) == 1 && (getq(ShipQuests_Ale) == 0 || getq(ShipQuests_Astapolos) == 0 || getq(ShipQuests_Gulukan) == 0 || getq(ShipQuests_Jalad) == 0 || getq(ShipQuests_Tibbo) == 0), l("I'm still busy, I need to find the other sailors.")), -,
        l("What's that?"), L_Plushroom;

    mes "";
    mesn;
    mesq l("Who are you looking for?");
    next;

    menu
        rif(getq(ShipQuests_Ale) == 0, l("Ale.")), L_Top,
        rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), L_Top,
        rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), L_Top,
        rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), L_Bottom,
        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), L_Bottom,
        l("Nobody."), L_Quit;

L_Bottom:
    mes "";
    mesn;
    mesq l("I've seen him at the bottom of the island, check around.");

    close;

L_Top:
    mes "";
    mesn;
    mesq l("I've seen him at the top of the island.");
    next;
    mesq l("You should walk to the north.");

    close;

L_Plushroom:
    mes "";
    mesn;
    mesq l("'That', as you call it, is a @@. There are plenty on this island!", getitemlink(Plushroom));
    next;
    mesq l("It's a kind of mushroom. We call it like that because of it's taste, just like a marshmallow. It also has this name because of it's appearance, it looks like a plush!");
    next;
    mesq l("There are few groups of these @@s all around this island. Just pick some and have a try.", getitemlink(Plushroom));

    close;

L_NoTask:
    mes "";
    mesn;
    mesq l("You see? I'm working here!");

    close;

L_TaskDone:
    mes "";
    mesn;
    mesq l("Good to hear!");
    next;

    goodbye;

L_Quit:
    closeclientdialog;
    close;

OnInit:
    .bodytype = BODYTYPE_3;
    .distance = 2;
    end;
}