/traderous

To get this branch, use:
bzr branch http://9ix.org/bzr/traderous

« back to all changes in this revision

Viewing changes to main.lua

  • Committer: Josh C
  • Date: 2013-06-15 16:59:30 UTC
  • Revision ID: josh@9ix.org-20130615165930-iud659qdwcvjlnoh
beginnings of trading interface

Show diffs side-by-side

added added

removed removed

Lines of Context:
18
18
require 'boom'
19
19
require 'planet'
20
20
require 'trade_view'
21
 
require 'shield'
22
 
require 'pause_view'
23
 
require 'game_over'
24
 
require 'names'
25
 
require 'good'
26
21
 
27
22
util = {
28
23
   signOf = function(value)
32
27
                  return -1
33
28
               end
34
29
            end,
 
30
   shortestVector = function(from, to)
 
31
                       if STRICT then
 
32
                          if from.x < the.app.width / 2 or
 
33
                             from.x > the.bg.width - the.app.width / 2 or
 
34
                             from.y < the.app.height / 2 or
 
35
                             from.y > the.bg.height - the.app.height / 2 then
 
36
                             error('"from" coordinate out of bounds: X='..from.x..' Y='..from.y)
 
37
                          end
 
38
 
 
39
                          if to.x < the.app.width / 2 or
 
40
                             to.x > the.bg.width - the.app.width / 2 or
 
41
                             to.y < the.app.height / 2 or
 
42
                             to.y > the.bg.height - the.app.height / 2 then
 
43
                             error('"to" coordinate out of bounds: X='..to.x..' Y='..to.y)
 
44
                          end
 
45
                       end
 
46
 
 
47
                       -- normalize grid to account for mirror zones
 
48
                       local fx = from.x - the.app.width / 2
 
49
                       local fy = from.y - the.app.height / 2
 
50
                       local tx = to.x - the.app.width / 2
 
51
                       local ty = to.y - the.app.height / 2
 
52
 
 
53
                       local short = {}
 
54
 
 
55
                       -- pick shorter x
 
56
                       if math.abs(tx - fx) < math.abs(tx - fx - (the.bg.width - the.app.width)) then
 
57
                          -- straight path is shorter
 
58
                          short.x = tx - fx
 
59
                       else
 
60
                          short.x = tx - fx - (the.bg.width - the.app.width)
 
61
                       end
 
62
 
 
63
                       -- pick shorter y
 
64
                       if math.abs(ty - fy) < math.abs(ty - fy - (the.bg.height - the.app.height)) then
 
65
                          -- straight path is shorter
 
66
                          short.y = ty - fy
 
67
                       else
 
68
                          short.y = ty - fy - (the.bg.height - the.app.height)
 
69
                       end
 
70
 
 
71
                       return vector.new(short.x, short.y)
 
72
                    end
35
73
}
36
74
 
37
75
GameView = View:extend {
 
76
   lastRock = 0,
 
77
   rockInterval = 1,
 
78
   gameStart = 0,
38
79
   onNew = function (self)
39
 
              the.storage = Storage:new{filename = 'world.lua'}
 
80
              -- for x = 1,30 do
 
81
              --    for y = 1,30 do
 
82
              --       self:add(Fill:new{x=x*400, y=y*400,
 
83
              --                         width = 32, height = 32,
 
84
              --                         fill = {0,0,255}
 
85
              --                      })
 
86
              --    end
 
87
              -- end
 
88
 
 
89
              the.storage = Storage:new{filename = 'scores.lua'}
40
90
              the.storage:load()
41
 
              --if not the.storage.data.highScore then
42
 
              --   print('initializing storage')
43
 
              --   the.storage.data = {highScore = 0}
44
 
              --end
 
91
              if not the.storage.data.highScore then
 
92
                 print('initializing storage')
 
93
                 the.storage.data = {highScore = 0}
 
94
              end
45
95
 
 
96
              --the.rockColliders = Group:new()
46
97
              the.bullets = Group:new()
 
98
              the.mirrors = Group:new()
 
99
              --the.rocks = Group:new()
47
100
              the.interface = Group:new()
48
101
              the.planets = Group:new()
49
 
              the.planetLabels = Group:new()
50
102
              the.indicators = Group:new()
51
 
              the.enemies = Group:new()
52
103
 
53
 
              -- init bg before build/load since planets need to know bg size
54
104
              the.bg = Tile:new{
55
105
                 image = 'data/stars3.png',
56
 
                 width = 27320,
57
 
                 height = 15360
 
106
                 width = 13660,
 
107
                 height = 7680
58
108
              }
59
109
              self:add(the.bg)
60
110
 
61
 
              if self.newWorld or not the.storage.data.player then
62
 
                 the.storage.data = {planets = {}}
63
 
 
64
 
                 -- build planets from random
65
 
                 for _ = 1, math.random(5, 7) do
66
 
                    local planet = Planet:new{
67
 
                       x = math.random(the.app.width / 2,
68
 
                                       the.bg.width - the.app.width / 2),
69
 
                       y = math.random(the.app.height / 2,
70
 
                                       the.bg.height - the.app.height / 2),
71
 
                       rotation = math.random() * math.pi
72
 
                    }
73
 
                    the.planets:add(planet)
74
 
                    table.insert(the.storage.data.planets, {
75
 
                                    x = planet.x,
76
 
                                    y = planet.y,
77
 
                                    rotation = planet.rotation,
78
 
                                    goods = planet.goods,
79
 
                                    name = planet.name
80
 
                                 })
81
 
                 end
82
 
 
83
 
                 Good:stockPlanets()
84
 
 
85
 
                 -- build fresh player
86
 
                 local player = SpacePlayer:new{x=the.bg.width / 2, y=the.bg.height / 2}
87
 
                 the.player = player
88
 
                 the.storage.data.player = {x = player.x,
89
 
                                            y = player.y,
90
 
                                            money = player.money,
91
 
                                            goods = player.goods,
92
 
                                            cargoSpace = player.cargoSpace
93
 
                                         }
94
 
 
95
 
                 the.storage:save()
96
 
              else
97
 
                 -- load planets with x, y, goods
98
 
                 for _, planetData in ipairs(the.storage.data.planets) do
99
 
                    the.planets:add(Planet:new(planetData))
100
 
                 end
101
 
 
102
 
                 -- load player with cargo, money, position
103
 
                 the.player = SpacePlayer:new(the.storage.data.player)
104
 
 
105
 
                 -- reload storage as we've turned it all into objects
106
 
                 the.storage:load()
107
 
              end
108
 
 
109
111
              self:add(the.planets)
110
 
              self:add(the.planetLabels)
111
112
 
 
113
              --the.player = CrystalPlayer:new{x=400,y=300}
 
114
              the.player = SpacePlayer:new{x=the.bg.width / 2, y=the.bg.height / 2}
112
115
              self:add(the.player)
113
116
              self:add(the.player.thrust)
114
 
              self:add(the.player.shield)
115
 
 
116
 
              self:add(the.enemies)
117
 
 
118
 
              for _ = 1, 20 do
119
 
                 local e = Enemy:new{x = math.random(the.bg.width),
120
 
                                     y = math.random(the.bg.height)}
121
 
                 --local e = Enemy:new{x=the.bg.width / 2, y=the.bg.height / 2}
122
 
                 the.enemies:add(e)
123
 
                 self:add(e.thrust) -- why doesn't this work in Enemy.new?
124
 
                 self:add(e.shield)
125
 
              end
 
117
 
 
118
              --self:add(Enemy:new{x=400, y=300})
126
119
 
127
120
              self:add(the.bullets)
 
121
              --self:add(the.rockColliders)
 
122
              self:add(the.mirrors)
 
123
              --self:add(the.rocks)
128
124
              self:add(the.indicators)
129
125
              self:add(the.interface)
130
126
 
 
127
              for _ = 1, math.random(6) do
 
128
                 local planet = Planet:new{
 
129
                    x = math.random(the.app.width / 2,
 
130
                                    the.bg.width - the.app.width / 2),
 
131
                    y = math.random(the.app.height / 2,
 
132
                                    the.bg.height - the.app.height / 2),
 
133
                    rotation = math.random() * math.pi
 
134
                 }
 
135
                 the.planets:add(planet)
 
136
              end
 
137
 
131
138
              the.cursor = Cursor:new()
132
139
              self:add(the.cursor)
133
140
 
 
141
              the.score = Text:new{
 
142
                 x = 8,
 
143
                 y = 8,
 
144
                 width = the.app.width,
 
145
                 --align = 'center',
 
146
                 font = 25}
 
147
              --the.interface:add(the.score)
 
148
 
 
149
              local hs = the.storage.data.highScore
 
150
              local m = hs / 60
 
151
              local s = hs % 60
 
152
 
 
153
              the.highScore = Text:new{
 
154
                 x = -8,
 
155
                 y = 8,
 
156
                 width = the.app.width,
 
157
                 align = 'right',
 
158
                 font = 25,
 
159
                 text = string.format('High Score: %d:%02d', m, s)
 
160
              }
 
161
              --the.interface:add(the.highScore)
 
162
 
 
163
              the.over = Text:new{
 
164
                 y = the.app.height / 2,
 
165
                 width = the.app.width,
 
166
                 align = 'center',
 
167
                 font = 25,
 
168
                 text = "Game Over",
 
169
                 visible = false
 
170
              }
 
171
              the.interface:add(the.over)
 
172
 
 
173
 
 
174
              the.instructions = Text:new{
 
175
                 y = the.app.height / 2 + 32,
 
176
                 width = the.app.width,
 
177
                 align = 'center',
 
178
                 font = 12,
 
179
                 text = "Press Enter to start a new game\nPress Q to quit",
 
180
                 visible = false
 
181
              }
 
182
              the.interface:add(the.instructions)
 
183
 
134
184
              love.mouse.setGrab(true)
135
185
              love.mouse.setVisible(false)
136
186
              love.mouse.setPosition(the.app.width / 2, the.app.height / 2)
137
187
 
 
188
              --self:loadLayers('data/map.lua')
138
189
              self.focus = the.player
 
190
              --self:clampTo(self.map)
 
191
 
 
192
              self.gameStart = love.timer.getTime()
139
193
           end,
140
194
   onUpdate = function(self, dt)
141
 
                 if the.keys:justPressed('escape') then
142
 
                    PauseView:new():activate()
143
 
                 end
144
 
 
145
 
                 the.bullets:collide(the.planets)
146
 
                 the.bullets:collide(the.player)
147
 
                 the.bullets:collide(the.enemies)
 
195
                 if false and the.player.active and love.timer.getTime() > self.lastRock + self.rockInterval then
 
196
                    local unseenRock = nil
 
197
                    while not unseenRock do
 
198
                       local rock = Rock:new{
 
199
                          x = math.random(the.app.width / 2,
 
200
                                          the.bg.width - the.app.width / 2),
 
201
                          y = math.random(the.app.height / 2,
 
202
                                          the.bg.height - the.app.height / 2),
 
203
                          velocity = {
 
204
                             x = math.random(-300, 300),
 
205
                             y = math.random(-300, 300),
 
206
                             rotation = math.random(-7, 7)
 
207
                          },
 
208
                          scale = math.random() + 0.5
 
209
                       }
 
210
 
 
211
                       local rockToPlayer = util.shortestVector(rock, the.player)
 
212
                       if math.abs(rockToPlayer.x) > the.app.width / 2 + rock.width * rock.scale and
 
213
                           math.abs(rockToPlayer.y) > the.app.height / 2 + rock.height * rock.scale then
 
214
                         unseenRock = rock
 
215
                        end
 
216
                    end
 
217
 
 
218
                    the.rocks:add(unseenRock)
 
219
 
 
220
                    self.lastRock = love.timer.getTime()
 
221
                 end
 
222
 
 
223
                 the.bullets:collide(the.rockColliders)
 
224
 
 
225
                 -- this should really go somewhere else...
 
226
                 for _, planet in ipairs(the.planets.sprites) do
 
227
                    local indx, indy
 
228
                    local pvec = vector.new(
 
229
                       planet.x - the.player.x + planet.width / 2,
 
230
                       planet.y - the.player.y + planet.height / 2 )
 
231
 
 
232
                    -- TODO: is there a better way to specify the
 
233
                    -- screen rectangle?
 
234
                    if planet:intersects(the.player.x - the.app.width / 2,
 
235
                                         the.player.y - the.app.height / 2,
 
236
                                         the.app.width,
 
237
                                         the.app.height) then
 
238
                       -- planet is on the screen
 
239
                       planet.indicator.visible = false
 
240
                    else
 
241
                       planet.indicator.visible = true
 
242
 
 
243
                       if math.abs(pvec.x) / math.abs(pvec.y) > the.app.width / the.app.height then
 
244
                          indx = (the.app.width / 2 - 10) * util.signOf(pvec.x) + 8
 
245
                          indy = (the.app.width / 2 - 10) * pvec.y / math.abs(pvec.x)
 
246
                       else
 
247
                          indy = (the.app.height / 2 - 10) * util.signOf(pvec.y) + 8
 
248
                          indx = (the.app.height / 2 - 10) * pvec.x / math.abs(pvec.y)
 
249
                       end
 
250
 
 
251
                       planet.indicator.x = the.player.x + indx
 
252
                       planet.indicator.y = the.player.y + indy
 
253
                    end
 
254
                 end
 
255
 
 
256
                 -- for _, mirror in ipairs(the.mirrors.sprites) do
 
257
                 --    if not mirror.of then
 
258
                 --       print('mirror:' .. inspect(mirror))
 
259
                 --       error('mirror OF NOTHING')
 
260
                 --    end
 
261
                 -- end
148
262
              end,
149
263
   onEndFrame = function(self)
150
264
                   the.interface.translate.x = the.player.x - the.app.width / 2 + the.player.width / 2
151
265
                   the.interface.translate.y = the.player.y - the.app.height / 2 + the.player.height / 2
 
266
 
 
267
                   if the.player.active then
 
268
                      self:updateScore()
 
269
                   end
152
270
                end,
153
271
   draw = function (self, x, y)
154
272
             View.draw(self, x, y)
155
273
             --love.graphics.print('FPS:' .. love.timer.getFPS(), 20, 20)
156
274
          end,
 
275
   updateScore = function(self)
 
276
                    local t = love.timer.getTime() - self.gameStart
 
277
                    local m = t / 60
 
278
                    local s = t % 60
 
279
 
 
280
                    the.score.text = string.format('Score: %d:%02d', m, s)
 
281
                    --the.score.y = the.player.y - the.app.height / 2 + the.player.height
 
282
                    --the.score.x = the.player.x - the.app.width / 2 + the.player.width
 
283
 
 
284
                    --the.highScore.y = the.player.y - the.app.height / 2 + the.player.height
 
285
                    --the.highScore.x = the.player.x - the.app.width / 2
 
286
                 end
157
287
}
158
288
 
159
289
MenuScreen = View:extend {
171
301
}
172
302
 
173
303
the.app = App:new {
174
 
   name = 'Traderous',
175
304
   onRun = function (self)
176
305
              print('Version: ' .. VERSION)
177
306
 
189
318
                 self.console:watch('num mirrors', '#the.mirrors.sprites')
190
319
                 self.console:watch('num rocks', '#the.rocks.sprites')
191
320
                 self.console:watch('num planets', '#the.planets.sprites')
192
 
                 self.console:watch('num enemies', 'the.enemies:count()')
193
 
                 self.console:watch('onPlanet', 'the.player.onPlanet')
194
 
                 self.console:watch('kills', 'the.player.kills')
195
321
                 --self.console:watch('drawTook', 'the.drawTook')
196
322
 
197
323
                 -- back off that dark overlay a bit
200
326
           end,
201
327
   onUpdate = function (self, dt)
202
328
                 if not (DEBUG and the.console.visible) then
203
 
                    if the.keys:justPressed('return') and the.keys:pressed('alt') then
204
 
                       love.graphics.toggleFullscreen()
 
329
                    if the.keys:justPressed('q') then
 
330
                       self.quit()
 
331
                    elseif the.keys:justPressed('return') then
 
332
                       if the.keys:pressed('alt') then
 
333
                          love.graphics.toggleFullscreen()
 
334
                       else
 
335
                          self.view = GameView:new()
 
336
                       end
205
337
                    elseif the.keys:justPressed('f1') then
206
338
                       local ss = love.graphics.newScreenshot()
207
339
                       ss:encode('screenshot-' ..love.timer.getTime()..'.png')