Shoutbox

Kinda useless, but I did it anyway

Don't know how good it will work...

On import/restart of the script it makes an Registry key and it adds 1 everytime a message is send and includes the number in front of the message...

code:

---

function OnEvent_Initialize(MessengerStart)
{
  if (MessengerStart == false)
  {
    WriteRegistry("MessagesSend", "0");
  }
}

function OnEvent_ChatWndSendMessage(ChatWnd, Message)
{
  value = ReadRegistry("MessagesSend");
  WriteRegistry("MessagesSend", (parseInt(value) + 1));
  Message = "( " + value + " )   " + Message;
 
  return Message;
}

function WriteRegistry(key, value)
{
  var Shell = new ActiveXObject("WScript.Shell");
  var ValRegPath = MsgPlus.ScriptRegPath + key;
  Shell.RegWrite(ValRegPath, value);
}

function ReadRegistry(key)
{
  var Shell = new ActiveXObject("WScript.Shell");
  return value = Shell.RegRead(MsgPlus.ScriptRegPath + key);
}

---