Shoutbox

I got it working

Update 2 Thanks silentdragon i forgot about that hehe

code:

---

//WML Flash 1.0 for MPL! (Smilie) by ivan300@yahoo.com
// slightly modified by djcarre@gmail.com

var VK_num = 144
var VK_scroll = 145
var VK_caps = 20
var KEYEVENTF_KEYUP = '&H2'
var count = 0

function OnEvent_Initialize(bMessengerStart){
}

function OnEvent_Uninitialize(bMessengerExit){
}

//when a chat window is created it starts a timer
function OnEvent_ChatWndCreated(){
MsgPlus.AddTimer('check', 200);
}

//when the chat window is closed it stops the timers and turns the light off
function OnEvent_ChatWndDestroyed(){
MsgPlus.CancelTimer('check');
MsgPlus.CancelTimer('check2');
}

//stops the blining when you type into the convo
//make sure to change VK_scroll accordingly if youre using a different led
function OnEvent_ChatWndEditKeyDown(Wnd, key){
if(key != VK_scroll){
    MsgPlus.CancelTimer('check');
    MsgPlus.CancelTimer('check2');
}
}

//to change which light you want to blink change the
// Vk_scroll to VK_num for num lock or VK_caps for caps lock

//this turns the light off and on depending on the timers
function OnEvent_Timer(sTimerId){
if(sTimerId == 'check'){
Debug.Trace('check');
Interop.Call('user32', 'keybd_event', VK_scroll, 0, 0, 0);
Interop.Call('user32', 'keybd_event', VK_scroll, 0, 2, 0);
MsgPlus.AddTimer('check2', 100);
}
if(sTimerId == 'check2'){
Debug.Trace('check2')
Interop.Call('user32', 'keybd_event', VK_scroll, 0, 0, 0);
Interop.Call('user32', 'keybd_event', VK_scroll, 0, 2, 0);
MsgPlus.AddTimer('check', 100);
}
}

---