colour_chat/init.lua

530 lines
16 KiB
Lua

local modstorage = core.get_mod_storage()
-- crashed on pre-5.2
-- local modpath = minetest.get_modpath("colour_chat")
-- dofile(modpath .. "/colournames.lua")
-- This list of colour names was extracted and converted from
-- https://drafts.csswg.org/css-color/#named-colors
local colournames = {}
colournames["aliceblue"] = "#F0F8FF"
colournames["antiquewhite"] = "#FAEBD7"
colournames["aqua"] = "#00FFFF"
colournames["aquamarine"] = "#7FFFD4"
colournames["azure"] = "#F0FFFF"
colournames["beige"] = "#F5F5DC"
colournames["bisque"] = "#FFE4C4"
colournames["black"] = "#000000"
colournames["blanchedalmond"] = "#FFEBCD"
colournames["blue"] = "#0000FF"
colournames["blueviolet"] = "#8A2BE2"
colournames["brown"] = "#A52A2A"
colournames["burlywood"] = "#DEB887"
colournames["cadetblue"] = "#5F9EA0"
colournames["chartreuse"] = "#7FFF00"
colournames["chocolate"] = "#D2691E"
colournames["coral"] = "#FF7F50"
colournames["cornflowerblue"] = "#6495ED"
colournames["cornsilk"] = "#FFF8DC"
colournames["crimson"] = "#DC143C"
colournames["cyan"] = "#00FFFF"
colournames["darkblue"] = "#00008B"
colournames["darkcyan"] = "#008B8B"
colournames["darkgoldenrod"] = "#B8860B"
colournames["darkgray"] = "#A9A9A9"
colournames["darkgreen"] = "#006400"
colournames["darkgrey"] = "#A9A9A9"
colournames["darkkhaki"] = "#BDB76B"
colournames["darkmagenta"] = "#8B008B"
colournames["darkolivegreen"] = "#556B2F"
colournames["darkorange"] = "#FF8C00"
colournames["darkorchid"] = "#9932CC"
colournames["darkred"] = "#8B0000"
colournames["darksalmon"] = "#E9967A"
colournames["darkseagreen"] = "#8FBC8F"
colournames["darkslateblue"] = "#483D8B"
colournames["darkslategray"] = "#2F4F4F"
colournames["darkslategrey"] = "#2F4F4F"
colournames["darkturquoise"] = "#00CED1"
colournames["darkviolet"] = "#9400D3"
colournames["deeppink"] = "#FF1493"
colournames["deepskyblue"] = "#00BFFF"
colournames["dimgray"] = "#696969"
colournames["dimgrey"] = "#696969"
colournames["dodgerblue"] = "#1E90FF"
colournames["firebrick"] = "#B22222"
colournames["floralwhite"] = "#FFFAF0"
colournames["forestgreen"] = "#228B22"
colournames["fuchsia"] = "#FF00FF"
colournames["gainsboro"] = "#DCDCDC"
colournames["ghostwhite"] = "#F8F8FF"
colournames["gold"] = "#FFD700"
colournames["goldenrod"] = "#DAA520"
colournames["gray"] = "#808080"
colournames["green"] = "#008000"
colournames["greenyellow"] = "#ADFF2F"
colournames["grey"] = "#808080"
colournames["honeydew"] = "#F0FFF0"
colournames["hotpink"] = "#FF69B4"
colournames["indianred"] = "#CD5C5C"
colournames["indigo"] = "#4B0082"
colournames["ivory"] = "#FFFFF0"
colournames["khaki"] = "#F0E68C"
colournames["lavender"] = "#E6E6FA"
colournames["lavenderblush"] = "#FFF0F5"
colournames["lawngreen"] = "#7CFC00"
colournames["lemonchiffon"] = "#FFFACD"
colournames["lightblue"] = "#ADD8E6"
colournames["lightcoral"] = "#F08080"
colournames["lightcyan"] = "#E0FFFF"
colournames["lightgoldenrodyellow"] = "#FAFAD2"
colournames["lightgray"] = "#D3D3D3"
colournames["lightgreen"] = "#90EE90"
colournames["lightgrey"] = "#D3D3D3"
colournames["lightpink"] = "#FFB6C1"
colournames["lightsalmon"] = "#FFA07A"
colournames["lightseagreen"] = "#20B2AA"
colournames["lightskyblue"] = "#87CEFA"
colournames["lightslategray"] = "#778899"
colournames["lightslategrey"] = "#778899"
colournames["lightsteelblue"] = "#B0C4DE"
colournames["lightyellow"] = "#FFFFE0"
colournames["lime"] = "#00FF00"
colournames["limegreen"] = "#32CD32"
colournames["linen"] = "#FAF0E6"
colournames["magenta"] = "#FF00FF"
colournames["maroon"] = "#800000"
colournames["mediumaquamarine"] = "#66CDAA"
colournames["mediumblue"] = "#0000CD"
colournames["mediumorchid"] = "#BA55D3"
colournames["mediumpurple"] = "#9370DB"
colournames["mediumseagreen"] = "#3CB371"
colournames["mediumslateblue"] = "#7B68EE"
colournames["mediumspringgreen"] = "#00FA9A"
colournames["mediumturquoise"] = "#48D1CC"
colournames["mediumvioletred"] = "#C71585"
colournames["midnightblue"] = "#191970"
colournames["mintcream"] = "#F5FFFA"
colournames["mistyrose"] = "#FFE4E1"
colournames["moccasin"] = "#FFE4B5"
colournames["navajowhite"] = "#FFDEAD"
colournames["navy"] = "#000080"
colournames["oldlace"] = "#FDF5E6"
colournames["olive"] = "#808000"
colournames["olivedrab"] = "#6B8E23"
colournames["orange"] = "#FFA500"
colournames["orangered"] = "#FF4500"
colournames["orchid"] = "#DA70D6"
colournames["palegoldenrod"] = "#EEE8AA"
colournames["palegreen"] = "#98FB98"
colournames["paleturquoise"] = "#AFEEEE"
colournames["palevioletred"] = "#DB7093"
colournames["papayawhip"] = "#FFEFD5"
colournames["peachpuff"] = "#FFDAB9"
colournames["peru"] = "#CD853F"
colournames["pink"] = "#FFC0CB"
colournames["plum"] = "#DDA0DD"
colournames["powderblue"] = "#B0E0E6"
colournames["purple"] = "#800080"
colournames["rebeccapurple"] = "#663399"
colournames["red"] = "#FF0000"
colournames["rosybrown"] = "#BC8F8F"
colournames["royalblue"] = "#4169E1"
colournames["saddlebrown"] = "#8B4513"
colournames["salmon"] = "#FA8072"
colournames["sandybrown"] = "#F4A460"
colournames["seagreen"] = "#2E8B57"
colournames["seashell"] = "#FFF5EE"
colournames["sienna"] = "#A0522D"
colournames["silver"] = "#C0C0C0"
colournames["skyblue"] = "#87CEEB"
colournames["slateblue"] = "#6A5ACD"
colournames["slategray"] = "#708090"
colournames["slategrey"] = "#708090"
colournames["snow"] = "#FFFAFA"
colournames["springgreen"] = "#00FF7F"
colournames["steelblue"] = "#4682B4"
colournames["tan"] = "#D2B48C"
colournames["teal"] = "#008080"
colournames["thistle"] = "#D8BFD8"
colournames["tomato"] = "#FF6347"
colournames["turquoise"] = "#40E0D0"
colournames["violet"] = "#EE82EE"
colournames["wheat"] = "#F5DEB3"
colournames["white"] = "#FFFFFF"
colournames["whitesmoke"] = "#F5F5F5"
colournames["yellow"] = "#FFFF00"
colournames["yellowgreen"] = "#9ACD32"
function colourname2hex(colname)
if not colname then return "" end
if colname == "" then return "" end
if colname:sub(1,1) == "#" then
if #colname == 7 then
-- let's guess it's a hexcode as colour
return colname
end
end
if colournames[colname] then
return colournames[colname]
end
-- be safe and return nothing
return ""
end
local register_on_message = core.register_on_sending_chat_message
if core.register_on_sending_chat_messages then
register_on_message = core.register_on_sending_chat_messages
end
local function safe(func)
-- wrap a function w/ logic to avoid crashing the game
local f = function(...)
local status, out = pcall(func, ...)
if status then
return out
else
log('warning', 'Error (func): ' .. out)
return nil
end
end
return f
end
local function paramsplit(str)
-- minetest.display_chat_message("paramsplit 1")
local s = str:gsub("^%s*(.-)%s*$", "%1")
local p1 = string.find(s," ",1,true)
if not p1 then return nil end
-- minetest.display_chat_message("paramsplit 2")
local p2 = string.find(s," ",p1+1,true)
local s1 = str:sub(1,p1-1)
if not p2 then return {s1,s1,str:sub(p1+1,512)}
end
-- minetest.display_chat_message("paramsplit 3")
local s2 = str:sub(p1+1,p2-1)
local s3 = str:sub(p2+1,512)
return {s1,s2,s3}
end
local function rgb_to_hex(rgb)
local hexadecimal = '#'
for key, value in pairs(rgb) do
local hex = ''
while(value > 0)do
local index = math.fmod(value, 16) + 1
value = math.floor(value / 16)
hex = string.sub('0123456789ABCDEF', index, index) .. hex
end
if(string.len(hex) == 0)then
hex = '00'
elseif(string.len(hex) == 1)then
hex = '0' .. hex
end
hexadecimal = hexadecimal .. hex
end
return hexadecimal
end
local function color_from_hue(hue)
local h = hue / 60
local c = 255
local x = (1 - math.abs(h%2 - 1)) * 255
local i = math.floor(h);
if (i == 0) then
return rgb_to_hex({c, x, 0})
elseif (i == 1) then
return rgb_to_hex({x, c, 0})
elseif (i == 2) then
return rgb_to_hex({0, c, x})
elseif (i == 3) then
return rgb_to_hex({0, x, c});
elseif (i == 4) then
return rgb_to_hex({x, 0, c});
else
return rgb_to_hex({c, 0, x});
end
end
local function pastel_from_hue(hue)
local h = hue / 60
local c = 255
local d = 192
local x = (1 - math.abs(h%2 - 1)) * 255
local i = math.floor(h);
if (i == 0) then
return rgb_to_hex({c, x, d})
elseif (i == 1) then
return rgb_to_hex({x, c, d})
elseif (i == 2) then
return rgb_to_hex({d, c, x})
elseif (i == 3) then
return rgb_to_hex({d, x, c});
elseif (i == 4) then
return rgb_to_hex({x, d, c});
else
return rgb_to_hex({c, d, x});
end
end
function hex2rgb(hex) -- added - found on github
hex = hex:gsub("#","")
return {tonumber("0x"..hex:sub(1,2)), tonumber("0x"..hex:sub(3,4)), tonumber("0x"..hex:sub(5,6))}
end
local function color_step(pos, col1, col2) -- added - gets a color between colors
-- if not col1 then col1 = "#888888" end
-- if not col2 then col2 = "#888888" end
local rgb1 = hex2rgb(col1)
local rgb2 = hex2rgb(col2)
local rgb = {}
for i, v in pairs(rgb1) do
rgb[i] = rgb1[i]+(rgb2[i]-rgb1[i])*(pos/255)
end
return rgb_to_hex(rgb)
end
local function canTalk()
if core.get_privilege_list then
return core.get_privilege_list().shout
else
return true
end
end
local function say(message)
if not canTalk() then
minetest.display_chat_message("You need 'shout' in order to talk")
return
end
minetest.send_chat_message(message)
if minetest.get_server_info().protocol_version < 29 then
local name = minetest.localplayer:get_name()
minetest.display_chat_message("<"..name.."> " .. message)
end
end
function fade(parameter)
local p = paramsplit(parameter)
if not p then return end
-- local col1 = string.sub(parameter, 1, 7)
-- local col2 = string.sub(parameter, 9, 15)
-- local message = string.sub(parameter, 17)
local col1 = colourname2hex(p[1])
-- minetest.display_chat_message("col1.a: "..col1)
-- minetest.display_chat_message("col1.b: "..core.get_color_escape_sequence(col1):sub(2,-1))
-- minetest.display_chat_message("col1.c: "..minetest.colorize(col1):sub(2,-1))
local col2 = colourname2hex(p[2])
-- minetest.display_chat_message("col2.a: "..p[2])
-- minetest.display_chat_message("col2.b: "..col2)
local message = p[3]
-- minetest.display_chat_message("msg: "..message)
-- if true then return end
if not canTalk() then
return false, "You need 'shout' in order to use this command"
end
if col1 == col2 then
-- minetest.display_chat_message("col1=col2")
say(minetest.get_color_escape_sequence(col1) .. message)
-- minetest.display_chat_message("col1=col2 b")
return true
end
-- minetest.display_chat_message("pos4")
local step = 255 / (message:len()/2)
local pos = 0
local output = ""
for i = 1, message:len() do
local char = message:sub(i,i)
if char:match("%s") then
output = output .. char
else
output = output .. minetest.get_color_escape_sequence(color_step(pos, col1, col2)) .. char
end
pos = pos + step
end
say(output)
return true
end
register_on_message(function(message)
if message:sub(1,1) == "/" or modstorage:get_string("colour") == "" or modstorage:get_string("colour") == "white" then
return false
end
fade(modstorage:get_string("colour") .. " " .. message)
return true
end)
core.register_chatcommand("set_colour", {
description = core.gettext("Change chat colour"),
func = function(colour)
local c = paramsplit(colour)
if not c then
local c1 = colourname2hex(colour)
if c1 and c1 ~= "" then
modstorage:set_string("colour", colour.." "..colour)
return true, "Chat colour changed."
else
return true,"'"..colour.."' is not a colour"
end
end
c1 = colourname2hex(c[1])
c2 = colourname2hex(c[3])
if not c1 or c1 == "" then
return true,"'"..c[1].."' is not a colour"
end
if not c2 or c2 == "" then
return true,"'"..c[2].."' is not a colour"
end
modstorage:set_string("colour", c1.." "..c2)
return true, "Chat colours changed."
end,
})
core.register_chatcommand("get_colour", {
description = core.gettext("Display chat colour"),
func = function()
local cc = modstorage:get_string("colour")
return true, "Current chat colour: " .. cc
end,
})
core.register_chatcommand("rainbow", {
description = core.gettext("rainbow text"),
func = function(param)
if not canTalk() then
return false, "You need 'shout' in order to use this command"
end
local step = 360 / param:len()
local hue = 0
-- iterate the whole 360 degrees
local output = ""
for i = 1, param:len() do
local char = param:sub(i,i)
if char:match("%s") then
output = output .. char
else
output = output .. core.get_color_escape_sequence(colour_from_hue(hue)) .. char
end
hue = hue + step
end
say(output)
return true
end,
})
core.register_chatcommand("fade", { -- added - fades between any two colors
description = core.gettext("fade message between two colors"),
func = fade,
})
core.register_chatcommand("pastel", {
description = core.gettext("pastel rainbow text"),
func = function(param)
if not canTalk() then
return false, "You need 'shout' in order to use this command"
end
local step = 360 / param:len()
local hue = 0
-- iterate the whole 360 degrees
local output = ""
for i = 1, param:len() do
local char = param:sub(i,i)
if char:match("%s") then
output = output .. char
else
output = output .. core.get_color_escape_sequence(pastel_from_hue(hue)) .. char
end
hue = hue + step
end
say(output)
return true
end,
})
core.register_chatcommand("mw", {
description = core.gettext("moderator warning"),
func = function(param)
if not canTalk() then
return false, "You need 'shout' in order to use this comand"
end
minetest.run_server_chatcommand('mw', param)
-- local output = ""
-- output = core.get_color_escape_sequence("#ffdf00") .. "MODERATOR WARNING: "
-- output = output .. core.get_color_escape_sequence("#ff7fff") ..param
-- say(output)
return true
end,
})
core.register_chatcommand("mi", {
description = core.gettext("moderator info"),
func = function(param)
if not canTalk() then
return false, "You need 'shout' in order to use this command"
end
minetest.run_server_chatcommand('mi', param)
-- local output = ""
-- output = core.get_color_escape_sequence("#d0ff00") .. "MODERATOR INFO: "
-- output = output .. core.get_color_escape_sequence("#dfdfff") .. param
-- say(output)
return true
end,
})
core.register_chatcommand("rainbow", {
description = core.gettext("rainbow text"),
func = function(param)
if not canTalk() then
return false, "You need 'shout' in order to use this command"
end
local step = 360 / param:len()
local hue = 0
-- iterate the whole 360 degrees
local output = ""
for i = 1, param:len() do
local char = param:sub(i,i)
if char:match("%s") then
output = output .. char
else
output = output .. core.get_color_escape_sequence(color_from_hue(hue)) .. char
end
hue = hue + step
end
say(output)
return true
end,
})
core.register_chatcommand("say", {
description = core.gettext("Send text without applying colour to it"),
func = function(text)
say(text)
return true
end,
})