ConfigureVarSys()
{

	CreateInteger("Swarm.count",0);
	SetIntegerRange("Swarm.count", 1, 2);

                   CreateInteger("Phaer.count",0);
	SetIntegerRange("Phaer.count", 1, 2);

                   CreateInteger("Bomb.count",0);
	SetIntegerRange("Bomb.count", 1, 2);

                   CreateInteger("Serv.count",0);
	SetIntegerRange("Serv.count", 1, 2);
	
                    CreateInteger("end.end",0);        
	SetIntegerRange("end.end", 0,1);
	

}

CreateControl("INFO", "STATIC")
{

	Geom("HCENTRE", "VCENTRE");


	Size(512,450);


	BorderSize(0);
	BevelSize(0);


	TabSize(200, 15);

	Style("OUTLINE", "INERT");

	Title("Choose your options");
	ColorGroup("LISTBOX");
	TitleFont("MEDIUM");

	CreateControl("Image1", "Static")
	{
		ColorGroup("WHITE");
		Geom("Top", "Left");
		Size(510,448);
		Pos(1,1);
		Image("two.bmp", 0,0,512,450);
	}

	CreateControl("SwarmYAlly", "BUTTON")
	{
		Pos(40, 155);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		Text("Ally");
		ColorGroup("LISTBOX");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		UseVar("Swarm.count");
		Value(1);
		NotifyParent("Button::Select", "SwarmA");
	}

	CreateControl("SwarmUnally", "BUTTON")
	{
		Pos(180, 155);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		ColorGroup("LISTBOX");
		Text("Unally");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		Value(2);
		UseVar("Swarm.count");

		NotifyParent("Button::Select", "SwarmU");
	}


	CreateControl("ReturnButt", "BUTTON")
	{
		Pos(228, 391);
		Size(55, 15);
		BorderSize(5);
		BevelSize(5);
		ColorGroup("LISTBOX");
		Font("SMALL");
		Text("START");
		Style("ROLLOVER","RADIO","OUTLINE");
		NotifyParent("Button::Select", "Return");
	}


	OnEvent("SwarmA")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|SwarmU");
		Cmd("Swarm.count 1");
		Activate("|SwarmA");
	}

	OnEvent("SwarmU")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|SwarmA");
		Cmd("Swarm.count 2");
		Activate("|SwarmU");
	}






CreateControl("PRyesbutt", "BUTTON")
	{
		Pos(40, 225);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		Text("Yes");
		ColorGroup("LISTBOX");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		UseVar("Phaer.count");
		Value(1);
		NotifyParent("Button::Select", "PRyes");
	}

	CreateControl("PRnobutt", "BUTTON")
	{
		Pos(180, 225);
		Size(80, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		ColorGroup("LISTBOX");
		Text("no");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		Value(2);
		UseVar("Phaer.count");

		NotifyParent("Button::Select", "PRno");
	}



	OnEvent("PRyes")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|PRno");
		Cmd("Phaer.count 1");	
		Activate("|PRyes");
	}

	OnEvent("PRno")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|PRyes");
		Cmd("Phaer.count 2");	
		Activate("|PRno");
	}


	CreateControl("Bomben", "BUTTON")
	{
		Pos(40, 295);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		Text("Enable");
		ColorGroup("LISTBOX");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		UseVar("Bomb.count");
		Value(1);
		NotifyParent("Button::Select", "Bombe");
	}

	CreateControl("Bombdis", "BUTTON")
	{
		Pos(180, 295);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		ColorGroup("LISTBOX");
		Text("Disable");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		Value(2);
		UseVar("Bomb.count");

		NotifyParent("Button::Select", "Bombd");
	}


	OnEvent("Bombe")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|Bombd");
		Cmd("Bomb.count 1");
		Activate("|Bombe");
	}

	OnEvent("Bombd")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|Bombe");
		Cmd("Bomb.count 2");
		Activate("|Bombd");
	}

	CreateControl("ServYes", "BUTTON")
	{
		Pos(40, 365);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		Text("On");
		ColorGroup("LISTBOX");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		UseVar("Serv.count");
		Value(1);
		NotifyParent("Button::Select", "Servy");
	}

	CreateControl("ServNo", "BUTTON")
	{
		Pos(180, 365);
		Size(75, 10);
		BorderSize(5);
		BevelSize(5);
		Font("TINY");
		ColorGroup("LISTBOX");
		Text("Off");
		Style("ROLLOVER", "RADIO", "OUTLINE");
		Value(2);
		UseVar("Serv.count");

		NotifyParent("Button::Select", "Servn");
	}


	OnEvent("Servy")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|Servn");
		Cmd("Serv.count 1");
		Activate("|Servy");
	}

	OnEvent("Servn")
	{
//		Cmd("end.end 0");
		Deactivate("|Start");
		Deactivate("|Servy");
		Cmd("Serv.count 2");
		Activate("|Servn");
	}


	OnEvent("Return")
	{

		Cmd("end.end 1");	
	
	}

     
	OnEvent("Control::Activate")
	{
		Cmd("Swarm.count 0");
		Cmd("Phaer.count 0");
		Cmd("Bomb.count 0");
		Cmd("Serv.count 0");
		Cmd("end.end 0");
		Activate("|Start");
	}

		OnEvent("Control::Deactivate")
	{
		
		Deactivate("|Start");
		Deactivate("|SwarmA");
		Deactivate("|SwarmU");
		Deactivate("|PRyes");
		Deactivate("|PRno");

	}
}

CreateControl("Start", "STATIC")
{
	Geom("HCENTRE", "VCENTRE");
	Pos(150, 420);
	Size(512,450);
	Style("OUTLINE");
	BevelSize(0);




	

	}



}


