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
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
function script Easter2010Loc_Check1 {
set @result, ~Easter_2010_EggState1 & (1 << @obj) & $Easter_2010_Egg_Loc_State1;
if (@result == 0) goto L_NotHere;
getinventorylist;
if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0)
goto L_TooMany;
if (rand(10)) set $Easter_2010_Egg_Loc_State1, $Easter_2010_Egg_Loc_State1 & ~(1 << @obj);
set Easter_2010_EggState1, Easter_2010_EggState1 | (1 << @obj);
mes "You pick up an egg.";
getitem E10_COLLECT_EGGS_ID, 1;
return;
L_NotHere:
mes "You can't find an egg here.";
set @result, 0;
return;
L_TooMany:
mes "You don't have room for this egg.";
set @result, 0;
return;
}
function script Easter2010Loc_Check2 {
set @result, ~Easter_2010_EggState2 & (1 << @obj) & $Easter_2010_Egg_Loc_State2;
if (@result == 0) goto L_NotHere;
getinventorylist;
if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0)
goto L_TooMany;
if (rand(10)) set $Easter_2010_Egg_Loc_State2, $Easter_2010_Egg_Loc_State2 & ~(1 << @obj);
set Easter_2010_EggState2, Easter_2010_EggState2 | (1 << @obj);
mes "You pick up an egg.";
getitem E10_COLLECT_EGGS_ID, 1;
return;
L_NotHere:
mes "You can't find an egg here.";
set @result, 0;
return;
L_TooMany:
mes "You don't have room for this egg.";
set @result, 0;
return;
}
function script Easter2010Loc_Check3 {
set @result, ~Easter_2010_EggState3 & (1 << @obj) & $Easter_2010_Egg_Loc_State3;
if (@result == 0) goto L_NotHere;
getinventorylist;
if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0)
goto L_TooMany;
if (rand(10)) set $Easter_2010_Egg_Loc_State3, $Easter_2010_Egg_Loc_State3 & ~(1 << @obj);
set Easter_2010_EggState3, Easter_2010_EggState3 | (1 << @obj);
mes "You pick up an egg.";
getitem E10_COLLECT_EGGS_ID, 1;
return;
L_NotHere:
mes "You can't find an egg here.";
set @result, 0;
return;
L_TooMany:
mes "You don't have room for this egg.";
set @result, 0;
return;
}
function script Easter2010Loc_Check4 {
set @result, ~Easter_2010_EggState4 & (1 << @obj) & $Easter_2010_Egg_Loc_State4;
if (@result == 0) goto L_NotHere;
getinventorylist;
if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0)
goto L_TooMany;
if (rand(10)) set $Easter_2010_Egg_Loc_State4, $Easter_2010_Egg_Loc_State4 & ~(1 << @obj);
set Easter_2010_EggState4, Easter_2010_EggState4 | (1 << @obj);
mes "You pick up an egg.";
getitem E10_COLLECT_EGGS_ID, 1;
return;
L_NotHere:
mes "You can't find an egg here.";
set @result, 0;
return;
L_TooMany:
mes "You don't have room for this egg.";
set @result, 0;
return;
}
function script Easter2010Loc_Check5 {
set @result, ~Easter_2010_EggState5 & (1 << @obj) & $Easter_2010_Egg_Loc_State5;
if (@result == 0) goto L_NotHere;
getinventorylist;
if (@inventorylist_count == 100 && countitem(E10_COLLECT_EGGS_ID) == 0)
goto L_TooMany;
if (rand(10)) set $Easter_2010_Egg_Loc_State5, $Easter_2010_Egg_Loc_State5 & ~(1 << @obj);
set Easter_2010_EggState5, Easter_2010_EggState5 | (1 << @obj);
mes "You pick up an egg.";
getitem E10_COLLECT_EGGS_ID, 1;
return;
L_NotHere:
mes "You can't find an egg here.";
set @result, 0;
return;
L_TooMany:
mes "You don't have room for this egg.";
set @result, 0;
return;
}
|