/traderous

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

« back to all changes in this revision

Viewing changes to planet.lua

  • Committer: Josh C
  • Date: 2013-10-21 18:31:55 UTC
  • Revision ID: josh@9ix.org-20131021183155-vl7pxaor2u3pw0t0
have enemies disengage when you land

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
Planet = Tile:extend {
2
2
   image = 'data/planet1.png',
3
 
   potentialGoods = {
4
 
      {name = 'Bobble-Headed Dolls',
5
 
       low = 50, med = 100, high = 150,
6
 
       chance = 0.5},
7
 
      {name = 'Alliance Foodstuffs',
8
 
       low = 100, med = 250, high = 400,
9
 
       chance = 0.8},
10
 
      {name = 'Antique Weapons',
11
 
       low = 5000, med = 6000, high = 8000,
12
 
       chance = 0.1}
13
 
   },
14
3
   goods = {},
15
4
   onNew = function (self)
16
5
              self.indicator = Tile:new{ image = 'data/planet1ind.png' }
17
6
              the.indicators:add(self.indicator)
18
7
 
19
 
              while #self.goods == 0 do
20
 
                 for _, good in ipairs(self.potentialGoods) do
21
 
                    if math.random() < good.chance then
22
 
                       local tier = math.random(4) -- betw 1 and 4
23
 
                       if tier == 1 then
24
 
                          table.insert(self.goods, {good.name, good.low})
25
 
                       elseif tier ==2 then
26
 
                          table.insert(self.goods, {good.name, good.high})
27
 
                       else
28
 
                          -- double chance for med (3 or 4)
29
 
                          table.insert(self.goods, {good.name, good.med})
30
 
                       end
31
 
                    end
 
8
              while not self.name do
 
9
                 local name = PlanetNames[math.random(#PlanetNames)]
 
10
                 local inUse = false
 
11
                 for _, planet in ipairs(the.planets.sprites) do
 
12
                    if name == planet.name then inUse = true end
 
13
                 end
 
14
 
 
15
                 if not inUse then
 
16
                    self.name = name
32
17
                 end
33
18
              end
 
19
 
 
20
              self.label = Text:new {
 
21
                 text = self.name,
 
22
                 x = self.x,
 
23
                 y = self.y - 32,
 
24
                 width = self.width,
 
25
                 align = 'center',
 
26
                 font = 20
 
27
              }
 
28
              the.planetLabels:add(self.label)
 
29
 
 
30
              self.keyLabel = Text:new {
 
31
                 text = 'Press L to land',
 
32
                 x = self.x,
 
33
                 y = self.y + self.height + 12,
 
34
                 width = self.width,
 
35
                 align = 'center',
 
36
                 font = 20
 
37
              }
 
38
              the.planetLabels:add(self.keyLabel)
34
39
           end,
35
40
   onUpdate = function (self)
36
 
                 if the.keys:justPressed('l') then
37
 
                    local hw = self.width / 2
38
 
                    local pvec = vector.new(the.player.x - (self.x + hw),
39
 
                                            the.player.y - (self.y + hw))
40
 
 
41
 
                    if pvec:len2() < hw ^ 2 then
 
41
                 local hw = self.width / 2
 
42
                 local pvec = vector.new(the.player.x - (self.x + hw),
 
43
                                         the.player.y - (self.y + hw))
 
44
 
 
45
                 if pvec:len2() < hw ^ 2 then
 
46
                    self.label.visible = true
 
47
                    self.keyLabel.visible = true
 
48
                    the.player.onPlanet = self
 
49
 
 
50
                    if the.keys:justPressed('l') then
 
51
                       the.player.velocity = {x=0, y=0}
 
52
                       the.player.acceleration = {x=0, y=0}
 
53
 
 
54
                       the.player:save()
 
55
 
 
56
                       -- disengage all the enemies
 
57
                       for _, enemy in pairs(the.enemies.sprites) do
 
58
                          if enemy.state == 'combat' then
 
59
                             enemy.state = 'patrolling'
 
60
                          end
 
61
                       end
 
62
 
42
63
                       tradeView = TradeView:new{ planet = self }
43
64
                       tradeView:activate()
44
65
                    end
 
66
                 else
 
67
                    self.label.visible = false
 
68
                    self.keyLabel.visible = false
 
69
                    if the.player.onPlanet == self then
 
70
                       the.player.onPlanet = false
 
71
                    end
45
72
                 end
46
73
              end,
47
74
   onEndFrame = function (self)
74
101
                   end
75
102
 
76
103
                end,
 
104
   onCollide = function (self, other)
 
105
                  if other:instanceOf(Bullet) then
 
106
                     the.bullets:remove(other)
 
107
                     other:die()
 
108
                  end
 
109
               end
77
110
}
 
 
b'\\ No newline at end of file'