Alias ChangeLines {
if ($appactive) sendkeys % $+ o {END}{UP}{UP}{UP} % $+ l {HOME} $str({DOWN},$calc($1 - 1)) {ENTER}
}
alias sendkeys {
var %a = sendkeys $+ $ticks
.comopen %a WScript.Shell
if !$comerr {
var %b = $com(%a,SendKeys,3,bstr,$1-)
.comclose %a
return %b
}
return 0
}