home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 092.lha / ColorFull / test.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-11-21  |  6.6 KB  |  205 lines
  1. /*~~~~~~~\_______________________________________________________/~~~~~~~~*\
  2. **********<<<<<<<<<<<<<<<<<<<|---={(~!~)}=---|>>>>>>>>>>>>>>>>>>>>**********
  3. *~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  4. *    test.c                                                     10/31/87
  5. *
  6. *   This simple program opens an 8 color, HIRES (640*200) screen and a full
  7. * sized window to show the use of the "init_palette()", "palette()" and 
  8. * "get_fname()" routines.
  9. *
  10. *   It will let you modify/load/save color palettes, and is exited by
  11. * selecting "OKAY!" or "CANCEL!" on the color palette.
  12. *
  13. *   See the file: palette.c for source of these routines and also for the
  14. * usage of: get_fname() (also included in this arc file as: getfile.c)
  15. *
  16. *---------------------------------------------------------------------------
  17. *   To use the palette routines in your program, you need only declare two
  18. * external functions... 
  19. *
  20. * extern void init_palette();
  21. * extern void palette();
  22. *
  23. * ...after opening your screen and window, (and a window->UserPort) you call
  24. * init_palette() with a pointer to your window and screen...
  25. *
  26. * init_palette(MyWindow,MyScreen);
  27. *
  28. * ...which sets up certain variables needed and then sets the colors to the
  29. * ones defined in: UBYTE def_colors[] (see: palette.c). Then to open the 
  30. * "Color Palette" window, you call palette() with the same window, screen 
  31. * pointers you used for init_palette()...
  32. * 
  33. * palette(MyWindow,MyScreen);
  34. *
  35. * ...which will the take control of the program until the user is through
  36. * modifying/loading/saving the colors of your screen. (when he/she selects
  37. * "OKAY" or "CANCEL")
  38. *----------------------------------------------------------------------------
  39. *
  40. *   To use the "File Requester" routine you will need to declare an external
  41. * function...
  42. *
  43. * extern UBYTE *get_fname();
  44. *                            
  45. * ...and set up one or more arrays to hold your "probable_file_name[]" and
  46. * one or more to hold your "probable_drive/path_name[]"...
  47. *
  48. * UBYTE color_file_name[] = "MyFile.Color";
  49. * UBYTE def_dir[]         = "SYS:";
  50. *
  51. * ...then to open the "File Requester" (window), you...
  52. *
  53. * get_fname(MyWindow,MyScreen,"Title For Window",color_file_name,def_dir);
  54. *
  55. * ...you can then find the file name in "color_file_name[]". Or you can call
  56. * it by...
  57. *
  58. * fname = get_fname(MyWindow,MyScreen,"Title","file.color","SYS:").
  59. *
  60. * ...using the first method will keep your "color_file_name" and "def_dir" 
  61. * updated for future calls.(See: palette.c for an example.)
  62. *
  63. *----------------------------------------------------------------------------                                           
  64. *
  65. *  These routines now compile using AZTEC 3.4a using 16 bit ints.
  66. * (makefile for MANX also included)
  67. *
  68. *   Any bug reports/suggestions/fixes/etc... would be appreciated.
  69. * 
  70. *   I can be reached at:                 (703) 297-7639
  71. *
  72. * via    E-MAIL-> GEnie: K.Young
  73. *                 CA-AUG: Keith Young
  74. *           Deep Thought: Keith Young
  75. *             COMPUSERVE: 73170,307
  76. *
  77. * via Snail-Mail-> Keith Young
  78. *                  Rt.2 Box 261
  79. *                  Goodview, Va.   (yes, really :-)
  80. *                           24095
  81. *         ______________________________________________________          
  82. \********<<<<<<<<<<<<<<<<<<<|---={(~!~)}=---|>>>>>>>>>>>>>>>>>>>>***********/
  83.  
  84. #include <exec/types.h>
  85. #include <exec/devices.h>
  86. #include <intuition/intuition.h>
  87.  
  88. #include <graphics/gels.h>
  89. #include <graphics/copper.h>
  90. #include <graphics/regions.h>
  91. #include <devices/keymap.h>
  92.  
  93. extern void init_palette(),palette();   /* Color Palette routines */
  94.  
  95. #define DPTH 3L       /* Raster dimensions */
  96. #define WDTH 640L
  97. #define HGHT 200L
  98.  
  99. #define NL 0L
  100.  
  101. /* Font Descriptor   */
  102. struct TextAttr MyFont = {
  103.    (UBYTE *)"topaz.font",
  104.    TOPAZ_EIGHTY,
  105.    FS_NORMAL,
  106.    FPF_ROMFONT
  107.  };
  108.  
  109. /* Used to open a Screen   */
  110. struct NewScreen NewScreen = {
  111.    0,0,WDTH,HGHT,DPTH,         /* Left,Top,Width,Height,Depth    */
  112.    7,5,HIRES,                  /* DetailPen, BlockPen, ViewModes */
  113.    CUSTOMSCREEN,&MyFont,       /* Type, Font  */
  114.    (UBYTE *)"Palette/File Requester Tester by--------> Keith Young",/* Title */
  115.    NL,NL };                    /* Gadgets, BitMap  */
  116.  
  117. /* Used to open a Window   */
  118. struct NewWindow NewWindow = {
  119.    0,0,WDTH,HGHT,              /* LeftEdge,TopEdge,Width,Height */
  120.    7,0,                        /* DetailPen,BlockPen     */
  121.    MOUSEBUTTONS | MOUSEMOVE | MENUVERIFY | MENUPICK | GADGETUP |
  122.       GADGETDOWN | CLOSEWINDOW | ACTIVEWINDOW,
  123.    SMART_REFRESH | REPORTMOUSE | ACTIVATE | BACKDROP | BORDERLESS, /*Flags*/
  124.    NL,NL,NL,                  /* FirstGadget, CheckMark, Title  */
  125.    NL,                        /* MUST SET SCREEN AFTER OPENSCREEN!!! */
  126.    NL,                        /* BitMap    */
  127.    100,60,32767,32767,        /* MinW, MinH, MaxW, MaxH */
  128.    CUSTOMSCREEN };            /* Type   */
  129.  
  130.  
  131. /*******    Variables Initialized by open_stuff()  **********/
  132.  
  133. struct IntuitionBase *IntuitionBase = NL;
  134. struct GfxBase       *GfxBase = NL;
  135. extern UBYTE         *OpenLibrary();
  136. extern struct Screen *OpenScreen();
  137. extern struct Window *OpenWindow();
  138. struct Screen        *p_S;
  139. struct Window        *p_W;
  140.  
  141. /************************************************************
  142. * open_stuff()
  143. *
  144. *     Opens screen and full-sized window for program.
  145. *
  146. *     Initializes handles p_S,p_W
  147. *
  148. *  See also: close_stuff()
  149. *************************************************************/
  150.  
  151. open_stuff()
  152. {
  153.    if ( ! (IntuitionBase = (struct IntuitionBase *)
  154.      OpenLibrary("intuition.library",0L)) ||
  155.       ! (GfxBase =(struct GfxBase *)OpenLibrary("graphics.library",0L)) )
  156.          exit(20);
  157.  
  158.    if ( ! (p_S =(struct Screen *)OpenScreen(&NewScreen)) )
  159.      {
  160.       printf("\tCan't Open Screen!\n Call Your Local Dealer and Buy More Mem!\n");
  161.       exit(21);
  162.      }
  163.  
  164.    NewWindow.Screen = p_S;   /* NEED TO SET SCREEN!!! */
  165.  
  166.    if ( ! (p_W =(struct Window *)OpenWindow(&NewWindow)) ) 
  167.      {
  168.       CloseScreen(p_S);
  169.       printf("This is not good.\n");
  170.       exit(22);
  171.      }
  172. }
  173.  
  174. /*************************************************
  175.  * close_stuff()
  176.  *
  177.  *  Cleans up what was allocated by open_stuff()
  178.  *************************************************/
  179.  
  180. void close_stuff()
  181. {
  182.    CloseWindow(p_W);
  183.    CloseScreen(p_S);
  184.    CloseLibrary(GfxBase);
  185.    CloseLibrary(IntuitionBase);
  186. }
  187.  
  188. /*****************************************************************
  189.  * main()
  190.  *
  191.  * open_stuff, initialize_the_palette, call_the_palette_routine,
  192.  * close_stuff and_then_exit. 
  193.  ****************************************************************/
  194.  
  195. void main()
  196. {
  197.  open_stuff();
  198.  init_palette(p_W,p_S);
  199.  palette(p_W,p_S);
  200.  close_stuff();
  201.  exit(1);
  202. }
  203.  
  204. /*** End of Palette/File Requester Tester (test.c) ***/
  205.