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) |
|
73 |
||
|
53
by Josh C
beginnings of trading interface |
74 |
end |
75 |
end, |
|
76 |
activate = function (self) |
|
77 |
the.cursor.visible = false |
|
78 |
love.mouse.setVisible(true) |
|
79 |
love.mouse.setGrab(false) |
|
80 |
||
81 |
Subview.activate(self) |
|
82 |
end, |
|
83 |
||
84 |
} |