/traderous

-- Class: Text

-- Shows text onscreen using an outline (e.g. TrueType) or bitmap font. 

-- You can control the width of the text but the height is ignored for

-- display purposes; it will always draw the entirety of its text property.

-- If you do not specify a height and width, the sprite will size itself

-- so that it fits its entire text as a single line.

--

-- By default, an outline font will display as white. To change its color,

-- change its <Sprite.tint> property.

--

-- Extends:

--		<Sprite>

Text = Sprite:extend{

	-- Property: text

	-- Text string to draw.

	text = '',

	-- Property: font

	-- Font to use to draw. See <Cached.font> for possible values here; if

	-- you need more than one value, use table notation. Some example values:

	-- 		* 12 (default font, size 12)

	--		* 'fonts/bitmapfont.png' (bitmap font, default character order)

	--		* { 'fonts/outlinefont.ttf', 12 } (outline font, font size)

	--		* { 'fonts/bitmapfont.ttf', 'ABCDEF' } (bitmap font, custom character order)

	font = 12,

	-- Property: align

	-- Horizontal alignment, see http://love2d.org/wiki/AlignMode.

	-- This affects how lines wrap relative to each other, not how

	-- a single line will wrap relative to the sprite's width and height.

	-- If <wordWrap> is set to false, then this has no effect. 

	align = 'left',

	-- Property: wordWrap

	-- Wrap lines to the width of the sprite?

	wordWrap = true,

	-- private property: used to check whether our font has changed

	_set = { font = {} },

	new = function (self, obj)

		obj = obj or {}

		self:extend(obj)

		obj:updateFont()

		if obj.onNew then obj:onNew() end

		return obj

	end,

	-- Method: getSize

	-- Returns the width and height of the text onscreen as line-wrapped

	-- to the sprite's boundaries. This disregards the sprite's height property.

	--

	-- Arguments:

	--		none

	-- 

	-- Returns:

	--		width, height in pixels

	getSize = function (self)

		if self.text == '' then return 0, 0 end

		-- did our font change on us?

		if type(self.font) == 'table' then

			for key, value in pairs(self.font) do

				if self._set.font[key] ~= self.font[key] then

					self:updateFont()

					break

				end

			end

		else

			if self.font ~= self._set.font then

				self:updateFont()

			end

		end

		local _, lines = self._fontObj:getWrap(self.text, self.width)

		local lineHeight = self._fontObj:getHeight()

		return self.width, lines * lineHeight

	end,

	-- Method: centerAround

	-- Centers the text around a position onscreen.

	--

	-- Arguments:

	--		x - center's x coordinate

	--		y - center's y coordinate

	--		centering - can be either 'horizontal', 'vertical', or 'both';

	--					default 'both'

	centerAround = function (self, x, y, centering)

		centering = centering or 'both'

		local width, height = self:getSize()

		if width == 0 then return end

		if centering == 'both' or centering == 'horizontal' then

			self.x = x - width / 2

		end

		if centering == 'both' or centering == 'vertical' then

			self.y = y - height / 2

		end

	end,

	-- private method: updateFont

	-- Updates the _fontObj property based on self.font.

	--

	-- Arguments:

	--		none

	--

	-- Returns:

	--		nothing

	updateFont = function (self)

		if self.font then

			if type(self.font) == 'table' then

				self._fontObj = Cached:font(unpack(self.font))

			else

				self._fontObj = Cached:font(self.font)

			end

			if not self.height then self.height = self._fontObj:getHeight() end

			if not self.width and self.text then self.width = self._fontObj:getWidth(self.text) end

		end

	end,

	draw = function (self, x, y)

		if not self.visible or self.alpha <= 0 or not self.text or not self.font then return end

		x = math.floor(x or self.x)

		y = math.floor(y or self.y)

		if STRICT then

			assert(type(x) == 'number', 'visible text sprite does not have a numeric x property')

			assert(type(y) == 'number', 'visible text sprite does not have a numeric y property')

			assert(type(self.width) == 'number', 'visible text sprite does not have a numeric width property')

			assert(type(self.height) == 'number', 'visible text sprite does not have a numeric height property')

			if not self.text then error('visible text sprite has no text property') end

			if not self.font then error('visible text sprite has no font property') end

		end

		-- did our font change on us?

		if type(self.font) == 'table' then

			for key, value in pairs(self.font) do

				if self._set.font[key] ~= self.font[key] then

					self:updateFont()

					break

				end

			end

		else

			if self.font ~= self._set.font then

				self:updateFont()

			end

		end

		-- rotate and scale

		local scaleX = self.scale * self.distort.x

		local scaleY = self.scale * self.distort.y

		if self.flipX then scaleX = scaleX * -1 end

		if self.flipY then scaleY = scaleY * -1 end

		if scaleX ~= 1 or scaleY ~= 1 or self.rotation ~= 0 then

			love.graphics.push()

			love.graphics.translate(x + self.width / 2, y + self.height / 2)

			love.graphics.scale(scaleX, scaleY)

			love.graphics.rotate(self.rotation)

			love.graphics.translate(- (x + self.width / 2), - (y + self.height / 2))

		end

		-- set color if needed

		local colored = self.alpha ~= 1 or self.tint[1] ~= 1 or self.tint[2] ~= 1 or self.tint[3] ~= 1

		if colored then

			love.graphics.setColor(self.tint[1] * 255, self.tint[2] * 255, self.tint[3] * 255, self.alpha * 255)

		end

		love.graphics.setFont(self._fontObj)

		if self.wordWrap then

			love.graphics.printf(self.text, x, y, self.width, self.align)

		else

			love.graphics.print(self.text, x, y)

		end

		-- reset color and rotation

		if colored then love.graphics.setColor(255, 255, 255, 255) end

		if scaleX ~= 1 or scaleY ~= 1 or self.rotation ~= 0 then

			love.graphics.pop()

		end

	end,

	__tostring = function (self)

		local result = 'Text (x: ' .. self.x .. ', y: ' .. self.y ..

					   ', w: ' .. self.width .. ', h: ' .. self.height .. ', '

		result = result .. 'font ' .. dump(self.font) .. ', ' .. string.len(self.text) .. ' chars, '

		if self.active then

			result = result .. 'active, '

		else

			result = result .. 'inactive, '

		end

		if self.visible then

			result = result .. 'visible, '

		else

			result = result .. 'invisible, '

		end

		if self.solid then

			result = result .. 'solid'

		else

			result = result .. 'not solid'

		end

		return result .. ')'

	end

}