blob: 2096da925a819d89c01da8762598b062b13271c8 (
plain) (
blame)
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
|
--[[
This file demonstrates how attributes are getting calculated and how they can
be linked to each other.
See http://doc.manasource.org/attributes.xml for more info.
--]]
local function recalculate_base_attribute(being, attribute)
local old_base = being:base_attribute(attribute)
local new_base = old_base
if attribute == ATTR_ACCURACY then
-- Provisional
new_base = being:modified_attribute(ATTR_DEX)
elseif attribute == ATTR_DEFENSE then
new_base = 0.3 * being:modified_attribute(ATTR_VIT)
elseif attribute == ATTR_DODGE then
-- Provisional
new_base = being:modified_attribute(ATTR_AGI)
elseif attribute == ATTR_MAGIC_DODGE then
-- TODO
new_base = 1
elseif attribute == ATTR_MAGIC_DEFENSE then
-- TODO
new_base = 0
elseif attribute == ATTR_BONUS_ASPD then
-- TODO
new_base = 0
elseif attribute == ATTR_HP_REGEN then
local hp_per_sec = being:modified_attribute(ATTR_VIT) * 0.05
new_base = hp_per_sec * TICKS_PER_HP_REGENERATION / 10
elseif attribute == ATTR_HP then
local hp = being:modified_attribute(ATTR_HP)
local max_hp = being:modified_attribute(ATTR_MAX_HP)
if hp > max_hp then
new_base = new_base - hp - max_hp
end
elseif attribute == ATTR_MAX_HP then
local vit = being:modified_attribute(ATTR_VIT)
new_base = (vit + 3) * (vit + 20) * 0.125
elseif attribute == ATTR_MOVE_SPEED_TPS then
-- Provisional
new_base = 3.0 + being:modified_attribute(ATTR_AGI) * 0.08
elseif attribute == ATTR_INV_CAPACITY then
-- Provisional
new_base = 2000 + being:modified_attribute(ATTR_STR) * 180
end
if new_base ~= old_base then
being:set_base_attribute(attribute, new_base)
end
end
local function update_derived_attributes(being, attribute)
if attribute == ATTR_STR then
recalculate_base_attribute(being, ATTR_INV_CAPACITY)
elseif attribute == ATTR_AGI then
recalculate_base_attribute(being, ATTR_DODGE)
elseif attribute == ATTR_VIT then
recalculate_base_attribute(being, ATTR_MAX_HP)
recalculate_base_attribute(being, ATTR_HP_REGEN)
recalculate_base_attribute(being, ATTR_DEFENSE)
elseif attribute == ATTR_INT then
-- unimplemented
elseif attribute == ATTR_WIL then
-- unimplemented
end
end
on_recalculate_base_attribute(recalculate_base_attribute)
on_update_derived_attribute(update_derived_attributes)
|
