wads 0.1.2 → 0.2.2

data/lib/wads/widgets.rb

@@ -1,10 +1,17 @@
+require 'singleton'
+require 'logger'
 require_relative 'data_structures'
 
+#
+# All wads classes are contained within the wads module.
+#
 module Wads
     COLOR_PEACH = Gosu::Color.argb(0xffe6b0aa)
     COLOR_LIGHT_PURPLE = Gosu::Color.argb(0xffd7bde2)
     COLOR_LIGHT_BLUE = Gosu::Color.argb(0xffa9cce3)
+    COLOR_VERY_LIGHT_BLUE = Gosu::Color.argb(0xffd0def5)
     COLOR_LIGHT_GREEN = Gosu::Color.argb(0xffa3e4d7)
+    COLOR_GREEN = COLOR_LIGHT_GREEN
     COLOR_LIGHT_YELLOW = Gosu::Color.argb(0xfff9e79f)
     COLOR_LIGHT_ORANGE = Gosu::Color.argb(0xffedbb99)
     COLOR_WHITE = Gosu::Color::WHITE
@@ -13,12 +20,16 @@ module Wads
     COLOR_LIME = Gosu::Color.argb(0xffDAF7A6)
     COLOR_YELLOW = Gosu::Color.argb(0xffFFC300)
     COLOR_MAROON = Gosu::Color.argb(0xffC70039)
+    COLOR_PURPLE = COLOR_MAROON
     COLOR_LIGHT_GRAY = Gosu::Color.argb(0xff2c3e50)
+    COLOR_LIGHTER_GRAY = Gosu::Color.argb(0xff364d63)
+    COLOR_LIGHTEST_GRAY = Gosu::Color.argb(0xff486684)
     COLOR_GRAY = Gosu::Color::GRAY
     COLOR_OFF_GRAY = Gosu::Color.argb(0xff566573)
     COLOR_LIGHT_BLACK = Gosu::Color.argb(0xff111111)
     COLOR_LIGHT_RED = Gosu::Color.argb(0xffe6b0aa)
     COLOR_CYAN = Gosu::Color::CYAN
+    COLOR_AQUA = COLOR_CYAN
     COLOR_HEADER_BLUE = Gosu::Color.argb(0xff089FCE)
     COLOR_HEADER_BRIGHT_BLUE = Gosu::Color.argb(0xff0FAADD)
     COLOR_BLUE = Gosu::Color::BLUE
@@ -27,6 +38,8 @@ module Wads
     COLOR_BLACK = Gosu::Color::BLACK
     COLOR_FORM_BUTTON = Gosu::Color.argb(0xcc2e4053)
     COLOR_ERROR_CODE_RED = Gosu::Color.argb(0xffe6b0aa)
+    COLOR_BORDER_BLUE = Gosu::Color.argb(0xff004D80)
+    COLOR_ALPHA = "alpha"
 
     Z_ORDER_BACKGROUND = 2
     Z_ORDER_BORDER = 3
@@ -42,33 +55,1070 @@ module Wads
     EVENT_TABLE_UNSELECT = "tableunselect"
     EVENT_TABLE_ROW_DELETE = "tablerowdelete"
 
+    IMAGE_CIRCLE_SIZE = 104
+
+    ELEMENT_TEXT = "text"
+    ELEMENT_TEXT_INPUT = "text_input"
+    ELEMENT_BUTTON = "button"
+    ELEMENT_IMAGE = "image"
+    ELEMENT_TABLE = "table"
+    ELEMENT_HORIZONTAL_PANEL = "hpanel"
+    ELEMENT_VERTICAL_PANEL = "vpanel"
+    ELEMENT_MAX_PANEL = "maxpanel"
+    ELEMENT_DOCUMENT = "document"
+    ELEMENT_GRAPH = "graph"
+    ELEMENT_GENERIC = "generic"
+    ELEMENT_PLOT = "plot"
+
+    ARG_SECTION = "section"
+    ARG_COLOR = "color"
+    ARG_DESIRED_WIDTH = "desired_width"
+    ARG_DESIRED_HEIGHT = "desired_height"
+    ARG_PANEL_WIDTH = "panel_width"
+    ARG_LAYOUT = "layout"
+    ARG_TEXT_ALIGN = "text_align"
+    ARG_USE_LARGE_FONT = "large_font"
+    ARG_THEME = "theme"
+
+    TEXT_ALIGN_LEFT = "left"
+    TEXT_ALIGN_CENTER = "center"
+    TEXT_ALIGN_RIGHT = "right"
+
+    SECTION_TOP = "north"
+    SECTION_MIDDLE = "center"
+    SECTION_BOTTOM = "south"
+    SECTION_LEFT = "west"
+    SECTION_RIGHT = "east"
+    SECTION_NORTH = SECTION_TOP
+    SECTION_HEADER = SECTION_TOP
+    SECTION_SOUTH = SECTION_BOTTOM
+    SECTION_FOOTER = SECTION_BOTTOM
+    SECTION_WEST = "west"
+    SECTION_EAST = "east"
+    SECTION_CENTER = "center"
+    SECTION_CONTENT = SECTION_CENTER
+
+    LAYOUT_VERTICAL_COLUMN = "vcolumn"
+    LAYOUT_TOP_MIDDLE_BOTTOM = "top_middle_bottom"
+    LAYOUT_HEADER_CONTENT = "header_content"
+    LAYOUT_CONTENT_FOOTER = "content_footer"
+    LAYOUT_BORDER = "border"
+    LAYOUT_EAST_WEST = "east_west"
+    LAYOUT_LEFT_RIGHT = LAYOUT_EAST_WEST
+
+    FILL_VERTICAL_STACK = "fill_vertical"
+    FILL_HORIZONTAL_STACK = "fill_horizontal"
+    FILL_FULL_SIZE = "fill_full_size"
+
+    GRAPH_DISPLAY_ALL = "all"
+    GRAPH_DISPLAY_EXPLORER = "explorer"
+    GRAPH_DISPLAY_TREE = "tree"
+
+    #
+    # An instance of Coordinates references an x, y position on the screen
+    # as well as the width and height of the widget, thus providing the
+    # outer dimensions of a rectangular widget.
+    #
+    class Coordinates 
+        attr_accessor :x
+        attr_accessor :y
+        attr_accessor :width
+        attr_accessor :height 
+        def initialize(x, y, w, h) 
+            @x = x 
+            @y = y 
+            @width = w 
+            @height = h 
+        end
+    end 
+
+    #
+    # An instance of GuiTheme directs wads widgets as to what colors and fonts
+    # should be used. This accomplishes two goals: one, we don't need to constantly
+    # pass around these instances. They can be globally accessed using WadsConfig.
+    # It also makes it easy to change the look and feel of your application.
+    # 
+    class GuiTheme 
+        attr_accessor :text_color
+        attr_accessor :graphic_elements_color
+        attr_accessor :border_color
+        attr_accessor :background_color
+        attr_accessor :selection_color
+        attr_accessor :use_icons
+        attr_accessor :font
+        attr_accessor :font_large
+
+        def initialize(text, graphics, border, background, selection, use_icons, font, font_large) 
+            @text_color = text 
+            @graphic_elements_color = graphics
+            @border_color = border 
+            @background_color = background 
+            @selection_color = selection 
+            @use_icons = use_icons
+            @font = font
+            @font_large = font_large
+        end
+
+        def pixel_width_for_string(str)
+            @font.text_width(str)
+        end
+
+        def pixel_width_for_large_font(str)
+            @font_large.text_width(str)
+        end
+    end
+
+    #
+    # Theme with black text on a white background
+    #
+    class WadsBrightTheme < GuiTheme 
+        def initialize 
+            super(COLOR_BLACK,                # text color
+                  COLOR_HEADER_BRIGHT_BLUE,   # graphic elements
+                  COLOR_BORDER_BLUE,          # border color
+                  COLOR_WHITE,                # background
+                  COLOR_VERY_LIGHT_BLUE,      # selected item
+                  true,                       # use icons
+                  Gosu::Font.new(22),         # regular font
+                  Gosu::Font.new(38))         # large font
+        end 
+    end
+
+    class WadsDarkRedBrownTheme < GuiTheme 
+        def initialize 
+            super(COLOR_WHITE,                  # text color
+                  Gosu::Color.argb(0xffD63D41), # graphic elements - dark red
+                  Gosu::Color.argb(0xffEC5633), # border color - dark orange
+                  Gosu::Color.argb(0xff52373B), # background - dark brown
+                  Gosu::Color.argb(0xffEC5633), # selected item - dark orange
+                  true,                         # use icons
+                  Gosu::Font.new(22),           # regular font
+                  Gosu::Font.new(38))           # large font
+        end 
+    end
+
+    class WadsEarthTonesTheme < GuiTheme 
+        def initialize 
+            super(COLOR_WHITE,                  # text color
+                  Gosu::Color.argb(0xffD0605E), # graphic elements
+                  Gosu::Color.argb(0xffFF994C), # border color
+                  Gosu::Color.argb(0xff98506D), # background
+                  Gosu::Color.argb(0xffFF994C), # selected item
+                  true,                         # use icons
+                  Gosu::Font.new(22),           # regular font
+                  Gosu::Font.new(38))           # large font
+        end 
+    end
+
+    class WadsNatureTheme < GuiTheme 
+        def initialize 
+            super(COLOR_WHITE,                  # text color
+                  Gosu::Color.argb(0xffA9B40B), # graphic elements
+                  Gosu::Color.argb(0xffF38B01), # border color
+                  Gosu::Color.argb(0xffFFC001), # background
+                  Gosu::Color.argb(0xffF38B01), # selected item
+                  true,                         # use icons
+                  Gosu::Font.new(22, { :bold => true}), # regular font
+                  Gosu::Font.new(38, { :bold => true})) # large font
+        end 
+    end
+
+    class WadsPurpleTheme < GuiTheme 
+        def initialize 
+            super(COLOR_WHITE,                  # text color
+                  Gosu::Color.argb(0xff5A23B4), # graphic elements
+                  Gosu::Color.argb(0xffFE01EA), # border color
+                  Gosu::Color.argb(0xffAA01FF), # background
+                  Gosu::Color.argb(0xffFE01EA), # selected item
+                  true,                         # use icons
+                  Gosu::Font.new(22), # regular font
+                  Gosu::Font.new(38, { :bold => true})) # large font
+        end 
+    end
+
+    class WadsAquaTheme < GuiTheme 
+        def initialize 
+            super(COLOR_WHITE,                  # text color
+                  Gosu::Color.argb(0xff387CA3), # graphic elements
+                  Gosu::Color.argb(0xff387CA3), # border color
+                  Gosu::Color.argb(0xff52ADC8), # background
+                  Gosu::Color.argb(0xff55C39E), # selected item
+                  true,                         # use icons
+                  Gosu::Font.new(22), # regular font
+                  Gosu::Font.new(38, { :bold => true})) # large font
+        end 
+    end
+
+    #
+    # Theme with white text on a black background that also does not use icons.
+    # Currently, icons are primarily used in the Graph display widget.
+    #
+    class WadsNoIconTheme < GuiTheme 
+        def initialize 
+            super(COLOR_WHITE,                # text color
+                  COLOR_HEADER_BRIGHT_BLUE,   # graphic elements
+                  COLOR_BORDER_BLUE,          # border color
+                  COLOR_BLACK,                # background
+                  COLOR_LIGHT_GRAY,           # selected item
+                  false,                      # use icons
+                  Gosu::Font.new(22),         # regular font
+                  Gosu::Font.new(38))         # large font
+        end 
+    end
+
+    ##
+    # WadsConfig is the one singleton that provides access to resources
+    # used throughput the application, including fonts, themes, and layouts.
+    #
+    class WadsConfig 
+        include Singleton
+
+        attr_accessor :logger
+        attr_accessor :window
+
+        def get_logger
+            if @logger.nil?
+                @logger = Logger.new(STDOUT)
+            end 
+            @logger 
+        end
+
+        #
+        # Wads uses the Ruby logger, and you can conrol the log level using this method.
+        # Valid values are 'debug', 'info', 'warn', 'error'
+        def set_log_level(level)
+            get_logger.level = level
+        end
+
+        def set_window(w)
+            @window = w 
+        end
+
+        def get_window
+            if @window.nil?
+                raise "The WadsConfig.instance.set_window(window) needs to be invoked first"
+            end
+            @window 
+        end
+
+        #
+        # Get the default theme which is white text on a black background
+        # that uses icons (primarily used in the Graph display widget currently)
+        #
+        def get_default_theme 
+            if @default_theme.nil?
+                @default_theme = GuiTheme.new(COLOR_WHITE,                # text color
+                                              COLOR_HEADER_BRIGHT_BLUE,   # graphic elements
+                                              COLOR_BORDER_BLUE,          # border color
+                                              COLOR_BLACK,                # background
+                                              COLOR_LIGHT_GRAY,           # selected item
+                                              true,                       # use icons
+                                              Gosu::Font.new(22),         # regular font
+                                              Gosu::Font.new(38))         # large font
+            end 
+            @default_theme
+        end
+
+        #
+        # Get a reference to the current theme. If one has not been set using
+        # set_current_theme(theme), the default theme will be used.
+        #
+        def current_theme 
+            if @current_theme.nil? 
+                @current_theme = get_default_theme 
+            end 
+            @current_theme 
+        end 
+
+        #
+        # Set the theme to be used by wads widgets
+        #
+        def set_current_theme(theme) 
+            @current_theme = theme 
+        end
+
+        #
+        # This method returns the default dimensions for the given widget type
+        # as a two value array of the form [width, height].
+        # This helps the layout manager allocate space to widgets within a layout
+        # and container. The string value max tells the layout to use all available
+        # space in that dimension (either x or y)
+        #
+        def default_dimensions(widget_type)
+            if @default_dimensions.nil? 
+                @default_dimensions = {}
+                @default_dimensions[ELEMENT_TEXT] = [100, 20]
+                @default_dimensions[ELEMENT_TEXT_INPUT] = [100, 20]
+                @default_dimensions[ELEMENT_IMAGE] = [100, 100]
+                @default_dimensions[ELEMENT_TABLE] = ["max", "max"]
+                @default_dimensions[ELEMENT_HORIZONTAL_PANEL] = ["max", 100]
+                @default_dimensions[ELEMENT_VERTICAL_PANEL] = [100, "max"]
+                @default_dimensions[ELEMENT_MAX_PANEL] = ["max", "max"]
+                @default_dimensions[ELEMENT_DOCUMENT] = ["max", "max"]
+                @default_dimensions[ELEMENT_GRAPH] = ["max", "max"]
+                @default_dimensions[ELEMENT_BUTTON] = [100, 26]
+                @default_dimensions[ELEMENT_GENERIC] = ["max", "max"]
+                @default_dimensions[ELEMENT_PLOT] = ["max", "max"]
+            end
+            @default_dimensions[widget_type]
+        end
+    
+        def create_layout_for_widget(widget, layout_type = nil, args = {})
+            create_layout(widget.x, widget.y, widget.width, widget.height, widget, layout_type, args)
+        end 
+
+        def create_layout(x, y, width, height, widget, layout_type = nil, args = {})
+            if layout_type.nil? 
+                if @default_layout_type.nil?
+                    layout_type = LAYOUT_VERTICAL_COLUMN
+                else 
+                    layout_type = @default_layout_type 
+                end 
+            end
+ 
+            if not @default_layout_args.nil?
+                if args.nil? 
+                    args = @default_layout_args 
+                else 
+                    args.merge(@default_layout_args)
+                end 
+            end
+
+            if layout_type == LAYOUT_VERTICAL_COLUMN
+                return VerticalColumnLayout.new(x, y, width, height, widget, args)
+            elsif layout_type == LAYOUT_TOP_MIDDLE_BOTTOM
+                return TopMiddleBottomLayout.new(x, y, width, height, widget, args)
+            elsif layout_type == LAYOUT_BORDER
+                return BorderLayout.new(x, y, width, height, widget, args)
+            elsif layout_type == LAYOUT_HEADER_CONTENT
+                return HeaderContentLayout.new(x, y, width, height, widget, args)
+            elsif layout_type == LAYOUT_CONTENT_FOOTER
+                return ContentFooterLayout.new(x, y, width, height, widget, args)
+            elsif layout_type == LAYOUT_EAST_WEST
+                return EastWestLayout.new(x, y, width, height, widget, args)
+            end
+            raise "#{layout_type} is an unsupported layout type" 
+        end 
+    
+        def set_default_layout(layout_type, layout_args = {}) 
+            @default_layout_type = layout_type 
+            @default_layout_args = layout_args
+        end
+
+        #
+        # Get a Gosu images instance for the specified color, i.e. COLOR_AQUA ir COLOR_BLUE
+        #
+        def circle(color)
+            create_circles 
+            if color.nil?
+                return nil 
+            end
+            img = @wads_image_circles[color]
+            if img.nil?
+                get_logger.error("ERROR: Did not find circle image with color #{color}")
+            end
+            img
+        end 
+
+        def create_circles
+            return unless @wads_image_circles.nil?
+            @wads_image_circle_aqua = Gosu::Image.new("./media/CircleAqua.png")
+            @wads_image_circle_blue = Gosu::Image.new("./media/CircleBlue.png")
+            @wads_image_circle_green = Gosu::Image.new("./media/CircleGreen.png")
+            @wads_image_circle_purple = Gosu::Image.new("./media/CirclePurple.png")
+            @wads_image_circle_red = Gosu::Image.new("./media/CircleRed.png")
+            @wads_image_circle_yellow = Gosu::Image.new("./media/CircleYellow.png")
+            @wads_image_circle_gray = Gosu::Image.new("./media/CircleGray.png")
+            @wads_image_circle_white = Gosu::Image.new("./media/CircleWhite.png")
+            @wads_image_circle_alpha = Gosu::Image.new("./media/CircleAlpha.png")
+            @wads_image_circles = {}
+            @wads_image_circles[COLOR_AQUA] = @wads_image_circle_aqua
+            @wads_image_circles[COLOR_BLUE] = @wads_image_circle_blue
+            @wads_image_circles[COLOR_GREEN] = @wads_image_circle_green
+            @wads_image_circles[COLOR_PURPLE] = @wads_image_circle_purple
+            @wads_image_circles[COLOR_RED] = @wads_image_circle_red
+            @wads_image_circles[COLOR_YELLOW] = @wads_image_circle_yellow
+            @wads_image_circles[COLOR_GRAY] = @wads_image_circle_gray
+            @wads_image_circles[COLOR_WHITE] = @wads_image_circle_white
+            @wads_image_circles[COLOR_ALPHA] = @wads_image_circle_alpha
+            @wads_image_circles[4294956800] = @wads_image_circle_yellow
+            @wads_image_circles[4281893349] = @wads_image_circle_blue
+            @wads_image_circles[4294967295] = @wads_image_circle_gray
+            @wads_image_circles[4286611584] = @wads_image_circle_gray
+            @wads_image_circles[4282962380] = @wads_image_circle_aqua
+            @wads_image_circles[4294939648] = @wads_image_circle_red
+            @wads_image_circles[4292664540] = @wads_image_circle_white    
+        end
+    end
+
+    #
+    # A Gui container is used to allocate space in the x, y two dimensional space to widgets
+    # and keep track of where the next widget in the container will be placed.
+    # The fill type is one of FILL_VERTICAL_STACK, FILL_HORIZONTAL_STACK, or FILL_FULL_SIZE.
+    # Layouts used containers to allocate space across the entire visible application.
+    #
+    class GuiContainer 
+        attr_accessor :start_x
+        attr_accessor :start_y
+        attr_accessor :next_x
+        attr_accessor :next_y
+        attr_accessor :max_width 
+        attr_accessor :max_height 
+        attr_accessor :padding 
+        attr_accessor :fill_type 
+        attr_accessor :elements
+
+        def initialize(start_x, start_y, width, height, fill_type = FILL_HORIZONTAL_STACK, padding = 5)
+            @start_x = start_x
+            @start_y = start_y
+            @next_x = start_x
+            @next_y = start_y
+            @max_width = width 
+            @max_height = height 
+            @padding = padding
+            if [FILL_VERTICAL_STACK, FILL_HORIZONTAL_STACK, FILL_FULL_SIZE].include? fill_type
+                @fill_type = fill_type 
+            else 
+                raise "#{fill_type} is not a valid fill type"
+            end
+            @elements = []
+        end 
+
+        def get_coordinates(element_type, args = {})
+            default_dim =  WadsConfig.instance.default_dimensions(element_type)
+            if default_dim.nil?
+                raise "#{element_type} is an undefined element type"
+            end
+            default_width = default_dim[0]
+            default_height = default_dim[1]
+            specified_width = args[ARG_DESIRED_WIDTH]
+            if specified_width.nil?
+                if default_width == "max"
+                    if fill_type == FILL_VERTICAL_STACK or fill_type == FILL_FULL_SIZE
+                        the_width = max_width
+                    else 
+                        the_width = (@start_x + @max_width) - @next_x
+                    end
+                else
+                    the_width = default_width 
+                end
+            else 
+                if specified_width > @max_width 
+                    the_width = @max_width
+                else
+                    the_width = specified_width
+                end
+            end
+
+            specified_height = args[ARG_DESIRED_HEIGHT]
+            if specified_height.nil?
+                if default_height == "max"
+                    if fill_type == FILL_VERTICAL_STACK
+                        the_height = (@start_y + @max_height) - @next_y
+                    else
+                        the_height = max_height
+                    end
+                else
+                    the_height = default_height 
+                end
+            else
+                if specified_height > @max_height
+                    the_height = @max_height 
+                else
+                    the_height = specified_height 
+                end
+            end
+
+            # Not all elements require padding
+            padding_exempt = [ELEMENT_IMAGE, ELEMENT_HORIZONTAL_PANEL, ELEMENT_PLOT,
+                ELEMENT_VERTICAL_PANEL, ELEMENT_GENERIC, ELEMENT_MAX_PANEL].include? element_type
+            if padding_exempt
+                # No padding
+                width_to_use = the_width
+                height_to_use = the_height
+                x_to_use = @next_x 
+                y_to_use = @next_y
+            else
+                # Apply padding only if we are the max, i.e. the boundaries
+                x_to_use = @next_x + @padding
+                y_to_use = @next_y + @padding
+                if the_width == @max_width 
+                    width_to_use = the_width - (2 * @padding)
+                else 
+                    width_to_use = the_width
+                end 
+                if the_height == @max_height
+                    height_to_use = the_height - (2 * @padding)
+                else 
+                    height_to_use = the_height
+                end 
+            end
+
+            # Text elements also honor ARG_TEXT_ALIGN 
+            arg_text_align = args[ARG_TEXT_ALIGN]
+            if not arg_text_align.nil?
+                # left is the default, so check for center or right
+                if arg_text_align == TEXT_ALIGN_CENTER 
+                    x_to_use = @next_x + ((@max_width - specified_width) / 2)
+                elsif arg_text_align == TEXT_ALIGN_RIGHT 
+                    x_to_use = @next_x + @max_width - specified_width - @padding
+                end
+            end
+
+            coords = Coordinates.new(x_to_use, y_to_use,
+                                     width_to_use, height_to_use)
+
+            if fill_type == FILL_VERTICAL_STACK
+                @next_y = @next_y + the_height + (2 * @padding)
+            elsif fill_type == FILL_HORIZONTAL_STACK
+                @next_x = @next_x + the_width + (2 * @padding)
+            end
+
+            @elements << coords
+            coords
+        end
+    end
+
+    # The base class for all wads layouts. It has helper methods to add
+    # different types of widgets to the layout.
+    class WadsLayout 
+        attr_accessor :border_coords
+        attr_accessor :parent_widget
+        attr_accessor :args
+
+        def initialize(x, y, width, height, parent_widget, args = {})
+            @border_coords = Coordinates.new(x, y, width, height)
+            @parent_widget = parent_widget
+            @args = args
+        end
+
+        def get_coordinates(element_type, args = {})
+            raise "You must use a subclass of WadsLayout"
+        end
+
+        def add_widget(widget, args = {})
+            # The widget already has an x, y position, so we need to move it
+            # based on the layout
+            coordinates = get_coordinates(ELEMENT_GENERIC, args)
+            widget.move_recursive_absolute(coordinates.x, coordinates.y)
+            widget.base_z = @parent_widget.base_z
+            @parent_widget.add_child(widget)
+            widget
+        end
+
+        def add_text(message, args = {})
+            default_dimensions = WadsConfig.instance.default_dimensions(ELEMENT_TEXT)
+            if args[ARG_USE_LARGE_FONT]
+                text_width = WadsConfig.instance.current_theme.pixel_width_for_large_font(message)
+            else
+                text_width = WadsConfig.instance.current_theme.pixel_width_for_string(message)
+            end
+            coordinates = get_coordinates(ELEMENT_TEXT,
+                { ARG_DESIRED_WIDTH => text_width,
+                  ARG_DESIRED_HEIGHT => default_dimensions[1]}.merge(args))
+            new_text = Text.new(coordinates.x, coordinates.y, message,
+                { ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_text.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_text)
+            new_text
+        end 
+
+        def add_text_input(width, default_text = '', args = {})
+            coordinates = get_coordinates(ELEMENT_TEXT_INPUT,
+                { ARG_DESIRED_WIDTH => width}.merge(args))
+            new_text_input = TextField.new(coordinates.x, coordinates.y, default_text, width)
+            new_text_input.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_text_input)
+            @parent_widget.text_input_fields << new_text_input
+            new_text_input
+        end 
+
+        def add_image(filename, args = {})
+            img = Gosu::Image.new(filename)
+            coordinates = get_coordinates(ELEMENT_IMAGE,
+                { ARG_DESIRED_WIDTH => img.width,
+                  ARG_DESIRED_HEIGHT => img.height}.merge(args))
+            new_image = ImageWidget.new(coordinates.x, coordinates.y, img,
+                                        {ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_image.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_image)
+            new_image
+        end
+
+        def add_button(label, args = {}, &block)
+            text_width = WadsConfig.instance.current_theme.pixel_width_for_string(label) + 20
+            coordinates = get_coordinates(ELEMENT_BUTTON,
+                { ARG_DESIRED_WIDTH => text_width}.merge(args))
+            new_button = Button.new(coordinates.x, coordinates.y, label, 
+                                    { ARG_DESIRED_WIDTH => coordinates.width,
+                                      ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_button.set_action(&block)
+            new_button.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_button)
+            new_button
+        end
+
+        def add_plot(args = {})
+            coordinates = get_coordinates(ELEMENT_PLOT, args)
+            new_plot = Plot.new(coordinates.x, coordinates.y,
+                                coordinates.width, coordinates.height) 
+            new_plot.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_plot)
+            new_plot
+        end
+
+        def add_document(content, args = {})
+            number_of_content_lines = content.lines.count
+            height = (number_of_content_lines * 26) + 4
+            coordinates = get_coordinates(ELEMENT_DOCUMENT,
+                { ARG_DESIRED_HEIGHT => height}.merge(args))
+            new_doc = Document.new(coordinates.x, coordinates.y,
+                                   coordinates.width, coordinates.height,
+                                   content,
+                                   {ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_doc.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_doc)
+            new_doc
+        end
+
+        def add_graph_display(graph, display_mode = GRAPH_DISPLAY_ALL, args = {})
+            coordinates = get_coordinates(ELEMENT_GRAPH, args)
+            new_graph = GraphWidget.new(coordinates.x, coordinates.y,
+                                        coordinates.width, coordinates.height,
+                                        graph, display_mode) 
+            new_graph.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_graph)
+            new_graph
+        end
+
+        def add_single_select_table(column_headers, visible_rows, args = {})
+            calculated_height = 30 + (visible_rows * 30)
+            coordinates = get_coordinates(ELEMENT_TABLE,
+                { ARG_DESIRED_HEIGHT => calculated_height}.merge(args))
+            new_table = SingleSelectTable.new(coordinates.x, coordinates.y,
+                                              coordinates.width, coordinates.height,
+                                              column_headers, visible_rows,
+                                              {ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_table.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_table)
+            new_table
+        end 
+
+        def add_multi_select_table(column_headers, visible_rows, args = {})
+            calculated_height = 30 + (visible_rows * 30)
+            coordinates = get_coordinates(ELEMENT_TABLE,
+                { ARG_DESIRED_HEIGHT => calculated_height}.merge(args))
+            new_table = MultiSelectTable.new(coordinates.x, coordinates.y,
+                                             coordinates.width, coordinates.height,
+                                             column_headers, visible_rows,
+                                             {ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_table.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_table)
+            new_table
+        end 
+
+        def add_table(column_headers, visible_rows, args = {})
+            calculated_height = 30 + (visible_rows * 30)
+            coordinates = get_coordinates(ELEMENT_TABLE,
+                { ARG_DESIRED_HEIGHT => calculated_height}.merge(args))
+            new_table = Table.new(coordinates.x, coordinates.y,
+                                coordinates.width, coordinates.height,
+                                column_headers, visible_rows,
+                                {ARG_THEME => @parent_widget.gui_theme}.merge(args))
+            new_table.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_table)
+            new_table
+        end 
+
+        def add_horizontal_panel(args = {})
+            internal_add_panel(ELEMENT_HORIZONTAL_PANEL, args)
+        end 
+
+        def add_vertical_panel(args = {})
+            internal_add_panel(ELEMENT_VERTICAL_PANEL, args)
+        end 
+
+        def add_max_panel(args = {})
+            internal_add_panel(ELEMENT_MAX_PANEL, args)
+        end 
+
+        def internal_add_panel(orientation, args)
+            coordinates = get_coordinates(orientation, args)
+            new_panel = Panel.new(coordinates.x, coordinates.y,
+                                  coordinates.width, coordinates.height)
+            new_panel_layout = args[ARG_LAYOUT]
+            if new_panel_layout.nil?
+                new_panel_layout = LAYOUT_VERTICAL_COLUMN
+            end
+            new_panel.set_layout(new_panel_layout, args)
+
+            new_panel_theme = args[ARG_THEME]
+            new_panel.gui_theme = new_panel_theme unless new_panel_theme.nil?
+
+            new_panel.base_z = @parent_widget.base_z
+            @parent_widget.add_child(new_panel)
+            #new_panel.disable_border
+            new_panel
+        end
+    end 
+
+    class VerticalColumnLayout < WadsLayout
+        attr_accessor :single_column_container
+
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            @single_column_container = GuiContainer.new(x, y, width, height, FILL_VERTICAL_STACK)
+        end
+
+        # This is the standard interface for layouts
+        def get_coordinates(element_type, args = {})
+            @single_column_container.get_coordinates(element_type, args)
+        end
+    end 
+
+    # SectionLayout is an intermediate class in the layout class hierarchy
+    # that is used to divide the visible screen into different sections.
+    # The commonly used sections include SECTION_TOP or SECTION_NORTH,
+    # SECTION_MIDDLE or SECTION_CENTER, SECTION_BOTTOM or SECTION_SOUTH,
+    # SECTION_LEFT or SECTION_WEST, SECTION_RIGHT or SECTION_EAST.
+    class SectionLayout < WadsLayout
+        attr_accessor :container_map
+
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            @container_map = {}
+        end
+
+        #
+        # Get the coordinates for the given element type. A generic map of parameters
+        # is accepted, however the  ARG_SECTION is required so the layout can determine
+        # which section or container is used.
+        #
+        def get_coordinates(element_type, args = {})
+            section = args[ARG_SECTION]
+            if section.nil?
+                raise "Layout addition requires the arg '#{ARG_SECTION}' with value #{@container_map.keys.join(', ')}"
+            end
+            container = @container_map[section]
+            if container.nil? 
+                raise "Invalid section #{section}. Value values are #{@container_map.keys.join(', ')}"
+            end
+            container.get_coordinates(element_type, args)
+        end
+    end 
+
+    # The layout sections are as follows:
+    #
+    #   +-------------------------------------------------+
+    #   +                  SECTION_NORTH                  +
+    #   +-------------------------------------------------+
+    #   +                                                 +
+    #   +                  SECTION_CENTER                 +
+    #   +                                                 +
+    #   +-------------------------------------------------+
+    class HeaderContentLayout < SectionLayout
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            # Divide the height into 100, 100, and the middle gets everything else
+            # Right now we are using 100 pixels rather than a percentage for the borders
+            header_section_height = 100
+            if args[ARG_DESIRED_HEIGHT]
+                header_section_height = args[ARG_DESIRED_HEIGHT]
+            end
+            middle_section_y_start = y + header_section_height
+            height_middle_section = height - header_section_height
+            @container_map[SECTION_NORTH] = GuiContainer.new(x, y, width, header_section_height)
+            @container_map[SECTION_CENTER] = GuiContainer.new(x, middle_section_y_start, width, height_middle_section, FILL_VERTICAL_STACK)
+        end
+    end 
+
+    # The layout sections are as follows:
+    #
+    #   +-------------------------------------------------+
+    #   +                                                 +
+    #   +                  SECTION_CENTER                 +
+    #   +                                                 +
+    #   +-------------------------------------------------+
+    #   +                  SECTION_SOUTH                  +
+    #   +-------------------------------------------------+
+    class ContentFooterLayout < SectionLayout
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            # Divide the height into 100, 100, and the middle gets everything else
+            # Right now we are using 100 pixels rather than a percentage for the borders
+            bottom_section_height = 100
+            if args[ARG_DESIRED_HEIGHT]
+                bottom_section_height = args[ARG_DESIRED_HEIGHT]
+            end
+            bottom_section_y_start = y + height - bottom_section_height
+            middle_section_height = height - bottom_section_height
+            @container_map[SECTION_CENTER] = GuiContainer.new(x, y, width, middle_section_height, FILL_VERTICAL_STACK)
+            @container_map[SECTION_SOUTH] = GuiContainer.new(x, bottom_section_y_start,
+                                                            width, bottom_section_height)
+        end
+    end 
+
+    # The layout sections are as follows:
+    #
+    #   +-------------------------------------------------+
+    #   +                        |                        +
+    #   +     SECTION_WEST       |      SECTION_EAST      +
+    #   +                        |                        +
+    #   +-------------------------------------------------+
+    #
+    class EastWestLayout < SectionLayout
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            west_section_width = width / 2
+            if args[ARG_PANEL_WIDTH]
+                west_section_width = args[ARG_PANEL_WIDTH]
+            end
+            east_section_width = width - west_section_width
+            @container_map[SECTION_WEST] = GuiContainer.new(x, y,
+                                                           west_section_width, height,
+                                                           FILL_FULL_SIZE)
+            @container_map[SECTION_EAST] = GuiContainer.new(x + west_section_width, y,
+                                                           east_section_width, height,
+                                                           FILL_FULL_SIZE)
+        end
+    end 
+
+    # The layout sections are as follows:
+    #
+    #   +-------------------------------------------------+
+    #   +                  SECTION_NORTH                  +
+    #   +-------------------------------------------------+
+    #   +                                                 +
+    #   +                  SECTION_CENTER                 +
+    #   +                                                 +
+    #   +-------------------------------------------------+
+    #   +                  SECTION_SOUTH                  +
+    #   +-------------------------------------------------+
+    class TopMiddleBottomLayout < SectionLayout
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            # Divide the height into 100, 100, and the middle gets everything else
+            # Right now we are using 100 pixels rather than a percentage for the borders
+            middle_section_y_start = y + 100
+            bottom_section_y_start = y + height - 100
+            height_middle_section = height - 200
+            @container_map[SECTION_NORTH] = GuiContainer.new(x, y, width, 100)
+            @container_map[SECTION_CENTER] = GuiContainer.new(x, middle_section_y_start,
+                                                             width, height_middle_section, FILL_VERTICAL_STACK)
+            @container_map[SECTION_SOUTH] = GuiContainer.new(x, bottom_section_y_start, width, 100)
+        end
+    end 
+
+    # The layout sections are as follows:
+    #
+    #   +-------------------------------------------------+
+    #   +                  SECTION_NORTH                  +
+    #   +-------------------------------------------------+
+    #   +              |                   |              +
+    #   + SECTION_WEST |   SECTION_CENTER  | SECTION_EAST +
+    #   +              |                   |              +
+    #   +-------------------------------------------------+
+    #   +                  SECTION_SOUTH                  +
+    #   +-------------------------------------------------+
+    class BorderLayout < SectionLayout
+        def initialize(x, y, width, height, parent_widget, args = {})
+            super
+            # Divide the height into 100, 100, and the middle gets everything else
+            # Right now we are using 100 pixels rather than a percentage for the borders
+            middle_section_y_start = y + 100
+            bottom_section_y_start = y + height - 100
+
+            height_middle_section = bottom_section_y_start - middle_section_y_start
+
+            middle_section_x_start = x + 100
+            right_section_x_start = x + width - 100
+            width_middle_section = right_section_x_start - middle_section_x_start
+
+            @container_map[SECTION_NORTH] = GuiContainer.new(x, y, width, 100)
+            @container_map[SECTION_WEST] = GuiContainer.new(
+                x, middle_section_y_start, 100, height_middle_section, FILL_VERTICAL_STACK)
+            @container_map[SECTION_CENTER] = GuiContainer.new(
+                                   middle_section_x_start,
+                                   middle_section_y_start,
+                                   width_middle_section,
+                                   height_middle_section,
+                                   FILL_VERTICAL_STACK)
+            @container_map[SECTION_EAST] = GuiContainer.new(
+                                   right_section_x_start,
+                                   middle_section_y_start,
+                                   100,
+                                   height_middle_section,
+                                   FILL_VERTICAL_STACK)
+            @container_map[SECTION_SOUTH] = GuiContainer.new(x, bottom_section_y_start, width, 100)
+        end
+    end 
+
+    # The base class for all widgets. This class provides basic functionality for
+    # all gui widgets including maintaining the coordinates and layout used.
+    # A widget has a border and background, whose colors are defined by the theme.
+    # These can be turned off using the disable_border and disable_background methods.
+    # Widgets support a hierarchy of visible elements on the screen. For example,
+    # a parent widget may be a form, and it may contain many child widgets such as
+    # text labels, input fields, and a submit button. You can add children to a 
+    # widget using the add or add_child methods. Children are automatically rendered
+    # so any child does not need an explicit call to its draw or render method.
+    # Children can be placed with x, y positioning relative to their parent for convenience
+    # (see the relative_x and relative_y methods).
+    #
+    # The draw and update methods are used by their Gosu counterparts.
+    # Typically there is one parent Wads widget used by a Gosu app, and it controls
+    # drawing all of the child widgets, invoking update on all widgets, and delegating
+    # user events. Widgets can override a render method for any specific drawing logic.
+    # It is worth showing the draw method here to amplify the point. You do not need
+    # to specifically call draw or render on any children. If you want to manage GUI
+    # elements outside of the widget hierarchy, then render is the best place to do it.
+    #
+    # Likewise, the update method recursively calls the handle_update method on all
+    # children in this widget's hierarchy.
+    #
+    # A commonly used method is contains_click(mouse_x, mouse_y) which returns
+    # whether this widget contained the mouse event. For a example, a button widget
+    # uses this method to determine if it was clicked.
+    # 
     class Widget 
         attr_accessor :x
         attr_accessor :y 
         attr_accessor :base_z 
-        attr_accessor :color 
-        attr_accessor :background_color
-        attr_accessor :border_color
+        attr_accessor :gui_theme 
+        attr_accessor :layout 
         attr_accessor :width
         attr_accessor :height 
         attr_accessor :visible 
-        attr_accessor :font
         attr_accessor :children
         attr_accessor :overlay_widget
-        attr_accessor :debug_off
+        attr_accessor :override_color
+        attr_accessor :is_selected
+        attr_accessor :text_input_fields
 
-        def initialize(x, y, color = COLOR_CYAN) 
-            @x = x 
-            @y = y 
-            @color = color
-            @width = 1 
-            @height = 1
+        def initialize(x, y, width = 10, height = 10, layout = nil, theme = nil) 
+            set_absolute_position(x, y)  
+            set_dimensions(width, height)
+            @base_z = 0
+            if uses_layout
+                if layout.nil? 
+                    @layout = WadsConfig.instance.create_layout(x, y, width, height, self)
+                else
+                    @layout = layout
+                end
+            end
+            if theme.nil?
+                @gui_theme = WadsConfig.instance.current_theme
+            else 
+                @gui_theme = theme 
+            end
             @visible = true 
             @children = []
-            @base_z = 0
-            @debug_off = true
+            @show_background = true
+            @show_border = true 
+            @is_selected = false
+            @text_input_fields = []
+        end
+
+        def pad(str, size, left_align = false)
+            str = str.to_s
+            if left_align
+                str[0, size].ljust(size, ' ')
+            else
+                str[0, size].rjust(size, ' ')
+            end
+        end
+        def debug(message)
+            WadsConfig.instance.get_logger.debug message 
+        end
+        def info(message)
+            WadsConfig.instance.get_logger.info message 
+        end
+        def warn(message)
+            WadsConfig.instance.get_logger.warn message 
+        end
+        def error(message)
+            WadsConfig.instance.get_logger.error message 
+        end
+
+        def set_absolute_position(x, y) 
+            @x = x 
+            @y = y 
+        end 
+
+        def set_dimensions(width, height)
+            @width = width
+            @height = height 
+        end
+
+        def uses_layout
+            true 
+        end
+
+        def get_layout 
+            if not uses_layout 
+                raise "The widget #{self.class.name} does not support layouts"
+            end
+            if @layout.nil? 
+                raise "No layout was defined for #{self.class.name}"
+            end 
+            @layout 
+        end 
+
+        def set_layout(layout_type, args = {})
+            @layout = WadsConfig.instance.create_layout_for_widget(self, layout_type, args)
+        end
+
+        def add_panel(section, args = {})
+            new_panel = get_layout.add_max_panel({ ARG_SECTION => section,
+                                                   ARG_THEME => @gui_theme}.merge(args))
+            new_panel.disable_border
+            new_panel
+        end
+
+        def get_theme 
+            @gui_theme
+        end
+
+        def set_theme(new_theme)
+            @gui_theme = new_theme
         end
 
+        def set_selected 
+            @is_selected = true
+        end 
+
+        def unset_selected 
+            @is_selected = false
+        end 
+
+        def graphics_color 
+            if @override_color 
+                return @override_color 
+            end 
+            @gui_theme.graphic_elements_color 
+        end 
+
+        def text_color 
+            if @override_color 
+                return @override_color 
+            end 
+            @gui_theme.text_color 
+        end 
+
+        def selection_color 
+            @gui_theme.selection_color 
+        end 
+
+        def border_color 
+            @gui_theme.border_color 
+        end 
+
+        #
+        # The z order is determined by taking the base_z and adding the widget specific value.
+        # An overlay widget has a base_z that is +10 higher than the widget underneath it.
+        # The widget_z method provides a relative ordering that is common for user interfaces.
+        # For example, text is higher than graphic elements and backgrounds.
+        #
         def z_order 
             @base_z + widget_z
         end
@@ -77,63 +1127,180 @@ module Wads
             @base_z + relative_order 
         end
 
+        #
+        # Add a child widget that will automatically be drawn by this widget and will received
+        # delegated events. This is an alias for add_child
+        #
+        def add(child) 
+            add_child(child)
+        end 
+
+        #
+        # Add a child widget that will automatically be drawn by this widget and will received
+        # delegated events.
+        #
         def add_child(child) 
             @children << child 
         end
 
+        #
+        # Remove the given child widget
+        #
         def remove_child(child)
             @children.delete(child)
         end
 
+        #
+        # Remove a list of child widgets
+        #
+        def remove_children(list)
+            list.each do |child|
+                @children.delete(child)
+            end
+        end 
+
+        #
+        # Remove all children whose class name includes the given token.
+        # This method can be used if you do not have a saved list of the
+        # widgets you want to remove.
+        #
+        def remove_children_by_type(class_name_token)
+            children_to_remove = []
+            @children.each do |child|
+                if child.class.name.include? class_name_token 
+                    children_to_remove << child 
+                end 
+            end 
+            children_to_remove.each do |child|
+                @children.delete(child)
+            end
+        end
+
+        #
+        # Remove all children from this widget
+        #
         def clear_children 
             @children = [] 
         end
 
-        def set_background(bgcolor)
-            @background_color = bgcolor 
+        #
+        # Drawing the background is on by default. Use this method to prevent drawing a background.
+        #
+        def disable_background
+            @show_background = false
         end
 
-        def set_border(bcolor)
-            @border_color = bcolor 
+        #
+        # Drawing the border is on by default. Use this method to prevent drawing a border.
+        #
+        def disable_border
+            @show_border = false 
         end
 
-        def set_font(font)
-            @font = font 
+        #
+        # Turn back on drawing of the border
+        #
+        def enable_border
+            @show_border = true 
         end
 
-        def set_color(color)
-            @color = color 
+        #
+        # Turn back on drawing of the background
+        #
+        def enable_background
+            @show_background = true 
         end
 
-        def set_dimensions(width, height)
-            @width = width
-            @height = height 
+        #
+        # A convenience method, or alias, to return the left x coordinate of this widget.
+        #
+        def left_edge
+            @x
         end
 
+        #
+        # A convenience method to return the right x coordinate of this widget.
+        #
         def right_edge
             @x + @width - 1
         end
-        
+
+        #
+        # A convenience method, or alias, to return the top y coordinate of this widget.
+        #
+        def top_edge
+            @y
+        end
+
+        #
+        # A convenience method to return the bottom y coordinate of this widget
+        #
         def bottom_edge
             @y + @height - 1
         end
 
+        #
+        # A convenience method to return the center x coordinate of this widget
+        #
         def center_x
             @x + ((right_edge - @x) / 2)
         end 
 
+        #
+        # A convenience method to return the center y coordinate of this widget
+        #
         def center_y
             @y + ((bottom_edge - @y) / 2)
         end 
 
+        #
+        # Move this widget to an absolute x, y position on the screen. 
+        # It will automatically move all child widgets, however be warned that
+        # if you are manually rendering any elements within your own render
+        # logic, you will need to deal with that seperately as the base class
+        # does not have access to its coordinates.
+        #
+        def move_recursive_absolute(new_x, new_y)
+            delta_x = new_x - @x 
+            delta_y = new_y - @y
+            move_recursive_delta(delta_x, delta_y)
+        end
+
+        #
+        # Move this widget to a relative number of x, y pixels on the screen. 
+        # It will automatically move all child widgets, however be warned that
+        # if you are manually rendering any elements within your own render
+        # logic, you will need to deal with that seperately as the base class
+        # does not have access to its coordinates.
+        #
+        def move_recursive_delta(delta_x, delta_y)
+            @x = @x + delta_x
+            @y = @y + delta_y
+            @children.each do |child| 
+                child.move_recursive_delta(delta_x, delta_y) 
+            end 
+        end
+
+        #
+        # The primary draw method, used by the main Gosu loop draw method.
+        # A common usage pattern is to have a primary widget in your Gosu app
+        # that calls this draw method. All children of this widget are then
+        # automatically drawn by this method recursively.
+        # Note that as a widget author, you should only implement/override the
+        # render method. This is a framework implementation that will
+        # handle child rendering and invoke render as a user-implemented
+        # callback.
+        #
         def draw 
             if @visible 
                 render
-                if @background_color
+                if @is_selected
+                    draw_background(Z_ORDER_SELECTION_BACKGROUND, @gui_theme.selection_color)
+                elsif @show_background
                     draw_background
                 end
-                if @border_color 
-                    draw_border(@border_color)
+                if @show_border
+                    draw_border
                 end
                 @children.each do |child| 
                     child.draw 
@@ -141,38 +1308,61 @@ module Wads
             end 
         end
 
-        def draw_background(z_override = nil)
+        def draw_background(z_override = nil, color_override = nil)
+            if color_override.nil? 
+                bgcolor = @gui_theme.background_color
+            else 
+                bgcolor = color_override
+            end
             if z_override 
                 z = relative_z_order(z_override)
             else 
                 z = relative_z_order(Z_ORDER_BACKGROUND) 
             end
-            Gosu::draw_rect(@x + 1, @y + 1, @width - 3, @height - 3, @background_color, z) 
+            Gosu::draw_rect(@x + 1, @y + 1, @width - 3, @height - 3, bgcolor, z) 
         end
 
-        def draw_shadow(color)
-            Gosu::draw_line @x - 1, @y - 1, color, right_edge - 1, @y - 1, color, relative_z_order(Z_ORDER_BORDER)
-            Gosu::draw_line @x - 1, @y - 1, color, @x - 1, bottom_edge - 1, color, relative_z_order(Z_ORDER_BORDER)
-        end
-
-        def draw_border(color = nil)
-            if color.nil? 
-                if @border_color
-                    color = @border_color 
-                else
-                    color = @color 
-                end
-            end
-            Gosu::draw_line @x, @y, color, right_edge, @y, color, relative_z_order(Z_ORDER_BORDER)
-            Gosu::draw_line @x, @y, color, @x, bottom_edge, color, relative_z_order(Z_ORDER_BORDER)
-            Gosu::draw_line @x,bottom_edge, color, right_edge, bottom_edge, color, relative_z_order(Z_ORDER_BORDER)
-            Gosu::draw_line right_edge, @y, color, right_edge, bottom_edge, color, relative_z_order(Z_ORDER_BORDER)
+        def draw_border
+            Gosu::draw_line @x, @y, @gui_theme.border_color, right_edge, @y, @gui_theme.border_color, relative_z_order(Z_ORDER_BORDER)
+            Gosu::draw_line @x, @y, @gui_theme.border_color, @x, bottom_edge, @gui_theme.border_color, relative_z_order(Z_ORDER_BORDER)
+            Gosu::draw_line @x,bottom_edge, @gui_theme.border_color, right_edge, bottom_edge, @gui_theme.border_color, relative_z_order(Z_ORDER_BORDER)
+            Gosu::draw_line right_edge, @y, @gui_theme.border_color, right_edge, bottom_edge, @gui_theme.border_color, relative_z_order(Z_ORDER_BORDER)
         end
 
         def contains_click(mouse_x, mouse_y)
             mouse_x >= @x and mouse_x <= right_edge and mouse_y >= @y and mouse_y <= bottom_edge
         end
 
+        #
+        # Return true if any part of the given widget overlaps on the screen with this widget
+        # as defined by the rectangle from the upper left corner to the bottom right.
+        # Note that your widget may not necessariliy draw pixels in this entire space.
+        #
+        def overlaps_with(other_widget)
+            if other_widget.contains_click(@x, @y)
+                return true 
+            end 
+            if other_widget.contains_click(right_edge, @y)
+                return true 
+            end 
+            if other_widget.contains_click(right_edge, bottom_edge - 1)
+                return true 
+            end 
+            if other_widget.contains_click(@x, bottom_edge - 1)
+                return true 
+            end 
+            if other_widget.contains_click(center_x, center_y)
+                return true 
+            end 
+            return false
+        end
+
+        #
+        # The framework implementation of the main Gosu update loop. This method
+        # propagates the event to all child widgets as well.
+        # As a widget author, do not override this method.
+        # Your callback to implement is the handle_update(update_count, mouse_x, mouse_y) method.
+        #
         def update(update_count, mouse_x, mouse_y)
             if @overlay_widget 
                 @overlay_widget.update(update_count, mouse_x, mouse_y)
@@ -183,8 +1373,16 @@ module Wads
             end 
         end
 
+        #
+        # The framework implementation of the main Gosu button down method.
+        # This method separates out mouse events from keyboard events, and calls the appropriate
+        # callback. As a widget author, do not override this method.
+        # Your callbacks to implement are:
+        #   handle_mouse_down(mouse_x, mouse_y)
+        #   handle_right_mouse(mouse_x, mouse_y)
+        #   handle_key_press(id, mouse_x, mouse_y)
+        #
         def button_down(id, mouse_x, mouse_y)
-            puts "Base widget #{self.class.name} button down #{id}." unless @debug_off
             if @overlay_widget 
                 result = @overlay_widget.button_down(id, mouse_x, mouse_y)
                 if not result.nil? and result.is_a? WidgetResult
@@ -200,6 +1398,14 @@ module Wads
             end
 
             if id == Gosu::MsLeft
+                # Special handling for text input fields
+                # Mouse click: Select text field based on mouse position.
+                if not @text_input_fields.empty?
+                    WadsConfig.instance.get_window.text_input = @text_input_fields.find { |tf| tf.under_point?(mouse_x, mouse_y) }
+                    # Advanced: Move caret to clicked position
+                    WadsConfig.instance.get_window.text_input.move_caret(mouse_x) unless WadsConfig.instance.get_window.text_input.nil?
+                end
+
                 result = handle_mouse_down mouse_x, mouse_y
             elsif id == Gosu::MsRight
                 result = handle_right_mouse mouse_x, mouse_y
@@ -208,7 +1414,6 @@ module Wads
             end
 
             if not result.nil? and result.is_a? WidgetResult
-                puts "Base widget #{self.class.name} returning own #{result}" unless @debug_off
                 return result 
             end
 
@@ -218,7 +1423,6 @@ module Wads
                         result = child.button_down id, mouse_x, mouse_y
                         if not result.nil? and result.is_a? WidgetResult
                             intercept_widget_event(result)
-                            puts "Base widget #{self.class.name} returning child #{result}" unless @debug_off
                             return result 
                         end
                     end 
@@ -226,13 +1430,20 @@ module Wads
                     result = child.button_down id, mouse_x, mouse_y
                     if not result.nil? and result.is_a? WidgetResult
                         intercept_widget_event(result)
-                        puts "Base widget #{self.class.name} returning child #{result}" unless @debug_off
                         return result 
                     end
                 end
             end 
         end
 
+        #
+        # The framework implementation of the main Gosu button up method.
+        # This method separates out mouse events from keyboard events.
+        # Only the mouse up event is propagated through the child hierarchy.
+        # As a widget author, do not override this method.
+        # Your callback to implement is:
+        #   handle_mouse_up(mouse_x, mouse_y)
+        #
         def button_up(id, mouse_x, mouse_y)
             if @overlay_widget 
                 return @overlay_widget.button_up(id, mouse_x, mouse_y)
@@ -257,133 +1468,269 @@ module Wads
             end
         end
 
+        #
+        # Return the absolute x coordinate given the relative x pixel to this widget
+        #
+        def relative_x(x)
+            x_pixel_to_screen(x)
+        end 
+
+        # An alias for relative_x
         def x_pixel_to_screen(x)
             @x + x
         end
 
+        #
+        # Return the absolute y coordinate given the relative y pixel to this widget
+        #
+        def relative_y(y)
+            y_pixel_to_screen(y)
+        end 
+
+        # An alias for relative_y
         def y_pixel_to_screen(y)
             @y + y
         end
 
-        def add_text(message, rel_x, rel_y)
-            new_text = Text.new(message, x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), @font)
+        #
+        # Add a child text widget using x, y positioning relative to this widget
+        #
+        def add_text(message, rel_x, rel_y, color = nil, use_large_font = false)
+            new_text = Text.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), message,
+                                                  { ARG_COLOR => color, ARG_USE_LARGE_FONT => use_large_font})
             new_text.base_z = @base_z
+            new_text.gui_theme = @gui_theme
             add_child(new_text)
             new_text
         end 
 
+        #
+        # Add a child document widget using x, y positioning relative to this widget
+        #
         def add_document(content, rel_x, rel_y, width, height)
-            new_doc = Document.new(content, x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height, @font)
+            new_doc = Document.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y),
+                                   width, height,
+                                   content)
             new_doc.base_z = @base_z
+            new_doc.gui_theme = @gui_theme
             add_child(new_doc)
             new_doc
         end
 
+        #
+        # Add a child button widget using x, y positioning relative to this widget.
+        # The width of the button will be determined based on the label text unless
+        # specified in the optional parameter. The code to execute is provided as a
+        # block, as shown in the example below.
+        #   add_button("Test Button", 10, 10) do 
+        #     puts "User hit the test button"
+        #   end
         def add_button(label, rel_x, rel_y, width = nil, &block)
-            new_button = Button.new(label, x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), @font)
             if width.nil?
-                width = 60
+                args = {}
+            else 
+                args = { ARG_DESIRED_WIDTH => width }
             end
-            new_button.width = width
+            new_button = Button.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), label, args)
             new_button.set_action(&block)
             new_button.base_z = @base_z
+            new_button.gui_theme = @gui_theme
             add_child(new_button)
             new_button
         end
 
+        #
+        # Add a child delete button widget using x, y positioning relative to this widget.
+        # A delete button is a regular button that is rendered as a red X, instead of a text label.
+        #
         def add_delete_button(rel_x, rel_y, &block)
             new_delete_button = DeleteButton.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y))
             new_delete_button.set_action(&block)
             new_delete_button.base_z = @base_z
+            new_delete_button.gui_theme = @gui_theme
             add_child(new_delete_button)
             new_delete_button 
         end
 
-        def add_table(rel_x, rel_y, width, height, column_headers, color = COLOR_WHITE, max_visible_rows = 10)
+        #
+        # Add a child table widget using x, y positioning relative to this widget.
+        # 
+        def add_table(rel_x, rel_y, width, height, column_headers, max_visible_rows = 10)
             new_table = Table.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y),
-                              width, height, column_headers, @font, color, max_visible_rows)
+                              width, height, column_headers, max_visible_rows)
             new_table.base_z = @base_z
+            new_table.gui_theme = @gui_theme
             add_child(new_table)
             new_table
         end 
 
-        def add_single_select_table(rel_x, rel_y, width, height, column_headers, color = COLOR_WHITE, max_visible_rows = 10)
+        #
+        # Add a child table widget using x, y positioning relative to this widget.
+        # The user can select up to one and only one item in the table.
+        # 
+        def add_single_select_table(rel_x, rel_y, width, height, column_headers, max_visible_rows = 10)
             new_table = SingleSelectTable.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y),
-                              width, height, column_headers, @font, color, max_visible_rows)
+                              width, height, column_headers, max_visible_rows)
             new_table.base_z = @base_z
+            new_table.gui_theme = @gui_theme
             add_child(new_table)
             new_table
         end 
 
-        def add_multi_select_table(rel_x, rel_y, width, height, column_headers, color = COLOR_WHITE, max_visible_rows = 10)
+        #
+        # Add a child table widget using x, y positioning relative to this widget.
+        # The user can zero to many items in the table.
+        # 
+        def add_multi_select_table(rel_x, rel_y, width, height, column_headers, max_visible_rows = 10)
             new_table = MultiSelectTable.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y),
-                              width, height, column_headers, @font, color, max_visible_rows)
+                              width, height, column_headers, max_visible_rows)
             new_table.base_z = @base_z
+            new_table.gui_theme = @gui_theme
             add_child(new_table)
             new_table
         end 
 
+        #
+        # Add a child graph display widget using x, y positioning relative to this widget.
+        # 
         def add_graph_display(rel_x, rel_y, width, height, graph)
-            new_graph = GraphWidget.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height, @font, @color, graph) 
+            new_graph = GraphWidget.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height, graph) 
             new_graph.base_z = @base_z
             add_child(new_graph)
             new_graph
         end
 
+        #
+        # Add a child plot display widget using x, y positioning relative to this widget.
+        # 
         def add_plot(rel_x, rel_y, width, height)
-            new_plot = Plot.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height, @font) 
+            new_plot = Plot.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height) 
             new_plot.base_z = @base_z
+            new_plot.gui_theme = @gui_theme
             add_child(new_plot)
             new_plot
         end
 
-        def add_axis_lines(rel_x, rel_y, width, height, color)
-            new_axis_lines = AxisLines.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height, color) 
+        #
+        # Add child axis lines widget using x, y positioning relative to this widget.
+        # 
+        def add_axis_lines(rel_x, rel_y, width, height)
+            new_axis_lines = AxisLines.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), width, height) 
             new_axis_lines.base_z = @base_z
+            new_axis_lines.gui_theme = @gui_theme
             add_child(new_axis_lines)
             new_axis_lines
         end
 
-        def add_overlay(overlay)
-            overlay.base_z = @base_z + 10
-            add_child(overlay)
-            @overlay_widget = overlay
+        #
+        # Add a child image widget using x, y positioning relative to this widget.
+        # 
+        def add_image(filename, rel_x, rel_y)
+            new_image = ImageWidget.new(x_pixel_to_screen(rel_x), y_pixel_to_screen(rel_y), img)
+            new_image.base_z = @base_z
+            new_image.gui_theme = @gui_theme
+            add_child(new_image)
+            new_image
+        end
+
+        #
+        # Add an overlay widget that is drawn on top of (at a higher z level) this widget
+        #
+        def add_overlay(overlay)
+            overlay.base_z = @base_z + 10
+            add_child(overlay)
+            @overlay_widget = overlay
+        end
+
+        # For all child widgets, adjust the x coordinate
+        # so that they are centered.
+        def center_children
+            if @children.empty?
+                return 
+            end
+            number_of_children = @children.size 
+            total_width_of_children = 0
+            @children.each do |child|
+                total_width_of_children = total_width_of_children + child.width + 5
+            end
+            total_width_of_children = total_width_of_children - 5
+
+            start_x = (@width - total_width_of_children) / 2
+            @children.each do |child|
+                child.x = start_x 
+                start_x = start_x + child.width + 5
+            end
         end
 
         #
-        # Callbacks for subclasses to override
+        # Override this method in your subclass to process mouse down events.
+        # The base implementation is empty
         #
         def handle_mouse_down mouse_x, mouse_y
             # empty base implementation
         end
 
+        #
+        # Override this method in your subclass to process mouse up events.
+        # The base implementation is empty
+        #
         def handle_mouse_up mouse_x, mouse_y
             # empty base implementation
         end
 
+        #
+        # Override this method in your subclass to process the right mouse click event.
+        # Note we do not differentiate between up and down for the right mouse button.
+        # The base implementation is empty
+        #
         def handle_right_mouse mouse_x, mouse_y
             # empty base implementation
         end
 
+        #
+        # Override this method in your subclass to process keyboard events.
+        # The base implementation is empty.
+        # Note that the mouse was not necessarily positioned over this widget.
+        # You can check this using the contains_click(mouse_x, mouse_y) method
+        # and decide if you want to process the event based on that, if desired.
+        #
         def handle_key_press id, mouse_x, mouse_y
             # empty base implementation
         end
 
+        #
+        # This callback is invoked for any key registered by the
+        # register_hold_down_key(id) method.
+        #
+        def handle_key_held_down id, mouse_x, mouse_y
+            # empty base implementation
+        end
+
+        #
+        # Override this method in your subclass to perform any logic needed
+        # as part of the main Gosu update loop. In most cases, this method is
+        # invoked 60 times per second.
+        #
         def handle_update update_count, mouse_x, mouse_y
             # empty base implementation
         end
 
+        #
+        # Override this method in your subclass to perform any custom rendering logic.
+        # Note that child widgets are automatically drawn and you do not need to do
+        # that yourself.
+        #
         def render 
             # Base implementation is empty
-            # Note that the draw method invoked by clients stills renders any added children
-            # render is for specific drawing done by the widget
         end 
 
+        #
+        # Return the relative z order compared to other widgets.
+        # The absolute z order is the base plus this value.
+        # Its calculated relative so that overlay widgets can be 
+        # on top of base displays.
+        #
         def widget_z 
-            # The relative z order compared to other widgets
-            # The absolute z order is the base plus this value.
-            # Its calculated relative so that overlay widgets can be 
-            # on top of base displays.
             0
         end
 
@@ -393,36 +1740,132 @@ module Wads
         end
     end 
 
+    #
+    # A panel is simply an alias for a widget, although you can optionally
+    # treat them differently if you wish. Generally a panel is used to 
+    # apply a specific layout to a sub-section of the screen.
+    #
+    class Panel < Widget
+        def initialize(x, y, w, h, layout = nil, theme = nil) 
+            super(x, y, w, h, layout, theme)
+        end
+    end 
+
+    #
+    # Displays an image on the screen at the specific x, y location. The image
+    # can be scaled by setting the scale attribute. The image attribute to the
+    # construcor can be the string file location or a Gosu::Image instance
+    #
+    class ImageWidget < Widget
+        attr_accessor :img 
+        attr_accessor :scale
+
+        def initialize(x, y, image, args = {}) 
+            super(x, y)
+            if image.is_a? String
+                @img = Gosu::Image.new(image)
+            elsif image.is_a? Gosu::Image 
+                @img = image 
+            elsif image.is_a? Gosu::Color
+                @img = nil
+                @override_color = image
+            else 
+                raise "ImageWidget requires either a filename or a Gosu::Image object"
+            end
+            if args[ARG_THEME]
+                @gui_theme = args[ARG_THEME]
+            end
+            @scale = 1
+            disable_border
+            disable_background
+            set_dimensions(@img.width, @img.height) if @img
+        end
+
+        def render 
+            if @img.nil?
+                # TODO draw a box
+                Gosu::draw_rect(@x, @y, @width - 1, @height - 1, @override_color, relative_z_order(Z_ORDER_GRAPHIC_ELEMENTS))
+            else
+                @img.draw @x, @y, z_order, @scale, @scale
+            end
+        end
+
+        def widget_z 
+            Z_ORDER_FOCAL_ELEMENTS
+        end
+    end 
+
+    #
+    # Displays a text label on the screen at the specific x, y location.
+    # The font specified by the current theme is used.
+    # The theme text color is used, unless the color parameter specifies an override.
+    # The small font is used by default, unless the use_large_font parameter is true.
+    #
     class Text < Widget
-        attr_accessor :str
-        def initialize(str, x, y, font, color = COLOR_WHITE) 
-            super(x, y, color) 
-            set_font(font)
-            @str = str
+        attr_accessor :label
+
+        def initialize(x, y, label, args = {}) 
+            super(x, y) 
+            @label = label
+            if args[ARG_THEME]
+                @gui_theme = args[ARG_THEME]
+            end
+            if args[ARG_USE_LARGE_FONT]
+                @use_large_font = args[ARG_USE_LARGE_FONT] 
+            end
+            if args[ARG_COLOR]
+                @override_color = args[ARG_COLOR]
+            end
+            disable_border
+            if @use_large_font 
+                set_dimensions(@gui_theme.font_large.text_width(@label) + 10, 20)
+            else 
+                set_dimensions(@gui_theme.font.text_width(@label) + 10, 20)
+            end
+        end
+
+        def set_text(new_text)
+            @label = new_text
+        end
+
+        def change_text(new_text)
+            set_text(new_text)
         end
+
         def render 
-            @font.draw_text(@str, @x, @y, z_order, 1, 1, @color)
+            if @use_large_font 
+                get_theme.font_large.draw_text(@label, @x, @y, z_order, 1, 1, text_color)
+            else
+                get_theme.font.draw_text(@label, @x, @y, z_order, 1, 1, text_color)
+            end 
         end
+
         def widget_z 
             Z_ORDER_TEXT
         end
     end 
 
+    #
+    # An ErrorMessage is a subclass of text that uses a red color
+    #
     class ErrorMessage < Text
-        attr_accessor :str
-        def initialize(str, x, y, font) 
-            super("ERROR: #{str}", x, y, font, COLOR_ERROR_CODE_RED) 
-            set_dimensions(@font.text_width(@str) + 4, 36)
+        def initialize(x, y, message) 
+            super(x, y, "ERROR: #{message}", COLOR_ERROR_CODE_RED)
         end
     end 
 
+    #
+    # A data point to be used in a Plot widget. This object holds
+    # the x, y screen location as well as the data values for x, y.
+    #
     class PlotPoint < Widget
         attr_accessor :data_x
         attr_accessor :data_y
         attr_accessor :data_point_size 
 
         def initialize(x, y, data_x, data_y, color = COLOR_MAROON, size = 4) 
-            super(x, y, color)
+            super(x, y)
+            @override_color = color
             @data_x = data_x
             @data_y = data_y
             @data_point_size = size
@@ -436,7 +1879,7 @@ module Wads
             half_size = size_to_draw / 2
             Gosu::draw_rect(@x - half_size, @y - half_size,
                             size_to_draw, size_to_draw,
-                            @color, z_order) 
+                            graphics_color, z_order) 
         end 
 
         def widget_z 
@@ -458,32 +1901,41 @@ module Wads
         end
     end 
 
+    #
+    # Displays a button at the specified x, y location.
+    # The button width is based on the label text unless specified
+    # using the optional parameter. The code to executeon a button
+    # click is specified using the set_action method, however typical
+    # using involves the widget or layout form of add_button. For example:
+    # add_button("Test Button", 10, 10) do 
+    #   puts "User hit the test button"
+    # end
+
     class Button < Widget
         attr_accessor :label
-        attr_accessor :text_color
         attr_accessor :is_pressed
         attr_accessor :action_code
 
-        def initialize(label, x, y, font, width = nil, color = COLOR_DARK_GRAY, text_color = COLOR_HEADER_BRIGHT_BLUE) 
-            super(x, y, color) 
-            set_font(font)
+        def initialize(x, y, label, args = {}) 
+            super(x, y) 
             @label = label
-            @text_pixel_width = @font.text_width(@label)
-            if width.nil?
-                @width = @text_pixel_width + 10
+            if args[ARG_THEME]
+                @gui_theme = args[ARG_THEME]
+            end
+            @text_pixel_width = @gui_theme.font.text_width(@label)
+            if args[ARG_DESIRED_WIDTH]
+                @width = args[ARG_DESIRED_WIDTH] 
             else 
-                @width = width 
+                @width = @text_pixel_width + 10
             end
             @height = 26
-            @text_color = text_color
             @is_pressed = false
             @is_pressed_update_count = -100
         end
 
         def render 
-            draw_border(@color)
             text_x = center_x - (@text_pixel_width / 2)
-            @font.draw_text(@label, text_x, @y, z_order, 1, 1, @text_color)
+            @gui_theme.font.draw_text(@label, text_x, @y, z_order, 1, 1, text_color)
         end 
 
         def widget_z 
@@ -508,22 +1960,24 @@ module Wads
             end
 
             if update_count < @is_pressed_update_count + 15
-                set_background(nil)
+                unset_selected
             elsif contains_click(mouse_x, mouse_y)
-                set_background(COLOR_LIGHT_GRAY)
+                set_selected
             else 
-                set_background(nil)
+                unset_selected
             end
         end
     end 
 
+    #
+    # A subclass of button that renders a red X instead of label text
+    #
     class DeleteButton < Button
-        def initialize(x, y) 
-            super("ignore", x, y, Gosu::Font.new(22), 50, COLOR_GRAY)
+        def initialize(x, y, args = {}) 
+            super(x, y, "ignore", {ARG_DESIRED_WIDTH => 50}.merge(args))
             set_dimensions(14, 14)
             add_child(Line.new(@x, @y, right_edge, bottom_edge, COLOR_ERROR_CODE_RED))
             add_child(Line.new(@x, bottom_edge, right_edge, @y, COLOR_ERROR_CODE_RED))
-            set_border(@color)
         end
 
         def render 
@@ -531,20 +1985,26 @@ module Wads
         end 
     end 
 
+    #
+    # Displays multiple lines of text content at the specified coordinates
+    #
     class Document < Widget
         attr_accessor :lines
 
-        def initialize(content, x, y, width, height, font) 
-            super(x, y, COLOR_GRAY) 
-            set_font(font)
+        def initialize(x, y, width, height, content, args = {}) 
+            super(x, y)
             set_dimensions(width, height)
             @lines = content.split("\n")
+            disable_border
+            if args[ARG_THEME]
+                @gui_theme = args[ARG_THEME]
+            end
         end
 
         def render 
             y = @y + 4
             @lines.each do |line|
-                @font.draw_text(line, @x + 5, y, z_order, 1, 1, COLOR_WHITE)
+                @gui_theme.font.draw_text(line, @x + 5, y, z_order, 1, 1, text_color)
                 y = y + 26
             end
         end 
@@ -555,19 +2015,18 @@ module Wads
     end 
 
     class InfoBox < Widget 
-        def initialize(title, content, x, y, font, width, height) 
+        def initialize(x, y, width, height, title, content, args = {}) 
             super(x, y) 
-            set_font(font)
             set_dimensions(width, height)
-            set_border(COLOR_WHITE)
-            set_background(COLOR_OFF_GRAY)
             @base_z = 10
+            if args[ARG_THEME]
+                @gui_theme = args[ARG_THEME]
+            end
             add_text(title, 5, 5)
             add_document(content, 5, 52, width, height - 52)
             ok_button = add_button("OK", (@width / 2) - 50, height - 26) do
                 WidgetResult.new(true)
             end
-            ok_button.text_color = COLOR_WHITE
             ok_button.width = 100
         end
 
@@ -581,13 +2040,8 @@ module Wads
     class Dialog < Widget
         attr_accessor :textinput
 
-        def initialize(window, font, x, y, width, height, title, text_input_default) 
-            super(x, y) 
-            @window = window
-            set_font(font)
-            set_dimensions(width, height)
-            set_background(COLOR_OFF_GRAY)
-            set_border(COLOR_WHITE)
+        def initialize(x, y, width, height, title, text_input_default) 
+            super(x, y, width, height) 
             @base_z = 10
             @error_message = nil
 
@@ -596,7 +2050,7 @@ module Wads
             add_document(content, 0, 56, width, height)
 
             # Forms automatically get a text input widget
-            @textinput = TextField.new(@window, @font, x + 10, bottom_edge - 80, text_input_default, 600)
+            @textinput = TextField.new(x + 10, bottom_edge - 80, text_input_default, 600)
             @textinput.base_z = 10
             add_child(@textinput)
 
@@ -604,15 +2058,11 @@ module Wads
             ok_button = add_button("OK", (@width / 2) - 100, height - 32) do
                 handle_ok
             end
-            ok_button.color = COLOR_FORM_BUTTON
-            ok_button.text_color = COLOR_WHITE
             ok_button.width = 100
 
             cancel_button = add_button("Cancel", (@width / 2) + 50, height - 32) do
                 WidgetResult.new(true)
             end
-            cancel_button.color = COLOR_FORM_BUTTON
-            cancel_button.text_color = COLOR_WHITE
             cancel_button.width = 100
         end
 
@@ -624,7 +2074,7 @@ module Wads
         end
 
         def add_error_message(msg) 
-            @error_message = ErrorMessage.new(msg, x + 10, bottom_edge - 120, @font)
+            @error_message = ErrorMessage.new(x + 10, bottom_edge - 120, msg)
             @error_message.base_z = @base_z
         end 
 
@@ -647,9 +2097,9 @@ module Wads
 
         def handle_mouse_down mouse_x, mouse_y
             # Mouse click: Select text field based on mouse position.
-            @window.text_input = [@textinput].find { |tf| tf.under_point?(mouse_x, mouse_y) }
+            WadsConfig.instance.get_window.text_input = [@textinput].find { |tf| tf.under_point?(mouse_x, mouse_y) }
             # Advanced: Move caret to clicked position
-            @window.text_input.move_caret(mouse_x) unless @window.text_input.nil?
+            WadsConfig.instance.get_window.text_input.move_caret(mouse_x) unless WadsConfig.instance.get_window.text_input.nil?
 
             handle_mouse_click(mouse_x, mouse_y)
         end 
@@ -661,6 +2111,14 @@ module Wads
         end
     end 
 
+    #
+    # A result object returned from handle methods that instructs the parent widget
+    # what to do. A close_widget value of true instructs the recipient to close
+    # either the overlay window or the entire app, based on the context of the receiver.
+    # In the case of a form being submitted, the action may be "OK" and the form_data
+    # contains the information supplied by the user.
+    # WidgetResult is intentionally generic so it can support a wide variety of use cases.
+    #
     class WidgetResult 
         attr_accessor :close_widget
         attr_accessor :action
@@ -673,80 +2131,124 @@ module Wads
         end
     end
 
+    #
+    # Renders a line from x, y to x2, y2. The theme graphics elements color
+    # is used by default, unless specified using the optional parameter.
+    #
     class Line < Widget
         attr_accessor :x2
         attr_accessor :y2
 
-        def initialize(x, y, x2, y2, color = COLOR_CYAN) 
-            super x, y, color 
+        def initialize(x, y, x2, y2, color = nil) 
+            super(x, y)
+            @override_color = color
             @x2 = x2 
             @y2 = y2
+            disable_border
+            disable_background
         end
 
         def render
-            Gosu::draw_line x, y, @color, x2, y2, @color, z_order
+            Gosu::draw_line x, y, graphics_color, x2, y2, graphics_color, z_order
         end
 
         def widget_z 
             Z_ORDER_GRAPHIC_ELEMENTS
         end
+
+        def uses_layout
+            false 
+        end
     end 
 
+    #
+    # A very specific widget used along with a Plot to draw the x and y axis lines.
+    # Note that the labels are drawn using separate widgets.
+    #
     class AxisLines < Widget
-        def initialize(x, y, width, height, color = COLOR_CYAN) 
-            super x, y, color 
-            @width = width 
-            @height = height
+        def initialize(x, y, width, height, color = nil) 
+            super(x, y)
+            set_dimensions(width, height)
+            disable_border
+            disable_background
         end
 
         def render
-            add_child(Line.new(@x, @y, @x, bottom_edge, @color))
-            add_child(Line.new(@x, bottom_edge, right_edge, bottom_edge, @color))
+            add_child(Line.new(@x, @y, @x, bottom_edge, graphics_color))
+            add_child(Line.new(@x, bottom_edge, right_edge, bottom_edge, graphics_color))
+        end
+
+        def uses_layout
+            false 
         end
     end
 
+    #
+    # Labels and tic marks for the vertical axis on a plot
+    #
     class VerticalAxisLabel < Widget
         attr_accessor :label
 
-        def initialize(x, y, label, font, color = COLOR_CYAN) 
-            super x, y, color 
-            set_font(font)
+        def initialize(x, y, label, color = nil) 
+            super(x, y)
             @label = label 
+            @override_color = color
+            text_pixel_width = @gui_theme.font.text_width(@label)
+            add_text(@label, -text_pixel_width - 28, -12)
+            disable_border
+            disable_background
         end
 
         def render
-            text_pixel_width = @font.text_width(@label)
-            Gosu::draw_line @x - 20, @y, @color,
-                            @x, @y, @color, z_order
-            
-            @font.draw_text(@label, @x - text_pixel_width - 28, @y - 12, 1, 1, 1, @color)
+            Gosu::draw_line @x - 20, @y, graphics_color,
+                            @x, @y, graphics_color, z_order
         end
 
         def widget_z 
             Z_ORDER_GRAPHIC_ELEMENTS
         end
+
+        def uses_layout
+            false 
+        end
     end 
 
+    #
+    # Labels and tic marks for the horizontal axis on a plot
+    #
     class HorizontalAxisLabel < Widget
         attr_accessor :label
 
-        def initialize(x, y, label, font, color = COLOR_CYAN) 
-            super x, y, color 
-            set_font(font)
+        def initialize(x, y, label, color = nil) 
+            super(x, y)
             @label = label 
+            @override_color = color
+            text_pixel_width = @gui_theme.font.text_width(@label)
+            add_text(@label, -(text_pixel_width / 2), 26)
+            disable_border
+            disable_background
         end
 
         def render
-            text_pixel_width = @font.text_width(@label)
-            Gosu::draw_line @x, @y, @color, @x, @y + 20, @color
-            @font.draw_text(@label, @x - (text_pixel_width / 2), @y + 26, z_order, 1, 1, @color)
+            Gosu::draw_line @x, @y, graphics_color, @x, @y + 20, graphics_color, z_order
         end
 
         def widget_z 
             Z_ORDER_TEXT
         end
+
+        def uses_layout
+            false 
+        end
     end 
 
+    #
+    # Displays a table of information at the given coordinates.
+    # The headers are an array of text labels to display at the top of each column.
+    # The max_visible_rows specifies how many rows are visible at once.
+    # If there are more data rows than the max, the arrow keys can be used to
+    # page up or down through the rows in the table.
+    #
     class Table < Widget
         attr_accessor :data_rows 
         attr_accessor :row_colors
@@ -755,10 +2257,12 @@ module Wads
         attr_accessor :current_row
         attr_accessor :can_delete_rows
 
-        def initialize(x, y, width, height, headers, font, color = COLOR_GRAY, max_visible_rows = 10) 
-            super(x, y, color) 
-            set_font(font) 
+        def initialize(x, y, width, height, headers, max_visible_rows = 10, args = {}) 
+            super(x, y)
             set_dimensions(width, height)
+            if args[ARG_THEME]
+                @gui_theme = args[ARG_THEME]
+            end
             @headers = headers
             @current_row = 0
             @max_visible_rows = max_visible_rows
@@ -785,7 +2289,7 @@ module Wads
             @row_colors = []
         end 
 
-        def add_row(data_row, color = @color)
+        def add_row(data_row, color = text_color )
             @data_rows << data_row
             @row_colors << color
         end
@@ -840,9 +2344,9 @@ module Wads
             column_widths = []
             number_of_columns = @data_rows[0].size 
             (0..number_of_columns-1).each do |c| 
-                max_length = @font.text_width(headers[c])
+                max_length = @gui_theme.font.text_width(headers[c])
                 (0..number_of_rows-1).each do |r|
-                    text_pixel_width = @font.text_width(@data_rows[r][c])
+                    text_pixel_width = @gui_theme.font.text_width(@data_rows[r][c])
                     if text_pixel_width > max_length 
                         max_length = text_pixel_width
                     end 
@@ -850,18 +2354,22 @@ module Wads
                 column_widths[c] = max_length
             end
 
+            # Draw a horizontal line between header and data rows
             x = @x + 10
             if number_of_columns > 1
                 (0..number_of_columns-2).each do |c| 
                     x = x + column_widths[c] + 20
-                    Gosu::draw_line x, @y, @color, x, @y + @height, @color, z_order
+                    Gosu::draw_line x, @y, graphics_color, x, @y + @height, graphics_color, z_order
                 end 
             end
 
-            y = @y             
+            # Draw the header row
+            y = @y
+            Gosu::draw_rect(@x + 1, y, @width - 3, 28, graphics_color, relative_z_order(Z_ORDER_SELECTION_BACKGROUND)) 
+
             x = @x + 20
             (0..number_of_columns-1).each do |c| 
-                @font.draw_text(@headers[c], x, y, z_order, 1, 1, @color)
+                @gui_theme.font.draw_text(@headers[c], x, y + 3, z_order, 1, 1, text_color)
                 x = x + column_widths[c] + 20
             end
             y = y + 30
@@ -873,7 +2381,7 @@ module Wads
                 elsif count < @current_row + @max_visible_rows
                     x = @x + 20
                     (0..number_of_columns-1).each do |c| 
-                        @font.draw_text(row[c], x, y + 2, z_order, 1, 1, @row_colors[count])
+                        @gui_theme.font.draw_text(row[c], x, y + 2, z_order, 1, 1, @row_colors[count])
                         x = x + column_widths[c] + 20
                     end
                     y = y + 30
@@ -894,15 +2402,31 @@ module Wads
         def widget_z 
             Z_ORDER_TEXT
         end
+
+        def uses_layout
+            false 
+        end
     end
 
+    #
+    # A table where the user can select one row at a time.
+    # The selected row has a background color specified by the selection color of the
+    # current theme.
+    #
     class SingleSelectTable < Table
         attr_accessor :selected_row
-        attr_accessor :selected_color
 
-        def initialize(x, y, width, height, headers, font, color = COLOR_GRAY, max_visible_rows = 10) 
-            super(x, y, width, height, headers, font, color, max_visible_rows) 
-            @selected_color = COLOR_BLACK
+        def initialize(x, y, width, height, headers, max_visible_rows = 10, args = {}) 
+            super(x, y, width, height, headers, max_visible_rows, args) 
+        end 
+
+        def is_row_selected(mouse_y)
+            row_number = determine_row_number(mouse_y)
+            if row_number.nil?
+                return false
+            end
+            selected_row = @current_row + row_number
+            @selected_row == selected_row
         end 
 
         def set_selected_row(mouse_y, column_number)
@@ -919,12 +2443,22 @@ module Wads
             end
         end
 
+        def unset_selected_row(mouse_y, column_number) 
+            row_number = determine_row_number(mouse_y) 
+            if not row_number.nil?
+                this_selected_row = @current_row + row_number
+                @selected_row = this_selected_row
+                return @data_rows[this_selected_row][column_number]
+            end 
+            nil
+        end
+
         def render 
             super 
             if @selected_row 
                 if @selected_row >= @current_row and @selected_row < @current_row + @max_visible_rows
                     y = @y + 30 + ((@selected_row - @current_row) * 30)
-                    Gosu::draw_rect(@x + 20, y, @width - 30, 28, @selected_color, relative_z_order(Z_ORDER_SELECTION_BACKGROUND)) 
+                    Gosu::draw_rect(@x + 20, y, @width - 30, 28, @gui_theme.selection_color, relative_z_order(Z_ORDER_SELECTION_BACKGROUND)) 
                 end 
             end
         end
@@ -932,20 +2466,58 @@ module Wads
         def widget_z 
             Z_ORDER_TEXT
         end
+
+        def handle_mouse_down mouse_x, mouse_y
+            if contains_click(mouse_x, mouse_y)
+                row_number = determine_row_number(mouse_y)
+                if row_number.nil? 
+                    return WidgetResult.new(false)
+                end
+                # First check if its the delete button that got this
+                delete_this_row = false
+                @delete_buttons.each do |db|
+                    if db.contains_click(mouse_x, mouse_y)
+                        delete_this_row = true 
+                    end 
+                end 
+                if delete_this_row
+                    if not row_number.nil?
+                       data_set_row_to_delete = @current_row + row_number
+                       data_set_name_to_delete = @data_rows[data_set_row_to_delete][1]
+                       @data_rows.delete_at(data_set_row_to_delete)
+                       return WidgetResult.new(false, EVENT_TABLE_ROW_DELETE, [data_set_name_to_delete])                       
+                    end
+                else
+                    if is_row_selected(mouse_y)
+                        unset_selected_row(mouse_y, 0)
+                        return WidgetResult.new(false, EVENT_TABLE_UNSELECT, @data_rows[row_number])
+                    else
+                        set_selected_row(mouse_y, 0)
+                        return WidgetResult.new(false, EVENT_TABLE_SELECT, @data_rows[row_number])
+                    end
+                end
+            end
+        end
     end 
 
+    #
+    # A table where the user can select multiple rows at a time.
+    # Selected rows have a background color specified by the selection color of the
+    # current theme.
+    #
     class MultiSelectTable < Table
         attr_accessor :selected_rows
-        attr_accessor :selection_color
 
-        def initialize(x, y, width, height, headers, font, color = COLOR_GRAY, max_visible_rows = 10) 
-            super(x, y, width, height, headers, font, color, max_visible_rows) 
+        def initialize(x, y, width, height, headers, max_visible_rows = 10, args = {}) 
+            super(x, y, width, height, headers, max_visible_rows, args) 
             @selected_rows = []
-            @selection_color = COLOR_LIGHT_GRAY
-        end 
-
+        end
+    
         def is_row_selected(mouse_y)
             row_number = determine_row_number(mouse_y)
+            if row_number.nil?
+                return false
+            end
             @selected_rows.include?(@current_row + row_number)
         end 
 
@@ -980,7 +2552,7 @@ module Wads
                         width_of_selection_background = width_of_selection_background - 20
                     end
                     Gosu::draw_rect(@x + 20, y, width_of_selection_background, 28,
-                                    @selection_color,
+                                    @gui_theme.selection_color,
                                     relative_z_order(Z_ORDER_SELECTION_BACKGROUND)) 
                 end 
                 y = y + 30
@@ -995,6 +2567,9 @@ module Wads
         def handle_mouse_down mouse_x, mouse_y
             if contains_click(mouse_x, mouse_y)
                 row_number = determine_row_number(mouse_y)
+                if row_number.nil? 
+                    return WidgetResult.new(false)
+                end
                 # First check if its the delete button that got this
                 delete_this_row = false
                 @delete_buttons.each do |db|
@@ -1022,6 +2597,11 @@ module Wads
         end
     end 
 
+    #
+    # A two-dimensional graph display which plots a number of PlotPoint objects.
+    # Options include grid lines that can be displayed, as well as whether lines
+    # should be drawn connecting each point in a data set.
+    #
     class Plot < Widget
         attr_accessor :points
         attr_accessor :visible_range
@@ -1030,9 +2610,8 @@ module Wads
         attr_accessor :zoom_level
         attr_accessor :visibility_map
 
-        def initialize(x, y, width, height, font) 
-            super x, y, color 
-            set_font(font)
+        def initialize(x, y, width, height) 
+            super(x, y)
             set_dimensions(width, height)
             @display_grid = false
             @display_lines = true
@@ -1044,6 +2623,7 @@ module Wads
             # Hash of rendered points keyed by data set name, so we can toggle visibility
             @points_by_data_set_name = {}
             @visibility_map = {}
+            disable_border
         end
 
         def toggle_visibility(data_set_name)
@@ -1105,6 +2685,24 @@ module Wads
             point.data_x >= @visible_range.left_x and point.data_x <= @visible_range.right_x and point.data_y >= @visible_range.bottom_y and point.data_y <= @visible_range.top_y
         end 
 
+        def add_data_point(data_set_name, data_x, data_y, color = COLOR_MAROON) 
+            if range_set?
+                rendered_points = @points_by_data_set_name[data_set_name]
+                if rendered_points.nil?
+                    rendered_points = []
+                    @points_by_data_set_name[data_set_name] = rendered_points
+                end 
+                rendered_points << PlotPoint.new(draw_x(data_x), draw_y(data_y),
+                                                 data_x, data_y,
+                                                 color)
+                if @visibility_map[data_set_name].nil?
+                    @visibility_map[data_set_name] = true
+                end
+            else
+                error("ERROR: range not set, cannot add data")
+            end
+        end 
+
         def add_data_set(data_set_name, rendered_points)
             if range_set?
                 @points_by_data_set_name[data_set_name] = rendered_points
@@ -1112,7 +2710,7 @@ module Wads
                     @visibility_map[data_set_name] = true
                 end
             else
-                puts "ERROR: range not set, cannot add data"
+                error("ERROR: range not set, cannot add data")
             end
         end 
 
@@ -1162,8 +2760,8 @@ module Wads
             if points.length > 1
                 points.inject(points[0]) do |last, the_next|
                     if last.x < the_next.x
-                        Gosu::draw_line last.x, last.y, last.color,
-                                        the_next.x, the_next.y, last.color, relative_z_order(Z_ORDER_GRAPHIC_ELEMENTS)
+                        Gosu::draw_line last.x, last.y, last.graphics_color,
+                                        the_next.x, the_next.y, last.graphics_color, relative_z_order(Z_ORDER_GRAPHIC_ELEMENTS)
                     end
                     the_next
                 end
@@ -1226,19 +2824,47 @@ module Wads
         end 
     end 
 
+    #
+    # A graphical representation of a node in a graph using a button-style, i.e
+    # a rectangular border with a text label.
+    # The choice to use this display class is dictated by the use_icons attribute
+    # of the current theme.
+    # Like images, the size of node widgets can be scaled.
+    # 
     class NodeWidget < Button
         attr_accessor :data_node
 
-        def initialize(node, x, y, font, border_color = COLOR_DARK_GRAY, text_color = COLOR_HEADER_BRIGHT_BLUE) 
-            super(node.name, x, y, font, nil, border_color, text_color) 
-            set_background(COLOR_BLACK)
+        def initialize(x, y, node, color = nil, initial_scale = 1, is_explorer = false) 
+            super(x, y, node.name)
+            @orig_width = @width 
+            @orig_height = @height
             @data_node = node
+            @override_color = color
+            set_scale(initial_scale, @is_explorer)
+        end
+
+        def is_background 
+            @scale <= 1 and @is_explorer
+        end
+
+        def set_scale(value, is_explorer = false)
+            @scale = value
+            @is_explorer = is_explorer
+            if value < 1
+                value = 1
+            end 
+            @width = @orig_width * @scale.to_f
+            debug("In regular node widget Setting scale of #{@label} to #{@scale}")
+        end
+
+        def get_text_widget
+            nil 
         end
 
         def render 
             super 
             draw_background(Z_ORDER_FOCAL_ELEMENTS)
-            draw_shadow(COLOR_GRAY)
+            #draw_shadow(COLOR_GRAY)
         end
     
         def widget_z 
@@ -1246,26 +2872,127 @@ module Wads
         end
     end 
 
+    #
+    # A graphical representation of a node in a graph using circular icons 
+    # and adjacent text labels.
+    # The choice to use this display class is dictated by the use_icons attribute
+    # of the current theme.
+    # Like images, the size of node widgets can be scaled.
+    # 
+    class NodeIconWidget < Widget
+        attr_accessor :data_node
+        attr_accessor :image
+        attr_accessor :scale
+        attr_accessor :label
+        attr_accessor :is_explorer
+
+        def initialize(x, y, node, color = nil, initial_scale = 1, is_explorer = false) 
+            super(x, y) 
+            @override_color = color
+            @data_node = node
+            @label = node.name
+            circle_image = WadsConfig.instance.circle(color)
+            if circle_image.nil?
+                @image = WadsConfig.instance.circle(COLOR_BLUE)
+            else 
+                @image = circle_image 
+            end
+            @is_explorer = is_explorer
+            set_scale(initial_scale, @is_explorer)
+            disable_border
+        end
+
+        def name 
+            @data_node.name 
+        end
+
+        def is_background 
+            @scale <= 0.1 and @is_explorer
+        end
+
+        def set_scale(value, is_explorer = false)
+            @is_explorer = is_explorer
+            if value < 0.5
+                value = 0.5
+            end 
+            @scale = value / 10.to_f
+            #debug("In node widget Setting scale of #{@label} to #{value} = #{@scale}")
+            @width = IMAGE_CIRCLE_SIZE * scale.to_f
+            @height = IMAGE_CIRCLE_SIZE * scale.to_f
+            # Only in explorer mode do we dull out nodes on the outer edge
+            if is_background 
+                @image = WadsConfig.instance.circle(COLOR_ALPHA)
+            else
+                text_pixel_width = @gui_theme.font.text_width(@label)
+                clear_children  # the text widget is the only child, so we can remove all
+                add_text(@label, (@width / 2) - (text_pixel_width / 2), -20)
+            end
+        end
+
+        def get_text_widget
+            if @children.size > 0
+                return @children[0]
+            end 
+            #raise "No text widget for NodeIconWidget" 
+            nil
+        end
+
+        def render 
+            @image.draw @x, @y, relative_z_order(Z_ORDER_FOCAL_ELEMENTS), @scale, @scale
+        end 
+
+        def widget_z 
+            Z_ORDER_TEXT
+        end
+    end 
+
+    #
+    # Given a single node or a graph data structure, this widget displays
+    # a visualization of the graph using one of the available node widget classes.
+    # There are different display modes that control what nodes within the graph 
+    # are shown. The default display mode, GRAPH_DISPLAY_ALL, shows all nodes
+    # as the name implies. GRAPH_DISPLAY_TREE assumes an acyclic graph and renders
+    # the graph in a tree-like structure. GRAPH_DISPLAY_EXPLORER has a chosen
+    # center focus node with connected nodes circled around it based on the depth
+    # or distance from that node. This mode also allows the user to click on
+    # different nodes to navigate the graph and change focus nodes.
+    #
     class GraphWidget < Widget
         attr_accessor :graph
-        attr_accessor :center_node 
         attr_accessor :selected_node
         attr_accessor :selected_node_x_offset
         attr_accessor :selected_node_y_offset
+        attr_accessor :size_by_connections
+        attr_accessor :is_explorer
 
-        def initialize(x, y, width, height, font, color, graph) 
-            super x, y, color 
-            set_font(font)
+        def initialize(x, y, width, height, graph, display_mode = GRAPH_DISPLAY_ALL) 
+            super(x, y)
             set_dimensions(width, height)
-            set_border(color)
-            @graph = graph 
-            set_all_nodes_for_display
+            if graph.is_a? Node 
+                @graph = Graph.new(graph)
+            else
+                @graph = graph 
+            end
+            @size_by_connections = false
+            @is_explorer = false 
+            if [GRAPH_DISPLAY_ALL, GRAPH_DISPLAY_TREE, GRAPH_DISPLAY_EXPLORER].include? display_mode 
+                debug("Displaying graph in #{display_mode} mode")
+            else 
+                raise "#{display_mode} is not a valid display mode for Graph Widget"
+            end
+            if display_mode == GRAPH_DISPLAY_ALL
+                set_all_nodes_for_display
+            elsif display_mode == GRAPH_DISPLAY_TREE 
+                set_tree_display
+            else 
+                set_explorer_display 
+            end
         end 
 
         def handle_update update_count, mouse_x, mouse_y
             if contains_click(mouse_x, mouse_y) and @selected_node 
-                @selected_node.x = mouse_x - @selected_node_x_offset
-                @selected_node.y = mouse_y - @selected_node_y_offset
+                @selected_node.move_recursive_absolute(mouse_x - @selected_node_x_offset,
+                                                       mouse_y - @selected_node_y_offset)
             end
         end
 
@@ -1277,6 +3004,7 @@ module Wads
                         @selected_node = rn 
                         @selected_node_x_offset = mouse_x - rn.x 
                         @selected_node_y_offset = mouse_y - rn.y
+                        @click_timestamp = Time.now
                     end
                 end
             end
@@ -1285,11 +3013,40 @@ module Wads
 
         def handle_mouse_up mouse_x, mouse_y
             if @selected_node 
+                if @is_explorer
+                    time_between_mouse_up_down = Time.now - @click_timestamp
+                    if time_between_mouse_up_down < 0.2
+                        # Treat this as a single click and make the selected
+                        # node the new center node of the graph
+                        set_explorer_display(@selected_node.data_node)
+                    end 
+                end
                 @selected_node = nil 
             end 
         end
 
-        def set_tree_display(max_depth = -1)
+        def set_explorer_display(center_node = nil)
+            if center_node.nil? 
+                # If not specified, pick a center node as the one with the most connections
+                center_node = @graph.node_with_most_connections
+            end
+
+            @graph.reset_visited
+            @visible_data_nodes = {}
+            center_node.bfs(4) do |n|
+                @visible_data_nodes[n.name] = n
+            end
+
+            @size_by_connections = false
+            @is_explorer = true
+
+            @rendered_nodes = {}
+            populate_rendered_nodes
+
+            prevent_text_overlap 
+        end 
+
+        def set_tree_display
             @graph.reset_visited
             @visible_data_nodes = @graph.node_map
             @rendered_nodes = {}
@@ -1299,7 +3056,7 @@ module Wads
             width_for_each_root_tree = @width / number_of_root_nodes
 
             start_x = 0
-            y_level = 10
+            y_level = 20
             root_nodes.each do |root|
                 set_tree_recursive(root, start_x, start_x + width_for_each_root_tree - 1, y_level)
                 start_x = start_x + width_for_each_root_tree
@@ -1309,8 +3066,108 @@ module Wads
             @rendered_nodes.values.each do |rn|
                 rn.base_z = @base_z
             end
+
+            if @size_by_connections
+                scale_node_size
+            end
+
+            prevent_text_overlap 
+        end 
+
+        def scale_node_size 
+            range = @graph.get_number_of_connections_range
+            # There are six colors. Any number of scale sizes
+            # Lets try 4 first as a max size.
+            bins = range.bin_max_values(4)  
+
+            # Set the scale for each node
+            @visible_data_nodes.values.each do |node|
+                num_links = node.number_of_links
+                index = 0
+                while index < bins.size 
+                    if num_links <= bins[index]
+                        @rendered_nodes[node.name].set_scale(index + 1, @is_explorer)
+                        index = bins.size
+                    end 
+                    index = index + 1
+                end
+            end
+        end 
+
+        def prevent_text_overlap 
+            @rendered_nodes.values.each do |rn|
+                text = rn.get_text_widget
+                if text
+                    if overlaps_with_a_node(text)
+                        move_text_for_node(rn)
+                    else 
+                        move_in_bounds = false
+                        # We also check to see if the text is outside the edges of this widget
+                        if text.x < @x or text.right_edge > right_edge 
+                            move_in_bounds = true 
+                        elsif text.y < @y or text.bottom_edge > bottom_edge 
+                            move_in_bounds = true
+                        end
+                        if move_in_bounds 
+                            debug("#{text.label} was out of bounds")
+                            move_text_for_node(rn)
+                        end
+                    end
+                end
+            end
+        end
+
+        def move_text_for_node(rendered_node)
+            text = rendered_node.get_text_widget
+            if text.nil? 
+                return 
+            end
+            radians_between_attempts = DEG_360 / 24
+            current_radians = 0.05
+            done = false 
+            while not done
+                # Use radians to spread the other nodes around the center node
+                # TODO base the distance off of scale
+                text_x = rendered_node.center_x + ((rendered_node.width / 2) * Math.cos(current_radians))
+                text_y = rendered_node.center_y - ((rendered_node.height / 2) * Math.sin(current_radians))
+                if text_x < @x 
+                    text_x = @x + 1
+                elsif text_x > right_edge - 20
+                    text_x = right_edge - 20
+                end 
+                if text_y < @y 
+                    text_y = @y + 1
+                elsif text_y > bottom_edge - 26 
+                    text_y = bottom_edge - 26
+                end
+                text.x = text_x 
+                text.y = text_y
+                current_radians = current_radians + radians_between_attempts
+                if overlaps_with_a_node(text)
+                    # check for done
+                    if current_radians > DEG_360
+                        done = true 
+                        error("ERROR: could not find a spot to put the text")
+                    end
+                else 
+                    done = true
+                end 
+            end
         end 
 
+        def overlaps_with_a_node(text)
+            @rendered_nodes.values.each do |rn| 
+                if text.label == rn.label 
+                    # don't compare to yourself 
+                else 
+                    if rn.overlaps_with(text) 
+                        return true
+                    end
+                end
+            end
+            false
+        end
+
         def set_tree_recursive(current_node, start_x, end_x, y_level)
             # Draw the current node, and then recursively divide up
             # and call again for each of the children
@@ -1319,13 +3176,19 @@ module Wads
             end 
             current_node.visited = true
 
-            @rendered_nodes[current_node.name] = NodeWidget.new(
+            if @gui_theme.use_icons
+                @rendered_nodes[current_node.name] = NodeIconWidget.new(
+                    x_pixel_to_screen(start_x + ((end_x - start_x) / 2)),
+                    y_pixel_to_screen(y_level),
                     current_node,
+                    get_node_color(current_node))
+            else
+                @rendered_nodes[current_node.name] = NodeWidget.new(
                     x_pixel_to_screen(start_x + ((end_x - start_x) / 2)),
                     y_pixel_to_screen(y_level),
-                    @font,
-                    get_node_color(current_node),
+                    current_node,
                     get_node_color(current_node))
+            end
 
             number_of_child_nodes = current_node.outputs.size 
             if number_of_child_nodes == 0
@@ -1347,10 +3210,14 @@ module Wads
             @visible_data_nodes = @graph.node_map
             @rendered_nodes = {}
             populate_rendered_nodes
+            if @size_by_connections
+                scale_node_size
+            end
+            prevent_text_overlap 
         end 
 
         def get_node_color(node)
-            color_tag = node.get_tag("color")
+            color_tag = node.get_tag(COLOR_TAG)
             if color_tag.nil? 
                 return @color 
             end 
@@ -1365,18 +3232,60 @@ module Wads
             # Convert the data nodes to rendered nodes
             # Start by putting the center node in the center, then draw others around it
             @rendered_nodes = {}
-            @rendered_nodes[center_node.name] = NodeWidget.new(center_node, center_x, center_y, @font,
-                get_node_color(center_node), get_node_color(center_node))
+            if @gui_theme.use_icons
+                @rendered_nodes[center_node.name] = NodeIconWidget.new(
+                    center_x, center_y, center_node, get_node_color(center_node)) 
+            else
+                @rendered_nodes[center_node.name] = NodeWidget.new(center_x, center_y,
+                    center_node, get_node_color(center_node), get_node_color(center_node))
+            end
 
             populate_rendered_nodes(center_node)
+
+            if @size_by_connections
+                scale_node_size
+            end
+            prevent_text_overlap 
         end 
 
         def populate_rendered_nodes(center_node = nil)
             # Spread out the other nodes around the center node
-            # going in a circle
-            number_of_visible_nodes = @visible_data_nodes.size 
-            radians_between_nodes = DEG_360 / number_of_visible_nodes.to_f
-            current_radians = 0.05
+            # going in a circle at each depth level
+            stats = Stats.new("NodesPerDepth")
+            @visible_data_nodes.values.each do |n|
+                stats.increment(n.depth)
+            end
+            current_radians = []
+            radians_increment = []
+            (1..4).each do |n|
+                number_of_nodes_at_depth = stats.count(n)
+                radians_increment[n] = DEG_360 / number_of_nodes_at_depth.to_f
+                current_radians[n] = 0.05
+            end
+
+            padding = 100
+            size_of_x_band = (@width - padding) / 6
+            size_of_y_band = (@height - padding) / 6
+            random_x = size_of_x_band / 8
+            random_y = size_of_y_band / 8
+            half_random_x = random_x / 2
+            half_random_y = random_y / 2
+
+            # Precompute the band center points
+            # then reference by the scale or depth values below
+            band_center_x = padding + (size_of_x_band / 2) 
+            band_center_y = padding + (size_of_y_band / 2) 
+            # depth 1 [0] - center node, distance should be zero. Should be only one
+            # depth 2 [1] - band one
+            # depth 3 [2] - band two
+            # depth 4 [3] - band three
+            bands_x = [0, band_center_x]
+            bands_x << band_center_x + size_of_x_band
+            bands_x << band_center_x + size_of_x_band + size_of_x_band
+
+            bands_y = [0, band_center_y]
+            bands_y << band_center_y + size_of_y_band
+            bands_y << band_center_y + size_of_y_band + size_of_y_band
 
             @visible_data_nodes.each do |node_name, data_node|
                 process_this_node = true
@@ -1386,10 +3295,33 @@ module Wads
                     end 
                 end
                 if process_this_node 
+                    scale_to_use = 1
+                    if stats.count(1) > 0 and stats.count(2) == 0
+                        # if all nodes are depth 1, then size everything
+                        # as a small node
+                    elsif data_node.depth < 4
+                        scale_to_use = 5 - data_node.depth
+                    end
+                    if @is_explorer 
+                        # TODO Layer the nodes around the center
+                        # We need a better multiplier based on the height and width
+                        # max distance x would be (@width / 2) - padding
+                        # divide that into three regions, layer 2, 3, and 4
+                        # get the center point for each of these regions, and do a random from there
+                        # scale to use determines which of the regions
+                        band_index = 4 - scale_to_use
+                        distance_from_center_x = bands_x[band_index] + rand(random_x) - half_random_x
+                        distance_from_center_y = bands_y[band_index] + rand(random_y) - half_random_y
+                    else 
+                        distance_from_center_x = 80 + rand(200)
+                        distance_from_center_y = 40 + rand(100)
+                    end
                     # Use radians to spread the other nodes around the center node
-                    # For now, we will randomly place them
-                    node_x = center_x + ((80 + rand(200)) * Math.cos(current_radians))
-                    node_y = center_y - ((40 + rand(100)) * Math.sin(current_radians))
+                    radians_to_use = current_radians[data_node.depth]
+                    radians_to_use = radians_to_use + (rand(radians_increment[data_node.depth]) / 2)
+                    current_radians[data_node.depth] = current_radians[data_node.depth] + radians_increment[data_node.depth]
+                    node_x = center_x + (distance_from_center_x * Math.cos(radians_to_use))
+                    node_y = center_y - (distance_from_center_y * Math.sin(radians_to_use))
                     if node_x < @x 
                         node_x = @x + 1
                     elsif node_x > right_edge - 20
@@ -1400,17 +3332,26 @@ module Wads
                     elsif node_y > bottom_edge - 26 
                         node_y = bottom_edge - 26
                     end
-                    current_radians = current_radians + radians_between_nodes
 
                     # Note we can link between data nodes and rendered nodes using the node name
                     # We have a map of each
-                    @rendered_nodes[data_node.name] = NodeWidget.new(
+                    if @gui_theme.use_icons
+                        @rendered_nodes[data_node.name] = NodeIconWidget.new(
+                                                        node_x,
+                                                        node_y,
                                                         data_node,
+                                                        get_node_color(data_node),
+                                                        scale_to_use,
+                                                        @is_explorer) 
+                    else
+                        @rendered_nodes[data_node.name] = NodeWidget.new(
                                                         node_x,
                                                         node_y,
-                                                        @font,
+                                                        data_node,
                                                         get_node_color(data_node),
-                                                        get_node_color(data_node))
+                                                        scale_to_use,
+                                                        @is_explorer)
+                    end
                 end
             end
             @rendered_nodes.values.each do |rn|
@@ -1423,6 +3364,7 @@ module Wads
                 @rendered_nodes.values.each do |vn|
                     vn.draw 
                 end 
+
                 # Draw the connections between nodes 
                 @visible_data_nodes.values.each do |data_node|
                     data_node.outputs.each do |connected_data_node|
@@ -1434,9 +3376,16 @@ module Wads
                         if connected_rendered_node.nil?
                             # Don't draw if it is not currently visible
                         else
-                            Gosu::draw_line rendered_node.center_x, rendered_node.center_y, rendered_node.color,
-                                    connected_rendered_node.center_x, connected_rendered_node.center_y, connected_rendered_node.color,
+                            if @is_explorer and (rendered_node.is_background or connected_rendered_node.is_background)
+                                # Use a dull gray color for the line
+                                Gosu::draw_line rendered_node.center_x, rendered_node.center_y, COLOR_LIGHT_GRAY,
+                                    connected_rendered_node.center_x, connected_rendered_node.center_y, COLOR_LIGHT_GRAY,
+                                    relative_z_order(Z_ORDER_GRAPHIC_ELEMENTS)
+                            else
+                                Gosu::draw_line rendered_node.center_x, rendered_node.center_y, rendered_node.graphics_color,
+                                    connected_rendered_node.center_x, connected_rendered_node.center_y, connected_rendered_node.graphics_color,
                                     relative_z_order(Z_ORDER_GRAPHIC_ELEMENTS)
+                            end
                         end
                     end
                 end