﻿if (!$gbl) {
	my %UP_LIST = (
		"3-TokuseiNoTokuseiE2EMsg"         => "EnglishMessage",
		"13-msg_l02r0301_award_01"         => "EnglishMessage",
		"16-mes_ribbon_name_023"           => "EnglishMessage",
		"16-mes_ribbon_haihu_text_027"     => "EnglishMessage",
		"8-str_dendemo_cong0"              => "EnglishMessage",
		"16-mes_ribbon_haihu_text_018"     => "EnglishMessage",
		"16-mes_ribbon_haihu_text_009"     => "EnglishMessage",
		"3-mystery_card_016"               => "WindowContext",
		"3-mystery_test_002"               => "EnglishMessage",
		"3-mystery_ranger_003"             => "EnglishMessage",
		"4-mes_porutoname_29"              => "EnglishMessage",
		"35-msg_c01r0201_kuji_11"          => "EnglishMessage",
		"41-msg_c01r0207_girl2_01"         => "EnglishMessage",
		"35-msg_c01r0201_kuji_08"          => "EnglishMessage",
		"35-msg_c01r0201_kuji_09"          => "EnglishMessage",
		"35-msg_c01r0201_idol_03"          => "EnglishMessage",
		"35-msg_c01r0201_kuji_10"          => "EnglishMessage",
		"24-msg_telop_01"                  => "WindowContext",
		"35-msg_c01r0201_kuji_01"          => "EnglishMessage",
		"35-msg_c01r0201_kuji_16"          => "EnglishMessage",
		"41-msg_c01r0207_boy2_01"          => "EnglishMessage",
		"58-msg_d11r0101_info_09"          => "EnglishMessage",
		"157-msg_t05r0201_glasses_08"      => "EnglishMessage",
		"139-msg_r212ar0101_maid1_01"      => "EnglishMessage",
		"55-msg_c05r1101_gerggeousm_03_01" => "EnglishMessage",
		"118-msg_c06_fighter_02"           => "EnglishMessage",
		"171-msg_c02r0501_babyboy1_02"     => "EnglishMessage",
		"94-msg_c07r0101_man2_01"          => "EnglishMessage",
		"0-msg_c04_statue_02"              => "EnglishMessage",
		"44-msg_c05r0201_gentleman_01"     => "EnglishMessage",
		"33-msg_c05_goods_19"              => "EnglishMessage",
		"91-msg_c07gym0101_leader_02"      => "EnglishMessage",
		"55-msg_c05r1101_gerggeousm_03"    => "EnglishMessage",
		"0-msg_c04_statue_01"              => "EnglishMessage",
		"163-msg_c02gym0101_sunglasses_01" => "EnglishMessage",
		"96-msg_all_dead_03"               => "WindowContext",
		"110-msg_tv_00_02_02"              => "EnglishMessage",
		"44-msg_tower_89"                  => "EnglishMessage",
		"50-msg_t07pc0101_idol_01"         => "EnglishMessage",
		"108-msg_tv_01_13_03"              => "EnglishMessage",
		"110-msg_tv_00_02_03"              => "EnglishMessage",
		"108-msg_tv_01_13_01"              => "EnglishMessage",
		"96-msg_all_dead_01"               => "WindowContext",
		"76-msg_d15_seaman_01"             => "EnglishMessage",
		"96-msg_all_dead_02"               => "WindowContext",
		"31-msg_c11_fishing_05"            => "EnglishMessage",
		"44-msg_tower_17"                  => "EnglishMessage",
		"110-msg_tv_00_02_01"              => "EnglishMessage",
		"91-msg_shop_01"                   => "WindowContext",
		"108-msg_tv_01_13_02"              => "EnglishMessage",
		"44-msg_d31r0201_idol_01"          => "EnglishMessage",
		"0-mes_tower_tr_171_01"            => "EnglishMessage",
		"1-ELITEW_11_TRMSG_FIGHT_START"    => "EnglishMessage",
		"1-CAMPB_04_TRMSG_FIGHT_AFTER"     => "EnglishMessage",
		"9-msg_underworld_19"              => "EnglishMessage",
		"19-dwc_message_0008"              => "EnglishMessage",
		"23-msg_wifilobby_014"             => "EnglishMessage",
		"18-country202"                    => "EnglishMessage",
	);

	$gbl->{up_list} = \%UP_LIST;
	$gbl->{reg}{EnglishMessage} = qr/^((?:[^,]*,){19})[^,]*/;
	$gbl->{reg}{WindowContext} = qr/^((?:[^,]*,){8})[^,]*/;
}

my $item = $gbl->{up_list}{$data{msg_id}};
my $check;

if ($data{back_col} =~ /#ff8000/) {
	$data{back_col} =~ s/#ff8000//g;
	$check = 1;
}
if (defined($item)) {
	if (!$data{back_col}) {
		$data{back_col} = ",,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,";
	}
	$data{back_col} =~ s/$gbl->{reg}{$item}/$1#ff8000/;
	$check = 1;
}
if ($check) {
	$iter->setBackColor($data{back_col});
}
