summaryrefslogtreecommitdiff
path: root/npc/easter/2010/egg_func.txt
blob: 9dbf669ea571f8e12cd59470d5670396657f0488 (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
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;
}