home *** CD-ROM | disk | FTP | other *** search
/ Aminet 5 / Aminet 5 - March 1995.iso / Aminet / game / misc / WordSearch.lha / WordSearch / src / request.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-06-06  |  874 b   |  44 lines
  1. #include <exec/types.h>
  2. #include <proto/exec.h>
  3. #include <proto/intuition.h>
  4. #include <proto/graphics.h>
  5. #include <proto/dos.h>
  6. #include <intuition/intuition.h>
  7. #include <graphics/display.h>
  8.  
  9. struct Window *Requestor_Window;
  10. struct message *m=NULL;
  11.  
  12. struct IntuiText chip Body_Text =
  13.    {0, 1, JAM1, 5, 10, NULL, (UBYTE *) "Click to abort New Key", NULL};
  14.  
  15. struct IntuiText chip Abort_Text =
  16.    {0, 1, JAM1, 5, 3, NULL, (UBYTE *) "Abort", NULL};
  17.  
  18. void open_requestor()
  19.    {
  20.    Requestor_Window = BuildSysRequest
  21.              (NULL, &Body_Text, NULL, &Abort_Text, GADGETUP, 280L, 60L);
  22.    }
  23.  
  24. void close_requestor()
  25. {
  26.     while(m!=NULL)
  27.     {
  28.         ReplyMsg(m);
  29.         m = GetMsg(Requestor_Window->UserPort);
  30.     }
  31.     
  32.         FreeSysRequest (Requestor_Window);
  33. }
  34.  
  35. BOOL Stop_Flag()
  36. {
  37.     if(m==NULL)
  38.         m = GetMsg(Requestor_Window->UserPort);
  39.     if(m==NULL)
  40.         return(FALSE);
  41.     else
  42.         return(TRUE);    
  43. }     
  44.