98 lines
3.5 KiB
C
98 lines
3.5 KiB
C
|
|
/*******************************************************************************/
|
|
/* Copyright (C) 2012 Jonathan Moore Liles */
|
|
/* Copyright (C) 2001-2005 by Colin Jones */
|
|
/* */
|
|
/* This program is free software; you can redistribute it and/or modify it */
|
|
/* under the terms of the GNU General Public License as published by the */
|
|
/* Free Software Foundation; either version 2 of the License, or (at your */
|
|
/* option) any later version. */
|
|
/* */
|
|
/* This program is distributed in the hope that it will be useful, but WITHOUT */
|
|
/* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or */
|
|
/* FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for */
|
|
/* more details. */
|
|
/* */
|
|
/* You should have received a copy of the GNU General Public License along */
|
|
/* with This program; see the file COPYING. If not,write to the Free Software */
|
|
/* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|
/*******************************************************************************/
|
|
|
|
/* Taken from the "Gleam" FLTK scheme, as modified by prodatum */
|
|
|
|
#include <FL/Fl.H>
|
|
#include <FL/fl_draw.H>
|
|
|
|
#include "FL/Fl_Theme.H"
|
|
|
|
static void clean_color(Fl_Color c)
|
|
{
|
|
c = fl_color_average( FL_GRAY, c, 0.4 );
|
|
|
|
if (Fl::draw_box_active())
|
|
fl_color(c);
|
|
else
|
|
fl_color(fl_inactive(c));
|
|
}
|
|
|
|
static void rect(int x, int y, int w, int h, Fl_Color bc)
|
|
{
|
|
// clean_color( bc );
|
|
fl_rect( x, y, w, h, bc );
|
|
}
|
|
|
|
static void rectf ( int x, int y,int w, int h, Fl_Color bc )
|
|
{
|
|
clean_color(fl_color_average( FL_WHITE, bc, 0.05 ) );
|
|
fl_rectf( x, y, w, h );
|
|
}
|
|
|
|
static void up_frame(int x, int y, int w, int h, Fl_Color c)
|
|
{
|
|
rect(x, y, w, h, fl_color_average( FL_WHITE, c, 0.2 ) );
|
|
}
|
|
|
|
static void up_box(int x, int y, int w, int h, Fl_Color c)
|
|
{
|
|
rectf(x, y, w, h, c );
|
|
rect(x, y, w, h, fl_color_average( FL_WHITE, c, 0.2 ) );
|
|
}
|
|
|
|
static void down_frame(int x, int y, int w, int h, Fl_Color c)
|
|
{
|
|
rect(x, y, w, h, fl_color_average( FL_BLACK, c, 0.2 ) );
|
|
}
|
|
|
|
static void down_box(int x, int y, int w, int h, Fl_Color c)
|
|
{
|
|
rectf(x, y, w, h, fl_color_average( FL_WHITE, c, 0.2 ) );
|
|
rect(x, y, w, h, fl_color_average( FL_WHITE, c, 0.4 ) );
|
|
}
|
|
|
|
static void flat_box( int x, int y, int w, int h, Fl_Color c )
|
|
{
|
|
rectf( x, y, w, h, c );
|
|
}
|
|
|
|
static void
|
|
init_theme ( void )
|
|
{
|
|
Fl::set_boxtype( FL_UP_BOX, up_box, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_DOWN_BOX, down_box, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_THIN_UP_BOX, up_box, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_THIN_DOWN_BOX, down_box, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_UP_FRAME, up_frame, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_DOWN_FRAME, down_frame, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_ROUND_UP_BOX, up_box, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_ROUND_DOWN_BOX, down_box, 1,1,2,2 );
|
|
Fl::set_boxtype( FL_FLAT_BOX, flat_box, 0, 0, 0, 0 );
|
|
}
|
|
|
|
void
|
|
init_clean_theme ( void )
|
|
{
|
|
Fl_Theme *t = new Fl_Theme( "Clean", "", "", init_theme );
|
|
|
|
Fl_Theme::add( t );
|
|
}
|