prontera,154,185,5	script	Battleground Creation	100,{
	mes "blah";
	next;
	switch ( select( "Create a Battleground Team", "Join a Battleground Team", "Leave your Battleground Team", "List Battleground Teams members", "Destroy a Battleground Team" ) ) {
	.@size = getarraysize( .team );
	case 1:
		getmapxy .@map$, .@x, .@y, 1;
		.team[ .@size ] = createbgid( .@map$, .@x, .@y, "", strnpcinfo(0)+"::OnDie" );
		mes "A new battleground Team has created. ID = "+ .team[ .@size ];
		close;
	case 2:
		if ( !.@size ) {
			mes "there is no available team";
			close;
		}
		for ( .@i = 0; .@i < .@size; .@i++ )
			.@menu$ = .@menu$ + .team[.@i] +":";
		.@s = select( .@menu$ ) -1;
		.@value = setbgid( .team[.@s] );
		if ( .@value > 0 )
			mes "Successfully join a Team No."+ .team[.@s];
		else if ( .@value == -2 )
			mes "This battleground Team already FULL";
		else if ( .@value == -5 )
			mes "You already in this team";
		else
			mes "shouldn't display this message at all ... lol";
		close;
	case 3:
		if ( !getcharid(4) ) {
			mes "You don't have a Battleground team!";
			close;
		}
		bg_leave;
		mes "You have leave your Battleground Team";
		close;
	case 4:
		if ( !.@size ) {
			mes "there is no available team";
			close;
		}
		.@menu$ = "Your Team";
		for ( .@i = 0; .@i < .@size; .@i++ )
			.@menu$ = .@menu$ +":"+ .team[.@i];
		.@s = select( .@menu$ ) -2;
		if ( .@s == -1 ) {
			if ( !getcharid(4) ) {
				mes "You don't have a Battleground team!";
				close;
			}
			.@team = getcharid(4);
		}
		else
			.@team = .team[.@s];
		getbgusers .@team;
		for ( .@i = 0; .@i < $@arenamembersnum; .@i++ )
			mes ( .@i +1 )+". "+ rid2name( $@arenamembers[.@i] );
		close;
	case 5:
		if ( !.@size ) {
			mes "there is no available team";
			close;
		}
		.@menu$ = "Your Team";
		for ( .@i = 0; .@i < .@size; .@i++ )
			.@menu$ = .@menu$ +":"+ .team[.@i];
		.@s = select( .@menu$ ) -2;
		if ( .@s == -1 ) {
			if ( !getcharid(4) ) {
				mes "You don't have a Battleground team!";
				close;
			}
			.@s = 0; // search through the array .. use my trick
			while ( getcharid(4) != .team[.@s] && .@s < .@size ) .@s++;
		}		
		bg_destroy .team[.@s];
		mes "Battleground Team ID = "+ .team[.@s] +" has destroyed";
		deletearray .team[.@s], 1;
		close;
	}
	close; // shouldn't reach
OnDie:
	sleep2 1250;
	percentheal 100,100;
	end;
}
prontera	mapflag	battleground