To get this branch, use:
bzr branch
http://9ix.org/bzr/zoeplat
« back to all changes in this revision
Viewing changes to main.lua
- browse files at revision 11
- compare with another revision
- download diff
- download tarball
- view history from revision 11
- Committer: Josh C
- Date: 2013-03-09 04:58:45 UTC
- Revision ID: josh@9ix.org-20130309045845-wdcov53ghv2h6iwf
apply acceleration to velocity, THEN apply velocity to position (then do
collision). important for detecting correct velocity
collision). important for detecting correct velocity
- files removed:
- underscore.lua
- files modified:
- data/player.png
added
removed
main.lua
2
2
DEBUG = true
3
3
4
4
require 'zoetrope'
5
__ = require 'underscore'
6
--inspect = require 'inspect'
7
5
8
6
Player = Animation:extend {
9
7
image = 'data/player.png',
12
10
sequences = {
13
11
stand = { frames = { 1 }, fps = 1 },
14
12
walk = { frames = { 2, 3 }, fps = 5 },
15
jump = { frames = { 4 }, fps = 1 },
16
climbLeft = { frames = { 5, 6 }, fps = 5 },
17
climbRight = { frames = { 7, 8 }, fps = 5 }
13
jump = { frames = { 4 }, fps = 1 }
18
14
},
19
collisions = {},
20
onWall = false,
21
leftWallAt = 0,
22
15
onNew = function (self)
23
16
self.velocity.y = 0
24
17
self.maxVelocity.y = 400
25
18
end,
26
doPhysics = function (self, dir, elapsed)
27
local vel = self.velocity
28
local acc = self.acceleration
29
local drag = self.drag
30
local minVel = self.minVelocity
31
local maxVel = self.maxVelocity
32
33
-- check existence of properties
34
35
if STRICT then
36
assert(vel, 'active sprite has no velocity property')
37
assert(acc, 'active sprite has no acceleration property')
38
assert(drag, 'active sprite has no drag property')
39
assert(minVel, 'active sprite has no minVelocity property')
40
assert(maxVel, 'active sprite has no maxVelocity property')
41
assert(__.include({'x','y','rotation'}, dir), 'direction should be x, y, or rotation')
42
end
43
44
vel.x = vel.x or 0
45
vel.y = vel.y or 0
46
vel.rotation = vel.rotation or 0
47
48
-- physics
49
50
if acc[dir] and acc[dir] ~= 0 then
51
vel[dir] = vel[dir] + acc[dir] * elapsed
52
else
53
if drag[dir] then
54
if vel[dir] > 0 then
55
vel[dir] = vel[dir] - drag[dir] * elapsed
56
if vel[dir] < 0 then vel[dir] = 0 end
57
elseif vel[dir] < 0 then
58
vel[dir] = vel[dir] + drag[dir] * elapsed
59
if vel[dir] > 0 then vel[dir] = 0 end
60
end
61
end
62
end
63
64
if minVel[dir] and vel[dir] < minVel[dir] then vel[dir] = minVel[dir] end
65
if maxVel[dir] and vel[dir] > maxVel[dir] then vel[dir] = maxVel[dir] end
66
67
if vel[dir] ~= 0 then self[dir] = self[dir] + vel[dir] * elapsed end
68
end,
69
19
onStartFrame = function (self)
70
20
-- this is all in startframe so it happens before
71
21
-- physics calc at beginning of update
72
22
73
-- jumping/falling updates could go in EndFrame...
74
self.falling = self.velocity.y > 0
75
if self.falling then self.jumping = false end
76
--print(self.jumping, self.falling)
77
78
if (not self.onGround) and (not self.onWall) then
79
self:play('jump')
80
end
81
23
self.velocity.x = 0
82
24
self.acceleration.y = 800
83
25
84
if self.onWall then
85
self.acceleration.y = 0
86
87
if self.onWall == 'right' then
88
self:play('climbRight')
89
elseif self.onWall == 'left' then
90
self:play('climbLeft')
91
end
92
93
if the.keys:pressed('up') then
94
self.velocity.y = -200
95
elseif the.keys:pressed('down') then
96
self.velocity.y = 200
97
else
98
self.velocity.y = 0
99
self:freeze(self.sequences[self.currentName].frames[1])
100
end
101
end
102
103
26
if the.keys:pressed('left') then
104
27
self.velocity.x = -200
105
if self.onGround then self:play('walk') end
106
if self.onWall == 'right' then
107
self.onWall = false
108
self.leftWallAt = love.timer.getTime()
109
end
28
self:play('walk')
110
29
elseif the.keys:pressed('right') then
111
30
self.velocity.x = 200
112
if self.onGround then self:play('walk') end
113
if self.onWall == 'left' then
114
self.onWall = false
115
self.leftWallAt = love.timer.getTime()
116
end
31
self:play('walk')
117
32
else
118
if not self.onWall then
119
if self.onGround then self:play('stand') end
120
self.velocity.x = 0
121
end
33
self:play('stand')
122
34
end
123
35
124
if the.keys:justPressed('up') and
125
(self.onGround or
126
(love.timer.getTime() - self.leftWallAt < .1) ) then
36
if the.keys:justPressed('up') then
127
37
self.velocity.y = -400
128
self.jumping = true
129
38
end
130
39
end,
131
update = function (self, elapsed)
132
-- NOTE: this is an override, not a callback
133
134
self:doPhysics('x', elapsed)
135
self:collide(the.view.map)
136
137
-- handle X collisions
138
self.onWall = false
139
for _, col in ipairs(self.collisions) do
140
col.other:displaceDir(self, 'x')
141
if self.velocity.x > 0 then
142
self.onWall = 'right'
143
elseif self.velocity.x < 0 then
144
self.onWall = 'left'
145
else
146
print 'x ??'
147
end
148
end
149
150
self.onGround = false -- right before Y collision callbacks
151
self:doPhysics('y', elapsed)
152
self:collide(the.view.map)
153
154
-- handle Y collisions
155
for _, col in ipairs(self.collisions) do
156
if self.velocity.y > 0 then
157
self.onGround = true
158
end
159
160
col.other:displaceDir(self, 'y')
161
self.velocity.y = 0
162
self.jumping = false
163
end
164
165
Animation.update(self, elapsed)
166
end,
167
collide = function (self, ...)
168
self.collisions = {}
169
Animation.collide(self, ...)
170
-- I could return a true/false value here if I wanted to...
171
end,
172
40
onCollide = function (self, other, xOverlap, yOverlap)
41
-- seriously, why does this even fire?
173
42
if other == the.view.map then return end
174
43
175
table.insert(self.collisions, {other = other,
176
xOverlap = xOverlap,
177
yOverlap = yOverlap })
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)
46
47
-- assumption: any other collision is with a solid map tile
48
if yOverlap > xOverlap then
49
other:displace(self)
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
55
self.velocity.y = 0
56
other:displace(self)
57
end
58
else
59
print('??')
60
end
61
178
62
end
179
63
}
180
64
181
function Sprite:displaceDir(other, dir)
182
if not self.solid or self == other or not other.solid then return end
183
if STRICT then assert(other:instanceOf(Sprite), 'asked to displace a non-sprite') end
184
185
if other.sprites then
186
-- handle groups
187
188
for _, spr in pairs(other.sprites) do
189
self:displace(spr, dir)
190
end
191
else
192
-- handle sprites
193
local dim
194
if dir == 'x' then
195
dim = 'width'
196
elseif dir == 'y' then
197
dim = 'height'
198
else
199
print 'dir ??'
200
end
201
202
local negMove = (other[dir] - self[dir]) + other[dim]
203
local posMove = (self[dir] + self[dim]) - other[dir]
204
205
-- TODO: re-add hinting?
206
if negMove < posMove then
207
chg = - negMove
208
else
209
chg = posMove
210
end
211
end
212
213
other[dir] = other[dir] + chg
214
end
215
216
65
GameView = View:extend {
217
66
onNew = function (self)
218
67
self:loadLayers('data/map.lua')
222
70
end,
223
71
onUpdate = function (self)
224
72
--print('tick')
225
--the.player:collide(self.map)
73
the.player:collide(self.map)
226
74
--self.map:collide(the.player)
227
75
end
228
76
}
230
78
the.app = App:new {
231
79
onRun = function (self)
232
80
self.view = GameView:new()
233
self.console:watch('onGround', 'the.player.onGround')
234
self.console:watch('onWall', 'the.player.onWall')
235
81
end,
236
82
onUpdate = function (self, dt)
237
if the.keys:justPressed('escape') and
238
not self.console.visible then
239
self.quit()
240
end
83
-- apparently I can do this w/ C-A-q if DEBUG is on
84
-- if the.keys:justPressed('escape') then
85
-- love.event.quit()
86
-- end
241
87
end
242
88
}
b'\\ No newline at end of file'
Loggerhead is a web-based interface for Breezy
Version: 2.0.1