From 1127771e46133a1d3051fcc7e41000f394120c30 Mon Sep 17 00:00:00 2001 From: euphyy Date: Sat, 16 Jun 2012 22:51:54 +0000 Subject: > Reorganization: * Cleaned up "Custom Scripts" configuration file (scripts_custom.conf) * Moved "Event King Items" scripts from events to quests (custom\quests\kings_items.txt) * Moved "p_track" from events to etc (custom\etc\p_track.txt) * Renamed "lvl99_quest" to "jewel_case" for easier identification (custom\quests\jewel_case.txt) * Deleted "2006_dogs_year" event script (pointless and incomplete) > Script changes: * Cleaned/standardized "Valentine Event Script" (events\valentinesday.txt) * Cleaned "Slotted Sunglasses Quest" (custom\quests\sunglasses.txt) * Optimized "Lord Kaho's Horns Quest" (custom\quests\kahohorn.txt) * Cleaned and optimized "Balmung & Lord Kaho's Horns Quest" (custom\quests\kaho_balmung.txt) git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16313 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/custom/quests/jewel_case.txt | 66 ++++++++++++++++ npc/custom/quests/kaho_balmung.txt | 99 ++++++++---------------- npc/custom/quests/kahohorn.txt | 119 +++++++++++------------------ npc/custom/quests/kings_items.txt | 79 +++++++++++++++++++ npc/custom/quests/lvl99_quest.txt | 66 ---------------- npc/custom/quests/sunglasses.txt | 151 ++++++++++++++----------------------- 6 files changed, 281 insertions(+), 299 deletions(-) create mode 100644 npc/custom/quests/jewel_case.txt create mode 100644 npc/custom/quests/kings_items.txt delete mode 100644 npc/custom/quests/lvl99_quest.txt (limited to 'npc/custom/quests') diff --git a/npc/custom/quests/jewel_case.txt b/npc/custom/quests/jewel_case.txt new file mode 100644 index 000000000..dfa52bdf6 --- /dev/null +++ b/npc/custom/quests/jewel_case.txt @@ -0,0 +1,66 @@ +//===== rAthena Script ======================================= +//= Jewel Case Quest +//===== By: ================================================== +//= Lupus +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= rAthena SVN +//===== Description: ========================================= +//= A quest for players at base level 99, +//= with Jewel Case as a reward. +//===== Additional Comments: ================================= +//= +//============================================================ + +lighthalzen,108,229,2 script La Fenn 766,{ + mes "[La Fenn]"; + if(BaseLevel<99) { + if(Q_99LVL) { + mes "You... You got younger!!! But you are defenitely YOU!"; + mes "I couldn't think you were able to meet my condition..."; + emotion e_hmm; + next; + mes "[La Fenn]"; + mes "Here is your prize. It's yours for good."; + set Q_99LVL,0; + getitem 12106,1; //Jewel Case + emotion e_grat; + } else { + mes callfunc("F_Hi"); + mes "..."; + emotion e_yawn; + next; + mes "[La Fenn]"; + mes "I've got a riddle for a strong man of 2nd Class and 99 Base Level."; + mes "*Yawn* If you meet some, please tell them about my riddle."; + } + close; + } + if(BaseLevel==99 && Upper==0) { + if(Q_99LVL) { + mes "Now go forth and get younger!"; + mes "If you solve my riddle, then I'll give you a magical Jewel Case with a rare accessory."; + } else { + mes callfunc("F_Hi")+" The Hero!"; + if(BaseExp<1000000) { + mes "Now you're strong."; + mes "But... not quite strong for my riddle."; + if(rand(2)) { + mes "Kill "+((1000000-BaseExp)/3765+1)+" more Seals and return."; + } else { + mes "Kill "+((1000000-BaseExp)/81+1)+" more Poporings and come back."; + } + } else { + mes "Now you're REALLY strong."; + mes "And if you get younger than now I'll give you my treasure."; + set Q_99LVL,1; + emotion e_no1; + } + } + close; + } + emotion e_hmm; + mes "..."; + close; +} diff --git a/npc/custom/quests/kaho_balmung.txt b/npc/custom/quests/kaho_balmung.txt index 11ef0442a..f3a82def4 100644 --- a/npc/custom/quests/kaho_balmung.txt +++ b/npc/custom/quests/kaho_balmung.txt @@ -3,84 +3,49 @@ //===== By: ================================================== //= MagicalTux //===== Current Version: ===================================== -//= 1.0 +//= 1.1 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= -//= +//= Custom quests for Balmung and Lord Kaho's Horns. +//= WARNING: The quests are very easy, so be careful! //===== Additional Comments: ================================= -//= Warning! Don't use this quest 8) +//= 1.1 Cleaned and optimized. [Euphy] //============================================================ prontera,158,356,4 script Royal Messenger 105,{ + + setarray .@Req1[0],1161,999,120,984,10,996,10,994,10,995,10,997,10; + setarray .@Req2[0],5013,2298,1,1001,10,996,10,994,10,995,10,997,10; + mes "[Royal Messenger]"; - mes "Welcome to prontera, I am the Royal Messenger in charge of the royal quest."; + mes "Welcome to Prontera."; + mes "I am the messenger in charge of the Royal Quests."; next; - menu "Listen",-,"No",Lend; - + if(select("Listen...:Walk away")==2) close; mes "[Royal Messenger]"; - mes "There are too quests please chose the one you must like."; + mes "There are two quests."; + mes "Choose the one you like."; next; - menu "Balmung",-,"Lord Kahos horns",Lkahos,"No",Lend; - - mes "[Royal Messenger]"; - mes "The Balmung quest consist of the next items:"; - mes "120 Steel"; - mes "10 Oridecon"; - mes "10 Rough Wind"; - mes "10 Flame Heart"; - mes "10 Mystic Frozen"; - mes "10 Great Nature"; - mes "1,000,000z"; + set .@i, select("Balmung:Lord Kaho's Horns:^777777Never mind.^000000"); + mes "[Royal Messenger]"; + if (.@i==3) { + mes "Have a nice day."; + close; } + mes "You will need the following items:"; + for(set .@j,1; .@j<13; set .@j,.@j+2) { + mes " ~ "+getd(".@Req"+.@i+"["+(.@j+1)+"]")+"x ^0055FF"+getitemname(getd(".@Req"+.@i+"["+.@j+"]"))+"^000000"; + if (!.@nr && countitem(getd(".@Req"+.@i+"["+.@j+"]")) < getd(".@Req"+.@i+"["+(.@j+1)+"]")) set .@nr,1; } + mes " ~ 1,000,000z"; next; - if(countitem(999)<120 || countitem(984)<10 || countitem(996)<10 || countitem(994)<10 - || countitem(995)<10 || countitem(997)<10 || Zeny<1000000) goto NoItems; - delitem 999,120; - delitem 984,10; - delitem 996,10; - delitem 994,10; - delitem 995,10; - delitem 997,10; - set Zeny,Zeny-1000000; - mes "[Royal Messenger]"; - mes "I see you already have all the items you need."; - mes "nice work."; - getitem 1161,1; - close; - -Lkahos: - mes "[Royal Messenger]"; - mes "The Lord Kahos horns quest consists of the next items:"; - mes "1 Green Feelers"; - mes "10 Star Dust"; - mes "10 Rough Wind"; - mes "10 Flame Heart"; - mes "10 Mystic Frozen"; - mes "10 Great Nature"; - mes "1,000,000z"; - next; - if(countitem(2298)<1 || countitem(1001)<10 || countitem(996)<10 || countitem(994)<10 - || countitem(995)<10 || countitem(997)<10 || Zeny<1000000) goto NoItems; - delitem 2298,1; - delitem 1001,10; - delitem 996,10; - delitem 994,10; - delitem 995,10; - delitem 997,10; - set Zeny,Zeny-1000000; - mes "[Royal Messenger]"; - mes "I see you already have all the items you need."; - mes "nice work."; - getitem 5013,1; - close; - -Lend: - mes "[Royal Messenger]"; - mes "Have a nice day."; - close; -NoItems: mes "[Royal Messenger]"; - mes "Sorry you don't have all the items or zeny I need."; - mes "Come back when you have them all"; + if (.@nr || Zeny < 1000000) { + mes "Come back when you meet all the requirements."; + close; } + for(set .@j,1; .@j<13; set .@j,.@j+2) + delitem getd(".@Req"+.@i+"["+.@j+"]"), getd(".@Req"+.@i+"["+(.@j+1)+"]"); + set Zeny, Zeny-1000000; + mes "I see you already have all the items you need. Here's your "+getitemname(getd(".@Req"+.@i+"[0]"))+", as promised."; + getitem getd(".@Req"+.@i+"[0]"),1; close; -} +} \ No newline at end of file diff --git a/npc/custom/quests/kahohorn.txt b/npc/custom/quests/kahohorn.txt index 7b3d7b50b..697047821 100644 --- a/npc/custom/quests/kahohorn.txt +++ b/npc/custom/quests/kahohorn.txt @@ -3,94 +3,67 @@ //===== By: ================================================== //= //===== Current Version: ===================================== -//= 1.0 +//= 1.1 //===== Compatible With: ===================================== //= rAthena SVN //===== Description: ========================================= -//= +//= Custom quest for Lord Kaho's Horns. //===== Additional Comments: ================================= -//= This quest is custom. Don't use it. +//= 1.1 Optimized, and fixed some requirements. [Euphy] //============================================================ geffen,115,107,5 script Lord Kaho's Servant 61,{ - mes "[Lord Kaho's Servant]"; + + setarray .@Items[0],7005, 968, 923, 734, 724,2268,7036,7020,5053,7018,741,742,743,750,751,752,753,754; + setarray .@Drops[0],1272,1087,1039,1260,1046,1115,1252,1147,1038,1059; + set .@n$, "[Lord Kaho's Servant]"; + + mes .@n$; mes "I worked myself to death trying to fulfill Lord Kaho's ridiculous expectations for a headgear!"; - mes "Now that I've finally found the formula for the perfect headgear, I'm willing to share my time and talents"; + mes "Now that I've finally found the formula for the perfect headgear, I'm willing to share my time and talents."; next; - mes "You need the following to get the Kaho horns!"; - mes "3 emperiums"; - mes "Oh yea... i also forgot to mention these X_X"; + mes .@n$; + mes "You need the following to get the Kaho horns:"; + mes "3x ^0055FFEmperium^000000"; next; - mes "1 Skull - From Dark Lord"; - mes "1 Heroic Emblem - From Orc Hero"; - mes "1 Evil Horn - From Baphomet"; - mes "1 Red Frame - From Doppelganger"; - mes "1 Smoking Pipe - From Eddga"; - mes "1 Fang of Garm - From Garm"; - mes "1 Mother's Nightmare - From Maya"; - mes "1 Sphynx Hat - from Osiris"; - mes "1 Diamond Ring - from Mistress"; + mes .@n$; + mes "Oh yeah..."; + mes "I also forgot to mention these..."; next; - mes "Were' not done yet sweety..."; - mes "Im a big fan of dolls, so you need to bring me these cuties"; - mes "1 Poring Doll - a Poring drop"; - mes "1 Chonchon Doll - a Chonchon Drop"; - mes "1 Baphomet Doll - a Baphomet drop"; - mes "1 Osiris Doll - an Osiris drop"; - mes "1 Rocker Doll - a Rocker drop"; - mes "1 Apez Fanitem Doll - a Yoyo drop"; - mes "1 Racoon Doll - a Smokie drop"; - mes "1 Spore Doll - a Spore drop"; + mes .@n$; + for(set .@i,0; .@i<10; set .@i,.@i+1) + mes "1x ^0055FF"+getitemname(.@Items[.@i])+"^000000 (from "+strmobinfo(1,.@Drops[.@i])+")"; next; - mes "Finally, i worked hard to make these horns for my master with all the mentioned items above..."; - mes "Please include 5 million zeny for my efforts."; + mes .@n$; + mes "We're not done yet, sweetie..."; + mes "I'm a big fan of dolls, so you need to bring me these cuties!"; + for(set .@i,10; .@i<18; set .@i,.@i+1) + mes "1x ^0055FF"+getitemname(.@Items[.@i])+"^000000"; next; - mes "[Lord Kaho's Servant]"; - mes ". . . . . ."; + mes .@n$; + mes "Finally, I've worked hard to make these horns for my master with all the items mentioned above..."; + mes "Please include ^0055FF5 million Zeny^000000 for my efforts."; + next; + mes .@n$; mes "Are you ready for me to make this special item?"; next; - menu "Sure am!",-,"These requirements are unfathomable!",LUnfathomable; - - mes "[Lord Kaho's Servant]"; - if(countitem(754) < 1 || countitem(753) < 1 || countitem(752) < 1 || countitem(751) < 1 || countitem(750) < 1 - || countitem(743) < 1 || countitem(742) < 1 || countitem(741) < 1 || countitem(2613) < 1 - || countitem(5053) < 1 || countitem(7020) < 1 || countitem(7036) < 1 || countitem(2268) < 1 - || countitem(734) < 1 || countitem(923) < 1 || countitem(968) < 1 || countitem(7005) < 1 - || countitem(714) < 3 || Zeny < 5000000) goto LNotEnough; - delitem 754,1; - delitem 753,1; - delitem 752,1; - delitem 751,1; - delitem 750,1; - delitem 743,1; - delitem 742,1; - delitem 741,1; - delitem 2613,1; - delitem 5053,1; - delitem 7020,1; - delitem 7036,1; - delitem 2268,1; - delitem 734,1; - delitem 923,1; - delitem 968,1; - delitem 7005,1; + if(select("Sure am!:These requirements are unfathomable!")==2) { + mes .@n$; + mes "What I had to go through was more unfathomable..."; + mes "If you succeed in getting these items, you will have incredible strength!"; + close; } + mes .@n$; + for(set .@i,0; .@i<18; set .@i,.@i+1) + if (!countitem(.@Items[.@i])) { set .@nr,1; break; } + if (.@nr || countitem(714) < 3 || Zeny < 5000000) { + mes "I can't afford to make this if you don't bring all materials needed. Please understand this is to benefit heroes such as yourself!"; + close; } + for(set .@i,0; .@i<18; set .@i,.@i+1) + delitem .@Items[.@i],1; delitem 714,3; - set Zeny,Zeny-5000000; - mes "Wow! You are brave indeed!"; + set Zeny, Zeny-5000000; + mes "Wow! You are brave indeed!"; getitem 5013,1; - mes ". . . . ."; - mes "Enjoy being God of Rune Midgard!"; - close; - -LNotEnough: - mes ". . . . ."; - mes ". . .I'm sorry .. You don't have enough money and items .."; - mes "I can't afford to make this if you don't bring all materials needed. Please understand this is to benefit heroes such as yourself!"; - close; - -LUnfathomable: - mes ". . . . ."; - mes "What I had to go through was more unfathomable.."; - mes "If you succeed in getting these items, you will have incredible strength!"; + mes "Enjoy being God of Rune-Midgard!"; close; -} +} \ No newline at end of file diff --git a/npc/custom/quests/kings_items.txt b/npc/custom/quests/kings_items.txt new file mode 100644 index 000000000..8140827c1 --- /dev/null +++ b/npc/custom/quests/kings_items.txt @@ -0,0 +1,79 @@ +//===== rAthena Script ======================================= +//= Event King Items +//===== By: ================================================== +//= $ephiroth +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= rAthena SVN +//===== Description: ========================================= +//= Grand Circlet Quest combined with Excalibur Quest. +//===== Additional Comments: ================================= +//= 2006/09/27: 1.0 Release and fully working. [$ephiroth] +//= 1.1 Optimized. [Euphy] +//============================================================ + +prt_castle,80,170,4 script King of Prontera 108,{ + mes "[King of Prontera]"; + mes "Hello, can you help me?"; + next; + if(select("Sure, what can I do?:Sorry, I'm busy.")==2) { + mes "[King of Prontera]"; + mes "Ok, that's fine, I'm sure someone else will help."; + close; } + mes "[King of Prontera]"; + mes "Thank you. Well, my daughter next to me is a little rowdy..."; + mes "If you get her these items I'm sure she'll calm down."; + mes "I'll give you my crown or my sword as a reward."; + next; + setarray .@Items1[0],5007,742,30,741,50,753,20,732,1,710,20,629,20; + setarray .@Items2[0],1137,2254,1,2282,1,714,1; + switch(select("What do you need?:I have the items!:Forget it.")) { + case 1: + for(set .@i,1; .@i<3; set .@i,.@i+1) { + mes "[King of Prontera]"; + mes "If you could get me:"; + for(set .@j,1; .@j