diff options
Diffstat (limited to 'npc/custom/quests/kaho_balmung.txt')
-rw-r--r-- | npc/custom/quests/kaho_balmung.txt | 51 |
1 files changed, 51 insertions, 0 deletions
diff --git a/npc/custom/quests/kaho_balmung.txt b/npc/custom/quests/kaho_balmung.txt new file mode 100644 index 000000000..f3a82def4 --- /dev/null +++ b/npc/custom/quests/kaho_balmung.txt @@ -0,0 +1,51 @@ +//===== rAthena Script ======================================= +//= Balmung & Lord Kaho's Horns Quest +//===== By: ================================================== +//= MagicalTux +//===== Current Version: ===================================== +//= 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: ================================= +//= 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."; + mes "I am the messenger in charge of the Royal Quests."; + next; + if(select("Listen...:Walk away")==2) close; + mes "[Royal Messenger]"; + mes "There are two quests."; + mes "Choose the one you like."; + next; + 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; + mes "[Royal Messenger]"; + 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 |