mirror of
https://github.com/etlegacy/etlegacy-lua-scripts.git
synced 2024-11-22 12:31:20 +00:00
added irc announcer script
This commit is contained in:
Remy Marquis
parent
2614fe21ee
commit
de1cbb4813
1 changed files with 122 additions and 0 deletions
122
irc/ircannouncer.lua
Normal file
122
irc/ircannouncer.lua
Normal file
|
|
@ -0,0 +1,122 @@
|
||||||
|
--[[
|
||||||
|
Author: ET:Legacy Team
|
||||||
|
Description: Ensure the server is connected to IRC - see irc_* cvars. Set irc_mode flag 1 and 2.
|
||||||
|
]]--
|
||||||
|
|
||||||
|
modname ="IRC announcer"
|
||||||
|
version ="0.2"
|
||||||
|
|
||||||
|
usecolor = 0
|
||||||
|
|
||||||
|
function et_InitGame()
|
||||||
|
et.RegisterModname(modname.." "..version)
|
||||||
|
end
|
||||||
|
|
||||||
|
function ircColorStr(str)
|
||||||
|
local escape = "\003"
|
||||||
|
local q3colorescape = "%^"
|
||||||
|
str = str:gsub(q3colorescape .. "[7Ww]", escape .. "0")
|
||||||
|
str = str:gsub(q3colorescape .. "[0Pp]", escape .. "1")
|
||||||
|
str = str:gsub(q3colorescape .. "[4Tt]", escape .. "2")
|
||||||
|
str = str:gsub(q3colorescape .. "[Hh]", escape .. "3")
|
||||||
|
str = str:gsub(q3colorescape .. "[Jj1QqIi]", escape .. "4")
|
||||||
|
str = str:gsub(q3colorescape .. "[Kk@%+%?]", escape .. "5")
|
||||||
|
str = str:gsub(q3colorescape .. "[CcEe]", escape .. "6")
|
||||||
|
str = str:gsub(q3colorescape .. "[Ll8XxAa]", escape .. "7")
|
||||||
|
str = str:gsub(q3colorescape .. "[Mm3%/%-SsOoNn]", escape .. "8")
|
||||||
|
str = str:gsub(q3colorescape .. "[2RrGg]", escape .. "9")
|
||||||
|
str = str:gsub(q3colorescape .. "[Bb]", escape .. "10")
|
||||||
|
str = str:gsub(q3colorescape .. "[5Uu]", escape .. "11")
|
||||||
|
str = str:gsub(q3colorescape .. "[DdFf]", escape .. "12")
|
||||||
|
str = str:gsub(q3colorescape .. "[6Vv]", escape .. "13")
|
||||||
|
str = str:gsub(q3colorescape .. "[9Yy]", escape .. "14")
|
||||||
|
str = str:gsub(q3colorescape .. "[Zz]", escape .. "15")
|
||||||
|
return str .. "\015"
|
||||||
|
end
|
||||||
|
|
||||||
|
function getTeamInfo()
|
||||||
|
local temp = et.trap_GetConfigstring(0)
|
||||||
|
temp = et.Info_ValueForKey(temp, "P")
|
||||||
|
|
||||||
|
local team_free_cnt, team_ax_cnt, team_al_cnt, team_spec_cnt = 0, 0, 0, 0
|
||||||
|
|
||||||
|
for i = 1, #temp do
|
||||||
|
if (string.sub(temp, i, i) == "0") then
|
||||||
|
team_free_cnt = team_free_cnt + 1
|
||||||
|
end
|
||||||
|
if (string.sub(temp, i, i) == "1") then
|
||||||
|
team_ax_cnt = team_ax_cnt + 1
|
||||||
|
end
|
||||||
|
if (string.sub(temp, i, i) == "2") then
|
||||||
|
team_al_cnt = team_al_cnt + 1
|
||||||
|
end
|
||||||
|
if (string.sub(temp, i, i) == "3") then
|
||||||
|
team_spec_cnt = team_spec_cnt + 1
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
return team_free_cnt, team_ax_cnt, team_al_cnt, team_spec_cnt
|
||||||
|
end
|
||||||
|
|
||||||
|
function getHumanBotInfo()
|
||||||
|
local cs = et.trap_GetConfigstring(0)
|
||||||
|
local bots = et.Info_ValueForKey(cs, "omnibot_playing")
|
||||||
|
|
||||||
|
return bots
|
||||||
|
end
|
||||||
|
|
||||||
|
|
||||||
|
function et_ClientConnect(_clientNum, _firstTime, _isBot)
|
||||||
|
if _isBot then
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
if _firstTime then
|
||||||
|
-- note pers.netname is empty on first connect
|
||||||
|
if usecolor then
|
||||||
|
local clientname = ircColorStr(et.Info_ValueForKey(et.trap_GetUserinfo(_clientNum), "name"))
|
||||||
|
else
|
||||||
|
local clientname = et.Q_CleanStr(et.Info_ValueForKey(et.trap_GetUserinfo(_clientNum), "name"))
|
||||||
|
end
|
||||||
|
|
||||||
|
-- iterate through clients and count them
|
||||||
|
local free, axis, allies, spec = 0, 0, 0, 0
|
||||||
|
free, axis, allies, spec = getTeamInfo()
|
||||||
|
|
||||||
|
-- count humans players
|
||||||
|
local bots, humans = 0, 0
|
||||||
|
bots = getHumanBotInfo()
|
||||||
|
|
||||||
|
if bots then
|
||||||
|
humans = free + axis + allies + spec - bots
|
||||||
|
else
|
||||||
|
humans = free + axis + allies + spec
|
||||||
|
end
|
||||||
|
humans = math.floor(humans)
|
||||||
|
|
||||||
|
-- current player is connecting but doesn't show up in the total yet
|
||||||
|
-- let's add it manually
|
||||||
|
humans = humans + 1
|
||||||
|
|
||||||
|
-- send message
|
||||||
|
if usecolor then
|
||||||
|
local msg = "irc_say \"" .. clientname .. " connected to server. Playing now:^7 " .. humans .. "^9(+" .. bots .. ")\""
|
||||||
|
et.trap_SendConsoleCommand(et.EXEC_NOW , ircColorStr(msg))
|
||||||
|
else
|
||||||
|
local msg = "irc_say \"" .. clientname .. " connected to server. Playing now: " .. humans .. "(+" .. bots .. ")\""
|
||||||
|
et.trap_SendConsoleCommand(et.EXEC_NOW , msg)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
-- function et_ClientDisconnect(_clientNum)
|
||||||
|
-- if usecolor then
|
||||||
|
-- local clientname = ircColorStr(et.gentity_get(_clientNum ,"pers.netname"))
|
||||||
|
-- local msg = "irc_say \"" .. clientname .. " disconnected from server\""
|
||||||
|
-- et.trap_SendConsoleCommand(et.EXEC_NOW , ircColorStr(msg))
|
||||||
|
-- else
|
||||||
|
-- local clientname = et.Q_CleanStr(et.gentity_get(_clientNum ,"pers.netname"))
|
||||||
|
-- local msg = "irc_say \"" .. clientname .. " disconnected from server\""
|
||||||
|
-- et.trap_SendConsoleCommand(et.EXEC_NOW , msg)
|
||||||
|
-- end
|
||||||
|
-- end
|
||||||
Loading…
Reference in a new issue