Project

General

Profile

[Script] Blinking scroll lock led on highlight v0.5 » Blinking scroll lock led on highlight v0.5.ini

Mr. BS, 11/23/2014 11:29 AM

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

    
5
alias -l m return * $+ $iif($$highlight($1-) == $ $+ me, $me, $v1) $+ *
6

    
7
alias -l led if (!$appactive) .timerLED -m 0 500 flashled
8

    
9
on *:TEXT:$($m($1-)):*:led
10

    
11
on *:ACTION:$($m($1-)):*:led
12

    
13
;Adi get focus then lets disable the led blinking
14
on *:APPACTIVE:{
15
  if ($timer(LED)) {
16
    .timerLED off
17
    if ($keylocked(scrolllock)) flashled
18
  }
19
}
20

    
21
alias flashled {
22
  var %name led $+ $ticks
23
  .comopen %name WScript.Shell
24
  .comclose %name $com(%name,SendKeys,3,bstr,{ScrollLock})
25
}
(5-5/5)