LÖVE

Code: Select all

require "MiddleClass.lua"

Candle = class('Candle')
Flame  = class('Flame')

-- The Candle library is going to take the liberty
-- of keeping track of all of your current Flames.
-- I need to do this because of how I'm doing the drawing.
-- At least for now until I refactor/rethink it.
Candle.flames = {}

function Candle.new(x,y,max_shimmer,min_shimmer)
	table.insert(Candle.flames, Flame:new(x,y,max_shimmer,min_shimmer))
end

function Candle.update(dt)
	for _, v in ipairs(Candle.flames) do
		v:update(dt)
	end
end

-- We need to use a frame buffer so we can do
-- independent blending of our light sources and
-- our shroud without having to worry about
-- anything else being drawn. One is good
-- for all of our Flames though!
Candle.buffer = love.graphics.newFramebuffer()

function Candle.draw()
	Candle.buffer:renderTo(function() 	
		love.graphics.draw(Candle.shrouds[Candle.shroud_intensity],0,0) -- draw our shroud
		for _, v in ipairs(Candle.flames) do
			love.graphics.setColor(v.light_intensity,v.light_intensity,v.light_intensity)
			love.graphics.circle('fill',v.x,v.y,v.shimmer_radius,256) 
		end
	end)
	
	love.graphics.setBlendMode("multiplicative")
	local draw_me = love.graphics.newImage(Candle.buffer:getImageData())
	love.graphics.draw(draw_me,0,0)
	love.graphics.setBlendMode("alpha")
end

--[[ Note: Currently the shroud_intensity is fixed, you can change it but
           you must also change the for loop in generateShrouds also. I initially
		   wanted to load all possible shrouds up-front, but this takes way too long.
		   I will find a new approach, but in the meantime... deal with it? ]]
   
Candle.shrouds = {}
Candle.shroud_intensity = 200 -- Fixed for now until I figure this shit out.

-- I wouldn't use this if I were you!
function Candle.setShroudIntensity(intensity)
	self.shroud_intensity = intensity
end

-- You can call this in love.load
-- so that it wont stall us when we
-- create our first Candle.
function Candle.generateShrouds() 
	for i=200, 200 do
		-- TODO: Replace dimensions with a variable
		-- screen size.
		Candle.shrouds[i] = love.image.newImageData(768,768)
		
		for x=1, Candle.shrouds[i]:getWidth() do
			for y=1, Candle.shrouds[i]:getHeight() do
				Candle.shrouds[i]:setPixel(x,y,0,0,0,i)
			end
		end
		
		Candle.shrouds[i] = love.graphics.newImage(Candle.shrouds[i])
	end
end


function Flame:initialize(x,y,max_shimmer,min_shimmer)
	if #Candle.shrouds == 0 then
		Candle.generateShrouds()
	end
	
	self.x = x
	self.y = y
	if max_shimmer == nil then self.max_shimmer = 50 
	else self.max_shimmer = max_shimmer end
	if min_shimmer == nil then self.min_shimmer = 50
	else self.min_shimmer = min_shimmer end
	
	self.light_intensity = 255
	self.shimmer_radius = self.max_shimmer-1
	self.shroud_intensity = 200
	self.magic = 1 -- Every code needs a little bit of magic.
end

function Flame:update(dt)
	-- "Shimmer" effect by growing and
	-- shrinking Candle radius
	
	if self.min_shimmer ~= self.max_shimmer then
		self.shimmer_radius  = self.shimmer_radius - 50 * dt * self.magic
		self.shimimer_radius = math.floor(self.shimmer_radius)
		if self.shimmer_radius >= self.max_shimmer then
			self.magic = self.magic * -1
		end

		if self.shimmer_radius <= self.min_shimmer then
			self.magic = self.magic * -1
		end
	end
end