2 // "$Id: fl_diamond_box.cxx 7903 2010-11-28 21:06:39Z matt $"
4 // Diamond box code for the Fast Light Tool Kit (FLTK).
6 // Copyright 1998-2010 by Bill Spitzak and others.
8 // This library is free software; you can redistribute it and/or
9 // modify it under the terms of the GNU Library General Public
10 // License as published by the Free Software Foundation; either
11 // version 2 of the License, or (at your option) any later version.
13 // This library is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 // Library General Public License for more details.
18 // You should have received a copy of the GNU Library General Public
19 // License along with this library; if not, write to the Free Software
20 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
23 // Please report all bugs and problems on the following page:
25 // http://www.fltk.org/str.php
28 // Box drawing code for an obscure box type.
29 // These box types are in separate files so they are not linked
32 // The diamond box draws best if the area is square!
35 #include <FL/fl_draw.H>
37 extern uchar
* fl_gray_ramp();
39 static void fl_diamond_up_box(int x
,int y
,int w
,int h
,Fl_Color bgcolor
) {
44 fl_color(bgcolor
); fl_polygon(x
+3, y1
, x1
,y
+3, x
+w
-3,y1
, x1
,y
+h
-3);
45 uchar
*g
= fl_gray_ramp();
46 fl_color(g
['W']); fl_line(x
+1, y1
, x1
, y
+1, x
+w
-1, y1
);
47 fl_color(g
['U']); fl_line(x
+2, y1
, x1
, y
+2, x
+w
-2, y1
);
48 fl_color(g
['S']); fl_line(x
+3, y1
, x1
, y
+3, x
+w
-3, y1
);
49 fl_color(g
['P']); fl_line(x
+3, y1
, x1
, y
+h
-3, x
+w
-3, y1
);
50 fl_color(g
['N']); fl_line(x
+2, y1
, x1
, y
+h
-2, x
+w
-2, y1
);
51 fl_color(g
['H']); fl_line(x
+1, y1
, x1
, y
+h
-1, x
+w
-1, y1
);
52 fl_color(g
['A']); fl_loop(x
, y1
, x1
, y
, x
+w
, y1
, x1
, y
+h
);
55 static void fl_diamond_down_box(int x
,int y
,int w
,int h
,Fl_Color bgcolor
) {
60 uchar
*g
= fl_gray_ramp();
61 fl_color(g
['P']); fl_line(x
+0, y1
, x1
, y
+0, x
+w
-0, y1
);
62 fl_color(g
['N']); fl_line(x
+1, y1
, x1
, y
+1, x
+w
-1, y1
);
63 fl_color(g
['H']); fl_line(x
+2, y1
, x1
, y
+2, x
+w
-2, y1
);
64 fl_color(g
['W']); fl_line(x
+2, y1
, x1
, y
+h
-2, x
+w
-2, y1
);
65 fl_color(g
['U']); fl_line(x
+1, y1
, x1
, y
+h
-1, x
+w
-1, y1
);
66 fl_color(g
['S']); fl_line(x
+0, y1
, x1
, y
+h
-0, x
+w
-0, y1
);
67 fl_color(bgcolor
); fl_polygon(x
+3, y1
, x1
,y
+3, x
+w
-3,y1
, x1
,y
+h
-3);
68 fl_color(g
['A']); fl_loop(x
+3, y1
, x1
, y
+3, x
+w
-3, y1
, x1
, y
+h
-3);
71 extern void fl_internal_boxtype(Fl_Boxtype
, Fl_Box_Draw_F
*);
72 Fl_Boxtype
fl_define_FL_DIAMOND_BOX() {
73 fl_internal_boxtype(_FL_DIAMOND_DOWN_BOX
, fl_diamond_down_box
);
74 fl_internal_boxtype(_FL_DIAMOND_UP_BOX
,fl_diamond_up_box
);
75 return _FL_DIAMOND_UP_BOX
;
79 // End of "$Id: fl_diamond_box.cxx 7903 2010-11-28 21:06:39Z matt $".