diff options
Diffstat (limited to 'npc/quests/custom/berzebub.txt')
-rw-r--r-- | npc/quests/custom/berzebub.txt | 84 |
1 files changed, 0 insertions, 84 deletions
diff --git a/npc/quests/custom/berzebub.txt b/npc/quests/custom/berzebub.txt deleted file mode 100644 index b84443a99..000000000 --- a/npc/quests/custom/berzebub.txt +++ /dev/null @@ -1,84 +0,0 @@ -//===== eAthena Script ======================================= -//= Berzebub Card Quest Script -//===== By: ================================================== -//= jabs <jabbedxorz@hotmail.com> -//===== Current Version: ===================================== -//= 1.0 -//===== Compatible With: ===================================== -//= Any eAthena Version; RO Episode XX -//===== Description: ========================================= -//= Quest to get the Berzebub Card -//===== Additional Comments: ================================= -//= MINE -//============================================================ -prontera.gat,165,178,8 script Old Woman 103,{ - if(BerzQuest == 1) goto alreadyDone; - mes "[Old Woman]"; - mes "Greeting lad. I found a really nift item while I was picking mushrooms near Glast Heim"; - next; - menu "Keep talking", goOn, "Leave", leave; - - leave: - mes "[Old Woman]"; - mes "Such a great item I have right here..."; - close; - - goOn: - mes "[Old Woman]"; - mes "I have never seen an item like this before. I am told it can be placed inside am accessory that has a slot avaiable in it."; - next; - mes "[Old Woman]"; - mes "If you're interested in this item, tell me and I'll tell you what you need for me to make you one of your own. I can only give one of these to each player, so once you finish this quest once, you may not do it again."; - next; - menu "Tell me more about it", getInfo, "Nah, I don't care about it", leave; - - getInfo: - mes "[Old Woman]"; - mes "I believe the item is called a Berzebub Card. It can make any spell caster cast spells really fast!"; - next; - mes "[Old Woman]"; - mes "I need all of the following items:"; - mes "^0080FF10^000000 Emperium"; - mes "^0080FF100^000000 Witched Starsand"; - mes "^0080FF200^000000 Needle of Alarm"; - mes "^0080FF10^000000 Worn Out Scrolls"; - mes "^0080FF1^000000 Bible"; - mes "^0080FF1^000000 Wand of the Occult"; - mes "^0080FF20^000000 Opal"; - next; - menu "I have all that!", checkItems, "I'll get those ASAP", leave; - - checkItems: - mes "[Old Woman]"; - mes "Anyone can say they have the items, but do they really have them? Let's take a look here..."; - next; - if(countitem(714) < 10) goto noItems; - if(countitem(1061) < 100) goto noItems; - if(countitem(1095) < 200) goto noItems; - if(countitem(618) < 10) goto noItems; - if(countitem(1551) < 1) goto noItems; - if(countitem(1614) < 1) goto noItems; - if(countitem(727) < 20) goto noItems; - delitem 714, 10; - delitem 1061, 100; - delitem 1095, 200; - delitem 618, 10; - delitem 1551, 1; - delitem 1614, 1; - delitem 727, 20; - getitem 4145, 1; - set BerzQuest, 1; - mes "[Old Woman]"; - mes "Well congratulations! You have all the items. Here is your Berzebub Card, just as I promised."; - close; - - noItems: - mes "[Old Woman]"; - mes "I knew you were lying! Get out of here and get those items you sorry excuse for a rock star."; - close; - - alreadyDone: - mes "[Old Woman]"; - mes "Hey I remember you! I already told you that you may only complete this quest once."; - close; -} |