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