//==================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// ---------------------------------
// - 㺸 dԸ} - 
//===================================
// G2.4a-c
//===================================


// NorthWest -----------------------------------------------------------------
alberta,28,229,0	script	dԪAȤH::kaf_alberta	116,{
	cutin "kafra_02",2;
	callfunc "F_KafSetAlb";
	callfunc "F_Kafra",0,0,0,50,850;

	M_Save:
		savepoint "alberta",31,231;
		callfunc "F_KafEnd",0,1,"in the city of Alberta";
}

// South ---------------------------------------------------------------------
alberta,113,60,6	script	dԪAȤH::kaf_alberta2	112,{
	cutin "kafra_06",2;
	callfunc "F_KafSetAlb";
	callfunc "F_Kafra",0,0,0,50,850;

	M_Save:
		savepoint "alberta",117,57;
		callfunc "F_KafEnd",0,1,"in the city of Alberta";
}


// Function: Sets variables for Ablerta Kafras -------------------------------
function	script	F_KafSetAlb	{
	cleararray @wrpC$[0],"",getarraysize(@wrpC$);
	setarray @wrpP[0], 1200, 1800, 1800;
	setarray @wrpD$[0], "", "ùJ", "w";
	set @wrpC$[0], @wrpD$[0]+"@-> "+@wrpP[0]+" z";
	set @wrpC$[1], @wrpD$[1]+"@-> "+@wrpP[1]+" z";
	set @wrpC$[2], @wrpD$[2]+"@-> "+@wrpP[2]+" z";
	set @wrpC$[3], "";
	setarray @viewpX[0], 28, 113, 0, 0;
	setarray @viewpY[0], 229, 60, 0, 0;
	return;
}