5
__ = require 'underscore'
5
_ = require 'underscore'
6
6
--inspect = require 'inspect'
19
elseif dir == 'y' then
22
if STRICT then error('dir '..dir) end
8
Player = Animation:extend {
9
image = 'data/player.png',
13
stand = { frames = { 1 }, fps = 1 },
14
walk = { frames = { 2, 3 }, fps = 5 },
15
jump = { frames = { 4 }, fps = 1 }
17
onNew = function (self)
19
self.maxVelocity.y = 400
21
doPhysics = function (self, dir, elapsed)
22
local vel = self.velocity
23
local acc = self.acceleration
24
local drag = self.drag
25
local minVel = self.minVelocity
26
local maxVel = self.maxVelocity
28
-- check existence of properties
31
assert(vel, 'active sprite has no velocity property')
32
assert(acc, 'active sprite has no acceleration property')
33
assert(drag, 'active sprite has no drag property')
34
assert(minVel, 'active sprite has no minVelocity property')
35
assert(maxVel, 'active sprite has no maxVelocity property')
36
assert(_.include({'x','y','rotation'}, dir), 'direction should be x, y, or rotation')
41
vel.rotation = vel.rotation or 0
45
if acc[dir] and acc[dir] ~= 0 then
46
vel[dir] = vel[dir] + acc[dir] * elapsed
50
vel[dir] = vel[dir] - drag[dir] * elapsed
51
if vel[dir] < 0 then vel[dir] = 0 end
52
elseif vel[dir] < 0 then
53
vel[dir] = vel[dir] + drag[dir] * elapsed
54
if vel[dir] > 0 then vel[dir] = 0 end
59
if minVel[dir] and vel[dir] < minVel[dir] then vel[dir] = minVel[dir] end
60
if maxVel[dir] and vel[dir] > maxVel[dir] then vel[dir] = maxVel[dir] end
62
if vel[dir] ~= 0 then self[dir] = self[dir] + vel[dir] * elapsed end
64
onStartFrame = function (self)
65
-- this is all in startframe so it happens before
66
-- physics calc at beginning of update
68
-- jumping/falling updates could go in EndFrame...
69
self.falling = self.velocity.y > 0
70
if self.falling then self.jumping = false end
71
--print(self.jumping, self.falling)
73
if (not self.onGround) and (not self.onWall) then
78
self.acceleration.y = 800
81
self.acceleration.y = 0
83
if the.keys:pressed('up') then
84
self.velocity.y = -200
86
elseif the.keys:pressed('down') then
95
if the.keys:pressed('left') then
96
self.velocity.x = -200
97
if self.onGround then self:play('walk') end
98
if self.onWall == 'right' then self.onWall = false end
99
if self.onWall == 'right' then self.onWall = false end
100
elseif the.keys:pressed('right') then
101
self.velocity.x = 200
102
if self.onGround then self:play('walk') end
103
if self.onWall == 'left' then self.onWall = false end
105
if self.onGround then self:play('stand') end
108
if the.keys:justPressed('up') and self.onGround then
109
self.velocity.y = -400
113
update = function (self, elapsed)
114
-- NOTE: this is an override, not a callback
116
self:doPhysics('x', elapsed)
118
self.onGround = false -- right before Y collision callbacks
119
self:doPhysics('y', elapsed)
121
self:collide(the.view.map)
123
Animation.update(self, elapsed)
125
onCollide = function (self, other, xOverlap, yOverlap)
126
-- seriously, why does this even fire?
127
if other == the.view.map then return end
129
--print(string.format('col s{x=%i y=%i w=%i h=%i} %s', self.x, self.y, self.width, self.height, tostring(other)))
130
--print('vel.x:'..self.velocity.x.." vel.y:"..self.velocity.y)
132
-- assumption: any other collision is with a solid map tile
133
if yOverlap > xOverlap then
136
if self.velocity.x > 0 then
137
self.onWall = 'right'
138
elseif self.velocity.x < 0 then
143
elseif xOverlap > yOverlap then
144
-- check if we've moved since collisions were generated
145
local xov, yov = self:overlap(other.x, other.y,
146
other.width, other.height)
147
if xov ~= 0 and yov ~= 0 then
148
--print('y collision')
149
if self.velocity.y > 0 then
27
164
GameView = View:extend {
29
166
self:loadLayers('data/map.lua')
30
167
self.focus = the.player
31
168
self:clampTo(self.map)
33
the.recorder = Recorder:new{mousePosInterval = 9999}
34
the.app.meta:add(the.recorder)
35
if the.app.record then
36
the.recorder:startRecording()
37
elseif the.app.playback then
38
local storage = Storage:new{filename = 'record.lua'}
40
--print(inspect(storage.data))
41
the.recorder.record = storage.data
42
the.recorder:startPlaying()
45
170
onUpdate = function (self)
46
--print('drawTook: ', the.drawTook)
48
172
--the.player:collide(self.map)
49
173
--self.map:collide(the.player)
51
-- draw = function (self, x, y)
52
-- View.draw(self, x, y)
54
-- love.graphics.print('FPS:' .. love.timer.getFPS(), 20, 20)
58
MenuScreen = View:extend {
59
--title = Text:new{text = "Test Platform Game", font = 48, wordWrap = false},
60
title = Tile:new{image = 'data/title.png', x = 0, y = 0},
61
onNew = function(self)
63
--self.title:centerAround(400, 200)
65
onUpdate = function(self, elapsed)
66
if the.keys:allJustPressed() then
67
the.app.view = GameView:new()
72
177
the.app = App:new {
74
178
onRun = function (self)
75
self.view = MenuScreen:new()
77
self.console:watch('onGround', 'the.player.onGround')
78
self.console:watch('onWall', 'the.player.onWall')
79
self.console:watch('updateTook', 'the.updateTook')
80
self.console:watch('drawTook', 'the.drawTook')
81
self.console:watch('recorder state', 'the.recorder.state')
84
--the.profiler = newProfiler('time', 2000)
85
--the.profiler = newProfiler()
86
--the.profiler:start()
179
self.view = GameView:new()
180
--print(inspect(_(the.app):keys()))
181
self.console:watch('onGround', 'the.player.onGround')
182
self.console:watch('onWall', 'the.player.onWall')
88
184
onUpdate = function (self, dt)
89
if the.keys:justPressed('escape') then
92
local outfile = io.open( "profile.txt", "w+" )
93
the.profiler:report( outfile )
97
if self.record and the.recorder then
98
if not love.filesystem.remove('record.lua') then
99
print('could not remove record.lua')
101
local storage = Storage:new{
102
data = the.recorder.record,
103
filename = 'record.lua'
106
--print(inspect(the.recorder.record))
185
if the.keys:justPressed('escape') and
186
not self.console.visible then
112
update = function (self, dt)
113
the.updateStart = love.timer.getMicroTime()
115
if the.updateStart then
116
the.updateTook = love.timer.getMicroTime() - the.updateStart
121
function love.load (arg)
122
opts = getopt(arg, '')
124
the.app.playback = true
125
the.app.record = false
126
elseif opts['r'] then
127
the.app.record = true
b'\\ No newline at end of file'
b'\\ No newline at end of file'