/*	Cakering Instance
	Created by: Aeromesi
	Variables to control: Will explain later
	Version 0.9 (Incomplete, 95% Finished, tons of things to do...)
	Additional Comments: Will explain later
*/
prontera,155,150,4	script	Cakering Instance#a	89,{
	.@md_name$ = "Cakering Instance";
	.@instance = instance_create( .@md_name$, getcharid( 3 ), IOT_CHAR);
	if( .@instance < 0 ) { 
		dispbottom "Instance Failed.";
		end;
	}

	dispbottom "^0000ff" + .@md_name$ + "^000000- Attempting to create Cakering Instance.";
	if( instance_attachmap("1@cake",.@instance) == "" ) {
//	if( !instance_attachmap( "yuno_fild02", .@instance, 1, "1@cake" ) ) {
		instance_destroy( .@instance );
		dispbottom "Failed to instance yuno_fild02/Instance Name: 1@cake";
		end;
	}
	if( instance_attachmap("2@cake",.@instance) == "" ) {
//	if( !instance_attachmap( "kh_vila", .@instance, 1, "2@cake" ) ) {
		instance_destroy( .@instance );
		dispbottom "Failed to attach kh_vila/Instance Name: 2@cake";
		end;
	}

	dispbottom "^0000ff" + .@md_name$ + " attempt successful on Instance attach!";
	instance_set_timeout( 3600, 300, .@instance );
	instance_init( .@instance );
//	donpcevent instance_npcname("SpwnMonster#CK", instance_id())+"::OnInstanceInit";			
	warp has_instance("1@cake"),92,189;
}t
/*function	script	OnCakeStart	{
if( getarg(0,-1) > 0 ) {
 warp instance_mapname("1@cake",getarg(0)),92,189;
}
}*/
1@cake,1,1,1	script	SpwnMonster#CK	-1,{

OnInstanceInit:
	disablenpc instance_npcname("CK_1stFloor");
	disablenpc instance_npcname("CK_2ndFloor");
	disablenpc instance_npcname("CK_3rdFloor");
	disablenpc instance_npcname("CK_4thFloor");
	disablenpc instance_npcname("CK_5thFloor");
	disablenpc instance_npcname("CK_end");
	'CT_MobCount = 16;        // Comment
	'CT_Restant = 'CT_MobCount; // Comment
	'CT_Count = 0;			// Kill count 1
	'CT_Count2 = 0;	 // Comment // Kill count 2
	end;
	
OnEvent1:

instance_announce -1,"Monsters!!!!",bc_map;
areamonster instance_mapname("1@cake"),95,200,110,215,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 90000;
areamonster instance_mapname("1@cake"),96,201,111,216,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 30000;
areamonster instance_mapname("1@cake"),97,202,112,216,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 10000;
areamonster instance_mapname("1@cake"),97,202,112,217,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";
end;
OnEvent2:

instance_announce -1,"Monsters!!!!",bc_map;
areamonster instance_mapname("2@cake"),125,60,145,50,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 90000;
areamonster instance_mapname("2@cake"),120,45,145,65,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 30000;
areamonster instance_mapname("2@cake"),125,70,125,50,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";
end;
OnEvent3:

instance_announce -1,"Monsters!!!!",bc_map;
areamonster instance_mapname("2@cake"),18,60,40,48,"Poring",1515,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 90000;
areamonster instance_mapname("2@cake"),20,45,40,60,"Poring",1686,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 30000;
areamonster instance_mapname("1@cake"),97,202,112,216,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 10000;
areamonster instance_mapname("1@cake"),97,25,54,115,"Poring",1062,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";
end;
OnEvent4:

instance_announce -1,"Monsters!!!!",bc_map;
areamonster instance_mapname("2@cake"),15,123,50,123,"Poring",1275,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 90000;
areamonster instance_mapname("2@cake"),15,110,49,110,"Poring",1735,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 30000;
areamonster instance_mapname("2@cake"),20,112,45,112,"Poring",1736,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";

sleep 10000;
areamonster instance_mapname("2@cake"),20,119,44,119,"Poring",1737,1,instance_npcname("SpwnMonster#CK")+"::OnThisMobDeath";
end;
OnEvent5:
disablenpc instance_npcname("CT_1stFloor");
instance_announce -1,"First Boss!",bc_map;
monster instance_mapname("2@cake"),79,85,"White Lady",1630,1,instance_npcname("SpwnMonster#CK")+"::OnThisBossDeath";
end;

OnEvent6:

instance_announce -1,"Monsters!!!!",bc_map;
monster instance_mapname("2@cake"),80,40,"White Lady",1630,1,instance_npcname("SpwnMonster#CK")+"::OnThisBoss2Death";
sleep 2000;
instance_announce -1,"Last boss defeated",bc_map;
end;

OnThisMobDeath:
'CK_Restant--;
	if(!'CK_Restant){
		instance_announce -1,"Etc",bc_map;
		'CK_Restant = 'CK_MobCount;
		'CK_Count++;
		donpcevent instance_npcname("Count#CK")+"::OnCountWarp";
		end;
	}
	else{
		instance_announce -1,"Mob count"+'CK_Restant+" monsters!",bc_map;
	}
end;
	
OnThisBossDeath:

instance_announce -1,"Making progression!",bc_map;
'CK_Count++;
donpcevent instance_npcname("Count#CK")+"::OnCountWarp";
end;


OnThisBoss2Death:
instance_announce -1,"Etc",bc_map;
sleep 2500;
enablenpc instance_npcname("CK_end");
instance_announce -1,"Warp out soon",bc_map;
.CK_fin = 1;
sleep 60000;
instance_destroy();
end;
}

1@cake,1,2,1	script	Count#CK	-1,{

OnCountWarp:

if ('CK_Count==1){
	enablenpc instance_npcname("CK_1stFloor");
	end;
	}
	
if ('CK_Count==2){
	enablenpc instance_npcname("CK_2ndFloor");
	end;
	}
	
if ('CK_Count==3){
	enablenpc instance_npcname("CK_3rdFloor");
	end;
	}

if ('CK_Count==4){
	enablenpc instance_npcname("CK_4thFloor");
	end;
	}

if ('CK_Count==5){
	enablenpc instance_npcname("CK_5thFloor");
	end;
	}
	
if ('CK_Count==6){
	enablenpc instance_npcname("CK_end");
	end;
	}
}

1@cake,92,189,4	script	CT_Event#1	111,3,3,{
OnTouch:
	if ( !'CT_Count2 ){
	donpcevent instance_npcname("SpwnMonster#CK")+"::OnEvent1";
	'CT_Count2++;
	}
}

2@cake,80,11,4	script	DT_Event#2	111,3,3,{
OnTouch:
	if ('CT_Count2 == 1){
	donpcevent instance_npcname("SpwnMonster#DT")+"::OnEvent2";
	'CT_Count2++;
	}
}

2@cake,116,47,4	script	DT_Event#3	111,3,3,{
OnTouch:
	if('CT_Count2==2){
	donpcevent instance_npcname("SpwnMonster#DT")+"::OnEvent3";
	'CT_Count2++;
	}
}

2@cake,42,54,4	script	DT_Event#4	111,3,3,{
OnTouch:
	if ('CT_Count2==3){
	donpcevent instance_npcname("SpwnMonster#DT")+"::OnEvent4";
	'CT_Count2++;
	}
}

2@cake,44,107,4	script	DT_Event#5	111,3,3,{
OnTouch:
if ('CT_Count2==4){
	donpcevent instance_npcname("SpwnMonster#DT")+"::OnEvent5";
	'CT_Count2++;
	}
}

2@cake,23,171,4	script	CT_Event#6	111,3,3,{
OnTouch:
	if ('CT_Count2==5){
	donpcevent instance_npcname("SpwnMonster#DT")+"::OnEvent6";
	'CT_Count2++;
	}
}
1@cake,92,211,0	script	CK_1stFloor	45,1,1,{	end;	OnTouch:	warp has_instance("2@cake"),80,11;	end; }
2@cake,90,48,0	script	CK_2ndFloor	45,1,1,{	end;	OnTouch:	warp has_instance("2@cake"),116,47;	end; }
2@cake,72,54,0	script	CK_3rdFloor	45,1,1,{	end;	OnTouch:	warp has_instance("2@cake"),42,54;	end; }
2@cake,84,66,0	script	CK_4thFloor	45,1,1,{	end;	OnTouch:	warp has_instance("2@cake"),44,107;	end; }
2@cake,32,128,0	script	CK_5thFloor	45,1,1,{	end;	OnTouch:	warp has_instance("2@cake"),23,171;	end; }
2@cake,72,82,0	script	CK_end	45,1,1,{		end;	OnTouch:	if (.CK_fin = 1) { mes "Good job"; close2; warp "prontera",150,150; } else end;
}
//Mapflags
1@cake	mapflag	nowarp
1@cake	mapflag	nowarpto
1@cake	mapflag	noteleport
1@cake	mapflag	nosave	SavePoint
1@cake	mapflag	nomemo
1@cake	mapflag	nobranch
1@cake	mapflag	noicewall
1@cake	mapflag	monster_noteleport
1@cake	mapflag	partylock
1@cake	mapflag	noicewall

2@cake	mapflag	nowarp
2@cake	mapflag	nowarpto
2@cake	mapflag	noteleport
2@cake	mapflag	nosave	SavePoint
2@cake	mapflag	nomemo
2@cake	mapflag	nobranch
2@cake	mapflag	noicewall
2@cake	mapflag	monster_noteleport
2@cake	mapflag	partylock
2@cake	mapflag	noicewall

1@cake	mapflag	src4instance
2@cake	mapflag	src4instance