;;; -*- lexical-binding: t -*-
;;
;; this file:
;;   https://dataswamp.org/~incal/terror-3/ev3-color-monitor.el

(require 'ev3-color-names)
(require 'ev3-color-value)

(defun color-monitor ()
  (interactive)
  (format "[amb %d%%] [color %s] [ref %d%%] [rgb %s]"
   (color-get-ambient)
   (color-number-and-name (color-get-color))
   (color-get-reflect)
   (color-get-rgb) ))

(provide 'ev3-color-monitor)