(

local aa = for i in geometry collect i.wirecolor

local bb = makeUniqueArray aa

for o = 1 to bb.count do 

(

local cc = for i in geometry where i.wirecolor == bb[o] collect i

group cc

)

)