下面是一个使用AppleScript将文件移动到一个新文件夹并进行顺序命名的示例：

-- 设置目标文件夹路径
set targetFolder to (choose folder with prompt "选择目标文件夹")

-- 获取目标文件夹中的所有文件
set fileList to list folder targetFolder without invisibles

-- 设置新文件夹路径
set newFolderName to "新文件夹"
set newFolderPath to targetFolder & "/" & newFolderName

-- 创建新文件夹
tell application "Finder"
    if not (exists folder newFolderPath) then
        make new folder at folder targetFolder with properties {name:newFolderName}
    else
        display alert "错误" message "新文件夹已存在！"
        return
    end if
end tell

-- 对文件进行排序
set sortedList to my sortList(fileList)

-- 进行顺序命名并移动文件
repeat with i from 1 to count of sortedList
    set oldFilePath to (targetFolder & "/" & item i of sortedList) as text
    set newFileName to "文件" & i & ".txt"
    set newFilePath to (newFolderPath & "/" & newFileName) as text
    tell application "Finder"
        move file oldFilePath to folder newFolderPath with replacing
        set name of file newFilePath to newFileName
    end tell
end repeat

-- 排序函数
on sortList(listToSort)
    set sortedList to {}
    repeat until (count of listToSort) = 0
        set lowestItem to item 1 of listToSort
        repeat with itemValue in listToSort
            if itemValue comes before lowestItem then
                set lowestItem to itemValue
            end if
        end repeat
        set end of sortedList to lowestItem
        set listToSort to rest of listToSort
    end repeat
    return sortedList
end sortList

使用这个脚本，你可以选择一个目标文件夹，然后它会创建一个名为"新文件夹"的文件夹，并将目标文件夹中的文件按顺序命名后移动到新文件夹中。