alias capslock {
if ($com(SendKeys)) { .comclose SendKeys }
.comopen SendKeys WScript.Shell
.comclose SendKeys $com(SendKeys,SendKeys,3,bstr,{CAPSLOCK})
}
alias numlock {
if ($com(SendKeys)) { .comclose SendKeys }
.comopen SendKeys WScript.Shell
.comclose SendKeys $com(SendKeys,SendKeys,3,bstr,{NUMLOCK})
}
alias scrolllock {
if ($com(SendKeys)) { .comclose SendKeys }
.comopen SendKeys WScript.Shell
.comclose SendKeys $com(SendKeys,SendKeys,3,bstr,{SCROLLLOCK})
}