summaryrefslogtreecommitdiff
path: root/npc/easter/2010/egg_func.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/easter/2010/egg_func.txt')
-rw-r--r--npc/easter/2010/egg_func.txt114
1 files changed, 114 insertions, 0 deletions
diff --git a/npc/easter/2010/egg_func.txt b/npc/easter/2010/egg_func.txt
new file mode 100644
index 00000000..9dbf669e
--- /dev/null
+++ b/npc/easter/2010/egg_func.txt
@@ -0,0 +1,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;
+}