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