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 39
- compare with another revision
- download diff
- download tarball
- view history from revision 39
- Committer: Josh C
- Date: 2013-04-19 01:35:57 UTC
- Revision ID: josh@9ix.org-20130419013557-jbmje9kqsagj0x3j
title screen
- files added:
- animation.lua
- files modified:
- main.lua
added
removed
main.lua
5
5
__ = require 'underscore'
6
6
--inspect = require 'inspect'
7
7
require 'pepperprof'
8
require 'getopt_alt'
9
10
require 'sprite'
11
require 'animation'
12
require 'player'
13
require 'balloon'
8
14
9
15
util = {
10
16
dim = function(dir)
13
19
elseif dir == 'y' then
14
20
return 'height'
15
21
else
16
print 'dir ??'
17
end
18
end
19
}
20
21
Player = Animation:extend {
22
image = 'data/player.png',
23
height = 32,
24
width = 32,
25
sequences = {
26
stand = { frames = { 1 }, fps = 1 },
27
walk = { frames = { 2, 3 }, fps = 5 },
28
jump = { frames = { 4 }, fps = 1 },
29
climbLeft = { frames = { 5, 6 }, fps = 5 },
30
climbRight = { frames = { 7, 8 }, fps = 5 }
31
},
32
collisions = {},
33
onWall = false,
34
leftWallAt = 0,
35
onNew = function (self)
36
self.velocity.y = 0
37
self.maxVelocity.y = 400
38
end,
39
doPhysics = function (self, dir, elapsed)
40
local vel = self.velocity
41
local acc = self.acceleration
42
local drag = self.drag
43
local minVel = self.minVelocity
44
local maxVel = self.maxVelocity
45
46
-- check existence of properties
47
48
if STRICT then
49
assert(vel, 'active sprite has no velocity property')
50
assert(acc, 'active sprite has no acceleration property')
51
assert(drag, 'active sprite has no drag property')
52
assert(minVel, 'active sprite has no minVelocity property')
53
assert(maxVel, 'active sprite has no maxVelocity property')
54
assert(__.include({'x','y','rotation'}, dir), 'direction should be x, y, or rotation')
55
end
56
57
vel.x = vel.x or 0
58
vel.y = vel.y or 0
59
vel.rotation = vel.rotation or 0
60
61
-- physics
62
63
if acc[dir] and acc[dir] ~= 0 then
64
vel[dir] = vel[dir] + acc[dir] * elapsed
65
else
66
if drag[dir] then
67
if vel[dir] > 0 then
68
vel[dir] = vel[dir] - drag[dir] * elapsed
69
if vel[dir] < 0 then vel[dir] = 0 end
70
elseif vel[dir] < 0 then
71
vel[dir] = vel[dir] + drag[dir] * elapsed
72
if vel[dir] > 0 then vel[dir] = 0 end
73
end
74
end
75
end
76
77
if minVel[dir] and vel[dir] < minVel[dir] then vel[dir] = minVel[dir] end
78
if maxVel[dir] and vel[dir] > maxVel[dir] then vel[dir] = maxVel[dir] end
79
80
-- ugly hack for falling through floor on really slow frames
81
if math.abs(vel[dir] * elapsed) > 32 then
82
print('skip')
83
return
84
end
85
86
if vel[dir] ~= 0 then self[dir] = self[dir] + vel[dir] * elapsed end
87
88
if self[dir] < 0 then self[dir] = 0 end
89
local edge = the.view.map[util.dim(dir)] -
90
the.player[util.dim(dir)]
91
-- TODO: take map position into account
92
if self[dir] > edge then self[dir] = edge end
93
end,
94
onStartFrame = function (self)
95
-- this is all in startframe so it happens before
96
-- physics calc at beginning of update
97
98
-- jumping/falling updates could go in EndFrame...
99
self.falling = self.velocity.y > 0
100
if self.falling then self.jumping = false end
101
--print(self.jumping, self.falling)
102
103
if (not self.onGround) and (not self.onWall) then
104
self:play('jump')
105
end
106
107
self.acceleration.y = 800
108
109
if self.onWall then
110
self.acceleration.y = 0
111
112
if self.onWall == 'right' then
113
self:play('climbRight')
114
elseif self.onWall == 'left' then
115
self:play('climbLeft')
116
end
117
118
if the.keys:pressed('up') then
119
self.velocity.y = -200
120
elseif the.keys:pressed('down') then
121
self.velocity.y = 200
122
else
123
self.velocity.y = 0
124
self:freeze(self.sequences[self.currentName].frames[1])
125
end
126
end
127
128
if the.keys:pressed('left') then
129
self.velocity.x = -200
130
if self.onGround then self:play('walk') end
131
if self.onWall == 'right' then
132
self.onWall = false
133
self.leftWallAt = love.timer.getTime()
134
end
135
elseif the.keys:pressed('right') then
136
self.velocity.x = 200
137
if self.onGround then self:play('walk') end
138
if self.onWall == 'left' then
139
self.onWall = false
140
self.leftWallAt = love.timer.getTime()
141
end
142
else
143
if not self.onWall then
144
if self.onGround then self:play('stand') end
145
self.velocity.x = 0
146
end
147
end
148
149
if the.keys:justPressed('up') and
150
(self.onGround or the.console.visible or
151
(love.timer.getTime() - self.leftWallAt < .1) ) then
152
self.velocity.y = -400
153
self.jumping = true
154
end
155
end,
156
update = function (self, elapsed)
157
-- NOTE: this is an override, not a callback
158
159
self:doPhysics('x', elapsed)
160
self:collide(the.view.map)
161
162
-- handle X collisions
163
self.onWall = false
164
for _, col in ipairs(self.collisions) do
165
col.other:displaceDir(self, 'x')
166
if self.velocity.x > 0 then
167
self.onWall = 'right'
168
elseif self.velocity.x < 0 then
169
self.onWall = 'left'
170
else
171
print 'x ??'
172
end
173
end
174
175
self.onGround = false -- right before Y collision callbacks
176
self:doPhysics('y', elapsed)
177
self:collide(the.view.map)
178
179
-- handle Y collisions
180
for _, col in ipairs(self.collisions) do
181
if self.velocity.y > 0 then
182
self.onGround = true
183
end
184
185
col.other:displaceDir(self, 'y')
186
self.velocity.y = 0
187
self.jumping = false
188
end
189
190
Animation.update(self, elapsed)
191
end,
192
collide = function (self, ...)
193
self.collisions = {}
194
Animation.collide(self, ...)
195
-- I could return a true/false value here if I wanted to...
196
end,
197
onCollide = function (self, other, xOverlap, yOverlap)
198
if other == the.view.map then return end
199
200
table.insert(self.collisions, {other = other,
201
xOverlap = xOverlap,
202
yOverlap = yOverlap })
203
end
204
}
205
206
function Sprite:displaceDir(other, dir)
207
if not self.solid or self == other or not other.solid then return end
208
if STRICT then assert(other:instanceOf(Sprite), 'asked to displace a non-sprite') end
209
210
if other.sprites then
211
-- handle groups
212
213
for _, spr in pairs(other.sprites) do
214
self:displace(spr, dir)
215
end
216
else
217
-- handle sprites
218
local dim = util.dim(dir)
219
220
local negMove = (other[dir] - self[dir]) + other[dim]
221
local posMove = (self[dir] + self[dim]) - other[dir]
222
223
-- TODO: re-add hinting?
224
if negMove < posMove then
225
chg = - negMove
226
else
227
chg = posMove
228
end
229
end
230
231
other[dir] = other[dir] + chg
232
end
233
234
function Sprite:update (elapsed)
235
if self.onUpdate then self:onUpdate(elapsed) end
236
end
22
if STRICT then error('dir '..dir) end
23
end
24
end
25
}
237
26
238
27
GameView = View:extend {
239
28
onNew = function (self)
240
29
self:loadLayers('data/map.lua')
241
30
self.focus = the.player
242
31
self:clampTo(self.map)
32
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'}
39
storage:load()
40
--print(inspect(storage.data))
41
the.recorder.record = storage.data
42
the.recorder:startPlaying()
43
end
243
44
end,
244
45
onUpdate = function (self)
245
46
--print('drawTook: ', the.drawTook)
249
48
--the.player:collide(self.map)
250
49
--self.map:collide(the.player)
251
50
end,
252
draw = function (self, x, y)
253
View.draw(self, x, y)
254
255
love.graphics.print('FPS:' .. love.timer.getFPS(), 20, 20)
256
end
51
-- draw = function (self, x, y)
52
-- View.draw(self, x, y)
53
54
-- love.graphics.print('FPS:' .. love.timer.getFPS(), 20, 20)
55
-- end
56
}
57
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)
62
self:add(self.title)
63
--self.title:centerAround(400, 200)
64
end,
65
onUpdate = function(self, elapsed)
66
if the.keys:allJustPressed() then
67
the.app.view = GameView:new()
68
end
69
end
257
70
}
258
71
259
72
the.app = App:new {
73
record = true,
260
74
onRun = function (self)
261
self.view = GameView:new()
262
self.console:watch('onGround', 'the.player.onGround')
263
self.console:watch('onWall', 'the.player.onWall')
264
self.console:watch('updateTook', 'the.updateTook')
265
self.console:watch('drawTook', 'the.drawTook')
75
self.view = MenuScreen:new()
76
if DEBUG then
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')
82
end
266
83
267
84
--the.profiler = newProfiler('time', 2000)
268
85
--the.profiler = newProfiler()
277
94
outfile:close()
278
95
end
279
96
97
if self.record and the.recorder then
98
if not love.filesystem.remove('record.lua') then
99
print('could not remove record.lua')
100
end
101
local storage = Storage:new{
102
data = the.recorder.record,
103
filename = 'record.lua'
104
}
105
storage:save(false)
106
--print(inspect(the.recorder.record))
107
end
108
280
109
self.quit()
281
110
end
282
111
end,
288
117
end
289
118
end
290
119
}
120
121
function love.load (arg)
122
opts = getopt(arg, '')
123
if opts['p'] then
124
the.app.playback = true
125
the.app.record = false
126
elseif opts['r'] then
127
the.app.record = true
128
end
129
130
the.app:run()
131
end
b'\\ No newline at end of file'
Loggerhead is a web-based interface for Breezy
Version: 2.0.1