/* listing 4 */



#include <intuition/intuition.h>



#include <proto/dos.h>

#include <proto/exec.h>

#include <proto/intuition.h>



struct IntuitionBase *IntuitionBase;

struct Window *window1, *window2;

struct TagItem	taglist[]=

{

	{WA_Left, 10},

	{WA_Top,	20},

	{WA_Width, 200},

	{WA_Height, 75},

	{WA_Title, (ULONG)"Okno 1 :-) wesole"},

	{WA_Flags, WFLG_DRAGBAR | WFLG_DEPTHGADGET | WFLG_RMBTRAP | WFLG_ACTIVATE},

	{WA_ScreenTitle, (ULONG)"Okno 1 twierdzi, ze jest wesole. Swiat jest piekny!!!"},

	TAG_DONE

};



int main(int argc, char *argv[])

{

	check_os(OS_20);

	if (IntuitionBase=(struct IntuitionBase*)OpenLibrary("intuition.library", 37))

	{

		/* Udalo sie otworzyc biblioteke */

		if (window1=OpenWindowTagList(0, taglist))

		{

			Delay(100);	/* Poczekamy chwilke */

			if (window2=OpenWindowTags(0,

				WA_Left, 100,

				WA_Top, 100,

				WA_Width, 250,

				WA_Height, 50,

				WA_Title, "Okno 2 :-( smutne",

				WA_Flags, WFLG_DRAGBAR | WFLG_CLOSEGADGET | WFLG_DEPTHGADGET | WFLG_ACTIVATE,

				WA_ScreenTitle, "To okno jest smutne bo ludzie sa okrutni.",

				TAG_END))

			{

				Delay(500); /* Poczekamy wieksza chwile */

				CloseWindow(window2); /* Zamknijmy otwarte wczesniej okno */

			}

			CloseWindow(window1);

		}

		/* Przed wyjsciem nalezy zamknac biblioteke */

		CloseLibrary((struct Library*)IntuitionBase);

	}

	return 0;

}