To get this branch, use:
bzr branch
http://9ix.org/bzr/traderous
« back to all changes in this revision
Viewing changes to trade_view.lua
- browse files at revision 86
- compare with another revision
- download diff
- download tarball
- view history from revision 86
- Committer: Josh C
- Date: 2013-06-26 00:45:08 UTC
- Revision ID: josh@9ix.org-20130626004508-6in13i6vjpu77els
give planets names
added
removed
trade_view.lua
1
1
TradeView = Subview:extend {
2
2
drawParent = true, --default?
3
have = {},
3
4
onNew = function (self)
4
5
-- create all the interface bits from the planet
5
6
-- and add them to the view
6
7
7
local boxL = the.app.width / 2 - 200
8
local boxT = the.app.height / 2 - 200
9
local boxR = boxL + 400
8
local boxL = the.app.width / 2 - 225
9
local boxT = the.app.height / 2 - 150
10
local boxR = boxL + 450
11
local boxB = boxT + 300
10
12
11
13
local lh = 17 -- line height
12
14
14
16
fill = {255,255,255},
15
17
x = boxL - 1,
16
18
y = boxT - 1,
17
width = 402,
18
height = 402,
19
width = 452,
20
height = 302,
19
21
})
20
22
21
23
self:add(Fill:new{
22
24
fill = {0,0,0},
23
25
x = boxL,
24
26
y = boxT,
25
width = 400,
26
height = 400,
27
width = 450,
28
height = 300,
29
})
30
31
self:add(Text:new{
32
text = 'Name',
33
x = boxL + 10,
34
y = boxT + 10,
35
width = 380
36
})
37
38
self:add(Text:new{
39
text = 'Price',
40
x = boxL + 10,
41
y = boxT + 10,
42
width = 300,
43
align = 'right'
44
})
45
46
self:add(Text:new{
47
text = 'Have',
48
align = 'right',
49
y = boxT + 10,
50
x = boxR - 40
27
51
})
28
52
29
53
for i, good in ipairs(self.planet.goods) do
30
54
local t = Text:new{
31
55
text = good[1],
32
56
x = boxL + 10,
33
y = boxT + 10 + (i-1) * lh,
57
y = boxT + 10 + i * lh,
34
58
width = 380
35
59
}
36
60
39
63
t = Text:new{
40
64
text = good[2],
41
65
x = boxL + 10,
42
y = boxT + 10 + (i-1) * lh,
66
y = boxT + 10 + i * lh,
43
67
width = 300,
44
68
align = 'right'
45
69
}
46
70
self:add(t)
47
71
48
72
local b = Button:new{
49
x = boxR - 80,
50
y = boxT + 10 + (i-1) * lh - 1,
73
x = boxR - 130,
74
y = boxT + 10 + i * lh - 1,
51
75
label = Text:new{ text = 'BUY', x = 1 },
52
76
onMouseDown = function (self)
53
77
the.player:buy(good[1], good[2])
62
86
self:add(b)
63
87
64
88
b = Button:new{
65
x = boxR - 40,
66
y = boxT + 10 + (i-1) * lh - 1,
89
x = boxR - 90,
90
y = boxT + 10 + i * lh - 1,
67
91
label = Text:new{ text = 'SELL', x = 1 },
68
92
onMouseDown = function (self)
69
93
the.player:sell(good[1], good[2])
76
100
height = th
77
101
}
78
102
self:add(b)
103
104
local have = Text:new{
105
x = boxR - 110,
106
y = boxT + 10 + i * lh,
107
width = 100,
108
align = 'right',
109
}
110
self.have[good[1]] = have
111
self:add(have)
112
79
113
end
80
114
81
115
local b = Button:new{
93
127
height = th + 4
94
128
}
95
129
b.x = boxR - b.background.width - 10
96
b.y = boxT + 400 - b.background.height - 10
130
b.y = boxB - b.background.height - 10
97
131
98
132
self:add(b)
99
133
134
local sh = the.player.shield
135
local cost = (sh.max - sh.strength) * sh.cost
136
b = Button:new{
137
x = boxL, y = boxT,
138
width = 800,
139
-- WTF: trailing space makes it not wrap?
140
label = Text:new{ text = 'Repair shields (' .. cost .. ') ',
141
x = 3, y = 2 },
142
onMouseDown = function(self)
143
if the.player.money >= cost and sh.strength < sh.max then
144
the.player.money = the.player.money - cost
145
sh.strength = sh.max
146
self.visible = false
147
end
148
end
149
}
150
151
local tw, th = b.label:getSize()
152
b.background = Fill:new{
153
fill = {100,100,100},
154
width = tw + 3,
155
height = th + 4
156
}
157
b.x = boxR - b.background.width - 60
158
b.y = boxB - b.background.height - 10
159
160
if sh.strength < sh.max then
161
self:add(b)
162
end
163
100
164
self.playerMoney = Text:new{
101
165
text = 'Your money: ',
102
166
width = 200,
103
167
x = boxL + 10,
104
y = boxT + 400 - th - 10
168
y = boxB - th - 10
105
169
}
106
170
self:add(self.playerMoney)
107
171
172
self.availSpace = Text:new{
173
text = 'Available cargo space: ',
174
width = 200,
175
x = boxL + 10,
176
y = boxB - 2 * th - 12
177
}
178
self:add(self.availSpace)
179
108
180
-- give the buttons a cycle to get out of the T/L corner
109
181
self:update(0)
110
182
end,
112
184
the.cursor.visible = false
113
185
love.mouse.setVisible(true)
114
186
love.mouse.setGrab(false)
187
love.mouse.setPosition(the.app.width / 2, the.app.height / 2)
115
188
116
189
Subview.activate(self)
117
190
end,
119
192
the.cursor.visible = true
120
193
love.mouse.setVisible(false)
121
194
love.mouse.setGrab(true)
195
love.mouse.setPosition(the.app.width / 2, the.app.height / 2)
122
196
123
197
self:deactivate()
124
198
end,
128
202
end
129
203
130
204
self.playerMoney.text = 'Your money: ' .. the.player.money
205
self.availSpace.text = 'Available cargo space: ' .. the.player:availableSpace()
206
207
for good, have in pairs(self.have) do
208
have.text = the.player.goods[good] or 0
209
end
131
210
end
132
211
}
b'\\ No newline at end of file'
Loggerhead is a web-based interface for Breezy
Version: 2.0.1