make all upcase words yellow
first working haskell version
added verbose parsing and preset tag styles
parses tag name without spaces
took getTagStyle out of IO monad, dunno why it was
grow and shrink tag width
added the max tag width
changed to using state monads
changed to using state monads
highlights upper case phrases
removed extra printed spaces