Anyway here is one of the scripts. Any help would be great.
(* Set Lable Index colours of selected files to defaults *)
set fileColorList to ¬
{red:{"app", "scpt", "bin", "pl", "py", "sh"}, orange:{"zip", "mpkg", "pkg", "tgz", "gz", "dmg", "torrent", "iso", "tar"}, yellow:{"xml", "xpi", "html", "htm", "PrefPane"}, green:{"aa", "m3u", "mp3", "mp4", "mov", "xspf", "qt", "aif", "aiff"}, blue:{"epub", "pdf", "txt", "rtf", "asc", "ascii", "djvu", "old"}, purple:{"pages", "numbers", "keynote", "doc", "xls", "nbp", "csv", "ics", "ppt", "pps"}, grey:{"png", "jpg", "jpeg", "gif", "tif", "tiff", "psd"}}
set theseFiles to ¬
choose file with multiple selections allowed
tell application "System Events"
repeat with myFile in theseFiles
get info for myFile
set fileExt to name extension of myFile
tell application "Finder"
if fileExt is in orange of fileColorList then
set label index of myFile to 1
else if fileExt is in red of fileColorList then
set label index of myFile to 2
else if fileExt is in yellow of fileColorList then
set label index of myFile to 3
else if fileExt is in blue of fileColorList then
set label index of myFile to 4
else if fileExt is in purple of fileColorList then
set label index of myFile to 5
else if fileExt is in green of fileColorList then
set label index of myFile to 6
else if fileExt is in grey of fileColorList then
set label index of myFile to 7
end if
end tell
end repeat
end tell