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
|
// The Easter Bunny
007-1.gat,32,30, 0 script Easter Bunny 173,{
callfunc "ClearVariables";
if (QUEST_Easter09 == 1) goto L_CheckEggs;
if (QUEST_Easter09 == 2) goto L_Done;
mes "[Easter Bunny]";
mes "Oh dear! Oh dear! I shall be too late!";
next;
menu
"What do you mean?", -,
"Goodbye then.", close;
mes "[Easter Bunny]";
mes "It's already Easter and I haven't hid a single Easter egg yet. And the worst part is, they already started searching for the eggs. What am I going to do? I seriously need a miracle. I mean, there are so many people searching and I haven't even begun yet. What am I going to do?";
next;
menu
"Maybe I can help.", -,
"I'll leave you to it then.", close;
mes "[Easter Bunny]";
mes "It's hopeless, you can't help me, it's to late!";
next;
menu
"I'm sure they haven't searched everywhere. What about that stone over there?", -,
"You're probably right.", close;
mes "[Easter Bunny]";
mes "Maybe you're right. Here, go hide these 10 Easter eggs for me.";
getitem "EasterEgg", 10;
set QUEST_Easter09, 1;
close;
L_CheckEggs:
set @count, 0;
set @temp, QUEST_Easter09_slots;
set @i, 0;
L_CheckEggs_Loop:
if (@temp & 1) set @count, @count + 1;
set @i, @i + 1;
if (@i == 31) goto L_CheckEggs_Continue;
set @temp, @temp >> 1;
goto L_CheckEggs_Loop;
L_CheckEggs_Continue:
if (@count > 10) goto L_ManyEggs;
if (@count == 10) goto L_EnoughEggs;
mes "[Easter Bunny]";
mes "Please place " + (10 - @count) + " more eggs!";
set @temp, 10 - @count - countitem("EasterEgg");
if (@temp > 0) goto L_GiveMoreEggs;
close;
L_GiveMoreEggs:
mes "[Easter Bunny]";
mes "What happened to " + @temp + " of your eggs?";
next;
mes "[Easter Bunny]";
mes "Never mind that. Take these and get them placed!";
getitem "EasterEgg", @temp;
close;
L_ManyEggs:
mes "[Easter Bunny]";
mes "How did you manage to place more eggs than I gave you?";
next;
L_EnoughEggs:
mes "[Easter Bunny]";
mes "Thanks! I'm saved. Now I don't need to be scared anymore. And I just came with the great plan to hide myself under a paper bag. Oh well, maybe you can use it.";
getitem "PaperBagHelm", 1;
set QUEST_Easter09, 2;
close;
L_Done:
mes "[Easter Bunny]";
mes "Thank you for placing those eggs for me!";
close;
}
|
