-
Notifications
You must be signed in to change notification settings - Fork 180
/
armoks-blessing.lua
287 lines (269 loc) · 12 KB
/
armoks-blessing.lua
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
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
-- Adjust all attributes of all dwarves to an ideal
-- by vjek
local utils = require('utils')
function rejuvenate(unit)
if unit==nil then
print ("No unit available! Aborting with extreme prejudice.")
return
end
local current_year=df.global.cur_year
local newbirthyear=current_year - 20
if unit.birth_year < newbirthyear then
unit.birth_year=newbirthyear
end
if unit.old_year < current_year+100 then
unit.old_year=current_year+100
end
end
-- ---------------------------------------------------------------------------
function brainwash_unit(unit)
if unit==nil then
print ("No unit available! Aborting with extreme prejudice.")
return
end
-- ~unit.status.current_soul.personality.traits
unit.status.current_soul.personality.traits.LOVE_PROPENSITY = 75
unit.status.current_soul.personality.traits.HATE_PROPENSITY = 25
unit.status.current_soul.personality.traits.ENVY_PROPENSITY = 25
unit.status.current_soul.personality.traits.CHEER_PROPENSITY = 75
unit.status.current_soul.personality.traits.DEPRESSION_PROPENSITY = 25
unit.status.current_soul.personality.traits.ANGER_PROPENSITY = 25
unit.status.current_soul.personality.traits.ANXIETY_PROPENSITY = 25
unit.status.current_soul.personality.traits.LUST_PROPENSITY = 99
unit.status.current_soul.personality.traits.STRESS_VULNERABILITY = 25
unit.status.current_soul.personality.traits.GREED = 25
unit.status.current_soul.personality.traits.IMMODERATION = 25
unit.status.current_soul.personality.traits.VIOLENT = 50
unit.status.current_soul.personality.traits.PERSEVERENCE = 75
unit.status.current_soul.personality.traits.WASTEFULNESS = 50
unit.status.current_soul.personality.traits.DISCORD = 25
unit.status.current_soul.personality.traits.FRIENDLINESS = 75
unit.status.current_soul.personality.traits.POLITENESS = 75
unit.status.current_soul.personality.traits.DISDAIN_ADVICE = 50
unit.status.current_soul.personality.traits.BRAVERY = 75
unit.status.current_soul.personality.traits.CONFIDENCE = 75
unit.status.current_soul.personality.traits.VANITY = 25
unit.status.current_soul.personality.traits.AMBITION = 75
unit.status.current_soul.personality.traits.GRATITUDE = 75
unit.status.current_soul.personality.traits.IMMODESTY = 50
unit.status.current_soul.personality.traits.HUMOR = 75
unit.status.current_soul.personality.traits.VENGEFUL = 25
unit.status.current_soul.personality.traits.PRIDE = 50
unit.status.current_soul.personality.traits.CRUELTY = 25
unit.status.current_soul.personality.traits.SINGLEMINDED = 75
unit.status.current_soul.personality.traits.HOPEFUL = 75
unit.status.current_soul.personality.traits.CURIOUS = 75
unit.status.current_soul.personality.traits.BASHFUL = 25
unit.status.current_soul.personality.traits.PRIVACY = 75
unit.status.current_soul.personality.traits.PERFECTIONIST = 75
unit.status.current_soul.personality.traits.CLOSEMINDED = 25
unit.status.current_soul.personality.traits.TOLERANT = 75
unit.status.current_soul.personality.traits.EMOTIONALLY_OBSESSIVE = 25
unit.status.current_soul.personality.traits.SWAYED_BY_EMOTIONS = 25
unit.status.current_soul.personality.traits.ALTRUISM = 75
unit.status.current_soul.personality.traits.DUTIFULNESS = 75
unit.status.current_soul.personality.traits.THOUGHTLESSNESS = 25
unit.status.current_soul.personality.traits.ORDERLINESS = 75
unit.status.current_soul.personality.traits.TRUST = 75
unit.status.current_soul.personality.traits.GREGARIOUSNESS = 75
unit.status.current_soul.personality.traits.ASSERTIVENESS = 25
unit.status.current_soul.personality.traits.ACTIVITY_LEVEL = 75
unit.status.current_soul.personality.traits.EXCITEMENT_SEEKING = 75
unit.status.current_soul.personality.traits.IMAGINATION = 25
unit.status.current_soul.personality.traits.ABSTRACT_INCLINED = 25
unit.status.current_soul.personality.traits.ART_INCLINED = 50
unit.status.current_soul.personality.values:resize(0)
local list_of_values={
[df.value_type.LAW]=-11,
[df.value_type.FAMILY]=11,
[df.value_type.FRIENDSHIP]=41,
[df.value_type.DECORUM]=11,
[df.value_type.TRADITION]=11,
[df.value_type.ARTWORK]=41,
[df.value_type.COOPERATION]=41,
[df.value_type.STOICISM]=11,
[df.value_type.INTROSPECTION]=41,
[df.value_type.SELF_CONTROL]=41,
[df.value_type.HARMONY]=11,
[df.value_type.MERRIMENT]=21,
[df.value_type.SKILL]=41,
[df.value_type.HARD_WORK]=41,
[df.value_type.SACRIFICE]=41,
[df.value_type.COMPETITION]=-41,
[df.value_type.PERSEVERENCE]=41,
[df.value_type.LEISURE_TIME]=-11,
[df.value_type.COMMERCE]=41,
[df.value_type.ROMANCE]=41,
[df.value_type.PEACE]=-11,
[df.value_type.KNOWLEDGE]=41,
}
for k,v in pairs(list_of_values) do
unit.status.current_soul.personality.values:insert("#",{new=true,type=k,strength=v})
end
unit.status.current_soul.personality.needs:resize(0)
local list_of_needs={
[df.need_type.Socialize]=2,
[df.need_type.BeWithFriends]=2,
[df.need_type.TakeItEasy]=2,
[df.need_type.MakeMerry]=2,
[df.need_type.AdmireArt]=2,
-- [df.need_type.EatGoodMeal]=0, -- open bug 10262 as of 20200218
[df.need_type.PrayOrMeditate]=0,
[df.need_type.DrinkAlcohol]=1,
}
for k,v in pairs(list_of_needs) do
if k == df.need_type.PrayOrMeditate then -- handle deity id, otherwise, the deity is set to -1
if unit.hist_figure_id ~= -1 then
for index, link in ipairs(df.historical_figure.find(unit.hist_figure_id).histfig_links) do
if df.histfig_hf_link_deityst:is_instance(link) and link.target_hf ~= nil then
unit.status.current_soul.personality.needs:insert("#",{new=true,id=k,deity_id=link.target_hf,need_level=v})
link.link_strength=1 -- casual worshipper
end
end
end
else
unit.status.current_soul.personality.needs:insert("#",{new=true,id=k,need_level=v})
end
end
end
-- ---------------------------------------------------------------------------
function elevate_attributes(unit)
if unit==nil then
print ("No unit available! Aborting with extreme prejudice.")
return
end
if unit.status.current_soul then
for k,v in pairs(unit.status.current_soul.mental_attrs) do
v.value=v.max_value
end
end
for k,v in pairs(unit.body.physical_attrs) do
v.value=v.max_value
end
end
-- ---------------------------------------------------------------------------
-- this function will return the number of elements, starting at zero.
-- useful for counting things where #foo doesn't work
function count_this(to_be_counted)
local count = -1
local var1 = ""
while var1 ~= nil do
count = count + 1
var1 = (to_be_counted[count])
end
count=count-1
return count
end
-- ---------------------------------------------------------------------------
function make_legendary(skillname,unit)
local skillnamenoun,skillnum
if unit==nil then
print ("No unit available! Aborting with extreme prejudice.")
return
end
if (df.job_skill[skillname]) then
skillnamenoun = df.job_skill.attrs[df.job_skill[skillname]].caption_noun
else
print ("The skill name provided is not in the list.")
return
end
if skillnamenoun ~= nil then
skillnum = df.job_skill[skillname]
utils.insert_or_update(unit.status.current_soul.skills, { new = true, id = skillnum, rating = 20 }, 'id')
print (unit.name.first_name.." is now a Legendary "..skillnamenoun)
else
print ("Empty skill name noun, bailing out!")
return
end
end
-- ---------------------------------------------------------------------------
function BreathOfArmok(unit)
if unit==nil then
print ("No unit available! Aborting with extreme prejudice.")
return
end
local i
local count_max = count_this(df.job_skill)
for i=0, count_max do
utils.insert_or_update(unit.status.current_soul.skills, { new = true, id = i, rating = 20 }, 'id')
end
print ("The breath of Armok has engulfed "..unit.name.first_name)
end
-- ---------------------------------------------------------------------------
local function get_skill_desc(skill_idx)
return df.job_skill.attrs[skill_idx].caption or df.job_skill[skill_idx] or ("(unnamed skill %d)"):format(skill_idx)
end
function LegendaryByClass(skilltype, unit)
if not unit then
print ("No unit available! Aborting with extreme prejudice.")
return
end
local count_max = count_this(df.job_skill)
for i=0, count_max do
if df.job_skill[i]:startswith('UNUSED') then goto continue end
local skillclass = df.job_skill_class[df.job_skill.attrs[i].type]
if skilltype == skillclass then
local skillname = get_skill_desc(i)
print ("Skill "..skillname.." is type: "..skillclass.." and is now Legendary for "..unit.name.first_name)
utils.insert_or_update(unit.status.current_soul.skills, { new = true, id = i, rating = 20 }, 'id')
end
::continue::
end
end
-- ---------------------------------------------------------------------------
function PrintSkillList()
local count_max = count_this(df.job_skill)
local i
for i=0, count_max do
print("'"..get_skill_desc(i).."' "..df.job_skill[i].." Type: "..df.job_skill_class[df.job_skill.attrs[i].type])
end
print ("Provide the UPPER CASE argument, for example: PROCESSPLANTS rather than Threshing")
end
-- ---------------------------------------------------------------------------
function PrintSkillClassList()
local i
local count_max = count_this(df.job_skill_class)
for i=0, count_max do
print(df.job_skill_class[i])
end
print ("Provide one of these arguments, and all skills of that type will be made Legendary")
print ("For example: Medical will make all medical skills legendary")
end
-- ---------------------------------------------------------------------------
function adjust_all_dwarves(skillname)
for _,v in ipairs(dfhack.units.getCitizens()) do
print("Adjusting "..dfhack.df2console(dfhack.TranslateName(dfhack.units.getVisibleName(v))))
brainwash_unit(v)
elevate_attributes(v)
rejuvenate(v)
if skillname then
if df.job_skill_class[skillname] then
LegendaryByClass(skillname,v)
elseif skillname=="all" then
BreathOfArmok(v)
else
make_legendary(skillname,v)
end
end
end
end
-- ---------------------------------------------------------------------------
-- main script operation starts here
-- ---------------------------------------------------------------------------
local args = {...}
local opt = args[1]
local skillname
if opt then
if opt=="list" then
PrintSkillList()
return
end
if opt=="classes" then
PrintSkillClassList()
return
end
skillname = opt
else
print ("No skillname supplied, no skills will be adjusted. Pass argument 'list' to see a skill list, 'classes' to show skill classes, or use 'all' if you want all skills legendary.")
end
adjust_all_dwarves(skillname)