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 19
- compare with another revision
- download diff
- download tarball
- view history from revision 19
- Committer: Josh C
- Date: 2013-03-10 22:25:26 UTC
- Revision ID: josh@9ix.org-20130310222526-hrotq2ukxktjsrdg
climb walls
- files removed:
- animation.lua
- files modified:
- data/map.lua
added
removed
main.lua
2
2
DEBUG = true
3
3
4
4
require 'zoetrope'
5
__ = require 'underscore'
5
_ = require 'underscore'
6
6
--inspect = require 'inspect'
7
require 'pepperprof'
8
require 'getopt_alt'
9
10
require 'sprite'
11
require 'animation'
12
require 'player'
13
require 'balloon'
14
require 'version'
15
16
util = {
17
dim = function(dir)
18
if dir == 'x' then
19
return 'width'
20
elseif dir == 'y' then
21
return 'height'
22
else
23
if STRICT then error('dir '..dir) end
24
end
25
end
7
8
Player = Animation:extend {
9
image = 'data/player.png',
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
onNew = function (self)
18
self.velocity.y = 0
19
self.maxVelocity.y = 400
20
end,
21
doPhysics = function (self, dir, elapsed)
22
local vel = self.velocity
23
local acc = self.acceleration
24
local drag = self.drag
25
local minVel = self.minVelocity
26
local maxVel = self.maxVelocity
27
28
-- check existence of properties
29
30
if STRICT then
31
assert(vel, 'active sprite has no velocity property')
32
assert(acc, 'active sprite has no acceleration property')
33
assert(drag, 'active sprite has no drag property')
34
assert(minVel, 'active sprite has no minVelocity property')
35
assert(maxVel, 'active sprite has no maxVelocity property')
36
assert(_.include({'x','y','rotation'}, dir), 'direction should be x, y, or rotation')
37
end
38
39
vel.x = vel.x or 0
40
vel.y = vel.y or 0
41
vel.rotation = vel.rotation or 0
42
43
-- physics
44
45
if acc[dir] and acc[dir] ~= 0 then
46
vel[dir] = vel[dir] + acc[dir] * elapsed
47
else
48
if drag[dir] then
49
if vel[dir] > 0 then
50
vel[dir] = vel[dir] - drag[dir] * elapsed
51
if vel[dir] < 0 then vel[dir] = 0 end
52
elseif vel[dir] < 0 then
53
vel[dir] = vel[dir] + drag[dir] * elapsed
54
if vel[dir] > 0 then vel[dir] = 0 end
55
end
56
end
57
end
58
59
if minVel[dir] and vel[dir] < minVel[dir] then vel[dir] = minVel[dir] end
60
if maxVel[dir] and vel[dir] > maxVel[dir] then vel[dir] = maxVel[dir] end
61
62
if vel[dir] ~= 0 then self[dir] = self[dir] + vel[dir] * elapsed end
63
end,
64
onStartFrame = function (self)
65
-- this is all in startframe so it happens before
66
-- physics calc at beginning of update
67
68
-- jumping/falling updates could go in EndFrame...
69
self.falling = self.velocity.y > 0
70
if self.falling then self.jumping = false end
71
--print(self.jumping, self.falling)
72
73
if (not self.onGround) and (not self.onWall) then
74
self:play('jump')
75
end
76
77
self.velocity.x = 0
78
self.acceleration.y = 800
79
80
if self.onWall then
81
self.acceleration.y = 0
82
83
if the.keys:pressed('up') then
84
self.velocity.y = -200
85
self:play('stand')
86
elseif the.keys:pressed('down') then
87
self.velocity.y = 200
88
self:play('stand')
89
else
90
self.velocity.y = 0
91
self:play('stand')
92
end
93
end
94
95
if the.keys:pressed('left') then
96
self.velocity.x = -200
97
if self.onGround then self:play('walk') end
98
if self.onWall == 'right' then self.onWall = false end
99
if self.onWall == 'right' then self.onWall = false end
100
elseif the.keys:pressed('right') then
101
self.velocity.x = 200
102
if self.onGround then self:play('walk') end
103
if self.onWall == 'left' then self.onWall = false end
104
else
105
if self.onGround then self:play('stand') end
106
end
107
108
if the.keys:justPressed('up') and self.onGround then
109
self.velocity.y = -400
110
self.jumping = true
111
end
112
end,
113
update = function (self, elapsed)
114
-- NOTE: this is an override, not a callback
115
116
self:doPhysics('x', elapsed)
117
118
self.onGround = false -- right before Y collision callbacks
119
self:doPhysics('y', elapsed)
120
121
self:collide(the.view.map)
122
123
Animation.update(self, elapsed)
124
end,
125
onCollide = function (self, other, xOverlap, yOverlap)
126
-- seriously, why does this even fire?
127
if other == the.view.map then return end
128
129
--print(string.format('col s{x=%i y=%i w=%i h=%i} %s', self.x, self.y, self.width, self.height, tostring(other)))
130
--print('vel.x:'..self.velocity.x.." vel.y:"..self.velocity.y)
131
132
-- assumption: any other collision is with a solid map tile
133
if yOverlap > xOverlap then
134
other:displace(self)
135
136
if self.velocity.x > 0 then
137
self.onWall = 'right'
138
elseif self.velocity.x < 0 then
139
self.onWall = 'left'
140
else
141
print 'x ??'
142
end
143
elseif xOverlap > yOverlap then
144
-- check if we've moved since collisions were generated
145
local xov, yov = self:overlap(other.x, other.y,
146
other.width, other.height)
147
if xov ~= 0 and yov ~= 0 then
148
--print('y collision')
149
if self.velocity.y > 0 then
150
self.onGround = true
151
end
152
153
self.velocity.y = 0
154
other:displace(self)
155
self.jumping = false
156
end
157
else
158
print('xy ??')
159
end
160
161
end,
26
162
}
27
163
28
164
GameView = View:extend {
30
166
self:loadLayers('data/map.lua')
31
167
self.focus = the.player
32
168
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
45
169
end,
46
170
onUpdate = function (self)
47
--print('drawTook: ', the.drawTook)
48
171
--print('tick')
49
172
--the.player:collide(self.map)
50
173
--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
70
174
end
71
175
}
72
176
73
177
the.app = App:new {
74
record = true,
75
178
onRun = function (self)
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
85
86
--the.profiler = newProfiler('time', 2000)
87
--the.profiler = newProfiler()
88
--the.profiler:start()
179
self.view = GameView:new()
180
--print(inspect(_(the.app):keys()))
181
self.console:watch('onGround', 'the.player.onGround')
182
self.console:watch('onWall', 'the.player.onWall')
89
183
end,
90
184
onUpdate = function (self, dt)
91
if the.keys:justPressed('escape') then
92
if the.profiler then
93
the.profiler:stop()
94
local outfile = io.open( "profile.txt", "w+" )
95
the.profiler:report( outfile )
96
outfile:close()
97
end
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
185
if the.keys:justPressed('escape') and
186
not self.console.visible then
111
187
self.quit()
112
188
end
113
end,
114
update = function (self, dt)
115
the.updateStart = love.timer.getMicroTime()
116
App.update(self, dt)
117
if the.updateStart then
118
the.updateTook = love.timer.getMicroTime() - the.updateStart
119
end
120
end
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'
189
end
190
}
b'\\ No newline at end of file'
Loggerhead is a web-based interface for Breezy
Version: 2.0.1