/*
 * BigCLI.c
 *
 * Diese Funktion bringt das aktuelle Fenster auf die maximale Groesse
 *
 *
 * MODIFICATION HISTORY:
 *
 * Datum:      Name:                Beschreibung:
 * ----------  -------------------- ---------------------------------------
 * 16.01.1988  Andreas Trappmann    AMIGA-Version 1.0
 *
 */

#include <exec/types.h>
#include <intuition/intuitionbase.h>
#include <intuition/intuition.h>

extern struct Library         *OpenLibrary();

struct IntuitionBase    *IntuitionBase    = NULL;

main()
{
   struct Screen     *screen;
   struct Window     *window;

   long dx,dy;

   IntuitionBase=(struct IntuitionBase*) OpenLibrary("intuition.library",0L);
   if(IntuitionBase)
   {
      /* Zeiger holen */
      screen = IntuitionBase->ActiveScreen;
      window = IntuitionBase->ActiveWindow;

      /* linke Window-Ecke auf Koordinaten (0/0) legen */
      dx = window->LeftEdge;
      dy = window->TopEdge;
      MoveWindow(window,-dx,-dy);

      /* Window auf max. Size */
      dx = screen->Width - window->Width;
      dy = screen->Height - window->Height;
      SizeWindow(window,dx,dy);

      CloseLibrary(IntuitionBase);
   }
}