/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-06-16 03:32:01 UTC
  • Revision ID: josh@9ix.org-20130616033201-91uqlfnqa6cgo989
make sure every planet trades something

Show diffs side-by-side

added added

removed removed

Lines of Context:
planet.lua
 
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'