/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-05-13 21:23:20 UTC
  • Revision ID: josh@9ix.org-20130513212320-t1sgc5dcpjwmjp38
mirror (contains a bug where things in the corner aren't getting mirrored?

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
Planet = Tile:extend {
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
 
   goods = {},
15
 
   onNew = function (self)
16
 
              self.indicator = Tile:new{ image = 'data/planet1ind.png' }
17
 
              the.indicators:add(self.indicator)
18
 
 
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
32
 
                 end
33
 
              end
34
 
           end,
35
 
   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
42
 
                       tradeView = TradeView:new{ planet = self }
43
 
                       tradeView:activate()
44
 
                    end
45
 
                 end
46
 
              end
47
 
}
 
 
b'\\ No newline at end of file'