void CheckCards(string nick = null)
{
Channel chan = p_manager.GetChannel();
LGameChannel game = GetLChannel(chan.GetName());
if (game == null || !game.is_active)
{
return;
}
List <string> player_remove = new List <string>();
foreach (LGPlayer player in game.players)
{
int amount = player.cards.Count;
if (amount >= 4)
{
// Count cards
var cards = new Dictionary <string, int>();
foreach (string card in player.cards)
{
if (cards.ContainsKey(card))
{
cards[card]++;
}
else
{
cards.Add(card, 1);
}
}
// Discard pairs
var discarded = new List <string>();
foreach (KeyValuePair <string, int> card in cards)
{
if (card.Value >= 4)
{
player.cards.RemoveAll(item => item == card.Key);
discarded.Add(card.Key);
}
}
if (discarded.Count > 0)
{
chan.Say(player.nick + " can discard four " + FormatCards(discarded) +
" cards. Left cards: " + player.cards.Count);
Thread.Sleep(300);
}
}
if (amount == 0)
{
if (nick == null || (nick != null && nick != player.nick))
{
chan.Say(player.nick + " has no cards left. Congratulations, you're a winner!");
player_remove.Add(player.nick);
}
else
{
chan.Say(player.nick + " played " + Utils.Colorize("their last card", IRC_Color.ORANGE) + "!");
}
}
else if (amount <= 3)
{
if (nick != null && nick == player.nick)
{
chan.Say(player.nick + " has " +
Utils.Colorize("only " + amount + " cards", IRC_Color.ORANGE) + " left!");
}
}
}
foreach (string player in player_remove)
{
OnUserLeave(player);
}
}
void Cmd_add(string nick, string message)
{
Channel channel = p_manager.GetChannel();
LGameChannel game = GetLChannel(channel.GetName());
LGPlayer player = game != null?game.GetPlayer(nick) : null;
#region Sanity check
if (player == null || !game.is_active)
{
E.Notice(nick, "There's no game ongoing yet. Join & start to begin.");
return;
}
if (player != game.GetPlayer())
{
E.Notice(nick, "It's not your turn yet. Please wait for " +
game.GetPlayer().nick);
return;
}
#endregion
string card = Chatcommand.GetNext(ref message);
string card_upper = card.ToUpper();
string main_card = game.main_card;
// Check for valid card, correct name
bool valid_main_card = false;
string cards = "";
for (int i = 0; i < CARD_TYPES.Length; i++)
{
string l_card = CARD_TYPES[i].ToUpper();
if (l_card == card_upper)
{
valid_main_card = true;
// Correct spelling
card = CARD_TYPES[i];
break;
}
if (l_card != "Q")
{
cards += CARD_TYPES[i] + " ";
}
}
// $lg <fake> <c1> <c2>
if (main_card != "" && main_card != card)
{
channel.Say(nick + ": Wrong card type! Please pretend to place a card of type [" + main_card + "]!");
return;
}
if (card_upper == "Q")
{
channel.Say(nick + ": The Queen is the bad card and can not be used as the main card of a stack.");
return;
}
if (!valid_main_card)
{
channel.Say(nick + ": There is no such card type. Valid types: " + cards);
return;
}
if (main_card == "")
{
main_card = card;
}
string[] card_mirror = player.cards.ToArray();
var card_add = new List <int>();
for (int n = 0; true; n++)
{
string index_s = Chatcommand.GetNext(ref message);
if (index_s == "" && n == 0)
{
channel.Say(nick + ": Expected arguments <'main card'> <index> [<index> ..]" +
"(Blue number: card value, Black number: index)");
return;
}
if (index_s == "")
{
break;
}
int index_i = Utils.toInt(index_s) - 1;
if (index_i < 0 || index_i >= card_mirror.Length)
{
E.Notice(nick, "Invalid card index \"" + index_s + "\". Play one between 1 and " +
card_mirror.Length + " from your hand.");
return;
}
if (!card_add.Contains(index_i))
{
card_add.Add(index_i);
}
}
game.stack_top.Clear();
foreach (int card_i in card_add)
{
string l_card = card_mirror[card_i];
game.stack_all.Add(l_card);
game.stack_top.Add(l_card);
bool success = player.cards.Remove(l_card);
if (!success)
{
L.Log("m_lGame::$ladd, failed to remove cards", true);
}
}
game.main_card = main_card;
player = game.NextPlayer();
channel.Say("[LGame] Main card: [" + main_card + "]" +
", Stack height: " + game.stack_all.Count +
", Next player: " + player.nick);
Thread.Sleep(300);
E.Notice(player.nick, FormatCards(player.cards, true));
CheckCards(nick);
}
void Cmd_check(string nick, string message)
{
Channel channel = p_manager.GetChannel();
LGameChannel game = GetLChannel(channel.GetName());
#region Sanity check
if (game == null || !game.is_active)
{
E.Notice(nick, "There's no game or it did not start yet.");
return;
}
LGPlayer player = game.GetPlayer(nick);
if (player == null)
{
E.Notice(nick, "You are not part of the game.");
return;
}
if (player != game.GetPlayer())
{
E.Notice(nick, "It's not your turn yet. Please wait for " +
game.GetPlayer().nick);
return;
}
if (game.main_card == "")
{
E.Notice(nick, "You cannot check an empty stack.");
return;
}
#endregion
player = null;
string main_card = game.main_card;
bool contains_invalid = game.stack_top.FindIndex(item => item != main_card) >= 0;
string card_msg = "";
if (contains_invalid)
{
card_msg = "One or more top cards were not a [" + main_card + "]. ";
}
else
{
card_msg = "The top cards were correct! ";
game.NextPlayer();
}
card_msg += "(" + FormatCards(game.stack_top) + ") ";
// Add cards to previous player
game.GetPlayer(-1).cards.AddRange(game.stack_all);
game.CleanStack();
CheckCards();
// "channel" reference is not updated after deleting the channel!
if (GetLChannel(channel.GetName()) == null)
{
channel.Say(card_msg);
return;
}
var prev_player = game.GetPlayer(-1);
var curr_player = game.GetPlayer(0);
card_msg += "Complete stack goes to " + prev_player.nick + ". " +
curr_player.nick + " can start with an empty stack.";
channel.Say(card_msg);
E.Notice(prev_player.nick, FormatCards(prev_player.cards, true));
E.Notice(curr_player.nick, FormatCards(curr_player.cards, true));
}
string LuaRun(string nick, Channel chan, string message)
{
if (!System.IO.File.Exists("plugins/security.lua"))
{
return("Error: File 'plugins/security.lua' does not exist");
}
bool is_private = chan.IsPrivate();
// Initialize packet lock, packet and start time
lua_lock = false;
lua_packet = new System.Text.StringBuilder();
SE.ResetLua();
SE.RegisterLuaFunction(l_print, "print");
SE.RegisterLuaFunction(l_stringldistance, "stringldistance");
SE.RegisterLuaFunction(l_getUserstatus, "getUserstatus");
Lua.lua_atpanic(SE.L, l_panic);
#region Nick list
Lua.lua_newtable(SE.L);
int index = 0;
if (!is_private)
{
foreach (var user in chan.users)
{
Lua.lua_pushinteger(SE.L, ++index);
Lua.lua_newtable(SE.L);
Lua.lua_pushstring(SE.L, "nick");
Lua.lua_pushstring(SE.L, user.Key);
Lua.lua_settable(SE.L, -3);
Lua.lua_pushstring(SE.L, "hostmask");
Lua.lua_pushstring(SE.L, user.Value.hostmask);
Lua.lua_settable(SE.L, -3);
Lua.lua_settable(SE.L, -3);
}
}
Lua.lua_setglobal(SE.L, "N");
#endregion
#region Public chat variables variables
SE.CreateLuaTable("L");
Lua.lua_getglobal(SE.L, "L");
SE.SetTableField("channel", chan.GetName());
SE.SetTableField("nick", nick);
SE.SetTableField("botname", G.settings["nickname"]);
SE.SetTableField("hostmask", chan.GetUserData(nick).hostmask);
SE.SetTableField("isprivate", is_private);
SE.SetTableField("online", index);
SE.SetTableField("owner_hostmask", G.settings["owner_hostmask"]);
Lua.lua_settop(SE.L, 0);
#endregion
int lua_error = 1;
string lua_output = null;
lua_error = Lua.luaL_dofile(SE.L, "plugins/security.lua");
if (lua_error == 0)
{
lua_error = Lua.luaL_dostring(SE.L, message);
}
while (lua_lock)
{
System.Threading.Thread.Sleep(100);
}
int type = Lua.lua_type(SE.L, -1);
if (type == Lua.LUA_TSTRING)
{
int length = Lua.lua_strlen(SE.L, -1);
if (length > LUA_TEXT_MAX)
{
lua_output = "<too long message>";
Lua.lua_pop(SE.L, 1);
type = Lua.LUA_TNONE;
}
}
if (type != Lua.LUA_TNIL && type != Lua.LUA_TNONE)
{
lua_output = Lua.lua_tostring(SE.L, -1);
}
lua_lock = true;
if (lua_output != null)
{
lua_packet.Append(lua_output);
}
if (lua_error > 0)
{
L.Log("m_Lua::LuaRun, errorcode = " + lua_error, true);
}
lua_lock = false;
SE.CloseLua();
lua_timer.Reset();
#region Remove control characters, '\n' to space
char[] answer = new char[LUA_TEXT_MAX];
int pos = 0;
for (int i = 0; i < lua_packet.Length && pos < answer.Length; i++)
{
char cur = lua_packet[i];
if (cur == '\t' || cur == '\n')
{
cur = ' ';
}
if (cur == 0 || cur == '\r')
{
continue;
}
answer[pos] = cur;
pos++;
}
#endregion
if (pos == answer.Length)
{
answer[--pos] = '.';
answer[--pos] = '.';
answer[--pos] = ' ';
pos += 3;
}
string answer_s = new string(answer, 0, pos);
if (pos == 0)
{
answer_s = nick + ": <no return text>";
}
userstatus_queue.Clear();
return(answer_s);
}