ls_flush_modes(channel)
end
- elseif revent == "irc_onmsg" then
+ elseif revent == "irc_onmsg" or revent == "irc_onnotice" then
local numeric, message = ...
local tokens = ls_split_message(message)
ls_cmd_investigate(numeric, argument)
elseif command == "vote" then
ls_cmd_vote(numeric, argument)
+ elseif command == "guard" then
+ ls_cmd_guard(numeric, argument)
elseif command == "smite" and onstaff(numeric) then
ls_cmd_smite(numeric, argument)
elseif command == "addchan" and ontlz(numeric) then
return
end
+ if string.lower(channel) == "#labspace" then
+ ls_notice(numeric, "Sorry, you can't use this command here.")
+ end
+
ls_set_lasthl(channel, os.time())
local numerics = {}
return
end
- ls_set_enabled(channel, false)
+ ls_set_enabled(channel, true)
ls_notice(numeric, "Game has been enabled.")
end
if math.random(100) > 85 then
ls_chanmsg(channel, "The scientists' attack was not successful tonight. Nobody died.")
+ elseif ls_get_guarded(channel, victimnumeric) then
+ for _, player in pairs(ls_get_players(channel)) do
+ ls_set_trait(channel, player, "force", false)
+ end
+
+ ls_set_guarded(channel, victimnumeric, false)
+
+ ls_chanmsg(channel, "The attack on " .. ls_format_player(channel, victimnumeric) .. " was deflected by a force field. The force field generator has now run out of power.")
+ elseif ls_get_trait(channel, victimnumeric, "infested") then
+ ls_devoice_player(channel, numeric)
+ ls_devoice_player(channel, victimnumeric)
+
+ ls_remove_player(channel, numeric, true)
+ ls_remove_player(channel, victimnumeric, true)
+
+ ls_chanmsg(channel, "An alien bursts out of " .. ls_format_player(channel, victimnumeric, true) .. "'s chest just as " .. ls_format_player(channel, numeric, true) .. " was about to murder them, killing them both.")
else
ls_devoice_player(channel, victimnumeric)
ls_flush_modes(channel)
end
+function ls_cmd_guard(numeric, victim)
+ if not victim then
+ ls_notice(numeric, "Syntax: vote <nick>")
+ return
+ end
+
+ local channel = ls_chan_for_numeric(numeric)
+
+ if not channel then
+ ls_notice(numeric, "You haven't joined any game lobby.")
+ return
+ end
+
+ if not ls_get_trait(channel, numeric, "force") then
+ ls_notice(numeric, "Sorry, you need the force field generator to use this command.")
+ return
+ end
+
+ ls_keepalive(channel, numeric)
+
+ local victimnick = irc_getnickbynick(victim)
+
+ if not victimnick then
+ ls_notice(numeric, "Sorry, I don't know who that is.")
+ return
+ end
+
+ local victimnumeric = victimnick.numeric
+
+ if not ls_get_role(channel, victimnumeric) then
+ ls_notice(numeric, "Sorry, " .. ls_format_player(channel, victimnumeric) .. " isn't playing the game.")
+ return
+ end
+
+ local target
+
+ if victimnumeric == numeric then
+ target = "yourself"
+ else
+ target = ls_format_player(channel, victimnumeric)
+ end
+
+ for _, player in pairs(ls_get_players(channel)) do
+ ls_set_guarded(channel, player, (player == victimnumeric))
+ end
+
+ ls_notice(numeric, "You are now protecting " .. target .. ".")
+end
+
function ls_cmd_smite(numeric, victim)
if not victim then
ls_notice(numeric, "Syntax: smite <nick>")
end
if chanuser.opped then
- ls_notice(channel, "You must not be opped to use this command.")
+ ls_notice(numeric, "You must not be opped to use this command.")
return
end
local announced = ls_get_announced(channel, numeric)
+ local force_field = ls_get_trait(channel, numeric, "force")
+
ls_set_role(channel, numeric, nil)
ls_devoice_player(channel, numeric)
if ls_get_vote(channel, player) == numeric then
ls_set_vote(channel, player, nil)
end
+
+ if force_field then
+ ls_set_guarded(channel, player, false)
+ end
end
if not forced then
end
function ls_set_role(channel, numeric, role)
- if not ls_gamestate[channel]["players"][numeric] then
- ls_gamestate[channel]["players"][numeric] = { active = false, announced = false }
+ if not ls_gamestate[channel]["players"][numeric] or role == "lobby" then
+ ls_gamestate[channel]["players"][numeric] = {
+ active = false,
+ announced = false,
+ traits = {},
+ guarded = false
+ }
end
if role then
end
end
+function ls_get_trait(channel, numeric, trait)
+ return ls_gamestate[channel]["players"][numeric]["traits"][trait]
+end
+
+function ls_set_trait(channel, numeric, trait, enabled)
+ ls_gamestate[channel]["players"][numeric]["traits"][trait] = enabled
+end
+
+function ls_get_guarded(channel, numeric, guarded)
+ return ls_gamestate[channel]["players"][numeric]["guarded"]
+end
+
+function ls_set_guarded(channel, numeric, guarded)
+ ls_gamestate[channel]["players"][numeric]["guarded"] = guarded
+end
+
function ls_get_seen(channel, numeric)
return ls_gamestate[channel]["players"][numeric]["seen"]
end
if ls_get_role(channel, numeric) then
ls_voice_player(channel, numeric)
+ ls_keepalive(channel, numeric)
else
ls_devoice_player(channel, numeric)
end
-- notify scientists about each other
for _, scientist in pairs(ls_get_players(channel, "scientist")) do
for _, scientist_notify in pairs(ls_get_players(channel, "scientist")) do
- if scientists ~= scientist_notify then
- ls_notice(scientists_notify, ls_format_player(channel, scientist) .. " is also a scientist.")
+ if scientist ~= scientist_notify then
+ ls_notice(scientist_notify, ls_format_player(channel, scientist) .. " is also a scientist.")
end
end
end
for _, player in pairs(players) do
ls_set_role(channel, player, "citizen")
end
-
+
+ -- give someone the force field generator
+ local force_owner = players[math.random(table.getn(players))]
+ ls_set_trait(channel, force_owner, "force", true)
+ ls_set_guarded(channel, force_owner, true)
+ ls_notice(force_owner, "You've found the \002force field generator\002. Use /notice " .. BOTNICK .. " guard <nick> to protect someone.")
+ ls_notice(force_owner, "You are currently protecting yourself.")
+
+ -- make someone infested if there are at least 6 citizens
+ if table.getn(players) > 6 then
+ local infested_player = players[math.random(table.getn(players))]
+ ls_set_trait(channel, infested_player, "infested", true)
+ ls_notice(infested_player, "You're infested with an \002alien parasite\002.")
+ ls_chanmsg(channel, "It's " .. ls_format_player(channel, infested_player) .. ".")
+ end
+
ls_chanmsg(channel, "Roles have been assigned: " ..
table.getn(ls_get_players(channel, "scientist")) .. "x " .. ls_format_role("scientist") .. ", " ..
table.getn(ls_get_players(channel, "investigator")) .. "x " .. ls_format_role("investigator") .. ", " ..
for _, player in pairs(ls_get_players(channel)) do
local seen = ls_get_seen(channel, player)
- if seen < os.time() - 120 then
- table.insert(dead_players, player)
- elseif seen < os.time() - 60 then
- table.insert(idle_players, player)
+ if seen then
+ if seen < os.time() - 120 then
+ table.insert(dead_players, player)
+ elseif seen < os.time() - 60 then
+ table.insert(idle_players, player)
+ end
end
end
if state == "kill" then
if timeout == -1 then
- local candidates = ls_get_players(channel, "scientist")
- local active_index = math.random(table.getn(candidates))
- local active_scientist = table.remove(candidates, active_index)
+ local active_scientist = scientists[math.random(table.getn(scientists))]
for _, scientist in pairs(scientists) do
if scientist == active_scientist then
ls_set_active(channel, scientist, true)
- ls_notice(scientist, "It's your turn to select a citizen to kill. Use /msg " .. BOTNICK .. " kill <nick> to kill someone.")
+ ls_notice(scientist, "It's your turn to select a citizen to kill. Use /notice " .. BOTNICK .. " kill <nick> to kill someone.")
else
ls_set_active(channel, scientist, false)
ls_notice(scientist, ls_format_player(channel, active_scientist) .. " is choosing a victim.")
end
if timeout == -1 then
- local candidates = ls_get_players(channel, "investigator")
- local active_index = math.random(table.getn(candidates))
- local active_investigator = table.remove(candidates, active_index)
+ local active_investigator = investigators[math.random(table.getn(investigators))]
for _, investigator in pairs(investigators) do
if investigator == active_investigator then
ls_set_active(channel, investigator, true)
- ls_notice(investigator, "You need to choose someone to investigate: /msg " .. BOTNICK .. " investigate <nick>")
+ ls_notice(investigator, "You need to choose someone to investigate: /notice " .. BOTNICK .. " investigate <nick>")
else
ls_set_active(channel, investigator, false)
ls_notice(investigator, "Another investigator is choosing a target.")
ls_set_vote(channel, player, nil)
end
- ls_chanmsg(channel, "It's now up to the citizens to vote who to lynch (via /msg " .. BOTNICK .. " vote <nick>).")
+ ls_chanmsg(channel, "It's now up to the citizens to vote who to lynch (via /notice " .. BOTNICK .. " vote <nick>).")
ls_set_timeout(channel, 120)
elseif ls_timeout_exceeded(channel) or table.getn(missing_votes) == 0 then
local votes = {}
projects / irc / quakenet / lua-labspace.git / blobdiff