% AK47 script for SLirc.

% No luser serviceable parts here.
% You're welcome to change things if you're not a luser, though.

irc_log("[AK47] Version 0.5.0 ALPHA loading init script.");
irc_update_display();

define anti_kenson()
{
   variable buf;
   if(irc_edit_insert_pos > 3)
     buf = substr(irc_buffer, irc_edit_insert_pos - 2, 3);
   else
     buf = "";
   if(buf != "mir")
     {
	irc_edit_insert_pos++;
	irc_set_buffer(sprintf("%sc%s", substr(irc_buffer, 1, irc_edit_insert_pos - 1), substr(irc_buffer, irc_edit_insert_pos, strlen(irc_buffer))));
     }
   else
     {
	irc_log("[AK47] Caught/Replaced \"mirc\"");
	irc_edit_insert_pos++;
	irc_set_buffer(sprintf("%sM-IRC%s", substr(irc_buffer, 1, irc_edit_insert_pos - 4), substr(irc_buffer, irc_edit_insert_pos, strlen(irc_buffer))));
	irc_edit_insert_pos++;
     }
}

() = irc_set_keysym('c', "anti_kenson", 0);

% That just replaces "mirc" with something else... Kenson's khrol thingy gets
% shirty if I discuss Windows based IRC clients...