Well here's my contribution, which I made before seeing qwerty's method (his is much better).

Code:

alias cut.files {
  if (%cut.files) {
    if ($nopath($1) != irc-companion) {
      if ($isfile($+($scriptdir,$nopath($1)))) .remove $qt($+($scriptdir,$nopath($1)))
      .rename $qt($1) $qt($+($scriptdir,$nopath($1)))
    }
    return
  }
  set %cut.files $true
  window -hl @cut.files
  noop $findfile($mircdir,irc*,0,0,@cut.files)
  filter -wk @cut.files cut.files *
  unset %cut.files
  window -c @cut.files
}


~ Edit ~
Imagining using the if statement in the command section of $findfile would have made all the difference for me lol. Ahh well. Very nicely done as usual qwerty. smile

~ Edit ~
Added the /remove per qwerty's suggestion so no second alias is necessary.