home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 1 / GoldFishApril1994_CD2.img / d4xx / d493 / screenmod / source / about.c < prev    next >
C/C++ Source or Header  |  1991-06-06  |  692b  |  35 lines
  1. /***************** about for ScreenMod ************************/
  2. /*          Written by Syd L. Bolton ©1991                    */
  3.  
  4. #include "about.h"
  5.  
  6. about()
  7. {
  8. struct IntuiMessage *message;
  9. ULONG class;
  10. struct Window *AWindow;
  11. int about_exit=0;
  12.  
  13. AboutWindow.Screen=Screen;    /* make sure we're on right screen! */
  14.  
  15. AWindow=OpenWindow(&AboutWindow);
  16. if (AWindow==NULL) return(0);
  17.  
  18. PrintIText(AWindow->RPort,&AboutTextList,0,0);
  19.  
  20. do {
  21.     WaitPort(AWindow->UserPort);
  22.         while ( ( message=(struct IntuiMessage *)
  23.             GetMsg(AWindow->UserPort) ) != NULL)
  24.         {
  25.         class=message->Class;
  26.         ReplyMsg(message);
  27.  
  28.         if (class==GADGETUP) about_exit=1;
  29.         }
  30.     } while (about_exit==0);
  31.  
  32. CloseWindow(AWindow);
  33. }
  34.  
  35.