150 lines
4.0 KiB
Lua
150 lines
4.0 KiB
Lua
local Time = require"time"
|
|
|
|
local numberFont = love.graphics.newFont(100)
|
|
|
|
local function pointToTurns(x, y)
|
|
local rawTurns = math.atan2(y, x) / 2 / math.pi
|
|
local _, clockTurns = math.modf(rawTurns + 1.25)
|
|
return clockTurns
|
|
end
|
|
|
|
local function turnsToRads(turns)
|
|
return turns * 2 * math.pi - 0.5 * math.pi
|
|
end
|
|
|
|
|
|
local Hand = {}
|
|
Hand.__index = Hand
|
|
|
|
function Hand:new(length, color)
|
|
local h = {
|
|
length = (length or 10),
|
|
color = (color or {1,1,1})
|
|
}
|
|
return setmetatable(h, self)
|
|
end
|
|
|
|
function Hand:draw(turns)
|
|
love.graphics.push("all")
|
|
love.graphics.setColor(unpack(self.color))
|
|
love.graphics.rotate(turnsToRads(turns) + 0.5 * math.pi)
|
|
love.graphics.rectangle("fill", -10, 10, 20, -self.length)
|
|
love.graphics.pop()
|
|
end
|
|
|
|
|
|
local function drawFaceCanvas(r)
|
|
local oldCanvas = love.graphics.getCanvas()
|
|
local canvas = love.graphics.newCanvas(2*r,2*r)
|
|
love.graphics.setCanvas(canvas)
|
|
love.graphics.push("all")
|
|
love.graphics.translate(r, r)
|
|
love.graphics.setColor(0.93, 0.8, 0)
|
|
love.graphics.circle("fill", 0, 0, r)
|
|
love.graphics.setColor(1, 1, 1)
|
|
love.graphics.circle("fill", 0, 0, 0.84*r)
|
|
love.graphics.setColor(0,0,0)
|
|
for i=1,60 do
|
|
love.graphics.rotate(math.pi/30)
|
|
love.graphics.circle("fill", 0.6*r, 0, 0.01*r)
|
|
end
|
|
love.graphics.setColor(0.87,0,0)
|
|
for i=1,12 do
|
|
love.graphics.rotate(math.pi/6)
|
|
love.graphics.circle("fill", 0.6*r, 0, 0.015*r)
|
|
end
|
|
|
|
local font = love.graphics.newFont("font/JosefinSans-Regular.ttf", r/6)
|
|
love.graphics.setColor(0,0,0)
|
|
for i=1,12 do
|
|
local s = tostring(i)
|
|
local h = font:getHeight()
|
|
local w = font:getWidth(s)
|
|
local tr = love.math.newTransform(0,0,-math.pi/6*i+math.pi)
|
|
tr = tr:apply(love.math.newTransform(w*0.5, h*0.4))
|
|
local x, y = tr:inverseTransformPoint(0, 0.72*r)
|
|
love.graphics.printf(s, font, x, y, r)
|
|
end
|
|
love.graphics.pop()
|
|
love.graphics.setCanvas(oldCanvas)
|
|
return canvas
|
|
end
|
|
|
|
local Clock = {}
|
|
Clock.__index = Clock
|
|
|
|
function Clock:new(time, diameter)
|
|
local radius = diameter and diameter/2 or 300
|
|
local transform = love.math.newTransform(radius, radius)
|
|
local c = {
|
|
time = (time or Time:new()),
|
|
minuteHand = Hand:new(240, {1,0,0}),
|
|
hourHand = Hand:new(180, {0,0.5,0.5}),
|
|
dragging = false,
|
|
radius = radius,
|
|
onSetHands = nil,
|
|
transform = transform,
|
|
faceCanvas = drawFaceCanvas(radius)
|
|
}
|
|
return setmetatable(c, self)
|
|
end
|
|
|
|
function Clock:setTime(time)
|
|
self.time = time
|
|
end
|
|
|
|
function Clock:getTime()
|
|
return self.time
|
|
end
|
|
|
|
function Clock:draw()
|
|
local _, m = self.time:get()
|
|
local h = self.time:getHoursSinceTwelve()
|
|
love.graphics.push("all")
|
|
love.graphics.draw(self.faceCanvas)
|
|
love.graphics.applyTransform(self.transform)
|
|
self.minuteHand:draw(m / 60)
|
|
self.hourHand:draw(h / 12)
|
|
love.graphics.pop()
|
|
end
|
|
|
|
local function clockContainsPoint(clock, x, y)
|
|
local localX, localY = clock.transform:inverseTransformPoint(x, y)
|
|
local dist = math.sqrt(localX^2 + localY^2)
|
|
return dist <= clock.radius
|
|
end
|
|
|
|
local function clockPointAt(clock, x, y)
|
|
local localX, localY = clock.transform:inverseTransformPoint(x, y)
|
|
local minutes = pointToTurns(localX, localY) * 60
|
|
local _, oldMinutes = clock.time:get()
|
|
local dMinutes = minutes - oldMinutes
|
|
-- Adjust for rolling over
|
|
if dMinutes < -30 then
|
|
dMinutes = dMinutes + 60
|
|
elseif dMinutes > 30 then
|
|
dMinutes = dMinutes - 60
|
|
end
|
|
clock.time = clock.time:addMinutes(dMinutes)
|
|
if clock.onSetHands then clock.onSetHands(clock.time) end
|
|
end
|
|
|
|
function Clock:movemouse(x, y)
|
|
if self.dragging then
|
|
local localX, localY = self.transform:inverseTransformPoint(x, y)
|
|
clockPointAt(self, x, y)
|
|
end
|
|
end
|
|
|
|
function Clock:pressmouse(x, y, button)
|
|
if not self.dragging and button == 1 and clockContainsPoint(self, x,y) then
|
|
self.dragging = true
|
|
clockPointAt(self, x, y)
|
|
end
|
|
end
|
|
|
|
function Clock:releasemouse(button)
|
|
if button == 1 then self.dragging = false end
|
|
end
|
|
|
|
return Clock |