sub setWaterColor( actor, c)