Manuel Simon Hirsig
107 lines
3.1 KiB
Lua
107 lines
3.1 KiB
Lua
local m = {}
|
|
Aux.money = m
|
|
|
|
local GOLD_TEXT = '|cffffd70ag|r'
|
|
local SILVER_TEXT = '|cffc7c7cfs|r'
|
|
local COPPER_TEXT = '|cffeda55fc|r'
|
|
|
|
do
|
|
local COPPER_PER_SILVER = 100
|
|
local COPPER_PER_GOLD = 10000
|
|
|
|
function m.to_GSC(money)
|
|
local gold = floor(money / COPPER_PER_GOLD)
|
|
local silver = floor(mod(money, COPPER_PER_GOLD) / COPPER_PER_SILVER)
|
|
local copper = mod(money, COPPER_PER_SILVER)
|
|
return gold, silver, copper
|
|
end
|
|
|
|
function m.from_GSC(gold, silver, copper)
|
|
return gold * COPPER_PER_GOLD + silver * COPPER_PER_SILVER + copper
|
|
end
|
|
end
|
|
|
|
function m.to_string(money, pad, trim, decimal_points, color, no_color)
|
|
|
|
local is_negative = money < 0
|
|
money = abs(money)
|
|
local gold, silver, copper = m.to_GSC(money)
|
|
|
|
-- rounding
|
|
if decimal_points then
|
|
copper = tonumber(format('%.'..decimal_points..'f', copper))
|
|
end
|
|
|
|
local gold_text, silver_text, copper_text
|
|
if no_color then
|
|
gold_text, silver_text, copper_text = 'g', 's', 'c'
|
|
else
|
|
gold_text, silver_text, copper_text = GOLD_TEXT, SILVER_TEXT, COPPER_TEXT
|
|
end
|
|
|
|
local text
|
|
if trim then
|
|
local parts = {}
|
|
if gold > 0 then
|
|
tinsert(parts, m.format_number(gold, false, nil, color)..gold_text)
|
|
end
|
|
if silver > 0 then
|
|
tinsert(parts, m.format_number(silver, pad, nil, color)..silver_text)
|
|
end
|
|
if copper > 0 or gold == 0 and silver == 0 then
|
|
tinsert(parts, m.format_number(copper, pad, decimal_points, color)..copper_text)
|
|
end
|
|
text = Aux.util.join(parts, ' ')
|
|
else
|
|
if gold > 0 then
|
|
text = m.format_number(gold, false, nil, color)..gold_text..' '..m.format_number(silver, pad, nil, color)..silver_text..' '..m.format_number(copper, pad, decimal_points, color)..copper_text
|
|
elseif silver > 0 then
|
|
text = m.format_number(silver, false, nil, color)..silver_text..' '..m.format_number(copper, pad, decimal_points, color)..copper_text
|
|
else
|
|
text = m.format_number(copper, false, decimal_points, color)..copper_text
|
|
end
|
|
end
|
|
|
|
if is_negative then
|
|
if color then
|
|
text = color..'-|r'..text
|
|
else
|
|
text = '-'..text
|
|
end
|
|
end
|
|
|
|
return text
|
|
end
|
|
|
|
function m.from_string(value)
|
|
value = strlower(value)
|
|
|
|
-- remove any colors
|
|
value = gsub(gsub(value, '\124c([0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F][0-9a-fA-F])', ''), '\124r', '')
|
|
|
|
-- extract gold/silver/copper values
|
|
local gold = tonumber(({strfind(value, '(%d*%.?%d+)g')})[3])
|
|
local silver = tonumber(({strfind(value, '(%d*%.?%d+)s')})[3])
|
|
local copper = tonumber(({strfind(value, '(%d*%.?%d+)c')})[3])
|
|
-- if not gold and not silver and not copper then return end
|
|
|
|
-- test that there are no extra characters (other than spaces)
|
|
value = gsub(value, '%d*%.?%d+g', '', 1)
|
|
value = gsub(value, '%d*%.?%d+s', '', 1)
|
|
value = gsub(value, '%d*%.?%d+c', '', 1)
|
|
if strfind(value, '%S') then return 0 end
|
|
|
|
return m.from_GSC(gold or 0, silver or 0, copper or 0)
|
|
end
|
|
|
|
function m.format_number(num, pad, decimal_padding, color)
|
|
|
|
local padding = pad and 2 + (decimal_padding and decimal_padding + 1 or 0) or 0
|
|
num = format('%0'..padding..'.0'..(decimal_padding or 0)..'f', num)
|
|
|
|
if color then
|
|
return color..num..'|r'
|
|
else
|
|
return num
|
|
end
|
|
end |