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

38 lines
715 B
Plaintext

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;
}
//}
}