home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / mus / Play16 / ProdS.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-07-02  |  715 b   |  39 lines
  1.  
  2. /*  Prod 1.1 stay   -- by Thomas Wenzel -- public domain  */
  3. /* It's really nothing special at all, why should it? :-) */
  4.  
  5. #include <graphics/displayinfo.h>
  6. #include <intuition/screens.h>
  7. #include <utility/tagitem.h>
  8. #include <proto/intuition.h>
  9. #include <proto/exec.h>
  10. #include <exec/memory.h>
  11. #include <exec/io.h>
  12. #include <dos/dos.h>
  13. #include <proto/dos.h>
  14.  
  15.  
  16. void main(void) {
  17.  
  18.     struct    TagItem ScreenTags[] = {
  19.         SA_Left,            0,
  20.         SA_Top,                0,
  21.         SA_Width,            640,
  22.         SA_Height,        400,
  23.         SA_Behind,        FALSE,
  24.         SA_DisplayID,    VGAPRODUCT_KEY,
  25.         TAG_DONE
  26.     };
  27.  
  28.     struct Screen *MyScreen;
  29.  
  30.     MyScreen=OpenScreenTagList(NULL, ScreenTags);
  31.  
  32.     WBenchToFront();
  33.  
  34.     Wait(SIGBREAKF_CTRL_C);
  35.  
  36.     if (MyScreen) CloseScreen(MyScreen);
  37.  
  38. }
  39.