[Fors1k]

Код:

param(
    $folder = "© VF 办公室",
    $proc   = "*calc",
    $pathAT = "C:\AT",
    $pathM  = "C:\M"
)cls

while(ps $proc -ea 0){sleep 1}
$at=1;if($at=([int]( gci  $pathAT  AT-* ).name[-1][-1].ToString())){$at++}
Move -l (gci $pathM *$folder).FullName (ni -i d "$pathAT\AT-$at").FullName