Colour-blind friendly. Head no longer attracts itself.

Type instead of state for casting, so use A-->A,A button instead
of A-->A,Acolour button