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
|
030-2,89,23,0 script Verneri NPC334,{
callfunc "XmasStates";
if((@xmas_state >= $@xmas_helpers_start_state) && ($@xmas_time))
goto L_XmasMain;
goto L_OffSeason;
L_OffSeason:
mes "[Verneri]";
mes "\"Nothing like the getting past the holiday rush to make you dread next season.\"";
goto L_close;
L_XmasMain:
mes "[Verneri]";
mes "\"Hm? I'm currently having a break. It's really nice here at the fireplace, isn't it?\"";
next;
mes "\"Ah, I remember when I was a child we used to roast acorns at the fireplace. We dunked them into Iron Potion and then put them over the fire for a while. That gave a tasty icing.\"";
menu
"Let's roast some.", L_LetsRoast,
"Children's stuff...", L_close;
L_LetsRoast:
mes "[Verneri]";
mes "\"Well, if you get some Acorns and Iron Potions, we can do that.\"";
mes "\"With one Iron Potion we can ice about " + $@xmas_acorn_amount + " Acorns.\"";
next;
mes "[Verneri]";
mes "\"Do you have everything we need? Shall we start?\"";
menu
"Sure!", L_Roast,
"I need to get the ingredients.", L_close;
L_Roast:
if (countitem("Acorn") < $@xmas_acorn_amount || countitem("IronPotion") < $@xmas_iron_potion_amount)
goto L_NoItems;
getinventorylist;
if (@inventorylist_count > 100)
goto L_FullInv;
delitem "IronPotion", $@xmas_iron_potion_amount;
delitem "Acorn", $@xmas_acorn_amount;
mes "Verneri takes the Iron Potion and the Acorns from you. He pours the potion into some bowl and adds the Acorns.";
mes "Then he puts the bowl over the fire, stirring it every now and then. After a while it starts to smell really tasty.";
next;
mes "[Verneri]";
mes "\"Here we are! Let me take one of them, ok?\"";
mes "He carefully takes one of the roasted acorns and eats it.";
next;
mes "[Verneri]";
mes "\"Ouch, hot. But tasty! Some of them might be burnt, I'll throw those away.\"";
XMASTIME = XMASTIME | $@xmas_helper_bit_acorns;
@karma_bonus = $@xmas_karma_bonus;
callfunc "XmasNice";
getitem "RoastedAcorn", rand(($@xmas_acorn_amount / 2), $@xmas_acorn_amount);
menu
"Let's roast some more.", L_Roast,
"Thank you.", L_close;
L_FullInv:
mes "\"You need some space to put the roasted acorns.\"";
goto L_close;
L_NoItems:
mes "[Verneri]";
mes "\"You need to bring at least one Iron Potion and " + $@xmas_acorn_amount + " Acorns.\"";
goto L_close;
L_close:
close;
}
|
