turnstates

eastern flames/scripts/st_control/st_control.gml

@@ -0,0 +1,73 @@
+function st_control() {
+	c_input();
+	var mouse = c_2dto3d(mouse_x,mouse_y);
+	if select && selectedunit == noone {
+		var mousex = floor(mouse.x/global.tilesize.x);
+		var mousey = floor(mouse.y/global.tilesize.y);
+		log(mousex, mousey);
+		if mousex < array_length(global.map)  && mousex >= 0 {
+			if mousey < array_length(global.map[mousex]) && mousey >= 0 {
+				var i;
+				for (i=0; i<array_length(global.map[mousex][mousey].contents); i++) {
+					if global.map[mousex][mousey].contents[i].object_index == o_unit {
+						var dude = global.map[mousex][mousey].contents[i];
+						if dude.alignment == global.turn {
+							c_selectunit(dude);
+						} else {
+							c_markunit(dude);
+						}
+					}
+				}
+			}
+		}
+	} else if select {
+		if mouse.x > global.gw-100 {
+			var guyhits = floor(abs(mouse.y-global.gh-10)/32);
+			log(guyhits, array_length(selectedunit.inventory));
+			if guyhits < array_length(selectedunit.inventory) {
+				//log("doing");
+				selectedunit.equippedweapon = guyhits+1;
+				c_equipweapon(selectedunit, selectedunit.inventory[selectedunit.equippedweapon]);
+			}
+			//draw_text(global.gw-10, global.gh-10-i*20;
+		}
+	}
+	if selectedunit == noone {
+		hspd = lerp(hspd, (right-left)*((.1+stop*.1)*(ts.x)), .4);
+		vspd = lerp(vspd, (down-up)*((.1+stop*.1)*(ts.y)), .4);
+		x += hspd;
+		y += vspd;
+	
+	} else {
+		hspd = 0;
+		vspd = 0;
+		x = lerp(x, selectedunit.x, .4);
+		y = lerp(y, selectedunit.y, .4);
+	}
+
+	global.camerax = x;
+	global.cameray = y;
+	var mousex = floor(mouse.x/global.tilesize.x);
+	var mousey = floor(mouse.y/global.tilesize.y);
+	//log(mousex, mousey);
+	hoveredunit = selectedunit;
+	if mousex < array_length(global.map) && mousex >= 0 {
+		if mousey < array_length(global.map[mousex]) && mousey >= 0 {
+			var i;
+			for (i=0; i<array_length(global.map[mousex][mousey].contents); i++) {
+				if global.map[mousex][mousey].contents[i].object_index == o_unit {
+					hoveredunit = (global.map[mousex][mousey].contents[i]);
+				}
+			}
+		}
+	}
+
+	var i;
+	for (i=0; i<array_length(global.units[global.turn]); i++) {
+		if global.units[global.turn][i].waiting = false exit;
+	}
+	c_dewait(global.turn);
+	global.turn = (global.turn+1)%2;
+	log("TURN " + string(global.turn));
+	state = st_enemyturn;
+}

eastern flames/scripts/st_control/st_control.yy

@@ -0,0 +1,12 @@
+{
+  "isDnD": false,
+  "isCompatibility": false,
+  "parent": {
+    "name": "Scripts",
+    "path": "folders/Scripts.yy",
+  },
+  "resourceVersion": "1.0",
+  "name": "st_control",
+  "tags": [],
+  "resourceType": "GMScript",
+}