eastern-flames/eastern flames/scripts/st_enemyturn/st_enemyturn.gml

function st_enemyturn() {
	if selectedunit != noone {
		hspd = 0;
		vspd = 0;
		x = lerp(x, selectedunit.x, .4);
		y = lerp(y, selectedunit.y, .4);
		cursor.x = mouse_x;
		cursor.y = mouse_y;
		global.camerax = x;
		global.cameray = y;
	}
	if waiting {
		waiting--;
		exit;
	}
	done = false;
	//for (k=0; k<array_length(global.units[ARMY.THEM]); k++) {
	var target = global.units[ARMY.THEM][k];
	selectedunit = target;
	while !target.waiting {
		c_doenemyai(target);
		if waiting exit;
	}
	k++;
	if k >= array_length(global.units[ARMY.THEM]){
		done = true;
	}
	//}
	if done {
		c_dewait(global.turn);
		k = 0;
		c_deselectunit(selectedunit);
		state = st_control;
		global.turn = ARMY.US;
		done = false;
	}
	//}
}