/traderous

To get this branch, use:
bzr branch http://9ix.org/bzr/traderous
53 by Josh C
beginnings of trading interface
1
TradeView = Subview:extend {
2
   drawParent = true, --default?
3
   onNew = function (self)
4
              -- create all the interface bits from the planet
5
              -- and add them to the view
6
7
              local boxL = the.app.width / 2 - 200
8
              local boxT = the.app.height / 2 - 200
54 by Josh C
prices, buttons
9
              local boxR = boxL + 400
10
11
              local lh = 17 -- line height
53 by Josh C
beginnings of trading interface
12
13
              self:add(Fill:new{
14
                          fill = {255,255,255},
15
                          x = boxL - 1,
16
                          y = boxT - 1,
17
                          width = 402,
18
                          height = 402,
19
                       })
20
21
              self:add(Fill:new{
22
                          fill = {0,0,0},
23
                          x = boxL,
24
                          y = boxT,
25
                          width = 400,
26
                          height = 400,
27
                       })
28
29
              for i, good in ipairs(self.planet.goods) do
30
                 local t = Text:new{
31
                    text = good[1],
32
                    x = boxL + 10,
54 by Josh C
prices, buttons
33
                    y = boxT + 10 + (i-1) * lh,
53 by Josh C
beginnings of trading interface
34
                    width = 380
35
                 }
36
54 by Josh C
prices, buttons
37
                 self:add(t)
38
39
                 t = Text:new{
40
                    text = good[2],
41
                    x = boxL + 10,
42
                    y = boxT + 10 + (i-1) * lh,
43
                    width = 300,
44
                    align = 'right'
45
                 }
46
                 self:add(t)
47
48
                 local b = Button:new{
49
                    x = boxR - 80,
50
                    y = boxT + 10 + (i-1) * lh - 1,
51
                    label = Text:new{ text = 'BUY', x = 1 },
52
                 }
53
                 local tw, th = b.label:getSize()
54
                 b.background = Fill:new{
55
                    fill = {100,100,100},
56
                    width = tw + 3,
57
                    height = th
58
                 }
59
                 self:add(b)
60
61
                 b = Button:new{
62
                    x = boxR - 40,
63
                    y = boxT + 10 + (i-1) * lh - 1,
64
                    label = Text:new{ text = 'SELL', x = 1 },
65
                 }
66
                 local tw, th = b.label:getSize()
67
                 b.background = Fill:new{
68
                    fill = {100,100,100},
69
                    width = tw + 3,
70
                    height = th
71
                 }
72
                 self:add(b)
53 by Josh C
beginnings of trading interface
73
              end
55 by Josh C
close button
74
75
              local b = Button:new{
76
                 x = boxL, y = boxT,
77
                 label = Text:new{ text = 'Close', x = 3, y = 2 },
78
                 onMouseDown = function()
79
                                  self:close()
80
                               end
81
              }
82
83
              local tw, th = b.label:getSize()
84
              b.background = Fill:new{
85
                 fill = {100,100,100},
86
                 width = tw + 7,
87
                 height = th + 4
88
              }
89
              b.x = boxR - b.background.width - 10
90
              b.y = boxT + 400 - b.background.height - 10
91
92
              self:add(b)
93
94
              -- give the buttons a cycle to get out of the T/L corner
95
              self:update(0)
53 by Josh C
beginnings of trading interface
96
           end,
97
   activate = function (self)
98
                 the.cursor.visible = false
99
                 love.mouse.setVisible(true)
100
                 love.mouse.setGrab(false)
101
102
                 Subview.activate(self)
103
              end,
55 by Josh C
close button
104
   close = function (self)
105
              the.cursor.visible = true
106
              love.mouse.setVisible(false)
107
              love.mouse.setGrab(true)
53 by Josh C
beginnings of trading interface
108
55 by Josh C
close button
109
              self:deactivate()
110
           end,
111
   onUpdate = function (self)
112
                 if the.keys:justPressed('escape') then
113
                    self:close()
114
                 end
115
              end
53 by Josh C
beginnings of trading interface
116
}