6
Player = Animation:extend {
7
9
image = 'data/player.png',
11
stand = { frames = { 1 }, fps = 1 },
12
walk = { frames = { 2, 3 }, fps = 5 },
13
jump = { frames = { 4 }, fps = 1 }
15
10
onNew = function (self)
16
11
self.velocity.y = 0
17
self.maxVelocity.y = 400
19
onStartFrame = function (self)
20
-- this is all in startframe so it happens before
21
-- physics calc at beginning of update
24
self.acceleration.y = 800
26
if the.keys:pressed('left') then
27
self.velocity.x = -200
29
elseif the.keys:pressed('right') then
36
if the.keys:justPressed('up') then
37
self.velocity.y = -400
40
onCollide = function (self, other, xOverlap, yOverlap)
41
-- seriously, why does this even fire?
42
if other == the.view.map then return end
44
--print(string.format('col s{x=%i y=%i w=%i h=%i} %s', self.x, self.y, self.width, self.height, tostring(other)))
45
--print('vel.x:'..self.velocity.x.." vel.y:"..self.velocity.y)
47
-- assumption: any other collision is with a solid map tile
48
if yOverlap > xOverlap then
50
elseif xOverlap > yOverlap then
51
-- check if we've moved since collisions were generated
52
local xov, yov = self:overlap(other.x, other.y,
53
other.width, other.height)
54
if xov ~= 0 and yov ~= 0 then
13
onUpdate = function (self)
16
if self.velocity.y >= TERM_VEL then
17
self.velocity.y = TERM_VEL
18
self.acceleration.y = 0
20
self.acceleration.y = 800
23
if the.keys:pressed('left') then
24
self.velocity.x = -200
25
elseif the.keys:pressed('right') then
29
if the.keys:justPressed('up') then
30
self.velocity.y = -400
65
36
GameView = View:extend {
68
39
self.focus = the.player
69
40
self:clampTo(self.map)
71
onUpdate = function (self)
73
the.player:collide(self.map)
74
--self.map:collide(the.player)
43
onEndFrame = function (self, dt)
44
self.map:subdisplace(the.player)
78
48
the.app = App:new {
80
50
self.view = GameView:new()
82
52
onUpdate = function (self, dt)
83
-- apparently I can do this w/ C-A-q if DEBUG is on
84
-- if the.keys:justPressed('escape') then
53
if the.keys:justPressed('escape') then
b'\\ No newline at end of file'