diff options
author | amber <amber@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2004-11-14 16:18:26 +0000 |
---|---|---|
committer | amber <amber@54d463be-8e91-2dee-dedb-b68131a5f0ec> | 2004-11-14 16:18:26 +0000 |
commit | 581475bc6416790765c498aa3d611f6868ffb64a (patch) | |
tree | 347ebf88eaa76e50488f23989d67cad834f3c9b1 /npc/quests/custom/berzebub.txt | |
parent | 600362764ce348c5c9de96eababff2e08bb90d4a (diff) | |
download | hercules-581475bc6416790765c498aa3d611f6868ffb64a.tar.gz hercules-581475bc6416790765c498aa3d611f6868ffb64a.tar.bz2 hercules-581475bc6416790765c498aa3d611f6868ffb64a.tar.xz hercules-581475bc6416790765c498aa3d611f6868ffb64a.zip |
Fixed some file types
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/athena@172 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/quests/custom/berzebub.txt')
-rw-r--r-- | npc/quests/custom/berzebub.txt | 168 |
1 files changed, 84 insertions, 84 deletions
diff --git a/npc/quests/custom/berzebub.txt b/npc/quests/custom/berzebub.txt index 200f0df87..b84443a99 100644 --- a/npc/quests/custom/berzebub.txt +++ b/npc/quests/custom/berzebub.txt @@ -1,84 +1,84 @@ -//===== 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;
-}
+//===== 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; +} |