epervier-old/gamecore/modules/world/baseworld.lua

247 lines
6 KiB
Lua
Raw Normal View History

-- baseworld.lua :: the base world object, that contain just a fast implementation
-- of a 2D world. It doesn't support collision and stuff.
--[[
Copyright © 2019 Kazhnuz
Permission is hereby granted, free of charge, to any person obtaining a copy of
this software and associated documentation files (the "Software"), to deal in
the Software without restriction, including without limitation the rights to
use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of
the Software, and to permit persons to whom the Software is furnished to do so,
subject to the following conditions:
The above copyright notice and this permission notice shall be included in all
copies or substantial portions of the Software.
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS
FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR
COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
]]
2019-04-07 14:03:44 +02:00
local cwd = (...):gsub('%.baseworld$', '') .. "."
2019-04-01 08:08:54 +02:00
local BaseWorld = Object:extend()
local Sti = require(cwd .. "libs.sti")
local CameraSystem = require(cwd .. "camera")
2019-04-07 14:03:44 +02:00
-- INIT FUNCTIONS
-- All functions to init the world and the map
2019-04-07 14:03:44 +02:00
function BaseWorld:new(scene, actorlist, mapfile)
2019-04-01 08:08:54 +02:00
self.scene = scene
2019-04-07 17:15:27 +02:00
self.cameras = CameraSystem(self)
2019-04-07 17:15:27 +02:00
self:initPlayers()
self:setActorList(actorlist)
2019-04-07 14:03:44 +02:00
self:setMap(mapfile)
self.actors = {}
2019-04-01 08:08:54 +02:00
end
function BaseWorld:setActorList(actorlist)
if actorlist == nil then
error("FATAL: You must set an actorlist to your world")
else
self.obj = require(actorlist)
end
end
2019-04-07 14:03:44 +02:00
function BaseWorld:setMap(mapfile)
if mapfile == nil then
self.haveMap = false
self.haveBackgroundColor = false
self.backcolor = {128, 128, 128}
else
self.haveMap = true
self.map = Sti(mapfile)
self.haveBackgroundColor = true
self.backcolor = self.map.backgroundcolor or {128, 128, 128}
end
end
-- ACTOR MANAGEMENT FUNCTIONS
-- Basic function to handle actors
function BaseWorld:newActor(name, x, y)
self.obj.index[name](self, x, y)
end
function BaseWorld:registerActor(actor)
table.insert(self.actors, actor)
2019-04-01 08:08:54 +02:00
end
2019-04-07 13:36:21 +02:00
function BaseWorld:removeActor(actor)
for i,v in ipairs(self.actors) do
if v == actor then
table.remove(self.actors, i)
end
end
end
2019-04-07 13:36:21 +02:00
function BaseWorld:moveActor(actor, x, y, filter)
-- as the baseworld have no collision function, we return empty collision
-- datas, but from the same type than bump2D will return
return x, y, {}, 0
end
2019-04-07 13:36:21 +02:00
function BaseWorld:queryRect(x, y, w, h)
local query = {}
local x2, y2 = x + w, y + h
for i,v in ipairs(self.actors) do
if (v.x >= x) and (v.x + v.w >= x1) and
(v.y >= y) and (v.y + v.h >= y1) then
table.insert(query, v)
end
end
return v
end
function BaseWorld:countActors()
return #self.actors
end
2019-04-07 13:36:21 +02:00
function BaseWorld:getActors()
return self.actors
end
2019-04-07 17:15:27 +02:00
-- PLAYER MANAGEMENT FUNCTIONS
-- Basic function to handle player actors
function BaseWorld:initPlayers()
self.players = {}
end
function BaseWorld:addPlayer(actor, sourceid)
local player = {}
player.actor = actor
player.sourceid = sourceid or 1
table.insert(self.players, player)
end
function BaseWorld:sendInputToPlayers(actor)
for i,v in ipairs(self.players) do
--TODO: make the player get from a selected source inputs
local keys = self.scene.sources[v.sourceid].keys
v.actor:getInput(keys)
2019-04-07 17:15:27 +02:00
end
end
function BaseWorld:removePlayer(actor)
for i,v in ipairs(self.players) do
if (v.actor == actor) then
table.remove(self.players, i)
end
end
end
2019-04-07 14:03:44 +02:00
-- MAP FUNCTIONS
-- All map wrappers
function BaseWorld:getDimensions()
if self.haveMap then
return self.map.width * self.map.tilewidth,
self.map.height * self.map.tileheight
else
return core.screen:getDimensions()
end
end
function BaseWorld:setBackgroundColor(r, g, b)
self.backcolor = {r, g, b}
self.haveBackgroundColor = true
end
function BaseWorld:removeBackgroundColor()
self.haveBackgroundColor = false
end
function BaseWorld:getBackgroundColor()
return self.backcolor[1]/256, self.backcolor[2]/256, self.backcolor[3]/256
end
-- UPDATE FUNCTIONS
-- All update functions
2019-04-01 08:08:54 +02:00
function BaseWorld:update(dt)
2019-04-07 14:03:44 +02:00
self:updateMap(dt)
2019-04-07 17:15:27 +02:00
self:sendInputToPlayers(dt)
self:updateActors(dt)
end
function BaseWorld:updateActors(dt)
local actors = self:getActors()
for i,v in ipairs(actors) do
2019-04-01 08:08:54 +02:00
v:update(dt)
end
end
2019-04-07 14:03:44 +02:00
function BaseWorld:updateMap(dt)
if self.haveMap then
self.map:update(dt)
end
end
-- DRAW FUNCTIONS
-- All function to draw the map, world and actors
2019-04-01 08:08:54 +02:00
function BaseWorld:draw(dt)
2019-04-07 14:03:44 +02:00
self:drawBackgroundColor()
local camNumber = self.cameras:getViewNumber()
if (camNumber == 0) then
self:drawMap()
self:drawActors()
else
for i=1, camNumber do
self:drawMap(i)
self:drawActors(i)
end
end
end
function BaseWorld:drawActors(id)
self.cameras:attachView(id)
local actors = self:getActors()
for i,v in ipairs(actors) do
v:draw()
2019-04-01 08:08:54 +02:00
end
self.cameras:detachView(id)
2019-04-01 08:08:54 +02:00
end
function BaseWorld:drawMap(id)
local tx, ty, scale = 0, 0, 1
if id ~= nil then
-- Du à la manière dont fonctionne STI, on est obligé de récupérer les info
-- de position de camera pour afficher la carte par rapport à ces infos
tx, ty = self.cameras:getViewCoordinate(id)
scale = self.cameras:getViewScale(id) or 1
tx = math.floor(tx)
ty = math.floor(ty)
end
2019-04-07 14:03:44 +02:00
if self.haveMap then
self.map:draw(-tx, -ty, scale, scale)
2019-04-07 14:03:44 +02:00
end
end
function BaseWorld:drawBackgroundColor()
if self.haveBackgroundColor then
local r, g, b = self.backcolor[1], self.backcolor[2], self.backcolor[3]
love.graphics.setColor(r/256, g/256, b/256)
love.graphics.rectangle("fill", 0, 0, 480, 272)
utils.graphics.resetColor()
end
end
2019-04-01 08:08:54 +02:00
return BaseWorld