319 lines
8.7 KiB
Lua
319 lines
8.7 KiB
Lua
|
renderer = {}
|
||
|
|
|
||
|
|
function renderer.show_debug(show)
|
||
|
|
-- useful?
|
||
|
|
end
|
||
|
|
|
||
|
|
function renderer.get_size()
|
||
|
|
return love.graphics.getWidth(), love.graphics.getHeight()
|
||
|
|
end
|
||
|
|
|
||
|
|
function renderer.begin_frame()
|
||
|
|
-- handled in love.run
|
||
|
|
end
|
||
|
|
|
||
|
|
function renderer.end_frame()
|
||
|
|
-- handled in love.run
|
||
|
|
end
|
||
|
|
|
||
|
|
function renderer.set_clip_rect(x, y, w, h)
|
||
|
|
love.graphics.setScissor(x, y, w, h)
|
||
|
|
end
|
||
|
|
|
||
|
|
function renderer.set_litecolor(color)
|
||
|
|
local r, g, b, a = 255, 255, 255, 255
|
||
|
|
if color and #color >= 3 then r, g, b = unpack(color, 1, 3) end
|
||
|
|
if #color >= 4 then a = color[4] end
|
||
|
|
love.graphics.setColor(r / 255, g / 255, b / 255, a / 255)
|
||
|
|
end
|
||
|
|
function renderer.draw_rect(x, y, w, h, color)
|
||
|
|
renderer.set_litecolor(color)
|
||
|
|
love.graphics.rectangle("fill", x, y, w, h)
|
||
|
|
end
|
||
|
|
|
||
|
|
function renderer.draw_text(font, text, x, y, color)
|
||
|
|
renderer.set_litecolor(color)
|
||
|
|
love.graphics.setFont(font.font)
|
||
|
|
if pcall(function() love.graphics.print(text, x, y) end) then
|
||
|
|
return x + font.font:getWidth(text)
|
||
|
|
else
|
||
|
|
return x
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
renderer.font = {}
|
||
|
|
function renderer.font.load(filename, size)
|
||
|
|
local font = love.graphics.newFont(filename, size)
|
||
|
|
return {
|
||
|
|
font = font,
|
||
|
|
set_tab_width = function(self, n)
|
||
|
|
-- todo? Ignore?
|
||
|
|
end,
|
||
|
|
get_width = function(self, text)
|
||
|
|
return self.font:getWidth(text)
|
||
|
|
end,
|
||
|
|
get_height = function(self)
|
||
|
|
return self.font:getHeight()
|
||
|
|
end
|
||
|
|
}
|
||
|
|
end
|
||
|
|
|
||
|
|
system = {}
|
||
|
|
system.event_queue = {}
|
||
|
|
function system.enqueue_love_event(ev, a, b, c, d, e, f)
|
||
|
|
local function button_name(button)
|
||
|
|
if button == 1 then return 'left' end
|
||
|
|
if button == 2 then return 'right' end
|
||
|
|
if button == 3 then return 'middle' end
|
||
|
|
return '?'
|
||
|
|
end
|
||
|
|
local function key_name(key)
|
||
|
|
if key:sub(1, 2) == "kp" then
|
||
|
|
return "keypad " .. key:sub(3)
|
||
|
|
end
|
||
|
|
if key:sub(2) == "ctrl" or key:sub(2) == "shift" or key:sub(2) == "alt" or key:sub(2) == "gui" then
|
||
|
|
if key:sub(1, 1) == "l" then return "left " .. key:sub(2) end
|
||
|
|
return "right " .. key:sub(2)
|
||
|
|
end
|
||
|
|
return key
|
||
|
|
end
|
||
|
|
local function convert_love_event()
|
||
|
|
if ev == 'quit' then
|
||
|
|
return {'quit'}
|
||
|
|
elseif ev == 'resize' then
|
||
|
|
return {'resized', a, b}
|
||
|
|
elseif ev == 'filedropped' then
|
||
|
|
return {'filedropped', a:getFilename(), love.mouse.getX(), love.mouse.getY()}
|
||
|
|
elseif ev == 'keypressed' then
|
||
|
|
return {'keypressed', key_name(a or b)}
|
||
|
|
elseif ev == 'keyreleased' then
|
||
|
|
return {'keyreleased', key_name(a or b)}
|
||
|
|
elseif ev == 'textinput' then
|
||
|
|
return {'textinput', a}
|
||
|
|
elseif ev == 'mousepressed' then
|
||
|
|
return {'mousepressed', button_name(c), a, b, e}
|
||
|
|
elseif ev == 'mousereleased' then
|
||
|
|
return {'mousereleased', button_name(c), a, b}
|
||
|
|
elseif ev == 'mousemoved' then
|
||
|
|
return {'mousemoved', a, b, c, d}
|
||
|
|
elseif ev == 'wheelmoved' then
|
||
|
|
return {'mousewheel', b}
|
||
|
|
end
|
||
|
|
end
|
||
|
|
local liteev = convert_love_event()
|
||
|
|
if liteev then
|
||
|
|
table.insert(system.event_queue, liteev)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.poll_event()
|
||
|
|
local liteev = table.remove(system.event_queue, 1)
|
||
|
|
if liteev then
|
||
|
|
return unpack(liteev)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.wait_event(n)
|
||
|
|
-- no love2d equivalent
|
||
|
|
return false
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.draw_love_frame()
|
||
|
|
local core = require("core")
|
||
|
|
-- update lite & draw
|
||
|
|
core.redraw = true
|
||
|
|
core.frame_start = system.get_time()
|
||
|
|
core.step()
|
||
|
|
core.run_threads()
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.set_cursor(cursor)
|
||
|
|
if cursor == nil then cursor = 'arrow' end
|
||
|
|
if cursor == 'sizeh' then cursor = 'sizewe' end
|
||
|
|
if cursor == 'sizev' then cursor = 'sizens' end
|
||
|
|
love.mouse.setCursor(love.mouse.getSystemCursor(cursor))
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.set_window_title(title)
|
||
|
|
love.window.setTitle(title)
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.set_window_mode(mode)
|
||
|
|
love.window.setFullscreen(mode == 'fullscreen')
|
||
|
|
if mode == nil or mode == 'normal' then love.window.restore() end
|
||
|
|
if mode == 'maximized' then love.window.maximize() end
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.window_has_focus()
|
||
|
|
return love.window.hasFocus()
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.show_confirm_dialog(title, msg)
|
||
|
|
return love.window.showMessageBox(title, msg, { 'Yes', 'No', escapebutton = 2 }, 'warning') == 1
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.chdir(dir)
|
||
|
|
-- not possible with love2d
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.list_dir(path)
|
||
|
|
if path == '.' then path = '' end
|
||
|
|
local info = love.filesystem.getInfo(path)
|
||
|
|
if info and info.type == 'directory' then
|
||
|
|
return love.filesystem.getDirectoryItems(path)
|
||
|
|
elseif info and info.type == 'symlink' then
|
||
|
|
return love.filesystem.getDirectoryItems(path .. "/.")
|
||
|
|
end
|
||
|
|
return nil, "Not a directory"
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.absolute_path(path)
|
||
|
|
return path -- love.filesystem.getRealDirectory(path)
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.get_file_info(path)
|
||
|
|
local info = love.filesystem.getInfo(path)
|
||
|
|
if info then
|
||
|
|
local type = nil
|
||
|
|
if info.type == 'file' then
|
||
|
|
type = 'file'
|
||
|
|
elseif info.type == 'directory' then
|
||
|
|
type = 'dir'
|
||
|
|
elseif info.type == 'symlink' then
|
||
|
|
if love.filesystem.read(path, 1) then
|
||
|
|
type = 'file'
|
||
|
|
else
|
||
|
|
type = 'dir'
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return {
|
||
|
|
modified = info.modtime,
|
||
|
|
size = info.size,
|
||
|
|
type = type
|
||
|
|
}
|
||
|
|
else
|
||
|
|
return nil, "Doesn't exist"
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.get_clipboard()
|
||
|
|
return love.system.getClipboardText()
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.set_clipboard(text)
|
||
|
|
love.system.setClipboardText(text)
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.get_time()
|
||
|
|
return love.timer.getTime()
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.sleep(s)
|
||
|
|
love.timer.sleep(s)
|
||
|
|
end
|
||
|
|
function system.exec(cmd)
|
||
|
|
-- ehhhh todo I guess
|
||
|
|
end
|
||
|
|
|
||
|
|
function system.fuzzy_match(str, ptn)
|
||
|
|
local istr = 1
|
||
|
|
local iptn = 1
|
||
|
|
local score = 0
|
||
|
|
local run = 0
|
||
|
|
while istr <= str:len() and iptn <= ptn:len() do
|
||
|
|
while str:sub(istr,istr) == ' ' do istr = istr + 1 end
|
||
|
|
while ptn:sub(iptn,iptn) == ' ' do iptn = iptn + 1 end
|
||
|
|
local cstr = str:sub(istr,istr)
|
||
|
|
local cptn = ptn:sub(iptn,iptn)
|
||
|
|
if cstr:lower() == cptn:lower() then
|
||
|
|
score = score + (run * 10)
|
||
|
|
if cstr ~= cptn then score = score - 1 end
|
||
|
|
run = run + 1
|
||
|
|
iptn = iptn + 1
|
||
|
|
else
|
||
|
|
score = score - 10
|
||
|
|
run = 0
|
||
|
|
end
|
||
|
|
istr = istr + 1
|
||
|
|
end
|
||
|
|
if iptn > ptn:len() then
|
||
|
|
return score - str:len() - istr + 1
|
||
|
|
end
|
||
|
|
end
|
||
|
|
table.unpack = unpack
|
||
|
|
|
||
|
|
|
||
|
|
PATHSEP = package.config:sub(1, 1)
|
||
|
|
ARGS = love.arg.parseGameArguments(arg)
|
||
|
|
VERSION = "1.11"
|
||
|
|
PLATFORM = "love2d"
|
||
|
|
SCALE = love.graphics.getDPIScale()
|
||
|
|
|
||
|
|
local modname = ...
|
||
|
|
local ilastdot = modname:reverse():find("%.")
|
||
|
|
EXEDIR = modname:gsub("%.", PATHSEP)
|
||
|
|
if ilastdot then
|
||
|
|
EXEDIR = EXEDIR:sub(1, (-1 - ilastdot))
|
||
|
|
else
|
||
|
|
EXEDIR = ""
|
||
|
|
end
|
||
|
|
|
||
|
|
local literoot = love.filesystem.getWorkingDirectory()
|
||
|
|
if #EXEDIR > 0 then
|
||
|
|
literoot = literoot .. PATHSEP .. EXEDIR
|
||
|
|
end
|
||
|
|
package.path = literoot .. '/data/?/init.lua;' .. package.path
|
||
|
|
package.path = literoot .. '/data/?.lua;' .. package.path
|
||
|
|
|
||
|
|
function love.run()
|
||
|
|
local core = require('core')
|
||
|
|
local style = require('core.style')
|
||
|
|
style.code_font = renderer.font.load(EXEDIR .. "/data/fonts/monospace.ttf", 15 * SCALE)
|
||
|
|
core.init()
|
||
|
|
|
||
|
|
if love.load then love.load(love.arg.parseGameArguments(arg), arg) end
|
||
|
|
|
||
|
|
-- We don't want the first frame's dt to include time taken by love.load.
|
||
|
|
if love.timer then love.timer.step() end
|
||
|
|
|
||
|
|
local dt = 0
|
||
|
|
-- Main loop time.
|
||
|
|
return function()
|
||
|
|
-- Process events.
|
||
|
|
if love.event then
|
||
|
|
love.event.pump()
|
||
|
|
for name, a,b,c,d,e,f in love.event.poll() do
|
||
|
|
if love.handlers.any then
|
||
|
|
love.handlers.any(name, a, b, c, d, e, f)
|
||
|
|
end
|
||
|
|
if name == "quit" then
|
||
|
|
if not love.quit or not love.quit() then
|
||
|
|
return a or 0
|
||
|
|
end
|
||
|
|
end
|
||
|
|
if rawget(love.handlers, name) then
|
||
|
|
love.handlers[name](a,b,c,d,e,f)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
-- Update dt, as we'll be passing it to update
|
||
|
|
if love.timer then dt = love.timer.step() end
|
||
|
|
|
||
|
|
-- Call update and draw
|
||
|
|
if love.update then love.update(dt) end -- will pass 0 if love.timer is disabled
|
||
|
|
|
||
|
|
if love.graphics and love.graphics.isActive() then
|
||
|
|
love.graphics.origin()
|
||
|
|
love.graphics.clear(love.graphics.getBackgroundColor())
|
||
|
|
|
||
|
|
if love.draw then love.draw() end
|
||
|
|
|
||
|
|
love.graphics.present()
|
||
|
|
end
|
||
|
|
|
||
|
|
if love.timer then love.timer.sleep(0.001) end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|