Mothback/data/scripts/animation.lua

Animation = {}

function Animation:New(anim_data)
 	local o = {}
 		o.path = anim_data.path
	 	o.frames = anim_data.frames
		o.speed = anim_data.speed
    o.imgs = anim_data.imgs
		o.subframe = 0
		o.frame = 1

 setmetatable(o, self)
 self.__index = self
 return o
end

function Animation:ChangeTo(anim_data)
	if anim_data.path == self.path
	then
		return self
	else
		return Animation:New(anim_data)
	end
end

-- to manually handle what frame
function Animation:DrawFrame(frame, x, y, rotate, sx, sy)
	if frame > self.frames then
		frame = self.frames
	end
	local x = x or 0
	local y = y or 0
	local sx = sx or 1
	local sy = sy or 1
	love.graphics.draw(
		self.imgs[frame],
		math.floor(x - Camera.pos.x),
		math.floor(y - Camera.pos.y),
		rotate,
		sx,
		sy
	)
end

-- to linearly animate
function Animation:Animate()
			-- try to animate
			self.subframe = self.subframe + current_dt

		if self.subframe > self.speed then
			self.frame = self.frame + 1
			self.subframe = self.subframe - self.speed
		end

		-- cycle
		if self.frame >= self.frames+1 then
			self.frame = self.frame - self.frames
		end
end

-- to draw the current frame
function Animation:Draw(x, y, rotate, sx, sy)
	local x = x or 0
	local y = y or 0
	local sx = sx or 1
	local sy = sy or 1
	love.graphics.draw(
		self.imgs[self.frame],
		math.floor(x),
		math.floor(y),
		rotate,
		sx,
		sy
	)
end