Files
chuchu/game.lua
2021-05-13 21:13:17 +02:00

184 lines
6.3 KiB
Lua

-- Chuchu by Makaron
-- The main game screen of Chuchu
Boipus = require('deps.boipushy')
Physics = require('deps.physics')
-- my own libs
crates = require('crate')
utils = require('utils')
GRAVITY = 512
PLAN_SIZE = {
marginX = 120,
marginY = 120,
w = 512,
h = 512
}
local player = {
maxSpeed = {
x = 100,
y = 100
},
magSpeed = 2
}
local movingStuff
local movingStuffHeight
local movingSutffWidth
local magnet = {
collider = nil,
size = {
width = nil,
height = nil
}
}
local stuffToMagnetJoint
local joint = {
min = 50,
max = 250
}
local velocity = {0, 0}
local current = { }
local Chu = {}
function Chu.new(x, y, debug)
obj = {}
obj.x = x
obj.y = y
if debug == nil then debug = false end
obj.debug = debug
world = Physics(0, GRAVITY)
world:addClass('Player')
world:addClass('GamePlan')
world:addClass('Crate')
world:addClass('Pier')
world:addClass('Crane')
obj.gamePlan = world:addChain(true, {
x - PLAN_SIZE.marginX, y - PLAN_SIZE.marginY,
x + PLAN_SIZE.w + PLAN_SIZE.marginX, y - PLAN_SIZE.marginY,
x + PLAN_SIZE.w + PLAN_SIZE.marginX, y + PLAN_SIZE.h + PLAN_SIZE.marginY,
x - PLAN_SIZE.marginX, y + PLAN_SIZE.h + PLAN_SIZE.marginY
}):setClass('GamePlan')
local pierWidth, pierHeight = assets.sprites.level.pier:getWidth(), assets.sprites.level.pier:getHeight()
obj.pier = utils.spawnStaticRectangleBySize(world, x - PLAN_SIZE.marginX, y + PLAN_SIZE.h - pierHeight, pierWidth + PLAN_SIZE.marginX, pierHeight)
local craneWidth, craneHeight = assets.sprites.crane:getWidth(), assets.sprites.crane:getHeight()
movingStuffWidth, movingStuffHeight = assets.sprites.movingstuff:getWidth(), assets.sprites.movingstuff:getHeight()
obj.crane = {
top = utils.spawnStaticRectangleBySize(world, x + 36, y + 80 + movingStuffHeight - 13, craneWidth, 6),
left = utils.spawnStaticRectangleBySize(world, x + 36, y + 80 + movingStuffHeight - 12 + 6, 6, craneHeight - 32),
right = utils.spawnStaticRectangleBySize(world, x + 30 + craneWidth, y + 80 + movingStuffHeight - 12 + 6, 6, craneHeight - 32),
bottom = utils.spawnStaticRectangleBySize(world, x + 36, y + 74 + craneHeight, craneWidth, 6)
}
local center = utils.getCenterByXY(x + 36 + (craneWidth/2) - (movingStuffWidth/2), y + craneHeight + 80 - movingStuffHeight - 6, movingStuffWidth, movingStuffHeight)
movingStuff = world:addRectangle(center.x, center.y, movingStuffWidth, movingStuffHeight):setClass('Player')
magnet.size.width, magnet.size.height = assets.sprites.magnet:getWidth(), assets.sprites.magnet:getHeight()
local centerMag = utils.getCenterByXY(x + 36 + (craneWidth/2) - (magnet.size.width/2), y + craneHeight + 80 + 50, magnet.size.width, magnet.size.height)
magnet.collider = world:addRectangle(centerMag.x, centerMag.y, magnet.size.width, magnet.size.height):setClass('Player')
--magnet.collider:setRestitution(0)
stuffToMagnetJoint = world:addJoint('distance', movingStuff, magnet.collider, center.x, center.y, centerMag.x, centerMag.y)
input = Boipus()
-- Controls
-- Keyboard and mouse
input:bind(love.keyboard.getKeyFromScancode('w'), 'moveUp')
input:bind(love.keyboard.getKeyFromScancode('a'), 'moveLeft')
input:bind(love.keyboard.getKeyFromScancode('d'), 'moveRight')
input:bind(love.keyboard.getKeyFromScancode('s'), 'moveDown')
-- input:bind(love.keyboard.getKeyFromScancode('space'), 'switch')
input:bind(love.keyboard.getKeyFromScancode('lshift'), 'detach')
crates:init(world, magnet)
crates:spawn(x + 120, y + 400, 'small')
crates:spawn(x + 150, y + 400, 'medium')
return setmetatable(obj, {
__index = Chu
})
end
function Chu:update(dt)
world:update(dt)
crates:update(dt)
if input:pressed('detach') then
velocity = {0, 0}
local attached = crates:getAttached()
for key in pairs(attached) do
crates:detach(key)
end
elseif input:down('moveUp') or input:down('moveDown') or input:down('moveLeft') or input:down('moveRight') then
local length = stuffToMagnetJoint:getLength()
if input:down('moveUp') then
length = length - player.magSpeed
if length < joint.min then length = joint.min end
stuffToMagnetJoint:setLength(length)
elseif input:down('moveDown') then
length = length + player.magSpeed
if length > joint.max then length = joint.max end
stuffToMagnetJoint:setLength(length)
end
if input:down('moveLeft') then velocity[1] = -player.maxSpeed.x
elseif input:down('moveRight') then velocity[1] = player.maxSpeed.x
else velocity[1] = 0 end
else
velocity = {0, 0}
end
movingStuff:setLinearVelocity(velocity[1], velocity[2])
end
function Chu:draw()
love.graphics.setColor(255, 255, 255, 1)
love.graphics.draw(assets.sprites.level.background, self.x, self.y)
love.graphics.draw(assets.sprites.level.clouds, self.x, self.y + 32)
love.graphics.draw(assets.sprites.level.clouds, self.x, self.y, 0, -1, 1, assets.sprites.level.clouds:getWidth())
love.graphics.draw(assets.sprites.cranevert, self.x + 60, self.y + PLAN_SIZE.h - 456)
love.graphics.draw(assets.sprites.cranevert, self.x + PLAN_SIZE.w - 112, self.y + PLAN_SIZE.h - 456)
local stuffPosX, stuffPosY = movingStuff:getPosition()
local otherPosX, otherPosY = magnet.collider:getPosition()
love.graphics.setColor(0, 0, 0, 1)
love.graphics.line(stuffPosX, stuffPosY, otherPosX, otherPosY)
love.graphics.setColor(255, 255, 255, 1)
local stuffPos = utils.getXYByCenter(stuffPosX, stuffPosY, movingStuffWidth, movingStuffHeight)
love.graphics.draw(assets.sprites.movingstuff, stuffPos.x, stuffPos.y)
love.graphics.draw(assets.sprites.crane, self.x + 36, self.y + 80)
love.graphics.draw(assets.sprites.wheel, stuffPos.x + 9, stuffPos.y + movingStuffHeight - 9)
love.graphics.draw(assets.sprites.wheel, stuffPos.x + movingStuffWidth - 23, stuffPos.y + movingStuffHeight - 9)
love.graphics.draw(assets.sprites.level.pier, self.x, self.y + PLAN_SIZE.h - 128)
otherPosX, otherPosY = magnet.collider:getPosition()
love.graphics.draw(assets.sprites.magnet, otherPosX, otherPosY, magnet.collider:getAngle(), 1, 1, magnet.size.width/2, magnet.size.height/2)
crates:draw()
world:draw()
if self.debug then
love.graphics.setColor(255, 0, 0, .5)
love.graphics.rectangle('line', self.x, self.y, PLAN_SIZE.w, PLAN_SIZE.h)
love.graphics.print(stuffToMagnetJoint:getLength(), 10, 10)
end
end
return Chu