summaryrefslogtreecommitdiff
path: root/npc/000-1/gulukan.txt
blob: b70604d3f3ab62fa23e0faf8e606ef2ce72b65bb (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
// Evol scripts.
// Author:
//    Reid
// Description:
//    Sailor part of the Gugli's quest.
//    Croconut box.

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

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

// Some dialogues will be here.
    setq ShipQuests_Gulukan, 1;
    getitem "CroconutBox", 1;
// 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 l("Yeye is 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 searching?");
    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;

}