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
|
// Annual Xmas
// author: Jenalya, wushin
// Warrick is the Chief of Santa's helpers
030-2.gat,127,42,0|script|Chief Warrick|329,
{
callfunc "XmasStates";
if($@xmas_time)
goto L_XmasMain;
goto L_OffSeason;
L_OffSeason:
mes "[Chief Warrick]";
mes "\"Things run a lot smoother in the offseason. Why don't you check back when it gets closer to the holiday?\"";
goto L_Close;
L_XmasMain:
if (@xmas_helper_bit)
goto L_HelpStatus;
if (@xmas_helper_start_state)
goto L_Helping;
if (@xmas_list_deliver)
goto L_Avalia;
goto L_NoHelp;
L_Helping:
mes "[Chief Warrick]";
mes "\"Welcome to the home of Santa! My name is Warrick, I'm the chief of Santa's helpers.";
mes "As you certainly know Christmas is near. Therefore we're very very busy.\"";
next;
mes "\"For this reason I have to ask you to leave and come back some at some more convenient time.\"";
menu
"Availa Sent me. She said you should have me help out.",L_Next;
L_Next:
mes "Warrick sighs.";
next;
mes "[Chief Warrick]";
mes "\"Everything is going wrong, we're missing ingredients for the Christmas candy and material for the toys.";
mes "The lists got lost, we are running low on supplies, everything is in utter confusion.";
mes "And to make matters worse some of the presents are missing!\"";
next;
mes "\"Oh, please excuse me. I didn't mean to moan.";
mes "However, as you can see we have to deal with some serious problems here.";
mes "So I'd appreciate if you could just leave and not interfere.\"";
menu
"But I can help!",L_Continue;
L_Continue:
mes "He hesitates.";
next;
mes "[Chief Warrick]";
mes "\"I'm not sure...\"";
menu
"Really, I can do a lot of things.",L_Insist;
L_Insist:
mes "[Chief Warrick]";
mes "\"Well, alright. I suppose it can't get worse than it already is.";
mes "Go to the helpers all over the house and ask them what is needed.";
mes "This will show you're hired as a co-helper.\"";
mes "He stabs your chest with his finger and leaves a blinking mark.";
set XMASTIME, XMASTIME | $@xmas_helper_bit;
goto L_Close;
L_HelpStatus:
mes "[Chief Warrick]";
if (@xmas_karma)
mes "\"It seems we're catching up with the tasks to do, thanks to your help.\"";
if (!(@xmas_karma))
mes "\"I hope you're doing well.\"";
if (@xmas_all_helpers)
mes "\"The helpers are happy for the extra help.\"";
if (!(@xmas_all_helpers))
mes "\"My workers are so stressed.\"";
if (@xmas_all_lists)
mes "\"I think all the children will be happy this year.\"";
if (!(@xmas_all_lists))
mes "\"I wonder how this season will turn out.\"";
goto L_Close;
L_Avalia:
mes "\"Wow, this can't be. The Missing Lists. You should go see Avalia right away. She can be found on the other side of the work shop. To the Room to the West of the Nutcracker.\"";
goto L_Close;
L_NoHelp:
mes "[Chief Warrick]";
mes "\"Hello young one. Welcome to Santa's house.\"";
mes "\"Have a look around and enjoy your visit, but please don't interrupt the busy helpers.\"";
mes "He smiles at you.";
goto L_Close;
L_Close:
close;
}
|
