/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-05-14 16:39:54 UTC
  • Revision ID: josh@9ix.org-20130514163954-tpi9djio3pm6vswf
prepare a collision box for the rocks

Show diffs side-by-side

added added

removed removed

Lines of Context:
main.lua
9
9
 
10
10
require 'version'
11
11
require 'wrap_tile'
 
12
require 'mirror'
12
13
require 'player'
13
14
require 'enemy'
14
15
require 'cursor'
15
16
require 'bullet'
 
17
require 'rock'
16
18
 
17
19
util = {
18
20
   signOf = function(value)
21
23
               else
22
24
                  return -1
23
25
               end
24
 
            end
 
26
            end,
 
27
   shortestVector = function(from, to)
 
28
                       if STRICT then
 
29
                          if from.x < the.app.width / 2 or
 
30
                             from.x > the.bg.width - the.app.width / 2 or
 
31
                             from.y < the.app.height / 2 or
 
32
                             from.y > the.bg.height - the.app.height / 2 then
 
33
                             error('"from" coordinate out of bounds: X='..from.x..' Y='..from.y)
 
34
                          end
 
35
 
 
36
                          if to.x < the.app.width / 2 or
 
37
                             to.x > the.bg.width - the.app.width / 2 or
 
38
                             to.y < the.app.height / 2 or
 
39
                             to.y > the.bg.height - the.app.height / 2 then
 
40
                             error('"to" coordinate out of bounds: X='..to.x..' Y='..to.y)
 
41
                          end
 
42
                       end
 
43
 
 
44
                       -- normalize grid to account for mirror zones
 
45
                       local fx = from.x - the.app.width / 2
 
46
                       local fy = from.y - the.app.height / 2
 
47
                       local tx = to.x - the.app.width / 2
 
48
                       local ty = to.y - the.app.height / 2
 
49
 
 
50
                       local short = {}
 
51
 
 
52
                       -- pick shorter x
 
53
                       if math.abs(tx - fx) < math.abs(tx - fx - (the.bg.width - the.app.width)) then
 
54
                          -- straight path is shorter
 
55
                          short.x = tx - fx
 
56
                       else
 
57
                          short.x = tx - fx - (the.bg.width - the.app.width)
 
58
                       end
 
59
 
 
60
                       -- pick shorter y
 
61
                       if math.abs(ty - fy) < math.abs(ty - fy - (the.bg.height - the.app.height)) then
 
62
                          -- straight path is shorter
 
63
                          short.y = ty - fy
 
64
                       else
 
65
                          short.y = ty - fy - (the.bg.height - the.app.height)
 
66
                       end
 
67
 
 
68
                       return vector.new(short.x, short.y)
 
69
                    end
25
70
}
26
71
 
27
72
GameView = View:extend {
 
73
   lastRock = 0,
 
74
   rockInterval = 1,
 
75
   gameStart = 0,
28
76
   onNew = function (self)
29
77
              -- for x = 1,30 do
30
78
              --    for y = 1,30 do
35
83
              --    end
36
84
              -- end
37
85
 
 
86
              the.rockColliders = {}
 
87
              the.bullets = {}
 
88
 
38
89
              the.bg = Tile:new{
39
90
                 image = 'data/stars3.png',
40
91
                 -- 1366x768 * 3
47
98
              the.player = SpacePlayer:new{x=1366,y=768}
48
99
              self:add(the.player)
49
100
 
50
 
              self:add(Enemy:new{x=400, y=300})
 
101
              --self:add(Enemy:new{x=400, y=300})
51
102
 
52
103
              the.cursor = Cursor:new()
53
104
              self:add(the.cursor)
58
109
              --self:loadLayers('data/map.lua')
59
110
              self.focus = the.player
60
111
              --self:clampTo(self.map)
 
112
 
 
113
              self.gameStart = love.timer.getTime()
61
114
           end,
 
115
   onUpdate = function(self, dt)
 
116
                 if love.timer.getTime() > self.lastRock + self.rockInterval then
 
117
                    local unseenRock = nil
 
118
                    while not unseenRock do
 
119
                       local rock = Rock:new{
 
120
                          x = math.random(the.app.width / 2,
 
121
                                          the.bg.width - the.app.width / 2),
 
122
                          y = math.random(the.app.height / 2,
 
123
                                          the.bg.height - the.app.height / 2),
 
124
                          velocity = {
 
125
                             x = math.random(-300, 300),
 
126
                             y = math.random(-300, 300),
 
127
                             rotation = math.random(-7, 7)
 
128
                          },
 
129
                          scale = math.random() + 0.5
 
130
                       }
 
131
 
 
132
                       local rockToPlayer = util.shortestVector(rock, the.player)
 
133
                       if math.abs(rockToPlayer.x) > the.app.width / 2 + rock.width * rock.scale and
 
134
                           math.abs(rockToPlayer.y) > the.app.height / 2 + rock.height * rock.scale then
 
135
                         unseenRock = rock
 
136
                        end
 
137
                    end
 
138
 
 
139
                    self:add(unseenRock)
 
140
 
 
141
                    self.lastRock = love.timer.getTime()
 
142
                 end
 
143
              end,
62
144
   draw = function (self, x, y)
63
145
             View.draw(self, x, y)
64
146
             love.graphics.print('FPS:' .. love.timer.getFPS(), 20, 20)
82
164
the.app = App:new {
83
165
   onRun = function (self)
84
166
              print('Version: ' .. VERSION)
 
167
 
 
168
              math.randomseed(os.time())
 
169
 
85
170
              self.view = GameView:new()
86
171
              if DEBUG then
87
172
                 self.console:watch('VERSION', 'VERSION')