summaryrefslogtreecommitdiff
path: root/npc/001-2-26/ivan.txt
blob: 45a45db8854431d33995848060de00dca072f78f (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
// Evol scripts.
// Author:
//    Reid
// Description:
//    Alchemist NPC

001-2-26,28,30,0	script	Ivan	NPC_IVAN,{

    function ivan_description {
        speech 5,
            l("I am an alchemist, I bear the name of Ivan."),
            l("I work under the protection and the supervision of the Legion of Aemil."),
            l("Alchemical studies are prohibited in every cities of the Archipelagos, do not dare to practice in a public zone!");

        return;
    }

    function enora_quest {
        speech 5, l("How many? What kind? I can produce two dozen of box per day.");

        select (l("5 Pibberies Infusion."));

        speech 5,
            l("5 boxes... Alright, @@ are my speciality!", getitemlink (PibberiesInfusion)),
            l("I can prepare them in an hour or so!");

        select (l("You missunderstood, it's 5 potions."));

        speech 5,
            l("Why the Legion would request my help for only 5 potions?"),
            l("Is this some kind of joke?!");

        switch (select (l("Enora needs them."),
                        l("Excuse me that was a mistake.")))
        {
            case 1:
                break;
            case 2:
                narrator 1, l("Ivan grumbles and resumes his work.");
                emotion 11;
                close;
        }

        speech 5,
            l("Oh... You should have started with this!"),
            l("I have some spare one, take them, and tell Enora that any fees are paid!");

        setq ArtisQuests_Enora, 9;
        emotion 3;
        return;
    }

    .@enora = getq (ArtisQuests_Enora);

    if (.@enora < 8)
    {
        npctalk3 l("I'm busy, leave me alone.");
    }

    speech 4, l("Yes what do you need?");

    menuint rif(.@enora == 8, l("The Legion need some potions.")), 1,
            rif(.@enora >= 8, l("Who are you?")), 2,
            menuaction(l("Quit")), 3;

    switch (@menuret)
    {
        case 1:
            enora_quest;
            break;
        case 2:
            ivan_description;
            break;
        case 3:
            break;
    }

    closedialog;
    goodbye;
    close;

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