/traderous

To get this branch, use:
bzr branch http://9ix.org/bzr/traderous
3 by Josh C
basecode main.lua
1
STRICT = true
2
DEBUG = true
3
4
require 'zoetrope'
13 by Josh C
constant velocity for bullets. using hump.vector e9b86ef
5
vector = require 'vector'
35 by Josh C
fix double-removing sprites (and subsequent zombie mirror bullets).
6
--inspect = require 'inspect'
3 by Josh C
basecode main.lua
7
24 by Josh C
monkey patch group to add onRemove hook. remove mirrors on remove.
8
require 'group'
9
3 by Josh C
basecode main.lua
10
require 'version'
21 by Josh C
extract wrapping behavior, wrap bullets
11
require 'wrap_tile'
27 by Josh C
try to not spawn rocks where you can see them. not working if screen
12
require 'mirror'
4 by Josh C
trying some movement styles. derivatives on crystal quest movement.
13
require 'player'
7 by Josh C
enemy
14
require 'enemy'
8 by Josh C
targeting cursor (manual switch to start)
15
require 'cursor'
11 by Josh C
pew pew!
16
require 'bullet'
26 by Josh C
rocks!
17
require 'rock'
30 by Josh C
explosions
18
require 'boom'
7 by Josh C
enemy
19
20
util = {
21
   signOf = function(value)
22
               if value >= 0 then
23
                  return 1
24
               else
25
                  return -1
26
               end
27 by Josh C
try to not spawn rocks where you can see them. not working if screen
27
            end,
28
   shortestVector = function(from, to)
29
                       if STRICT then
30
                          if from.x < the.app.width / 2 or
31
                             from.x > the.bg.width - the.app.width / 2 or
32
                             from.y < the.app.height / 2 or
33
                             from.y > the.bg.height - the.app.height / 2 then
34
                             error('"from" coordinate out of bounds: X='..from.x..' Y='..from.y)
35
                          end
36
37
                          if to.x < the.app.width / 2 or
38
                             to.x > the.bg.width - the.app.width / 2 or
39
                             to.y < the.app.height / 2 or
40
                             to.y > the.bg.height - the.app.height / 2 then
41
                             error('"to" coordinate out of bounds: X='..to.x..' Y='..to.y)
42
                          end
43
                       end
44
45
                       -- normalize grid to account for mirror zones
46
                       local fx = from.x - the.app.width / 2
47
                       local fy = from.y - the.app.height / 2
48
                       local tx = to.x - the.app.width / 2
49
                       local ty = to.y - the.app.height / 2
50
51
                       local short = {}
52
53
                       -- pick shorter x
54
                       if math.abs(tx - fx) < math.abs(tx - fx - (the.bg.width - the.app.width)) then
55
                          -- straight path is shorter
56
                          short.x = tx - fx
57
                       else
58
                          short.x = tx - fx - (the.bg.width - the.app.width)
59
                       end
60
61
                       -- pick shorter y
62
                       if math.abs(ty - fy) < math.abs(ty - fy - (the.bg.height - the.app.height)) then
63
                          -- straight path is shorter
64
                          short.y = ty - fy
65
                       else
66
                          short.y = ty - fy - (the.bg.height - the.app.height)
67
                       end
68
69
                       return vector.new(short.x, short.y)
70
                    end
7 by Josh C
enemy
71
}
3 by Josh C
basecode main.lua
72
73
GameView = View:extend {
26 by Josh C
rocks!
74
   lastRock = 0,
75
   rockInterval = 1,
76
   gameStart = 0,
3 by Josh C
basecode main.lua
77
   onNew = function (self)
18 by Josh C
starry background
78
              -- for x = 1,30 do
79
              --    for y = 1,30 do
80
              --       self:add(Fill:new{x=x*400, y=y*400,
81
              --                         width = 32, height = 32,
82
              --                         fill = {0,0,255}
83
              --                      })
84
              --    end
85
              -- end
86
34 by Josh C
record high scores
87
              the.storage = Storage:new{filename = 'scores.lua'}
88
              the.storage:load()
89
              if not the.storage.data.highScore then
90
                 print('initializing storage')
91
                 the.storage.data = {highScore = 0}
92
              end
93
29 by Josh C
shoot things!
94
              the.rockColliders = Group:new()
95
              the.bullets = Group:new()
32 by Josh C
stick things into layers
96
              the.mirrors = Group:new()
97
              the.rocks = Group:new()
28 by Josh C
prepare a collision box for the rocks
98
19 by Josh C
move player around looping world
99
              the.bg = Tile:new{
100
                 image = 'data/stars3.png',
101
                 -- 1366x768 * 3
102
                 width = 4098,
103
                 height = 2304
18 by Josh C
starry background
104
              }
19 by Josh C
move player around looping world
105
              self:add(the.bg)
4 by Josh C
trying some movement styles. derivatives on crystal quest movement.
106
107
              --the.player = CrystalPlayer:new{x=400,y=300}
19 by Josh C
move player around looping world
108
              the.player = SpacePlayer:new{x=1366,y=768}
4 by Josh C
trying some movement styles. derivatives on crystal quest movement.
109
              self:add(the.player)
110
27 by Josh C
try to not spawn rocks where you can see them. not working if screen
111
              --self:add(Enemy:new{x=400, y=300})
7 by Josh C
enemy
112
32 by Josh C
stick things into layers
113
              self:add(the.bullets)
114
              self:add(the.rockColliders)
115
              self:add(the.mirrors)
116
              self:add(the.rocks)
117
14 by Josh C
only fire if cursor is in target area. change cursor to reflect this.
118
              the.cursor = Cursor:new()
119
              self:add(the.cursor)
8 by Josh C
targeting cursor (manual switch to start)
120
33 by Josh C
keep score, center mouse on start
121
              the.score = Text:new{
122
                 width = the.app.width,
123
                 align = 'center',
124
                 font = 25}
125
              self:add(the.score)
126
34 by Josh C
record high scores
127
              local hs = the.storage.data.highScore
128
              local m = hs / 60
129
              local s = hs % 60
130
131
              the.highScore = Text:new{
132
                 width = the.app.width,
133
                 align = 'right',
134
                 font = 25,
135
                 text = string.format('High Score: %d:%02d', m, s)
136
              }
137
              self:add(the.highScore)
138
4 by Josh C
trying some movement styles. derivatives on crystal quest movement.
139
              love.mouse.setGrab(true)
8 by Josh C
targeting cursor (manual switch to start)
140
              love.mouse.setVisible(false)
33 by Josh C
keep score, center mouse on start
141
              love.mouse.setPosition(the.app.width / 2, the.app.height / 2)
3 by Josh C
basecode main.lua
142
143
              --self:loadLayers('data/map.lua')
4 by Josh C
trying some movement styles. derivatives on crystal quest movement.
144
              self.focus = the.player
3 by Josh C
basecode main.lua
145
              --self:clampTo(self.map)
26 by Josh C
rocks!
146
147
              self.gameStart = love.timer.getTime()
3 by Josh C
basecode main.lua
148
           end,
26 by Josh C
rocks!
149
   onUpdate = function(self, dt)
36 by Josh C
don't keep spawning rocks after death.
150
                 if the.player.active and love.timer.getTime() > self.lastRock + self.rockInterval then
27 by Josh C
try to not spawn rocks where you can see them. not working if screen
151
                    local unseenRock = nil
152
                    while not unseenRock do
153
                       local rock = Rock:new{
154
                          x = math.random(the.app.width / 2,
155
                                          the.bg.width - the.app.width / 2),
156
                          y = math.random(the.app.height / 2,
157
                                          the.bg.height - the.app.height / 2),
158
                          velocity = {
159
                             x = math.random(-300, 300),
160
                             y = math.random(-300, 300),
161
                             rotation = math.random(-7, 7)
162
                          },
163
                          scale = math.random() + 0.5
164
                       }
165
166
                       local rockToPlayer = util.shortestVector(rock, the.player)
167
                       if math.abs(rockToPlayer.x) > the.app.width / 2 + rock.width * rock.scale and
168
                           math.abs(rockToPlayer.y) > the.app.height / 2 + rock.height * rock.scale then
169
                         unseenRock = rock
170
                        end
171
                    end
172
32 by Josh C
stick things into layers
173
                    the.rocks:add(unseenRock)
26 by Josh C
rocks!
174
175
                    self.lastRock = love.timer.getTime()
176
                 end
29 by Josh C
shoot things!
177
178
                 the.bullets:collide(the.rockColliders)
35 by Josh C
fix double-removing sprites (and subsequent zombie mirror bullets).
179
180
                 -- for _, mirror in ipairs(the.mirrors.sprites) do
181
                 --    if not mirror.of then
182
                 --       print('mirror:' .. inspect(mirror))
183
                 --       error('mirror OF NOTHING')
184
                 --    end
185
                 -- end
26 by Josh C
rocks!
186
              end,
33 by Josh C
keep score, center mouse on start
187
   onEndFrame = function(self)
188
                   if the.player.active then
37 by Josh C
extract updating score. update score again when you calc high score -
189
                      self:updateScore()
33 by Josh C
keep score, center mouse on start
190
                   end
191
                end,
3 by Josh C
basecode main.lua
192
   draw = function (self, x, y)
193
             View.draw(self, x, y)
194
             love.graphics.print('FPS:' .. love.timer.getFPS(), 20, 20)
37 by Josh C
extract updating score. update score again when you calc high score -
195
          end,
196
   updateScore = function(self)
197
                    local t = love.timer.getTime() - self.gameStart
198
                    local m = t / 60
199
                    local s = t % 60
200
201
                    the.score.text = string.format('Score: %d:%02d', m, s)
202
                    the.score.y = the.player.y - the.app.height / 2 + the.player.height
203
                    the.score.x = the.player.x - the.app.width / 2
204
205
                    the.highScore.y = the.player.y - the.app.height / 2 + the.player.height
206
                    the.highScore.x = the.player.x - the.app.width / 2
207
                 end
3 by Josh C
basecode main.lua
208
}
209
210
MenuScreen = View:extend {
211
   title = Text:new{text = "Press a key to start", font = 48, wordWrap = false},
212
   --title = Tile:new{image = 'data/title.png', x = 0, y = 0},
213
   onNew = function(self)
214
              self:add(self.title)
215
              self.title:centerAround(400, 200)
216
           end,
217
   onUpdate = function(self, elapsed)
218
                 if the.keys:allJustPressed() then
219
                    the.app.view = GameView:new()
220
                 end
221
              end
222
}
223
224
the.app = App:new {
225
   onRun = function (self)
226
              print('Version: ' .. VERSION)
26 by Josh C
rocks!
227
228
              math.randomseed(os.time())
229
3 by Josh C
basecode main.lua
230
              self.view = GameView:new()
231
              if DEBUG then
232
                 self.console:watch('VERSION', 'VERSION')
233
                 self.console:watch('updateTook', 'the.updateTook')
19 by Josh C
move player around looping world
234
                 self.console:watch('the.player.x', 'the.player.x')
235
                 self.console:watch('the.player.y', 'the.player.y')
236
                 self.console:watch('the.app.width', 'the.app.width')
237
                 self.console:watch('the.app.height', 'the.app.height')
35 by Josh C
fix double-removing sprites (and subsequent zombie mirror bullets).
238
                 self.console:watch('num mirrors', '#the.mirrors.sprites')
36 by Josh C
don't keep spawning rocks after death.
239
                 self.console:watch('num rocks', '#the.rocks.sprites')
3 by Josh C
basecode main.lua
240
                 --self.console:watch('drawTook', 'the.drawTook')
22 by Josh C
mirror (contains a bug where things in the corner aren't getting mirrored?
241
242
                 -- back off that dark overlay a bit
243
                 self.console.fill.fill[4] = 75
3 by Josh C
basecode main.lua
244
              end
245
           end,
246
   onUpdate = function (self, dt)
247
                 if the.keys:justPressed('escape') then
248
                    self.quit()
249
                 end
250
              end,
251
   update = function (self, dt)
252
               the.updateStart = love.timer.getMicroTime()
253
               App.update(self, dt)
254
               if the.updateStart then
255
                  the.updateTook = love.timer.getMicroTime() - the.updateStart
256
               end
257
            end
258
}