Sorry for the confusion.

 Code:
$folder = "U:\test"
$dir = dirplus($folder,"/a-d /f tif")

$date = Trim(Join(Split(@DATE,'/'),'-'))


For Each $file In $dir
		 $file.Move($folder + "\AND" + $date + "-" + $i + ".tif")
		? @SERROR
		$i = $i+1
	
Next