* Added "eA Job System" documentation for third classes (doc\ea_job_system.txt)

* Fixed Eden: Romeo#02 not setting para_suv01 upon quest completion (bugreport:5949)
* Cleaned and edited "Item Signer" script for general use (custom\item_signer.txt)
* Merged and cleaned "Poring Track" custom script, then moved and renamed (custom\events\p_track.txt)
* Optimized "Valhallen Quests" script (custom\quests\valhallen.txt)
* Optimized "Event King Items" script (custom\events\kings_items.txt)
* Deleted "Market Place" script, not sure why this existed... (custom\etc\market.txt)

git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@16239 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 49 insertions, 178 deletions

diff --git a/npc/custom/quests/valhallen.txt b/npc/custom/quests/valhallen.txt
index e976640cc..19480b105 100644
--- a/npc/custom/quests/valhallen.txt
+++ b/npc/custom/quests/valhallen.txt
@@ -1,197 +1,68 @@
 //===== rAthena Script ======================================= 
-//= Valhallen items Quests NPC
+//= Valhallen Items Quests NPC
 //===== By: ================================================== 
 //= Avaji
 //===== Current Version: ===================================== 
-//= 1.0
+//= 1.1
 //===== Compatible With: ===================================== 
 //= rAthena SVN
 //===== Description: ========================================= 
-//= All-in-one: Mjollnir,Sleipnir,Brisingammen,Gleipnir,Megingjard
-//===== Additional Comments: ================================= 
+//= All-in-one: Mjolnir,Sleipnir,Brisingamen,Gleipnir,Megingjard
 //= Custom quest, ingredients based on official RO FAQ
+//===== Additional Comments: ================================= 
+//= 1.1 Optimized. [Euphy]
 //============================================================ 
 
 prontera,147,171,5	script	Lenneth	811,{
 	mes "[Lenneth]";
 	mes "I come from Valhalla to aid you.";
-	mes "I can transmute for you many of the Valhallen items.";
-	mes "Although they require many rare elements to make.";
-	next;
-	mes "[Lenneth]";
-	mes "What would you like?";
-	next;
-	menu "Mjollnir",-,"Sleipnir",L_SLE,"Brisingammen",L_BRI,"Gleipnir",L_GLE,"Megingjard",L_MEG;
-
-	mes "[Lenneth]";
-	mes "^3355FFMjollnir^000000 is the mighty Hammer of Thor.";
-	mes "The items I need to transmute 2 ^3355FFSpanners^000000 into ^3355FFMjollnir^000000 are as follows:";
-	mes "20 ^3355FFOridecon^000000 5 ^3355FFElunium^000000 and 40 ^3355FFGold^000000";
-	mes "I also need the following essences:";
-	mes "2 ^3355FFThor's Guntlet^000000";
-	mes "4 ^3355FFIron Maiden^000000";
-	mes "5 ^3355FFWrath of Valkyrie^000000";
-	mes "5 ^3355FFBreath of Soul^000000";
-	mes "5 ^3355FFOmen of tempest^000000";
-	next;
-	mes "[Lenneth]";
-	mes "Do you desire ^3355FFMjollnir^000000?";
-	next;
-	menu "Yes",-,"No",L_OUT;
-
-	if(countitem(984) < 20 || countitem(985) < 5 || countitem(969) < 40 || countitem(1531) < 2 || countitem(7089) < 5
-		|| countitem(7074) < 2 || countitem(7075) < 4 || countitem(7078) < 5 || countitem(7087) < 5) goto L_NOTENOUGH;
-
-	delitem 984,20;
-	delitem 985,5;
-	delitem 969,40;
-	delitem 1531,2;
-	delitem 7074,2;
-	delitem 7075,4;
-	delitem 7078,5;
-	delitem 7087,5;
-	delitem 7089,5;
-
-	getitem 1530,1;
-
-	mes "[Lenneth]";
-	mes "Here is your ^3355FFMjollnir^000000, may it serve you well.";
-	close;
-L_SLE:
-
-	mes "[Lenneth]";
-	mes "^3355FFSleipnir^000000 are boots made after Odin's War Horse.";
-	mes "To be able to transmute 2 ^3355FFBoots^000000 into ^3355FFSleipnir^000000 I will need:";
-	mes "1 ^3355FFOridecon^000000 10 ^3355FFElunium^000000 and 20 ^3355FFGold^000000";
-	mes "I also need the following essences:";
-	mes "3 ^3355FFWheel of the Unknown^000000";
-	mes "5 ^3355FFFeather of Angel^000000";
-	mes "3 ^3355FFSprirt of Fish^000000";
-	mes "3 ^3355FFEmblem of the Sun God^000000";
+	mes "I can transmute for you many of the Valhallen items,";
+	mes "although they require many rare elements to make.";
 	next;
-	mes "[Lenneth]";
-	mes "Do you desire ^3355FFSleipnir^000000?";
+	switch(select("Mjolnir:Sleipnir:Brisingamen:Gleipnir:Megingjard")) {
+		case 1:
+			mes "[Lenneth]";
+			mes "^3355FFMjolnir^000000 is the mighty Hammer of Thor.";
+			setarray .@Items[0],1530,1531,2,984,20,985,5,969,40,7074,2,7075,4,7078,5,7087,5,7089,5;
+			break;
+		case 2:
+			mes "[Lenneth]";
+			mes "^3355FFSleipnir^000000 are boots made after Odin's War Horse.";
+			setarray .@Items[0],2410,2406,2,984,1,969,20,985,10,7076,3,7079,5,7083,3,7086,3;
+			break;
+		case 3:
+			mes "[Lenneth]";
+			mes "^3355FFBrisingammen^000000 is the magical Necklace of Freyja, goddess of Beauty.";
+			setarray .@Items[0],2630,2603,1,726,2,722,3,727,10,723,5,969,20,7073,4,7077,4,7088,3,7090,3,7092,3;
+			break;
+		case 4:
+			mes "[Lenneth]";
+			mes "The ^3355FFGleipnir^000000 is a light yet strong rope required to make ^3355FFMegingjard^000000";
+			setarray .@Items[0],7058,7080,4,7081,5,7082,4,7084,3,7085,3;
+			break;
+		case 5:
+			mes "[Lenneth]";
+			mes "The ^3355FFMegingjard^000000 is the powerful Belt of Thor.";
+			setarray .@Items[0],2629,7058,1,2627,1,969,10,726,10,984,5;
+			break; }
+	mes "^FF0000The items I need are as follows:^000000";
+	for(set .@i,1; .@i<getarraysize(.@Items[0]); set .@i,.@i+2) {
+		mes " ~ "+.@Items[.@i+1]+"x ^3355FF"+getitemname(.@Items[.@i])+"^000000";
+		if (countitem(.@Items[.@i]) < .@Items[.@i+1]) set .@nr,1; }
+	if (.@nr) close;
 	next;
-	menu "Yes",-,"No",L_OUT;
-
-	if(countitem(969) < 20 || countitem(985) < 10 || countitem(984) < 1 || countitem(2406) < 2 || countitem(7076) < 3
-		|| countitem(7079) < 5 || countitem(7083) < 3 || countitem(7086) < 3) goto L_NOTENOUGH;
-
-	delitem 969,20;
-	delitem 985,10;
-	delitem 984,1;
-	delitem 2406,2;
-	delitem 7076,3;
-	delitem 7079,5;
-	delitem 7083,3;
-	delitem 7086,3;
-
-	getitem 2410,1;
-
 	mes "[Lenneth]";
-	mes "Here is your ^3355FFSleipnir^000000, may they help you.";
-	close;
-L_BRI:
-
-	mes "[Lenneth]";
-	mes "^3355FFBrisingammen^000000 is the magical Necklace of Freyja, goddess of Beauty.";
-	mes "The items I need to transmute a ^3355FFNecklace^000000 into ^3355FFBrisingammen^000000 are as follows:";
-	mes "2 ^3355FFSapphire^000000 3 ^3355FFPearl^000000 10 ^3355FFOpal^000000";
-	mes "5 ^3355FFRuby^000000 and 20 ^3355FFGold^000000";
-	mes "I also need the following essences:";
-	mes "4 ^3355FFFreya's Jewel^000000";
-	mes "4 ^3355FFSilver Ornament^000000";
-	mes "3 ^3355FFSnow Crystal^000000";
-	mes "3 ^3355FFQuiet Wave^000000";
-	mes "3 ^3355FFDrifting Air^000000";
+	mes "Do you desire ^3355FF"+getitemname(.@Items[0])+"^000000?";
 	next;
-	mes "[Lenneth]";
-	mes "Do you desire ^3355FFBrisingammen^000000?";
-	next;
-	menu "Yes",-,"No",L_OUT;
-
-	if(countitem(969) < 20 || countitem(723) < 5 || countitem(727) < 10 || countitem(722) < 3 || countitem(726) < 2
-		|| countitem(7090) < 3 || countitem(7088) < 3 || countitem(7077) < 4 || countitem(7073) < 4 || countitem(2603) < 1
-		|| countitem(7092) < 3) goto L_NOTENOUGH;
-
-	delitem 726,2;
-	delitem 722,3;
-	delitem 727,10;
-	delitem 723,5;
-	delitem 969,20;
-	delitem 2603,1;
-	delitem 7073,4;
-	delitem 7077,4;
-	delitem 7088,3;
-	delitem 7090,3;
-	delitem 7092,3;
-
-	getitem 2630,1;
-
-	mes "[Lenneth]";
-	mes "Here is ^3355FFBrisingammen^000000, may it serve you well.";
-	close;
-L_GLE:
-
-	mes "[Lenneth]";
-	mes "The ^3355FFGleipnir^000000 is a light yet strong rope required to make ^3355FFMegingjard^000000";
-	mes "I will need the following essences to transmute ^3355FFGleipnir^000000:";
-	mes "4 ^3355FFTread of Cat^000000";
-	mes "5 ^3355FFWoman's Moustache^000000";
-	mes "4 ^3355FFStone Fragment^000000";
-	mes "3 ^3355FFSaliva of Bird^000000";
-	mes "3 ^3355FFSinew of Bear^000000";
-	next;
-	mes "[Lenneth]";
-	mes "Do you desire ^3355FFGleipnir^000000?";
-	next;
-	menu "Yes",-,"No",L_OUT;
-
-	if(countitem(7085) < 3 || countitem(7084) < 3 || countitem(7082) < 4 || countitem(7081) < 5 || countitem(7080) < 4) goto L_NOTENOUGH;
-
-	delitem 7080,4;
-	delitem 7081,5;
-	delitem 7082,4;
-	delitem 7084,3;
-	delitem 7085,3;
-
-	getitem 7058,1;
-
-	mes "[Lenneth]";
-	mes "Here is your ^3355FFGleipnir^000000.";
-	close;
-L_MEG:
-
-	mes "[Lenneth]";
-	mes "The ^3355FFMegingjard^000000 is the powerful Belt of Thor.";
-	mes "To transmute a ^3355FFBelt^000000 into ^3355FFMegingjard^000000 I will need the following:";
-	mes "10 ^3355FFGold^000000 10 ^3355FFSapphire^000000";
-	mes "5 ^3355FFOridecon^000000 and 1 ^3355FFGleipnir^000000";
-	next;
-	mes "[Lenneth]";
-	mes "Do you desire ^3355FFMegingjard^000000?";
-	next;
-	menu "Yes",-,"No",L_OUT;
-
-	if(countitem(2627) < 1 || countitem(984) < 5 || countitem(726) < 10 || countitem(969) < 10 || countitem(7058) < 1) goto L_NOTENOUGH;
-
-	delitem 7058,1;
-	delitem 969,10;
-	delitem 726,10;
-	delitem 984,5;
-	delitem 2627,1;
-
-	getitem 2629,1;
-
-	mes "[Lenneth]";
-	mes "Here is ^3355FFMegingjard^000000, may it serve you well.";
-	close;
-L_NOTENOUGH:
-	mes "[Lenneth]";
-	mes "You are lacking a few items, please return when you have them.";
-	close;
-L_OUT:
-	mes "[Lenneth]";
-	mes "Please return when you change your mind.";
+	if(select("Yes:No")==2) {
+		mes "[Lenneth]";
+		mes "Please return if you change your mind.";
+		close; }
+	mes "[Lenneth]";
+	mes "Here is your ^3355FF"+getitemname(.@Items[0])+"^000000.";
+	mes "May it serve you well.";
+	for(set .@i,1; .@i<getarraysize(.@Items); set .@i,.@i+2)
+		delitem .@Items[.@i], .@Items[.@i+1];
+	getitem .@Items[0],1;
 	close;
 }