summaryrefslogtreecommitdiff
path: root/world/map/npc/048-2/helperMSilk.txt
blob: 8b6b08a62dfe11adbb6d73234529a636b9f141e6 (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
// Part of Blue Sage quests
// author: Jenalya
// see bluesageConfig for detailed quest description
// Janika asks for Silk Cocoons for repairing the books
// can give second hint about visitor in investigation subquest

048-2.gat,104,103,0|script|Janika|363
{
    set @investigate, ((QUEST_BlueSage & $@Q_BlueSageInvestigate_MASK) >> $@Q_BlueSageInvestigate_SHIFT);
    set @silk_amount, 80;
    set @silk_exp, 10000;

    if (QUEST_BlueSage & $@Q_BlueSageMaterialSilk) goto L_Done;
    if (BaseLevel >= $@Q_BlueSageMinimumLevel) goto L_Quest;

    mes "[Janika]";
    mes "\"This is going to be difficult... oh, hello. I'm working on recreating some of the books that were destroyed.\"";
    goto L_Close;

L_Quest:
    mes "[Janika]";
    mes "\"This is going to be difficult...";
    mes "Oh, hello. You don't have " + @silk_amount + " Silk Cocoons with you, do you? I need them for the book covers and binding of some of the more valuable books we're trying to recreate.\"";
    menu
        "I have!",L_TurnIn,
        "I haven't, but I can try to get some.",L_Investigate,
        "No.",L_Investigate;

L_TurnIn:
    if(countitem("SilkCocoon") < @silk_amount)
        goto L_NoItem;
    delitem "SilkCocoon", @silk_amount;
    getexp @silk_exp, 0;
    set QUEST_BlueSage, (QUEST_BlueSage | $@Q_BlueSageMaterialSilk);
    mes "[Janika]";
    mes "\"Excellent! This is exactly what I need. Thanks a lot. I'll tell Nikolai about your generosity.\"";
    goto L_Investigate;

L_Done:
    mes "[Janika]";
    mes "\"Thanks for the Silk Cocoons. With these the new books are going to be exquisite.\"";
    goto L_Investigate;

L_NoItem:
    mes "[Janika]";
    mes "\"Are you kidding? You don't have it!\"";
    goto L_Close;

L_Investigate:
    if ((@investigate == 3) || (@investigate == 4)) goto L_Ask_Visitor;
    if ((@investigate == 5) || (@investigate == 8)) goto L_Ask_Helper;
    if ((@investigate == 6) || (@investigate == 7) || (@investigate == 9) || (@investigate == 10)) goto L_Ask_Both;
    goto L_Close;

L_Ask_Visitor:
    menu
        "Can you tell me anything about the visitor with the mask?",L_Visitor,
        "I need to leave.",L_Close;

L_Ask_Helper:
    menu
        "What's your opinion of Peetu and how he does his work?",L_Helper,
        "See you later.",L_Close;

L_Ask_Both:
    menu
        "Can you tell me anything about the visitor with the mask?",L_Visitor,
        "What's your opinion of Peetu and how he does his work?",L_Helper,
        "Bye.",L_Close;

L_Visitor:
    mes "[Janika]";
    mes "\"Oh, I know who you mean! That impertinent person came over in the workshop area and fiddled about with all kinds of things here! Such a rude person! Didn't he understand that we had delicate things going on here? We had to send him back to the library area several times.\"";
    next;
    mes "She shakes her head.";
    mes "\"Sometimes I think it'd be better not to allow visitors here. But the sages set a high value on keeping contact with the population. Politics.\"";
    if ((@investigate != 3) && (@investigate != 6) && (@investigate != 9))
        goto L_Close;
    set @investigate, @investigate + 1;
    callfunc "updateBlueSageInvestigate";
    goto L_Close;

L_Helper:
    mes "[Janika]";
    mes "\"Mh, I don't know him closely.\"";
    goto L_Close;

L_Close:
    set @investigate, 0;
    set @silk_amount, 0;
    set @silk_exp, 0;
    close;
}