summaryrefslogtreecommitdiff
path: root/npc/006-2-5/dusk.txt
blob: c66b4fcc7684c3f6faa3999d43ab8d715fda15f9 (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
// TMW-2 scripts.
// Original Authors: Hal9000 & Qwerty Dragon
// TMW-2 Authors:
//	  +seeds
// Description:
//    Piou captain who gives information about the war and piou queen.

006-2-5,36,25,0	script	Captain Dusk	NPC_PIOU_KNIGHT_R,{
	function duskIgnore
	function duskHello
	function duskAboutQueen
	function reedAboutWar
	.@q=getq(LilitQuest_Pouf)

    function reedHello {
    do
    {
        mesn;
        mesq l("Welcome to the Order of the Piou Knights, %s.", strcharinfo(0));
        next;
        select
            l("Why is Princess Pouf not a Queen?"),
            l("How is the war going?"),
            l("I just wanted to say hi.");
        mes "";
        switch (@menu) {
        case 1:
            duskAboutQueen();
            break;
        case 2:
            duskAboutWar();
            break;
        case 3:
            close;
            break;
        }
    }
    return;
}

function duskAboutQueen {
    mesn;
    mesq l("Queen +seeds of Piou Isles is busy coordinating war efforts at the front.");
    mesn;
    mesq l("She's a fierce piou, leading our troops into the heart of each battle. I admire her bravery.");
    mesn;
    mesq l("Princess Pouf has been given leadership until our Queen returns. Should Queen +seeds perish, Princess Pouf will take the crown.");
    mesn;
    mesq l("Fight bravely and well, %s, and perhaps our Queen will survive to return to her beloved Isles.", strcharinfo(0));
    mesn;
    duskHello();
}

function duskAboutWar {
    mesn;
    mesq l("So far neither the Duck Side or the Piou Knights have gained the upper hand in the war.");
    mesn;
    mesq l("However, our mages have recently begun sensing something dark stirring.");
    mesn;
    mesq l("I fear something terrible is rising, and I do not know if we can weather the coming storm.");
    mesn;
    mesc l("The captain falls quiet, and appears to be lost in thought.");
    mesn;
    close;
}

function duskignore {
    next;
	if (.@q <= 2)
    {
		.@r = rand2(3);
		if (.@r == 0)
		{
			mesq l("Don't think you'll sneak anything by me. I'm watching you.");
		}
		else if (.@r == 1)
		{
			mesq l("I don't tolerate a piou who is afraid of hard work... or a %s.", get_race());
		}
		else
		{
			mesq l("Best steer clear of the Princess, %s. It won't go well if you upset her.", strcharinfo(0));
		}
		return;
		}    
    else if (.@q == 3)
    {
        duskHello();
    }
    return;
}

OnInit:
    .sex = G_Other;
    .distance = 4;
    end;
}