; Usage : /searchfor sometext
; and double-click an item in the resulting window
alias searchfor {
  window -l -t30 @search | clear @search
  %scripts = $script(0)
  %searchTerm = $$1-
  while %scripts {
    filter -fkn $script(%scripts) extract *
    dec %scripts
  }
}
 
on *:close:@search: {
  unset %scripts
  unset %searchterm
}
 
alias extract {
  if %searchterm isin $1- {
    aline @search  4 $+ $script(%scripts)12 $chr(9) $+ 12 $+ $1-
  }
}
menu @search {
  dclick: {
    var %selected = $line(@search,$1,1)
    tokenize 32 %selected
    var %scriptFile = $strip($1)
    var %scriptline = $strip($2)
    var %nopath = $nopath(%scriptfile)
    clipboard %nopath
    showmirc -s 
    sendkeys % $+ r $+ % $+ r $+ ^ $+ m $+ ^ $+ v $+ {enter}
    timer -m 1 500 /gotoLine %scriptLine
  }
}
 
alias -l gotoLine {
  clipboard $1
  sendkeys ^ $+ g $+ ^ $+ v $+ {enter}
}
 
 
alias -l sendkeys {
  var %object = sendkeys $+ $ticks
  .comopen %object WScript.Shell
  if ($com(%object)) { .comclose %object $com(%object,SendKeys,3,bstr,$1-) }
}
 
 

Commenting Options