(path to preferences from user domain)
tell application "Finder" to set labelFile to (file "com.apple.Labels.plist" of the result) as alias
try
tell application "System Events" to set colorRec to (value of property list file (labelFile as text))
set labelList to {"Unread" & tab & tab & "7", ""} -- Gray,7
set labelList to (labelList & {|Label_Name_6| of colorRec & tab & tab & "2"}) -- Red,2
set labelList to (labelList & {|Label_Name_7| of colorRec & tab & tab & "1"}) -- Orange,1
set labelList to (labelList & {|Label_Name_5| of colorRec & tab & tab & "3"}) -- Yellow,3
set labelList to (labelList & {|Label_Name_2| of colorRec & tab & tab & "6"}) -- Green,6
set labelList to (labelList & {|Label_Name_4| of colorRec & " " & tab & tab & "4"}) -- Blue,4
set labelList to (labelList & {|Label_Name_3| of colorRec & tab & tab & "5"}) -- Purple,5
set labelList to (labelList & {"", "Outdated" & tab & "0"}) -- unlabeled,0
on error
set labelList to {"Unread" & tab & tab & "7", "", "Red " & tab & tab & "2", "Orange" & tab & tab & "1", ¬
"Yellow" & tab & tab & "3", "Green" & tab & tab & "6", "Blue " & tab & tab & "4", "Purple" & tab & tab & "5", "", "Outdated" & tab & "0"}
end try
tell me to choose from list the result with title "title" with prompt "Choose a label to show ..." default items {item 1 of the result} OK button name "Show"