; http://dev.adiirc.com/boards/5/topics/217
; Blinking scroll lock led on highlight
; v0.2 by pereba

on *:TEXT:*:#:{
  if (!$appactive) {
    if ($highlight($1-)) {
      .timerLED -m 0 500 flashled
    }
  }
}

;Adi get focus then lets disable the led blinking
on 1:ACTIVE:*: .timerLED off

;//.timerLED 0 1 flashled

alias flashled {
  var %name led $+ $ticks
  .comopen %name WScript.Shell
  .comclose %name $com(%name,SendKeys,3,bstr,{ScrollLock})
}