[proc,clan_banned_draw].cs2

// 4271
[proc,clan_banned_draw](component $component0, component $component1, int $comsubid2, component $component3, component $component4, component $component5, int $int6, int $int7, component $component8, int $int9)
def_string $string0 = "";
def_int $clanslot10 = null;
def_int $int11 = -1;
def_string $text1 = "";
def_graphic $graphic12 = null;
def_int $int13 = -1;
def_int $int14 = 0;
if (%varbit12165 = 1 & %varbit12164 = 3 & activeclansettings_find_listened = true | %varbit12165 = 0 & %varbit933 = 3 & activeclansettings_find_affined(^clantype_clan) = true) {
	if (cc_find($component1, $comsubid2) = ^true) {
		if (~clan_members_searching = 1) {
			$string0 = ~bankmain_filterstring;
			if (string_length($string0) > 0) {
				cc_settext("Showing banned players: <col=ff0000><$string0></col>");
			} else {
				cc_settext("Showing banned players: <col=ff0000>*</col>");
			}
		} else {
			cc_settext("<activeclansettings_getclanname>: Ban list");
		}
	}
	$clanslot10 = activeclansettings_getaffinedslot(removetags(chat_playername));
	if ($clanslot10 ! null) {
		$int11 = ~clan_permission_get(ban_from_chat_2956);
		if (activeclansettings_getaffinedrank($clanslot10) >= $int11) {
			if_settext("<~text_device("Click", "Tap")> a name to remove it from the ban list.", $component8);
		} else {
			$text1, $graphic12 = ~script4302($int11);
			if (~league_world = 1) {
				if_settext("You may not administer clans from a League world.", $component8);
			} else if (~speedrunning_world = 1) {
				if_settext("You may not administer clans from a Speedrunning world.", $component8);
			} else {
				if_settext("Only clan members with a rank of <$text1> may unban players.", $component8);
			}
		}
		$int13 = activeclansettings_getbannedcount;
		if ($int13 > 0) {
			$int14 = ~clan_banned_populatedisplay($int13, $component3, $component4, $component5, $int6, $int7, $int9);
		} else {
			~clan_banned_wipedisplay("The ban list is currently empty.", $component3, $component4);
		}
	} else {
		if_settext("Only clan members may unban players.", $component8);
		~clan_banned_wipedisplay("Only clan members may unban players.", $component3, $component4);
	}
} else {
	$text1 = ~script4287;
	if (cc_find($component1, $comsubid2) = ^true) {
		cc_settext($text1);
	}
	if_settext("<col=9f9f9f><$text1></col>", $component8);
	~clan_banned_wipedisplay($text1, $component3, $component4);
}
def_component $layer15 = if_getlayer($component0);
if ($layer15 ! null) {
	~clan_banned_setsize($layer15, $component0, $component3, $component4, ~max(180, $int14), if_getheight($layer15));
}
~clan_banned_blocker($component5, $int6, $int7);