/*
	Server Side:

	/db/import/instance_db.txt
	302,Bloody Branch Room,3600,300,temple,100,98

	/db/pre(re)/item_db.txt edit it to....
	12103,Bloody_Dead_Branch,Bloody Branch,2,10000,,200,,,,,0xFFFFFFFF,63,2,,,,,,{ .@map$ = getvariableofnpc(.map$, "bbroom"); if ( strcharinfo(3) != instance_mapname(.@map$,instance_id()) ) { dispbottom "You can only use Bloody Brach at Bloody Brach Room", 0xff0000; getitem 12103,1; end; }  monster("this",-1,-1,"--ja--",-1-MOBG_Bloody_Dead_Branch,1,""); },{},{}

*/

prontera,163,93,4	script	Bloody Branch Room::bbroom	571,{
	.@party_id = getcharid(1);
	getpartymember getcharid(1),0;
	copyarray .@name$[0], $@partymembername$[0], $@partymembercount;

	if (!.@party_id) {
		mes .NPC$;
		mes "Create or join a party.";
		close;
	}
	if (.Ins_back == true && getcharid(1) == jura_partyid) {
		mes .NPC$;
		mes "Instance Generated";
		mes "Please enter the instance.";
		next;
		switch(select("Enter "+.Ins_name$)) {
			callsub InsEnter;
		}
	}
OnMenu:
	mes .NPC$;
	mes "^ff0000Level Requirement: "+.Ins_level+"^000000";
	mes "Min Player: ^0000ff1^000000";
	mes "Re-Enter: "+((.Ins_back == true) ?"^00C000YES^000000":"^FF0000NO^000000");
	next;
	if (BaseLevel < .Ins_level) {
		mes .NPC$;
		mes "Check level requirements";
		close;
	}
	if (getcharid(0) == getpartyleader(.@party_id,2)) {
		mes .NPC$;
		mes "Party Name: ^0000ff"+getpartyname(.@party_id)+"^000000";
		mes "Party Member List:";
		for(.@i = 0; .@i < .@count; .@i++)
			mes (.@i + 1)+". ^ff0000"+.@name$[.@i]+"^000000";
		next;
		switch(select("Generate "+.Ins_name$)) {
			instance_create(.Ins_name$);
			callsub InsEnter;
		}
	}
	mes .NPC$;
	mes "Party Name: ^0000ff"+getpartyname(.@party_id)+"^000000";
	mes "Party Member List:";
	for(.@i = 0; .@i < .@count; .@i++)
		mes (.@i + 1)+". ^ff0000"+.@name$[.@i]+"^000000";
	next;
	switch(select("Enter "+.Ins_name$)) {
		callsub InsEnter;
	}
	end;

InsEnter:
	switch(instance_enter(.Ins_name$)) {
	case IE_OTHER:
		mes .NPC$;
		mes " - ^ff0000ERROR^000000 -";
		mes "select ^0000ffproperly^000000,";
		mes "^0000ffGenerate Instance^000000 first or ^0000ffRe-Party^000000.";
		mes "Only ^0000ffParty Leader^000000 can generate instance.";
		close;
	case IE_NOINSTANCE:
		mes .NPC$;
		mes " - ^ff0000NO INSTANCE^000000 -";
		mes "^0000ffGenerate Instance^000000 first or ^0000ffRe-Party^000000.";
		mes "Only ^0000ffParty Leader^000000 can generate instance.";
		close;
	case IE_NOMEMBER:
		mes .NPC$;
		mes "Create or join a party first.";
		close;
	case IE_OK:
		mapannounce strnpcinfo(4), strcharinfo(0)+" of the party, "+getpartyname(getcharid(1))+", is entering the instance, "+.Ins_name$+".",bc_map,"0x00ff99",FW_NORMAL,12;
		end;
	}
end;

OnInit:
	.NPC$ = "^800080[ BLOODY BRANCH ROOM ]^000000";
	.Ins_name$ = "Bloody Branch Room";
	.Ins_level = 100;
	.Ins_back = true;
	end;
}

temple,0,0,0	script	#hidden_ninja	111,{
OnInstanceInit:
	initnpctimer;
	end;
OnTimer15000:
	stopnpctimer;
	mapannounce instance_mapname(strnpcinfo(4),instance_id()), "Bloody Branch Room MVP Drops Card 0.10%", bc_map,"0xff0099";
	end;

OnInit:
	disablenpc strnpcinfo(0);
}


temple,92,106,4	script	Exit#temple	570,{
	mes "Do you want to exit the instance?";
	next;
	if(select("Yes:No")==2) close;
	warp "SavePoint",0,0;
	end;
}

temple	mapflag	droprate	6:10