home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / d / desklib / !DeskSrc / FN / Libraries / ColourMenu / c / Colourmenu
Encoding:
Text File  |  1996-05-13  |  4.5 KB  |  119 lines
  1. /*
  2.     ####             #    #     # #
  3.     #   #            #    #       #          The FreeWare C library for 
  4.     #   #  ##   ###  #  # #     # ###             RISC OS machines
  5.     #   # #  # #     # #  #     # #  #   ___________________________________
  6.     #   # ####  ###  ##   #     # #  #                                      
  7.     #   # #        # # #  #     # #  #    Please refer to the accompanying
  8.     ####   ### ####  #  # ##### # ###    documentation for conditions of use
  9.     ________________________________________________________________________
  10.  
  11.     File:    Colourmenu.Colourmenu.c
  12.     Author:  Copyright © 1994 Craig Beech
  13.     Version: 1.00 (27 Aug 1994)
  14.     Purpose: Equivalent of the Desk_RISC_OSLib colourmenu function.
  15. */
  16.  
  17. #include "Desk.Menu.h"
  18. #include "Desk.ColourMenu.h"
  19.  
  20.  
  21. /****************************************************************************
  22.  
  23. > Desk_menu_ptr Desk_ColourMenu_Create(char *name);
  24.  
  25.   Inputs:   name - title of colour menu.
  26.   Returns:  Desk_menu_ptr - colour menu.
  27.   Purpose:  Creates a colour menu similar to the Desk_RISC_OSLib function.
  28.  
  29. ****************************************************************************/
  30.  
  31. extern Desk_menu_ptr Desk_ColourMenu_Create(char *name)
  32. { Desk_menu_ptr menu;
  33.   Desk_menu_item *item;
  34.  
  35.   menu = Desk_Menu_New(name, "0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15");
  36.  
  37.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  38.   item = &item[0];
  39.   item->iconflags.data.foreground = Desk_colour_BLACK;
  40.   item->iconflags.data.background = Desk_colour_WHITE;
  41.  
  42.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  43.   item = &item[1];
  44.   item->iconflags.data.foreground = Desk_colour_BLACK;
  45.   item->iconflags.data.background = Desk_colour_GREY1;
  46.  
  47.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  48.   item = &item[2];
  49.   item->iconflags.data.foreground = Desk_colour_BLACK;
  50.   item->iconflags.data.background = Desk_colour_GREY2;
  51.  
  52.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  53.   item = &item[3];
  54.   item->iconflags.data.foreground = Desk_colour_BLACK;
  55.   item->iconflags.data.background = Desk_colour_GREY3;
  56.  
  57.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  58.   item = &item[4];
  59.   item->iconflags.data.foreground = Desk_colour_BLACK;
  60.   item->iconflags.data.background = Desk_colour_GREY4;
  61.  
  62.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  63.   item = &item[5];
  64.   item->iconflags.data.foreground = Desk_colour_WHITE;
  65.   item->iconflags.data.background = Desk_colour_GREY5;
  66.  
  67.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  68.   item = &item[6];
  69.   item->iconflags.data.foreground = Desk_colour_WHITE;
  70.   item->iconflags.data.background = Desk_colour_GREY6;
  71.  
  72.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  73.   item = &item[7];
  74.   item->iconflags.data.foreground = Desk_colour_WHITE;
  75.   item->iconflags.data.background = Desk_colour_BLACK;
  76.  
  77.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  78.   item = &item[8];
  79.   item->iconflags.data.foreground = Desk_colour_WHITE;
  80.   item->iconflags.data.background = Desk_colour_DARK_BLUE;
  81.  
  82.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  83.   item = &item[9];
  84.   item->iconflags.data.foreground = Desk_colour_BLACK;
  85.   item->iconflags.data.background = Desk_colour_YELLOW;
  86.  
  87.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  88.   item = &item[10];
  89.   item->iconflags.data.foreground = Desk_colour_WHITE;
  90.   item->iconflags.data.background = Desk_colour_GREEN;
  91.  
  92.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  93.   item = &item[11];
  94.   item->iconflags.data.foreground = Desk_colour_WHITE;
  95.   item->iconflags.data.background = Desk_colour_RED;
  96.  
  97.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  98.   item = &item[12];
  99.   item->iconflags.data.foreground = Desk_colour_BLACK;
  100.   item->iconflags.data.background = Desk_colour_CREAM;
  101.  
  102.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  103.   item = &item[13];
  104.   item->iconflags.data.foreground = Desk_colour_WHITE;
  105.   item->iconflags.data.background = Desk_colour_ARMY_GREEN;
  106.  
  107.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  108.   item = &item[14];
  109.   item->iconflags.data.foreground = Desk_colour_BLACK;
  110.   item->iconflags.data.background = Desk_colour_ORANGE;
  111.  
  112.   item = (Desk_menu_item *) (((int) menu) + sizeof(Desk_menu_block));
  113.   item = &item[15];
  114.   item->iconflags.data.foreground = Desk_colour_BLACK;
  115.   item->iconflags.data.background = Desk_colour_LIGHT_BLUE;
  116.  
  117.   return menu;
  118. }
  119.