[Stratagus-CVS] stratagus/src/ui ccl_ui.c menu_proc.c

[address@hidden]

CVSROOT:        /home/strat
Module name:    stratagus
Changes by:      <address@hidden>       03/12/17 00:31:33

Modified files:
        src/ui         : ccl_ui.c menu_proc.c 

Log message:
        Added support for transparent menus( bad tabs)

Patches:
Index: stratagus/src/ui/ccl_ui.c
diff -u stratagus/src/ui/ccl_ui.c:1.169 stratagus/src/ui/ccl_ui.c:1.170
--- stratagus/src/ui/ccl_ui.c:1.169     Mon Dec 15 16:14:07 2003
+++ stratagus/src/ui/ccl_ui.c   Wed Dec 17 00:31:33 2003
@@ -26,7 +26,7 @@
 //      Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 //      02111-1307, USA.
 //
-//     $Id: ccl_ui.c,v 1.169 2003/12/15 05:14:07 jsalmon3 Exp $
+//     $Id: ccl_ui.c,v 1.170 2003/12/16 13:31:33 mohydine Exp $
 
 //@{
 
@@ -4530,7 +4530,9 @@
            item->xofs = gh_scm2int(gh_car(value));
            value = gh_cdr(value);
            item->yofs = gh_scm2int(gh_car(value));
-
+       // Addition of the transparent flag
+       } else if (gh_eq_p(value, gh_symbol2scm("transparent"))) {
+               item->transparent = 1;
        } else if (gh_eq_p(value, gh_symbol2scm("menu"))) {
            value = gh_car(list);
            list = gh_cdr(list);
Index: stratagus/src/ui/menu_proc.c
diff -u stratagus/src/ui/menu_proc.c:1.115 stratagus/src/ui/menu_proc.c:1.116
--- stratagus/src/ui/menu_proc.c:1.115  Tue Dec 16 22:46:02 2003
+++ stratagus/src/ui/menu_proc.c        Wed Dec 17 00:31:33 2003
@@ -26,7 +26,7 @@
 //      Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
 //      02111-1307, USA.
 //
-//     $Id: menu_proc.c,v 1.115 2003/12/16 11:46:02 mohydine Exp $
+//     $Id: menu_proc.c,v 1.116 2003/12/16 13:31:33 mohydine Exp $
 
 //@{
 
@@ -827,11 +827,11 @@
            PushClipping();
            SetClipping(0, 0, x + w - 20, VideoHeight - 1);
                if (mi->transparent) {
-           VideoDrawClipTrans50(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x - 2, 
y);
-           VideoDrawClipTrans50(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x + w / 
2, y);
+               VideoDrawClipTrans50(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x - 
2, y);
+               VideoDrawClipTrans50(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x + 
w / 2, y);
                } else {
                VideoDrawClip(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x - 2, y);
-           VideoDrawClip(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x + w / 2, y);
+               VideoDrawClip(MenuButtonGfx.Sprite, MBUTTON_S_HCONT, x + w / 2, 
y);
                }
            PopClipping();
            if (mi->d.hslider.cflags & MI_CFLAGS_LEFT) {
@@ -978,9 +978,9 @@
        PushClipping();
        SetClipping(0, 0, x + w, VideoHeight - 1);
        if (mi->transparent) {
-       VideoDrawClipTrans50(MenuButtonGfx.Sprite, rb, x - 1, y - 1);
+               VideoDrawClipTrans50(MenuButtonGfx.Sprite, rb, x - 1, y - 1);
        } else {
-       VideoDrawClip(MenuButtonGfx.Sprite, rb, x - 1, y - 1);
+               VideoDrawClip(MenuButtonGfx.Sprite, rb, x - 1, y - 1);
        }
        PopClipping();
        text = mi->d.input.buffer;