summaryrefslogtreecommitdiff
path: root/npc/000-1/gulukan.txt
blob: d0ddb6e4ccac25579dc280de0f072f523b5dc6e8 (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
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
// Evol scripts.
// Authors:
//    Hal9000
//    Reid
// Description:
//    Sailor part of the Gugli's quest.
//    Croconut box.

000-1.gat,54,90,0,1	script	Gulukan	111;2,{

    set @g, getq(ShipQuests_Gugli);
    if (@g == 0) goto l_NoTask;

    set @q, getq(ShipQuests_Gulukan);
    if (@q == 1) l_Func;

    mesn;
    mesq l("Hey @@!", strcharinfo(0));
    next;
    mesq l("How are you feeling, now having foot on steady land? Better?");
    next;

    menu
        l("Wow! It seems everyone knows my name."), l_Name,
        l("Well, it isn't a bad sensation to finally feel something beneath my feet."), l_Continue,
        l("Not so good. I would feel better on Nard's ship."), close;

l_Name:

    mes "";
    mesn;
    mesq l("You know, sailors love to chat while working.");
    next;

    goto l_Continue;

l_Continue:

    mes "";
    mesn;
    mesq l("Are you here to explore the island?");
    next;

    menu
        l("Actually Gugli asked me if I could help you bringing him some of your boxes."), -,
        l("Yes, indeed. I prefer to explore places I have never been to, before doing anything else."), close;

    mes "";
    mesn;
    mesq l("Gugli? Oh I see. Yes, he is pretty used to shout orders to everybody down here.");
    next;
    mesq l("Anyway I am glad I can give you some of these @@s.", getitemlink("Croconut"));
    next;

    setq ShipQuests_Gulukan, 1;
    getitem "CroconutBox", 1;
    
    mes "";
    mesn;
    mesq l("Thank you my friend.");
    close;
    
// And here too.

l_Func:
    mesn;

    set @q, rand(0,400)/100;
    if (@q == 0) goto l_RandomA;
    if (@q == 1) goto l_RandomB;
    if (@q > 1) goto l_RandomC;

l_RandomA:
    mesq l("Hey.");
    next;
    mesq l("What did Gugli yayaid about the box? Was it ok?");
    next;

    menu
        l("It's ok."), l_Fine,
        l("He needs more food."), -;

    mes "";
    mesn;
    mesq lg("Yeye sure? I'll yaye some more food in the next box then.");

    close;

l_Fine:
    mes "";
    mesn;
    mesq l("Alright! Yoyone more box and it'll be good.");

    close;

l_RandomB:
    mesq l("Thanks for the help!");
    next;
    mesq l("These yeye box are way too heavy to be carried alone onto the ship.");

    close;

l_RandomC:
    mesq l("I think that yeye's soon be done. Yeye'll soon have a full box of @@s!", getitemlink("CrocClaw")); 
    next;
    mesq l("And you? How's it yaying on your side?");
    next;

    menu  
        rif(getq(ShipQuests_Gulukan) == 1, l("I'm still busy, I need to find the other sailors.")), -;

    mes "";
    mesn;
    mesq l("Who are yeye 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_QMuller) == 0, l("QMuller.")), l_Top,
        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,
        l("Nobody."), -;

    close;

l_Bottom:
    mes "";
    mesn;
    mesq l("Yeye seen this yoiis at the bottom of the island, check around.");

    close;

l_Top:
    mes "";
    mesn;
    mesq l("Yeye seen this yoiis at the top of the island.");
    next;
    mesq l("You yoiis should walk to the north.");

    close;

l_NoTask:
    mes "";
    mesn;
    mesq l("*uff*... And another box of @@s for our starving colleagues is ready.", getitemlink("Croconut")); 
    close;

}