summaryrefslogtreecommitdiff
path: root/npc/functions
diff options
context:
space:
mode:
authorChuck Miller <shadowmil@gmail.com>2010-07-08 19:34:06 -0400
committerChuck Miller <shadowmil@gmail.com>2010-07-08 20:22:22 -0400
commite45b62a09b9e3391d682bbf34f997d623d6004fe (patch)
tree017def936478299eba0eab38abe10471f702f43d /npc/functions
parentc94cc7043c255ac8b05494018eccffffe03ac9b7 (diff)
downloadserverdata-e45b62a09b9e3391d682bbf34f997d623d6004fe.tar.gz
serverdata-e45b62a09b9e3391d682bbf34f997d623d6004fe.tar.bz2
serverdata-e45b62a09b9e3391d682bbf34f997d623d6004fe.tar.xz
serverdata-e45b62a09b9e3391d682bbf34f997d623d6004fe.zip
Adds the evil obelisk function, which summons evil monsters for a price
Diffstat (limited to 'npc/functions')
-rw-r--r--npc/functions/evil_obelisk.txt70
1 files changed, 70 insertions, 0 deletions
diff --git a/npc/functions/evil_obelisk.txt b/npc/functions/evil_obelisk.txt
new file mode 100644
index 00000000..c544058a
--- /dev/null
+++ b/npc/functions/evil_obelisk.txt
@@ -0,0 +1,70 @@
+function script EvilObelisk {
+ mes "[Evil Obelisk]";
+ mes "(A mystical aura surrounds this stone. To seems to crave money.)";
+ next;
+
+ menu
+ "Pay it 200,000 gold", L_JACKO,
+ "Pay it 100,000 gold", L_GRAVEYARD1,
+ "Pay it 75,000 gold", L_GRAVEYARD2,
+ "Pay it 50,000 gold", L_SKULL,
+ "Pay it 25,000 gold", L_SNAKE,
+ "Don't pay it anything.", -;
+ close;
+ return;
+
+L_JACKO:
+ if (zeny < 200000) goto L_NotEnough;
+ set zeny, zeny - 200000;
+ set @mob_id, 1022;
+ set @mob_count, rand(2) + 1;
+ goto L_Summon;
+
+L_GRAVEYARD1:
+ if (zeny < 100000) goto L_NotEnough;
+ set @temp, rand(2);
+ if(@temp == 0) set @mob_id, 1036; // Zombie
+ if(@temp == 1) set @mob_id, 1045; // Fallen
+ set @mob_count, rand(2) + 1;
+ set zeny, zeny - 100000;
+ goto L_Summon;
+
+L_GRAVEYARD2:
+ if (zeny < 75000) goto L_NotEnough;
+ set @temp, rand(2);
+ if(@temp == 0) set @mob_id, 1044; // Lady Skelly
+ if(@temp == 1) set @mob_id, 1043; // Normal Skelly
+ set @mob_count, rand(2) + 1;
+ set zeny, zeny - 75000;
+ goto L_Summon;
+
+L_SKULL:
+ if (zeny < 50000) goto L_NotEnough;
+ set @temp, rand(2);
+ if(@temp == 0) set @mob_id, 1024; // Poison
+ if(@temp == 1) set @mob_id, 1023; // Fire
+ set @mob_count, rand(4) + 1;
+ set zeny, zeny - 50000;
+ goto L_Summon;
+
+L_SNAKE:
+ if (zeny < 25000) goto L_NotEnough;
+ set @temp, rand(4);
+ if(@temp == 0) set @mob_id, 1034; // Grass
+ if(@temp == 1) set @mob_id, 1026; // Mnt.
+ if(@temp == 2) set @mob_id, 1010; // Normal
+ if(@temp == 3) set @mob_id, 1021; // Cave
+ set @mob_count, rand(4) + 1;
+ set zeny, zeny - 25000;
+ goto L_Summon;
+
+L_Summon:
+ monster @map$, @x, @y, "Evil", @mob_id, @mob_count;
+ close;
+ return;
+
+L_NotEnough:
+ mes "You don't have that much money";
+ close;
+ return;
+}