Hi All, I think I need some help.

I'm working on a Script to load color palette in this example I have choose 'Apple'
I have extract the keys and running a repeat loop to get the values/components.
The item 2 of Apple color palette is color blue with color {7, 115, 65418} from choose color.

When I run the below script the value from the r,g,b is not correct.
I believe AppleScript use 0 - 65535 for 8-bits color.

Have I missing something ??

This is the result I get from Apple color palette
{{0, 0, 0}, {1101, 12999, 65535}, {43777, 31137, 16947}, {0, 64974, 65535}, {0, 64015, 0}, {65535, 16567, 65535}, {65535, 37773, 0}, {37957, 8389, 37531}, {65535, 9773, 0}, {65497, 64588, 0}, {65535, 65535, 65535}}

Applescript:

(**
* [Instancee Property]: allKeys
*    A new array containing the dictionary’s keys, or an empty array if the dictionary has no entries.
*)
set colorListName to current application's NSColorList's colorListNamed:"Apple"
set theColorList to (colorListName's allKeys()) as list
log theColorList

set colorList to {}
repeat with i in theColorList
   set colorName to contents of i
   -- Returns the color object associated with the specified key.
   set itsValue to ((colorListName's colorWithKey:colorName)'s {redComponent(), greenComponent(), blueComponent()})
   set {r, g, b} to itsValue
   set itsValue to {round (r * 65535), round (g * 65535), round (b * 65535)}
   copy itsValue to end of the colorList
end repeat
-- item 2 should be {7, 115, 65418}
return colorList

HERE IS THE CODE AFTER SHANE'S INPUT.

Applescript:

use framework "Foundation"
use framework "AppKit"
use scripting additions

set colorListName to current application's NSColorList's colorListNamed:"Apple"
set theColorList to (colorListName's allKeys()) as list
log theColorList

set colorListValues to {}
repeat with i in theColorList
   set colorName to contents of i
   -- Returns the color object associated with the specified key.
   set itsName to ((colorListName's colorWithKey:colorName)'s colorUsingColorSpace:(current application's NSColorSpace's genericRGBColorSpace()))
   set colorComp to {(itsName's redComponent()) * 65535 div 1, (itsName's greenComponent()) * 65535 div 1, (itsName's blueComponent()) * 65535 div 1}
   copy colorComp to end of the colorListValues
end repeat
return colorListValues

Regards.
Fredrik

Last edited by Fredrik71 (2020-12-03 02:41:36 pm)