🚀 go-pugleaf

Hi Shane thanks for pointing me in the right direction, I have come up with the below which does what I am after, how would I go about having the result returned as individual colors, not in a list but like

set {a} to color/swatch 1 of the result
set {b} to color/swatch 2 of the result

not quite sure how to go about it

----------------
tell application "Adobe InDesign CS3"
	activate
	delete unused swatches of document 1
	set _NotUSED to {"None", "Paper", "Black", "Registration", "Keyline"}
	set _UpDatedList to get (name of swatches of document 1 whose name is not in _NotUSED)
	set _myDoc to active document
	tell _myDoc
		set _Colour1 to swatch "Black"
		set _FillColour to every page item of _myDoc whose fill color is _Colour1
		set NumberOfColoredObject to count of _FillColour
		set _StrokeColour to every page item of _myDoc whose stroke color is _Colour1
		set _Stroke_Fill to _FillColour & _StrokeColour
		if (count of _Stroke_Fill) = 0 then
			set _NewList to _UpDatedList
		else if (count of _Stroke_Fill) > 0 then
			set _NewList to _UpDatedList & "Black"
		end if
	end tell
end tell

----------------

Budgie