home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 602b.lha / StripANSI_v1.0 / Source / source.lzh / about.c next >
C/C++ Source or Header  |  1991-08-02  |  647b  |  35 lines
  1. /*                Written by Syd L. Bolton ©1991                       */
  2.  
  3. #include "about.h"
  4.  
  5. about()
  6. {
  7. struct IntuiMessage *message;
  8. ULONG class;
  9. struct Window *AWindow;
  10. int about_exit=0;
  11.  
  12. AboutWindow.TopEdge=55+Window->TopEdge;
  13. AboutWindow.LeftEdge=120+Window->LeftEdge;
  14.  
  15. AWindow=OpenWindow(&AboutWindow);
  16. if (AWindow==NULL) return(0);
  17.  
  18. PrintIText(AWindow->RPort,&ATextList,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.