/traderous : revision 55

1

TradeView = Subview:extend {

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

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

164

self.playerMoney = Text:new{

165

text = 'Your money: ',

166

width = 200,

167

x = boxL + 10,

168

y = boxB - th - 10

169

}

170

self:add(self.playerMoney)

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

180

94

-- give the buttons a cycle to get out of the T/L corner

181

95

self:update(0)

182

96

end,

184

98

the.cursor.visible = false

185

99

love.mouse.setVisible(true)

186

100

love.mouse.setGrab(false)

187

love.mouse.setPosition(the.app.width / 2, the.app.height / 2)

188

101

189

102

Subview.activate(self)

190

103

end,

192

105

the.cursor.visible = true

193

106

love.mouse.setVisible(false)

194

107

love.mouse.setGrab(true)

195

love.mouse.setPosition(the.app.width / 2, the.app.height / 2)

196

108

197

109

self:deactivate()

198

110

end,

200

112

if the.keys:justPressed('escape') then

201

113

self:close()

202

114

end

203

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

210

115

end

211

116

}

b'\\ No newline at end of file'