summaryrefslogtreecommitdiff
path: root/npc/001-2-39/qanon.txt
blob: e227385004ffcf9212390ded3a529bf675be671b (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
// Evol scripts.
// Authors:
//    Alige
//    Reid
// Description:
//    Artis's Legion of Aemil leader.
// Variables:
//    Artis_Legion_Progress
// Values:
//    5    Sent by Lozerk.
//    6    Train forever (Cannot resume legion, must see brotherhood first)
//          Technically, Q'Anon wants to see if player will recover his memory.
//          After all, player memories might have something important.
//    7    Arrived at Hurnscald (This means we can resume legion)

001-2-39,34,41,0	script	Q'Anon	NPC_Q_ANON,{
    function legionState;
    function notaMember;
    .@q=getq(Artis_Legion_Progress);
    mesn;
    mesq lg("It's been a while, girl!", "It's been a while, boy!");
    next;
    if (.@q < 5)
        notaMember();

    // Faction report
    mesc l("Your current standing with the Legion: %s", faction_standing("LEGION", false));
    if (LEGION_RANK)
        mesc l("You are a Legion's %s", legionrank());

    // Main Menu
    select
        rif(.@q == 5, l("Lozerk told me to talk to you and join the legion.")),
        l("Thanks, sir Q'Anon.");
    mes "";
    switch (@menu)
    {
        case 1:
            legionState();
            break;
        case 2:
            mesn;
            mesq lg("Make me proud, girl.", "Make me proud, boy.");
            break;
    }
    close;

function notaMember {
    mesn;
    mesq col(l("*ahem*"), 9) + " " + l("Heh, did you saw me at the port? No?");
    next;
    mesn;
    mesq l("This is how good we Legion Members are. I was informed of your arrival way before you left Drasil Island.");
    next;
    mesn;
    mesq l("I usually would not care, but it is not every day a complete stranger arrives at Artis.");
    next;
    mesn;
    mesq l("You're welcome to stay here as long as you wish. Just don't do anything stupid, like a riot, for example.");
    close;
    return;
}

function legionState {
    mesn;
    mesq l("Oh? And do you think you have what it takes to be a proud Legion Member?");
    next;
    mesn;
    mesq lg("Listen, kid. Being a legion member is not a joke.");
    next;
    mesn;
    mesq l("Hmm, why don't you go train a little more? We have several training rooms here.");
    next;
    mesn;
    mesq l("Yes, I am authorizing you to use them as you deem fit, until you get stronger.");
    next;
    mesn;
    mesq l("Also, build a reputation with the Legion. Talk to everyone. Help everyone. Prove me your worth!");
    next;
    mesn;
    mesq l("Only after you prove yourself, you may join our ranks as a proud member! Hahah!");
    setq Artis_Legion_Progress, 6;
    // So, we probably should use Clan System for the major guilds.
    // I guess major guilds are: Legion, Brotherhood
    // minor guilds: Merchants, Thieves and Mages.

    // It would be the commands below:
    // join_clan(FACTION_LEGION);
    // clan_leave();
    return;
}

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