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