src/Clean_Theme.cxx

   1
   2 /*******************************************************************************/
   3 /* Copyright (C) 2012 Jonathan Moore Liles                                     */
   4 /* Copyright (C) 2001-2005 by Colin Jones                                      */
   5 /*                                                                             */
   6 /* This program is free software; you can redistribute it and/or modify it     */
   7 /* under the terms of the GNU General Public License as published by the       */
   8 /* Free Software Foundation; either version 2 of the License, or (at your      */
   9 /* option) any later version.                                                  */
  10 /*                                                                             */
  11 /* This program is distributed in the hope that it will be useful, but WITHOUT */
  12 /* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or       */
  13 /* FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for   */
  14 /* more details.                                                               */
  15 /*                                                                             */
  16 /* You should have received a copy of the GNU General Public License along     */
  17 /* with This program; see the file COPYING.  If not,write to the Free Software */
  18 /* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  19 /*******************************************************************************/
  20
  21 /* Taken from the "Gleam" FLTK scheme, as modified by prodatum */
  22
  23 #include <FL/Fl.H>
  24 #include <FL/fl_draw.H>
  25
  26 #include "FL/Fl_Theme.H"
  27
  28 static void clean_color(Fl_Color c)
  29 {
  30     c = fl_color_average( FL_WHITE, c, 0.10f );
  31
  32     if (Fl::draw_box_active())
  33         fl_color(c);
  34     else
  35         fl_color(fl_inactive(c));
  36 }
  37
  38 static Fl_Color border_color (Fl_Color c)
  39 {
  40     return fl_color_average( FL_BLACK, FL_BACKGROUND_COLOR,0.70f);
  41 }
  42
  43 static void rect(int x, int y, int w, int h, Fl_Color bc)
  44 {
  45     fl_rect( x, y, w, h, bc );
  46 }
  47
  48 static void rectf ( int x, int y,int w, int h, Fl_Color bc )
  49 {
  50     clean_color( bc );
  51     fl_rectf( x, y, w, h );
  52 }
  53
  54 static void up_frame(int x, int y, int w, int h, Fl_Color c)
  55 {
  56     rect(x, y, w, h, border_color( c ));
  57 }
  58
  59 static void up_box(int x, int y, int w, int h, Fl_Color c)
  60 {
  61     rectf(x, y, w, h, c );
  62     rect(x, y, w, h, border_color( c ));
  63 }
  64
  65 static void down_frame(int x, int y, int w, int h, Fl_Color c)
  66 {
  67     rect(x, y, w, h, fl_color_average( FL_BLACK, c, 0.2f ) );
  68 }
  69
  70 static void down_box(int x, int y, int w, int h, Fl_Color c)
  71 {
  72     rectf(x, y, w, h,
  73           FL_BACKGROUND_COLOR == c || FL_BACKGROUND2_COLOR == c
  74           ? fl_darker(c)
  75           : c );
  76     rect(x, y, w, h, border_color( c ));
  77 }
  78
  79 static void flat_box( int x, int y, int w, int h, Fl_Color c )
  80 {
  81     rectf( x, y, w, h, c );
  82 }
  83
  84 static void border_box( int x, int y, int w, int h, Fl_Color c )
  85 {
  86     rectf( x, y, w, h, c );
  87     rect(x, y, w, h, border_color( c ));
  88 }
  89
  90 static void
  91 init_theme ( void )
  92 {
  93     Fl::set_boxtype(  FL_UP_BOX,         up_box,           1,1,2,2 );
  94     Fl::set_boxtype(  FL_DOWN_BOX,       down_box,         1,1,2,2 );
  95     Fl::set_boxtype(  FL_THIN_UP_BOX,         up_box,      1,1,2,2 );
  96     Fl::set_boxtype(  FL_THIN_DOWN_BOX,       down_box,    1,1,2,2 );
  97     Fl::set_boxtype(  FL_UP_FRAME,       up_frame,         1,1,2,2 );
  98     Fl::set_boxtype(  FL_DOWN_FRAME,     down_frame,       1,1,2,2 );
  99     Fl::set_boxtype(  FL_ROUND_UP_BOX,   up_box,           1,1,2,2 );
 100     Fl::set_boxtype(  FL_ROUND_DOWN_BOX, down_box,         1,1,2,2 );
 101 //    Fl::set_boxtype(  FL_FLAT_BOX,       flat_box,         0, 0, 0, 0 );
 102     Fl::set_boxtype(  FL_BORDER_BOX,       border_box,      1,1,2,2 );
 103 }
 104
 105 void
 106 init_clean_theme ( void )
 107 {
 108     Fl_Theme *t = new Fl_Theme( "Clean", "", "", init_theme );
 109
 110     Fl_Theme::add( t );
 111 }