Colour Capital Letters

[Heime]

I want to make a stand alone function that uses a different colour for capital 
letters 
in CamelCase names. Possibly taking code from glasses.el.

(defun color-camelcase-capital-letters ()
  "Color capital letters in CamelCase variables."
  (interactive)
  (highlight-regexp "\\(?:^\\|\\b\\)[[:upper:]][[:lower:]]*" 'hi-yellow))

What can I do ?