ecs = require("ecs")
world = require("world")
controller = {}




class FishControllerComponent extends ecs.Component
	new: () =>
		--print("Fish controller started")
		@node = am.group!
	join: (entity) =>
		super(entity)
		@ent = entity
		graphic = entity\get("graphic")
		assert(graphic, "Fish controller must have a graphic")
		pred_component = entity\get("pred")
		assert(pred_component, "Fish controller must have a predicted component")
		net_component = entity\get("net")
		assert(net_component, "Fish controller must have a net component")
		@net = net_component
		graphic.node\append(@node)
		comp = @
		locpicker = coroutine.create(() =>
			comp\pick_next_location!
			coroutine.yield!
		)
		--either "swimming", "waiting", or "catching"
		@state = "swimming"
		@node\action(coroutine.create(() =>
			while comp.state == "swimming"
				comp.state = "waiting"
				start_wait = world.sync_time!
				while world.sync_time! - start_wait < 8
					--TODO: look for nearby hooks and get caught
					coroutine.yield!
				if comp.state == "waiting"
					comp\pick_next_location!
					comp.state = "swimming"
					while math.distance(pred_component.properties.pos, net_component.properties.next_loc) > 0.01
						--print("At ", pred_component.properties.pos, "waiting to get to next location, ", net_component.properties.next_loc, "it is ", math.distance(pred_component.properties.pos, net_component.properties.next_loc), " away")
						coroutine.yield!

		))
	pick_next_location: () =>
		-- Pick somewhere to swim based on where we are?
		-- This can only be done on the host.
		--TODO: spawn fish on all sides.
		-- everything has to be floats so math.random returns a float.
		if @net.properties.pos.x > 10 -- pick somewhere to the right
			@net.properties.next_loc = vec2(
				math.random(11.1,15),
				math.random(-10.1,10)
			)
		elseif @net.properties.pos.x < -10
			@net.properties.next_loc = vec2(
				math.random(-15.1,-11)
				math.random(-10.1,10)
			)
		elseif @net.properties.pos.y > 10
			@net.properties.next_loc = vec2(
				math.random(-10.1,10)
				math.random(11.1,15)
			)
		elseif @net.properties.pos.y < -10
			@net.properties.next_loc = vec2(
				math.random(-10.1,10)
				math.random(-15.1,-11)
			)
		else
			--If none of these apply, we're stuck on land somehow, delete ourselves
			@entity\destroy!

		@net.properties.next_loc_time = world.sync_time!
		--@net.properties.next_loc = @net.properties.pos + vec2(0,1)
		--@net.properties.next_loc_time = world.sync_time!
		--print("Picking next location, it was ", @net.properties.next_loc)

{:FishControllerComponent}