diff options
Diffstat (limited to 'npc/custom/quests/kahohorn.txt')
| -rw-r--r-- | npc/custom/quests/kahohorn.txt | 69 |
1 files changed, 69 insertions, 0 deletions
diff --git a/npc/custom/quests/kahohorn.txt b/npc/custom/quests/kahohorn.txt new file mode 100644 index 000000000..697047821 --- /dev/null +++ b/npc/custom/quests/kahohorn.txt @@ -0,0 +1,69 @@ +//===== rAthena Script ======================================= +//= Lord Kaho's Horns Quest +//===== By: ================================================== +//= +//===== Current Version: ===================================== +//= 1.1 +//===== Compatible With: ===================================== +//= rAthena SVN +//===== Description: ========================================= +//= Custom quest for Lord Kaho's Horns. +//===== Additional Comments: ================================= +//= 1.1 Optimized, and fixed some requirements. [Euphy] +//============================================================ + +geffen,115,107,5 script Lord Kaho's Servant 61,{ + + 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."; + next; + mes .@n$; + mes "You need the following to get the Kaho horns:"; + mes "3x ^0055FFEmperium^000000"; + next; + mes .@n$; + mes "Oh yeah..."; + mes "I also forgot to mention these..."; + next; + 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 .@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 .@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; + 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!"; + getitem 5013,1; + mes "Enjoy being God of Rune-Midgard!"; + close; +}
\ No newline at end of file |