1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
|
include "tribes/scripting/help/format_help.lua"
-- RST
-- ware_help.lua
-- ---------------
--
-- This script returns a formatted entry for the ingame ware help.
-- Pass the internal tribe name and ware name to the coroutine to select the
-- ware type.
-- =======================================================
-- ************* Main ware help functions *************
-- =======================================================
-- RST
-- .. function:: ware_help_general_string(tribe, ware_description)
--
-- Displays general info texts about the ware
--
-- :arg tribe: The :class:`LuaTribeDescription` for a tribe that uses this ware.
-- :arg ware_description: the ware_description from C++.
-- :returns: General info about the ware
--
function ware_help_general_string(tribe, ware_description)
local purpose_text = ware_helptext()
if (purpose_text ~= "") then
purpose_text = purpose_text .. " "
end
-- TRANSLATORS: Put 2 sentences one after the other.
-- Languages using Chinese script probably want to lose the blank space here.
purpose_text = pgettext("sentence_separator", "%s %s"):bformat(ware_helptext(), ware_helptext(tribe.name))
-- TODO(GunChleoc): Split into purpose and note
local result = rt(h2(_"Purpose")) ..
rt("image=" .. ware_description.icon_name, p(purpose_text))
return result
end
-- RST
-- .. function:: ware_help_producers_string(tribe, ware_description)
--
-- Displays the buildings that produce this ware with information about
-- wares consumed in their production programs
--
-- :arg tribe: The :class:`LuaTribeDescription` for a tribe that uses this ware.
-- :arg ware_description: the ware_description from C++.
-- :returns: Info about buildings producing this ware and the production cost.
--
function ware_help_producers_string(tribe, ware_description)
local result = ""
for i, building in ipairs(ware_description.producers) do
if (tribe:has_building(building.name)) then
-- TRANSLATORS: Ware Encyclopedia: A building producing a ware
result = result .. rt(h2(_"Producer"))
result = result .. dependencies({building, ware_description}, building.descname)
-- Find out which programs in the building produce this ware
local producing_programs = {}
for j, program_name in ipairs(building.production_programs) do
for ware, amount in pairs(building:produced_wares(program_name)) do
if (ware_description.name == ware) then
table.insert(producing_programs, program_name)
end
end
end
-- Now collect all wares produced by the filtered programs
local produced_wares_strings = {}
local produced_wares_counters = {}
for j, program_name in ipairs(producing_programs) do
local produced_wares_amount = {}
produced_wares_counters[program_name] = 0
for ware, amount in pairs(building:produced_wares(program_name)) do
if (produced_wares_amount[ware] == nil) then
produced_wares_amount[ware] = 0
end
produced_wares_amount[ware] = produced_wares_amount[ware] + amount
produced_wares_counters[program_name] = produced_wares_counters[program_name] + amount
end
local produced_wares_string = ""
for ware, amount in pairs(produced_wares_amount) do
local ware_descr = wl.Game():get_ware_description(ware)
produced_wares_string = produced_wares_string
.. help_ware_amount_line(ware_descr, amount)
end
produced_wares_strings[program_name] = produced_wares_string
end
-- Now collect the consumed wares for each filtered program and print the program info
for j, program_name in ipairs(producing_programs) do
result = result .. help_consumed_wares(building, program_name)
if (produced_wares_counters[program_name] > 0) then
result = result
-- TRANSLATORS: Ware Encyclopedia: Wares produced by a productionsite
.. rt(h3(ngettext("Ware produced:", "Wares produced:", produced_wares_counters[program_name])))
.. produced_wares_strings[program_name]
end
end
end
end
return result
end
-- RST
-- .. function:: ware_help_consumers_string(tribe, ware_description)
--
-- Displays the buildings that consume this ware and about
-- workers that use this ware as a tool
--
-- :arg tribe: The :class:`LuaTribeDescription` for a tribe that uses this ware.
-- :arg ware_description: the ware_description from C++.
-- :returns: Info about buildings and workers that use this ware
--
function ware_help_consumers_string(tribe, ware_description)
local result = ""
-- Now collecting the buildings that consume this ware
local consumers_string = ""
local consumers_amount = 0
for i, building in ipairs(ware_description.consumers) do
if (tribe:has_building(building.name)) then
consumers_string = consumers_string .. dependencies({ware_description, building}, building.descname)
consumers_amount = consumers_amount + 1
end
end
-- Constructionsite isn't listed with the consumers, so we need a special check
if (ware_description:is_construction_material(tribe.name)) then
local constructionsite_description = wl.Game():get_building_description("constructionsite")
consumers_string = consumers_string
.. dependencies({ware_description, constructionsite_description}, constructionsite_description.descname)
consumers_amount = consumers_amount + 1
end
-- Now collecting the workers that use this ware as a tool
local workers_string = ""
for i, worker in ipairs(tribe.workers) do
local add_this_worker = false
for j, buildcost in ipairs(worker.buildcost) do
if (buildcost ~= nil and buildcost == ware_description.name) then
add_this_worker = true
consumers_amount = consumers_amount + 1
break
end
end
if(add_this_worker) then
workers_string = workers_string .. image_line(worker.icon_name, 1, p(worker.descname))
end
end
-- Now show consumers (buildings + workers)
if (consumers_amount > 0) then
-- TRANSLATORS: Ware Encyclopedia: A list of buildings and / or workers that consume a ware
result = result .. rt(h2(ngettext("Consumer", "Consumers", consumers_amount)))
if (consumers ~= "") then
result = result .. consumers_string
end
if (workers_string ~= "") then
result = result .. workers_string
end
end
return result
end
return {
func = function(tribename, warename)
set_textdomain("tribes_encyclopedia")
local tribe = wl.Game():get_tribe_description(tribename)
local ware_description = wl.Game():get_ware_description(warename)
include(ware_description.helptext_script)
return {
title = ware_description.descname,
text = ware_help_general_string(tribe, ware_description)
.. ware_help_producers_string(tribe, ware_description)
.. ware_help_consumers_string(tribe, ware_description)
}
end
}
|
