//===== eAthena Script ======================================= 
//= Quests NPCs located in Niflheim
//===== By: ================================================== 
//= eAthena Dev Team
//===== Current Version: ===================================== 
//= 1.0
//===== Compatible With: ===================================== 
//= eAthena 7.15 +
//===== Description: ========================================= 
//= Book of Devil and Piano Key quest
//===== Additional Comments: ================================= 
//= 1.0 Initial release, moved Book of Devil and Piano quest from npc/cities/niflheim.txt
//============================================================ 

//=============================================================
//Quest for Book of Devil
//=============================================================
niflheim,184,199,5	script	СŮ#02	793,{
	mes "[ɴ]";
	if(MISC_QUEST & 256){
		mes "ллЭ!";
		close;
	}
	if(@niflheimlost == 2){
		mes "ҵ˹?";
		mes "! ̫л!";
		mes "еСҸл.";
		getitem 642,1;//Items: Book of Devil,
		set MISC_QUEST,MISC_QUEST | 256;
		set @niflheimlost,0;
		close;
	}
	if(@niflheimlost == 1){
M_YES:
		set @niflheimlost,1;
		mes "ҵת! һμڳԭҰһԭҰ...";
		close;
	}
	mes "!԰һæ?";
	if(BaseJob==Job_Novice){
		mes "Ŷ... Ҳ·...";
		close;
	}
	next;
	menu "û!",-, "˵...",M_NO;

	mes "[ɴ]";
	mes "ҵѸһеʧİĵط.";
	next;
	mes "[ɴ]";
	mes "ͻȻҷһޣҰһĻ!";
	next;
	mes "[ɴ]";
	mes "Ҽӿܵؿܡ֮ͣʱҷİĳ..";
	next;
	mes "[ɴ]";
	mes "ûԸңﵽ! ԰ҵҵ?";
	next;
	menu "û!",M_YES, "ѸòҲĻ...",M_NO;
M_NO:
	close;
}

nif_fild01,213,268,5	script	Ск	797,{
	if(MISC_QUEST & 256){
L_DONE:
		set @niflheimlost,2;
		mes "[˹]";
		mes "ллЭ!";
		close;
	}
	if(@niflheimlost == 2) goto L_PART2;
	if(@niflheimlost == 1){
		mes "˭?";
		mes "...";
		mes "֪ɴ?";
		mes "ܽȥ?";
		next;
L_PART2:
		mes "[˹]";
		mes "ת̶ȥ?";
		mes "·е֪Ѿ·ˣҪ.";
		next;
		menu "û!",L_DONE, "߰!",-;
		close;	
	}
	mes "[˹]";
	mes "ɴ...?";
	close;
}

//=============================================================
//Piano Quest
//=============================================================
//-----------------ħŮ--------------//
niflheim,224,243,3	script	׸	795,{
	mes "[׸]";
	mes "ϲ Ź";
	mes "㿴...úó";
	next;
	mes "[׸]";
	mes "Ҫ";
	next;
	mes "-   -";
	if(nif_piano&1 || (MISC_QUEST & 32)) goto L_end;
	percentheal -60,0;
	next;
	mes "[׸]";
	mes "þûԵôóԵ...";
	mes "ʽʦȼϲ⣬";
	mes "ƷţŶʳʱ";
	mes "渽Ļ";
	mes "Ӧûܺó... ";
	next;
	mes "[׸]";
	mes "лǲǰ";
	mes "ڵϼ񵽵ģ";
	getitem 7184,1;//Items: Piano Key,
	set nif_piano, nif_piano|1;
	close;
L_end:
	percentheal -30,0;
 	close;
}

nif_in,105,81,3	script		794,{
	mes "[]";
	mes "ϵడ..";
	mes "֪Ӻʱĸ˿ʼ..";
	mes "ʲô֪ʫ";
	mes "";
	next;
	mes "[]";
	mes "^FF0000ɽʱ^000000";
	mes "^FF0000ɫƻָĵط^000000";
	mes "^FF0000Ưɲʱ^000000";
	mes "^FF0000ǱܿʿԿ^000000";
	next;
	mes "[]";
	if(nif_piano&2 || (MISC_QUEST & 32)){
		mes "ʲô... ϸĻ";
		mes "ַǳ£";
		mes "ȷʵǺУ";
		mes "ʲôܵʫ";
		close;
	}
	set @nif_random,rand(1,4);
	switch(@nif_random){
	case 1:
		set @str1$,"ɽʱ";
		set @str2$,"һУ";
		break;
	case 2:
		set @str1$,"ɫƻָĵط";
		set @str2$,"ڶУ";
		break;
	case 3:
		set @str1$,"Ưɲʱ";
		set @str2$,"У";
		break;
	case 4:
		set @str1$,"ǱܿʿԿ";
		set @str2$,"У";
		break;
	}
	mes "ôڴ˲һ! Ѹո";
	mes "ʫ" + @str2$ + "";
	mes "дһ!";
	next;
	input @inputstr1$;
	mes "[]";
	if(@inputstr1$ == @str1$){
		mes "...ע!";
		mes "ҿӣΪʫˣ";
		mes "ܻӭڣ";
		mes "Ľ";
		getitem 7184,1;//Items: Piano Key,
		set nif_piano, nif_piano|2;
		next;
		mes "[]";
		mes "ôϣʫˣ";
		mes "ҲһҪò";
		close;
	}
	mes "... רĻ";
	mes "һԵ!";
	mes "úõ֮";
	mes "ս!";
	close;
}

nif_in,31,20,3	script	ȿϣ	794,{
	mes "[ȿϣ]";
	mes "ĿǰǺܲ...";
	mes "ϱҵĵҲ";
	mes "ܲ~!";
	if(nif_piano&4 || (MISC_QUEST & 32)) close;
	next;
	mes "[ȿϣ]";
	mes "ι λ! ȥʱң";
	mes "";
	getitem 7184,1;//Items: Piano Key,
	set nif_piano, nif_piano|4;
	next;
	mes "[ȿϣ]";
	mes "Ϊʲô";
	mes "ô... ֹֹֹֹ";
	close;
}

niflheim,169,71,1	script	#1	111,1,1,{
	end;

OnTouch:
	if(MISC_QUEST & 32 || nif_piano&8) end;

	mes "- 㷢ڷĹ -";
	mes "- и -";
	mes "- ûһ -";
	mes "- ʲôƬ? -";
	mes "-  -";
	next;
	mes "- Ҫ? -";
	menu "ǵ",-,"",L_end;
	getitem 7184,1;//Items: Piano Key,
	set nif_piano, nif_piano|8;
L_end:
	close;
}

niflheim,208,103,1	script	#2	111,1,1,{
	end;

OnTouch:
	if(MISC_QUEST & 32 || nif_piano&32) end;
	if(nif_piano&16){
		mes "- ڸڳĵط -";
		mes "- ﻹж -";
		mes "-  -";
		mes "- ȻǸ -";
		mes "- Ƭ -";
		next;
		mes "- Ҫ? -";
		menu "ǵ",-,"",L_end;
		getitem 7184,1;//Items: Piano Key,
		set nif_piano, nif_piano|32;
	L_end:
		close;
	}
	mes "- 㷢ڷĹ -";
	mes "- и -";
	mes "- ûһ -";
	mes "- ʲôƬ? -";
	mes "-  -";
	next;
	mes "- Ҫ? -";
	menu "ǵ",-,"",L_end;
	getitem 7184,1;//Items: Piano Key,
	set nif_piano, nif_piano|16;
	close;
}

nif_in,115,181,1	script	#4	111,1,1,{
	end;

OnTouch:
	mes "- ڸĲ -";
	if((MISC_QUEST & 32)==0) mes "- with a few keys missing  -";
	if(MISC_QUEST & 32) mes "- with one key missing -";
	if(MISC_QUEST & 32 || countitem(7184) < 6) close;

	delitem 7184,countitem(7184);//Items: Piano Key,
	set MISC_QUEST,MISC_QUEST | 32;
	set nif_piano, 0;
	mes "- Ѽһһ -";
	mes "- ȥˣ -";
	mes "-  -";
	mes "- Ĳȱһ -";
	mes "-  -";
	close;
}


nif_in,118,151,0	script	#5	111,1,1,{
	end;

OnTouch:
	if((MISC_QUEST & 32)==0) end;
	mes "- ӳӰ -";
	mes "- պõ -";
	mes "- ĸټ -";
	mes "- һ -";
	next;
	soundeffect "complete.wav",0;
	mes "- űĸо -";
	mes "- ΧҰҲ -";
	mes "- ʼģ-";
	next;
	warp "nif_in",179,163;
	close;
}

nif_in,188,168,3	script	ħŮ	792,{
	mes "[ֿ]";
	mes "?... 㲻ǻ";
	mes "";
	mes "Ӧòװ...";
	mes "ʲôﲻǻŵ";
	mes "ĵط";
	next;
	mes "[ֿ]";
	mes "ҵ㴫";
	mes "ȥԺ";
	mes "Ҫ";
	close2;
	warp "umbala",138,208;
	end;
}
