summaryrefslogtreecommitdiff
path: root/npc/006-2-1/may.txt
blob: 2de362cd267bdf490463a7d04e2ec86640d5e2d0 (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
// TMW-2 scripts.
// Original Authors: Hal9000 & Qwerty Dragon
// TMW-2 Authors:
//	  +seeds
//	  dangerduck
// Description:
//    Piou nurse who keeps losing one of her charges.

006-2-1,28,24,0	script	Nurse May	NPC_PIOU_NURSE,{
	function mayHello;
	function mayHelp;
	function mayClose;
	.@q=getq(LilitQuest_Hatchling);

	if (.@q <= 1)
	function mayHello {
		mesn;
		mesq l("Oh please help me, %s! A hatchling has escaped and I can't leave my charges to retrieve him! Will you fetch him for me?", get_race());
		next;
		select
			l("Of course, I'd be happy to help!"),
			l("I don't do well with kids, sorry."),
		mes "";
		switch (@menu) {
		case 1:
			mayHelp();
			break;
		case 2:
			mayClose();
			break;
		}
		return;
}

function mayHelp {
	mesn;
	mesq l("My charge Chuck darted through the door when I came in this morning, and escaped!");
	mesn;
	mesq l("One of the palace guards came by earlier to pickup her daughter, and she said he's at the castle.");
	mesn;
	mesq l("Apparently he's been terrorizing the staff, and keeping them out of their quarters!");
	mesn;
	mesq l("Nobody's been able to coax him back or catch him, but a %s might be able to.", get_race());
	mesn;
	mesq l("Please bring him back, and hurry!");
	close;
}
	
function mayClose {
    {
		.@r = rand2(2);
		if (.@r == 0)
		{
			npctalk3 l("I'm sorry, I simply can't spare any more time to talk with you. Oh, Kendra, don't eat that!");
		}
		else
		{
			npctalk3 l("I must get back to my hatchlings!", get_race());
		}
	}
    else if (.@q == 1)
    {
    mesn;
    mesq l("Oh, hello again %s! I'm afraid Chuck escaped again. Would you mind retrieving him again, please?", strcharinfo(0));
next;
		select
			l("No problem! It's kind of fun chasing after him."),
			l("Sorry, I'm too busy to worry about misbehaved chicks. Catch him yourself."),
		mes "";
		switch (@menu) {
		case 1:
			close;
		case 2:
			mayClose();
			break;
		}
		return;
}

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