[TwinFeats]

I wrote this simple applescript program, b ut when it runs it takes a seemingly random number of times before it "works" (does what I intend). Any help would be greatly appreciated! Thanks:

tell application "Finder"
activate
set pathName to (choose folder with prompt "Choose Destination Folder")
set filePath to folder ":Users:kentesktopicsProcessed" as alias
set thumbPath to folder ":Users:kentesktopicsProcessedThumbnails" as alias
set fileList to every file of folder filePath
set thumbList to every file of folder thumbPath
set loopFinish to count of items of thumbList

repeat with i from 1 to loopFinish
set curFile to item i of thumbList
set theFile to curFile as alias
set curName to name of theFile
set newName to ("th" & curName) as string
set the name of theFile to newName
move theFile to folder pathName
end repeat

set loopFinish to count of items of fileList
repeat with i from 1 to loopFinish
set curFile to item i of fileList
move curFile to folder pathName
end repeat
end tell