<pre>on mouseUp  answer "The labels are :" & return & getLabelNames()end mouseUpfunction getLabelNames  repeat with labelNumber = 1 to 7    put getLabelName(labelNumber) & return after labelNames  end repeat  return labelNamesend getLabelNamesfunction getLabelName labelNumber  put word 2 of getLabelInfo(labelNumber) into labelName -- Label A with color { 65535, 25738, 652 }  delete first char of labelName  delete last char of labelName  return labelNameend getLabelNamefunction getLabelInfo labelNumber  put "set labelNumber to" && labelNumber & return after scriptVar  put "tell application" && quote & "Finder" & quote & return after scriptVar  put indent(2) & "set response to label labelNumber of Finder preferences" & return after scriptVar  put indent(2) & "return (response as string)" & return after scriptVar  put "end tell" after scriptVar  do scriptVar as appleScript  return the resultend getLabelInfo</pre>