#include <intuition/intuitionbase.h>
#include <libraries/mathffp.h>

/* Nächste Zeile nur eingeben, falls ein */
/* Aztek-C-Compiler verwendet wird.      */

#include <functions.h>


struct IntuitionBase *IntuitionBase;
struct GfxBase       *GfxBase;
struct Screen        *screen;
struct Window        *window;


/* Daten für den Screen: Auflösung 320 * 256 Pixel  */
/*                       und 1 Bitplane             */


struct NewScreen  screendaten =
      {0,0,320,256,1,0,1,NULL,CUSTOMSCREEN,NULL,NULL,NULL,NULL};



/* Daten für das Window: Auflösung 320 * 256 Pixel  */
/* Das Window kann durch Anklicken des CloseWindow- */
/* Gadgets geschlossen werden.                      */


struct NewWindow  windowdaten =
      {0,0,320,256,0,1,CLOSEWINDOW,ACTIVATE|WINDOWCLOSE,NULL,NULL,
       (UBYTE *)"GRAFIKWINDOW",NULL,NULL,NULL,NULL,NULL,NULL,CUSTOMSCREEN,};



Vorbereitung()

/* Diese Funktion öffnet alle benötigten Libraries, */
/* den Screen und das Window.                       */

   {

      if(!IntuitionBase)
         {
            IntuitionBase  =  (struct IntuitionBase *)
                              OpenLibrary("intuition.library",0L);
            if(!IntuitionBase)
               {
                Ende();
               }
         }

      if(!GfxBase)
         {
            GfxBase        =  (struct GfxBase *)
                              OpenLibrary("graphics.library",0L);
            if(!GfxBase)
               {
                Ende();
               }
         }


   screen = (struct Screen*)OpenScreen(&screendaten);


   if(!screen)
      {
       Ende();
      }


   windowdaten.Screen =  screen;


   window = (struct Window*)OpenWindow(&windowdaten);


   if(!window)
      {
       Ende();
      }


   return(NULL);

   }


Ende()

/* Diese Funktion schließt alles, was Vorbereitung geöffnet hat */

   {
      if(window) CloseWindow(window);
      if(screen) CloseScreen(screen);

      if(GfxBase) CloseLibrary(GfxBase);
      if(IntuitionBase) CloseLibrary(IntuitionBase);

      return(NULL);
   }




