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 8
- compare with another revision
- download diff
- download tarball
- view history from revision 8
- Committer: Josh C
- Date: 2013-05-05 14:00:45 UTC
- Revision ID: josh@9ix.org-20130505140045-o1dcza3m347rkx3i
targeting cursor (manual switch to start)
- files removed:
- .bzrignore
- files modified:
- Info.plist
added
removed
trade_view.lua
1
TradeView = Subview:extend {
2
drawParent = true, --default?
3
have = {},
4
onNew = function (self)
5
-- create all the interface bits from the planet
6
-- and add them to the view
7
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
12
13
local lh = 17 -- line height
14
15
self:add(Fill:new{
16
fill = {255,255,255},
17
x = boxL - 1,
18
y = boxT - 1,
19
width = 452,
20
height = 302,
21
})
22
23
self:add(Fill:new{
24
fill = {0,0,0},
25
x = boxL,
26
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
51
})
52
53
for i, good in ipairs(self.planet.goods) do
54
local t = Text:new{
55
text = good[1],
56
x = boxL + 10,
57
y = boxT + 10 + i * lh,
58
width = 380
59
}
60
61
self:add(t)
62
63
t = Text:new{
64
text = good[2],
65
x = boxL + 10,
66
y = boxT + 10 + i * lh,
67
width = 300,
68
align = 'right'
69
}
70
self:add(t)
71
72
local b = Button:new{
73
x = boxR - 130,
74
y = boxT + 10 + i * lh - 1,
75
label = Text:new{ text = 'BUY', x = 1 },
76
onMouseDown = function (self)
77
the.player:buy(good[1], good[2])
78
end
79
}
80
local tw, th = b.label:getSize()
81
b.background = Fill:new{
82
fill = {100,100,100},
83
width = tw + 3,
84
height = th
85
}
86
self:add(b)
87
88
b = Button:new{
89
x = boxR - 90,
90
y = boxT + 10 + i * lh - 1,
91
label = Text:new{ text = 'SELL', x = 1 },
92
onMouseDown = function (self)
93
the.player:sell(good[1], good[2])
94
end
95
}
96
local tw, th = b.label:getSize()
97
b.background = Fill:new{
98
fill = {100,100,100},
99
width = tw + 3,
100
height = th
101
}
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
113
end
114
115
local b = Button:new{
116
x = boxL, y = boxT,
117
label = Text:new{ text = 'Close', x = 3, y = 2 },
118
onMouseDown = function()
119
self:close()
120
end
121
}
122
123
local tw, th = b.label:getSize()
124
b.background = Fill:new{
125
fill = {100,100,100},
126
width = tw + 7,
127
height = th + 4
128
}
129
b.x = boxR - b.background.width - 10
130
b.y = boxB - b.background.height - 10
131
132
self:add(b)
133
134
self.playerMoney = Text:new{
135
text = 'Your money: ',
136
width = 200,
137
x = boxL + 10,
138
y = boxB - th - 10
139
}
140
self:add(self.playerMoney)
141
142
self.availSpace = Text:new{
143
text = 'Available cargo space: ',
144
width = 200,
145
x = boxL + 10,
146
y = boxB - 2 * th - 12
147
}
148
self:add(self.availSpace)
149
150
-- give the buttons a cycle to get out of the T/L corner
151
self:update(0)
152
end,
153
activate = function (self)
154
the.cursor.visible = false
155
love.mouse.setVisible(true)
156
love.mouse.setGrab(false)
157
love.mouse.setPosition(the.app.width / 2, the.app.height / 2)
158
159
Subview.activate(self)
160
end,
161
close = function (self)
162
the.cursor.visible = true
163
love.mouse.setVisible(false)
164
love.mouse.setGrab(true)
165
love.mouse.setPosition(the.app.width / 2, the.app.height / 2)
166
167
self:deactivate()
168
end,
169
onUpdate = function (self)
170
if the.keys:justPressed('escape') then
171
self:close()
172
end
173
174
self.playerMoney.text = 'Your money: ' .. the.player.money
175
self.availSpace.text = 'Available cargo space: ' .. the.player:availableSpace()
176
177
for good, have in pairs(self.have) do
178
have.text = the.player.goods[good] or 0
179
end
180
end
181
}
b'\\ No newline at end of file'
Loggerhead is a web-based interface for Breezy
Version: 2.0.1