5
_ = require 'underscore'
5
__ = require 'underscore'
6
6
--inspect = require 'inspect'
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 then
78
self.acceleration.y = 800
80
if the.keys:pressed('left') then
81
self.velocity.x = -200
82
if self.onGround then self:play('walk') end
83
elseif the.keys:pressed('right') then
85
if self.onGround then self:play('walk') end
87
if self.onGround then self:play('stand') end
90
if the.keys:justPressed('up') and self.onGround then
91
self.velocity.y = -400
95
update = function (self, elapsed)
96
-- NOTE: this is an override, not a callback
98
self:doPhysics('x', elapsed)
100
self.onGround = false -- right before Y collision callbacks
101
self:doPhysics('y', elapsed)
103
self:collide(the.view.map)
105
onCollide = function (self, other, xOverlap, yOverlap)
106
-- seriously, why does this even fire?
107
if other == the.view.map then return end
109
--print(string.format('col s{x=%i y=%i w=%i h=%i} %s', self.x, self.y, self.width, self.height, tostring(other)))
110
--print('vel.x:'..self.velocity.x.." vel.y:"..self.velocity.y)
112
-- assumption: any other collision is with a solid map tile
113
if yOverlap > xOverlap then
116
if self.velocity.x > 0 then
117
self.onWall = 'right'
118
elseif self.velocity.x < 0 then
123
elseif xOverlap > yOverlap then
124
-- check if we've moved since collisions were generated
125
local xov, yov = self:overlap(other.x, other.y,
126
other.width, other.height)
127
if xov ~= 0 and yov ~= 0 then
128
--print('y collision')
129
if self.velocity.y > 0 then
19
elseif dir == 'y' then
22
if STRICT then error('dir '..dir) end
144
27
GameView = View:extend {
146
29
self:loadLayers('data/map.lua')
147
30
self.focus = the.player
148
31
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()
150
45
onUpdate = function (self)
46
--print('drawTook: ', the.drawTook)
152
48
--the.player:collide(self.map)
153
49
--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)
157
58
the.app = App:new {
158
60
onRun = function (self)
159
61
self.view = GameView:new()
160
--print(inspect(_(the.app):keys()))
161
self.console:watch('onGround', 'the.player.onGround')
162
self.console:watch('onWall', 'the.player.onWall')
63
self.console:watch('onGround', 'the.player.onGround')
64
self.console:watch('onWall', 'the.player.onWall')
65
self.console:watch('updateTook', 'the.updateTook')
66
self.console:watch('drawTook', 'the.drawTook')
67
self.console:watch('recorder state', 'the.recorder.state')
70
--the.profiler = newProfiler('time', 2000)
71
--the.profiler = newProfiler()
72
--the.profiler:start()
164
74
onUpdate = function (self, dt)
165
if the.keys:justPressed('escape') and
166
not self.console.visible then
75
if the.keys:justPressed('escape') then
78
local outfile = io.open( "profile.txt", "w+" )
79
the.profiler:report( outfile )
84
if not love.filesystem.remove('record.lua') then
85
print('could not remove record.lua')
87
local storage = Storage:new{
88
data = the.recorder.record,
89
filename = 'record.lua'
92
--print(inspect(the.recorder.record))
b'\\ No newline at end of file'
98
update = function (self, dt)
99
the.updateStart = love.timer.getMicroTime()
101
if the.updateStart then
102
the.updateTook = love.timer.getMicroTime() - the.updateStart
107
function love.load (arg)
108
opts = getopt(arg, '')
110
the.app.playback = true
111
the.app.record = false
112
elseif opts['r'] then
113
the.app.record = true
b'\\ No newline at end of file'