#!Perl
$^W = 1;
use strict;
use Astro::MoonPhase;
use Date::Pcalc qw(:all);
use Time::Local;
use Tk::ROText;
use Tk::HList;
use Tk;

#Optional Modules#
if ($^O eq 'MSWin32') {
    eval    { require Win32::Console; Win32::Console::Free() };
    if ($@) { warn "Win32::Console is not installed.\n$@";   }
}

#Declarations#
my $VERSION = 1.1;
my ($yr,$mo,$dy,$diy,$dim,$yr1,$mo1,$wnb,$txt,$time,$D,$M,);

#Main#
dbmopen(my %NOTES, "Notes", 0600)
    or die "Cannot create or read settings.\a\n$!";
open STDERR, ">LPCal.log"
    or warn  "Cannot create LPCal.log\a\n$!";
my  $mw = MainWindow->new(-title => 'Lunar Phase Calendar',);
    $mw->geometry('800x600+0+0');
my  $sys_bg = $mw->cget(-background);
&init(); &mpcal_gui(); &Tk::MainLoop();

#Subroutines#
sub init #--------------------------------------------------------------
{
    ($yr, $mo, $dy,) = Today();
    $dim  = Days_in_Month($yr,$mo);
    $yr1  = Day_of_Week($yr,1,1);
    $mo1  = Day_of_Week($yr,$mo,1);
    $wnb  = Week_Number($yr,$mo,$dy);
    $txt  = Date_to_Text_Long($yr,$mo,$dy);
    $time = localtime();
    $D    = $dy;
    $M    = $mo;
}
sub mpcal_gui #---------------------------------------------------------
{
    #Widgets
    my  $menu_1  = $mw->Menu();
    my  $meni_1  = $mw->Menu(-tearoff => '0',);
    my  $meni_2  = $mw->Menu(-tearoff => '0',);
    my  $meni_3  = $mw->Menu(-tearoff => '0',);
        $menu_1->cascade(-label     => 'File',
                         -underline => '0',
                         -menu      => $meni_1,);
        $menu_1->cascade(-label     => 'View',
                         -underline => '0',
                         -menu      => $meni_2);
        $menu_1->cascade(-label     => 'Help',
                         -underline => '0',
                         -menu      => $meni_3);
    my $c = 0;
    foreach ('Exit', 'Yearly', 'Monthly',
             'Weekly', 'Daily', 'Help', 'About') {
        my $x = $_; $c++;
        if     ($c < 2) {
            $meni_1->command(-label   => "$_", -underline => '0',
                             -command => sub {&menu_1_cmd("$x");});
        }elsif ($c < 6) {
            $meni_2->command(-label   => "$_", -underline => '0',
                             -command => sub {&menu_1_cmd("$x");});
        }else{
            $meni_3->command(-label   => "$_", -underline => '0',
                             -command => sub {&menu_1_cmd("$x");});
        }
    }   $mw->configure(-menu => $menu_1,);
    my  $pw  = $mw->Panedwindow(-showhandle => 1,
                                -bd         => 2,
                                -relief     => 'groove',);
    my  $f1  = $mw->Frame(-relief => 'sunken', -bd => 2,);
    my  $f2  = $pw->Frame(-relief => 'sunken', -bd => 2,);
    my  $f3  = $pw->Frame(-relief => 'sunken', -bd => 2,
                          -bg     => '#000000',);
    my  $f4  = $mw->Frame();
    $f4->gridRowconfigure(1, -minsize => 8,);
      for (1..7) {
        $f4->gridColumnconfigure($_, -minsize => 64, -weight => 1);
      }$f4->gridColumnconfigure(8, -minsize => 8, -weight => 1);
      my $col = 0;
      foreach ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat') {
        $col++;
        my $w  = $f4->Label(-text   => $_,
                            -fg     => '#000000',
                            -font   => '{Courier New} 10',)->grid(
                            -row    => 1,
                            -column => $col,
                            -sticky => 'news');
      }undef $col;
    my  $l1  = $f4->Label(-text   => $time,
                          -font   => '{Courier} 10',
                          -fg     => '#000000',)->grid(
                          -row    => 1,
                          -column => 8,
                          -sticky => 'nes');
    our $cv1 = $f2->Scrolled('Canvas',
                             -scrollbars         => 'oe',
                             -relief             => 'flat',
                             -bg                 => '#000000',
                             -takefocus          => 1,
                             -highlightthickness => 0,
                             -bd                 => 2,
                             -width              => 578,
                             -height             => 560,);
    our $tx1 = $f3->ROText(-height           => 2,
                           -bd               => 2,
                           -wrap             => 'word',
                           -relief           => 'flat',
                           -font             => '{Ariel} 8',
                           -selectbackground => '#000000',
                           -selectforeground => '#ffffff',
                           -insertbackground => '#000000',
                           -bg               => '#000000',
                           -fg               => '#fff000',);
        $tx1->menu(undef);
    our $tx2 = $f3->Text(-width            => 40,
                         -bd               => 4,
                         -relief           => 'sunken',
                         -wrap             => 'word',
                         -insertbackground => '#ffffff',
                         -selectbackground => '#000000',
                         -selectforeground => '#fff000',
                         -bg               => '#000000',
                         -fg               => '#ffffff',);
        my $tx2M = $tx2->menu;
        $tx2M->delete('File');
        $tx2M->delete('Search');
        $tx2M->delete('View');
        undef $tx2M;
    my  $b1  = $f3->Button(-text             => 'Save Note',
                           -relief           => 'flat',
                           -background       => '#000000',
                           -foreground       => '#ffffff',
                           -activeforeground => '#fff000',
                           -activebackground => '#000000',
                           -width            => 10,
                           -command          => \&savenote,);
    my  $b2  = $f3->Button(-text             => 'Clear Note',
                           -relief           => 'flat',
                           -background       => '#000000',
                           -foreground       => '#ffffff',
                           -activeforeground => '#fff000',
                           -activebackground => '#000000',
                           -width            => 10,
                           -command          => sub {&savenote('C');});
    $pw->add($f2, $f3);
    
    #Bindings
    &FlashButton($b1, '#00ff00', '#ffffff');
    &FlashButton($b2, '#ff0000', '#ffffff');
    &BindMouseWheel($cv1);
    &BindMouseWheel($tx2);
    
    #Grid
    $mw->gridRowconfigure(1,        -minsize => 2,);
    $mw->gridRowconfigure(2,        -minsize => 8,);
    $mw->gridRowconfigure(3,        -minsize => 8,     -weight => 1);
    $mw->gridRowconfigure(4,        -minsize => 8,);
    $mw->gridRowconfigure(5,        -minsize => 8,);
    $mw->gridColumnconfigure(1,     -minsize => 8,);
    $mw->gridColumnconfigure(2,     -minsize => 8,     -weight => 1);
    $mw->gridColumnconfigure(3,     -minsize => 8,     -weight => 1);
    $mw->gridColumnconfigure(4,     -minsize => 8,);
    $f2->gridRowconfigure(1,        -minsize => 8,     -weight => 1);
    $f2->gridColumnconfigure(1,     -minsize => 8,     -weight => 1);
    $f3->gridRowconfigure(1,        -minsize => 8,);
    $f3->gridRowconfigure(2,        -minsize => 8,     -weight => 1);
    $f3->gridRowconfigure(3,        -minsize => 8,);
    $f3->gridColumnconfigure(1,     -minsize => 8,     -weight => 1);
    $f3->gridColumnconfigure(2,     -minsize => 8,     -weight => 1);
    
    $pw ->grid(-in     => $mw,      -columnspan => '2',
               -column => '2',      -rowspan    => '1',
               -row    => '3',      -sticky     => 'news');
    $f1 ->grid(-in     => $mw,      -columnspan => '4',
               -column => '1',      -rowspan    => '1',
               -row    => '1',      -sticky     => 'news');
    $f4 ->grid(-in     => $mw,      -columnspan => '2',
               -column => '2',      -rowspan    => '1',
               -row    => '2',      -sticky     => 'news');
    $cv1->grid(-in     => $f2,      -columnspan => '1',
               -column => '1',      -rowspan    => '1',
               -row    => '1',      -sticky     => 'news');
    $tx2->grid(-in     => $f3,      -columnspan => '2',
               -column => '1',      -rowspan    => '1',
               -row    => '2',      -sticky     => 'news');
    $tx1->grid(-in     => $f3,      -columnspan => '2',
               -column => '1',      -rowspan    => '1',
               -row    => '1',      -sticky     => 'news');
    $b1 ->grid(-in     => $f3,      -columnspan => '1',
               -column => '1',      -rowspan    => '1',
               -row    => '3',      -sticky     => 'n');
    $b2 ->grid(-in     => $f3,      -columnspan => '1',
               -column => '2',      -rowspan    => '1',
               -row    => '3',      -sticky     => 'n');
    
    #Defaults
    $mw->after(2000, sub {
        &menu_1_cmd('Daily');
    });
    $mw->repeat(1000, sub {
        $time = localtime();
        $l1->configure(-text => "$time");
        $mw->update;
    });
    
    #Functions
    sub menu_1_cmd #----------------------------------------------------
    {
        my $x = $_[0]; my $viewopt;
        $mw->Busy(-recurse => 1);
        $tx2->delete('1.0', 'end');
        $tx1->delete('1.0', 'end');
        menu_1_cmd_start:
        
        if ($x eq 'Exit') {
            dbmclose(%NOTES); exit;
        }
        elsif ($x eq 'Monthly' || $x eq 'Daily' || $x eq 'Weekly') {
            $viewopt = $x;
            $x = 'Yearly';
            goto menu_1_cmd_start;
        }
        elsif ($x eq 'Yearly') {
            my (@images,$x,$y,$c0,$c1,$c2,$c3,$c4,);
            $x = $y = $c1 = $c2 = $c3 = 0; $c4 = 1;
            unless ($viewopt) { $viewopt = 'Yearly'; }
            
            #prepare canvas
            $cv1->dtag('all'); $cv1->delete("all");
            if     ($viewopt eq 'Monthly') {
                $c0 = 1;
                $cv1->configure(-height       => 640,
                                -scrollbars   => 'e',
                                -scrollregion => [0,0,578,640]);
            }elsif ($viewopt eq 'Weekly') {
                $c0 = 1;
                $cv1->configure(-height       => 1,
                                -scrollbars   => 'e',
                                -scrollregion => [0,0,578,1]);
            }elsif ($viewopt eq 'Daily') {
                $c0 = 1;
                $cv1->configure(-height       => 1,
                                -scrollbars   => 'oe',
                                -scrollregion => [0,0,578,1]);
            }else{
                $c0 = 12;
                $cv1->configure(-height       => 6008,
                                -scrollbars   => 'e',
                                -scrollregion => [0,0,578,6008]);
            }
            
            #calculate calendar
            &init();
            for my $mon (1..$c0) {
                my $save;
                #calendar data
                my ($m,$f,$d,);
                if ($viewopt eq 'Monthly' ||
                    $viewopt eq 'Daily'   ||
                    $viewopt eq 'Weekly'   ) {
                    if ($viewopt eq 'Daily') {
                        $m = $txt;
                        $f = Day_of_Week($yr,$mo,$dy);
                        $d = 1;
                    }elsif ($viewopt eq 'Weekly') {
                        my ($yx,$mx,$dx) = Monday_of_Week($wnb,$yr);
                        $m = Month_to_Text($mo) . " $yr (Week: $wnb)";
                        $f = 1;
                        $d = $dx + 7; $c4 = $dx;
                    }elsif ($viewopt eq 'Monthly') {
                        $m = Month_to_Text($mo) . " $yr";
                        $f = Day_of_Week($yr,$mo,1);
                        $d = Days_in_Month($yr,$mo);
                    }
                }else{
                    $m = Month_to_Text($mon) . " $yr";
                    $f = Day_of_Week($yr,$mon,1);
                    $d = Days_in_Month($yr,$mon);
                }
                
                #display month
                if ($mon == 1) { $x = 280; $y += 30;  }
                else           { $x = 280; $y += 108; }
                my $i = $cv1->createText($x, $y,
                                         -text    => "$m",
                                         #-fill    => '#fff000',
                                         -fill    => '#d3d3d3',
                                         -font    => 'Verdana 24',
                                         -anchor  => 'center');
                $mw->update;
                
                #x,y values
                if ($mon < 2) { $c1++;    }
                else          { $c1 += 2; }
                if ($f < 7)   { $c2 = $f; }
                else          { $c2 = 0;  }
                $mon--;
                
                #days of the month
                for my $mday ($c4..$d) {
                    #x,y values
                    if ($c2 >= 7) {
                        $c2 = 0; $c1++;
                    }
                    if ($viewopt eq 'Daily') {
                        $y = 55; $x = 50;
                    }
                    else {
                        $y = $c1 * 80; $x = $c2 * 80;
                    }
                    $c2++;
                    
                    #moonphase
                    my ($epoch, $mp,);
                    if ($viewopt eq 'Daily')  { $mday = $dy; }
                    if ($viewopt eq 'Yearly') {
                        $epoch = timelocal(55,55,23,$mday,$mon,$yr);
                    }else{
                        $epoch = timelocal(55,55,23,$mday,$mo-1,$yr);
                    }
                    $mp = phase($epoch); $mp *= 100;
                    $mp = &assign_image($mp);
                    
                    #no consecutive images unless darkmoon
                    #if (defined $save) {
                    #  if ($mp == $save) {
                    #    if ($save == 29)         {        }
                    #    else                     { $mp++; }
                    #  }elsif (($mp - $save) > 1) { $mp--; }
                    #}
                    #$save = $mp;
                    
                    #populate canvas
                    my($itype, $eimg, $limg,);
                    my $tag = $mon + 1;
                    unless ($viewopt eq 'Yearly') { $tag   = $mo;     }
                    if     ($viewopt eq 'Daily')  { $itype = 'big';   }
                    else                          { $itype = 'white'; }
                    my $imagedata = &load_image($mp,$itype);
                    my $image     = $mw->Photo(-format => 'gif',
                                               -data   => $imagedata);
                    undef $imagedata;
                    $cv1->createImage($x, $y,
                                      -image  => $image,
                                      -anchor => 'nw',);
                    $cv1->addtag("$tag $mday", 'closest', $x+10, $y+10);
                    
                    if ($viewopt eq 'Daily') { $eimg = 'big';  }
                    else                     { $eimg = 'blue'; }
                    $cv1->bind("$tag $mday", "<Enter>", sub {
                        my $imagedata = &load_image($mp, $eimg);
                        my $image     = $mw->Photo(
                                            -format => 'gif',
                                            -data   => $imagedata);
                        undef $imagedata;
                        $cv1->itemconfigure("$tag $mday",
                                            -image => $image);
                        $mw->update;
                    });
                    if ($viewopt eq 'Daily') { $limg = 'big';   }
                    else                     { $limg = 'white'; }
                    $cv1->bind("$tag $mday", "<Leave>", sub {
                        my $imagedata = &load_image($mp, $limg);
                        my $image     = $mw->Photo(
                                            -format => 'gif',
                                            -data   => $imagedata);
                        undef $imagedata;
                        $cv1->itemconfigure("$tag $mday",
                                            -image => $image);
                        $mw->update;
                    });
                    $cv1->bind("$tag $mday", "<Double-Button-1>", sub {
                        $M = $tag; $D = $mday;
                        &showday();
                    });
                    unless ($viewopt eq 'Daily') {
                        $x += 2; $y += 2;
                        $i = $cv1->createText($x, $y,
                                              -text    => "$mday",
                                              -fill    => '#ffffff',
                                              -anchor  => 'nw');
                    }
                }
            }
        }elsif ($x eq 'Help') {
            undef $M; undef $D;
            $tx1->delete('1.0', 'end');
            $tx2->delete('1.0', 'end');
            $tx1->insert('end', 'Help');
            $tx2->insert('end', 'Works by reading the "system" date; ' .
                         'the program is known to work with dates '    .
                         'which fall between the years 1970 and 2037.');
        }elsif ($x eq 'About') {
            undef $M; undef $D;
            $tx1->delete('1.0', 'end');
            $tx2->delete('1.0', 'end');
            $tx1->insert('end', 'About');
            $tx2->insert('end', "Lunar Phase Calander\n\n"             .
                         "Version: 1.1\n"                              .
                         "Author:  Jason McManus\n"                    .
                         "Contact: QoS\@cpan.org");
        }
        menu_1_cmd_end:
        $mw->update; $mw->Unbusy;
    }
    sub showday #-------------------------------------------------------
    {
        $mw->Busy(-recurse => 1);
        my $l = Date_to_Text_Long($yr,$M,$D);
        $tx2->delete('1.0', 'end');
        $tx1->delete('1.0', 'end');
        $tx1->insert('end', "\n    $l",);
        if (defined $NOTES{"$yr $M $D"}) {
            $tx2->insert('end', $NOTES{"$yr $M $D"});
        }
        $mw->update; $mw->Unbusy;
    }
    sub savenote #------------------------------------------------------
    {
        my $opt = $_[0];
        my $note = $tx2->get('1.0', 'end');
        if (defined $yr && defined $M && defined $D) {
            if (defined $note) {
                if ($opt) { $NOTES{"$yr $M $D"} = undef; }
                else      { $NOTES{"$yr $M $D"} = $note; }
                &showday();
            }
        }
    }
    sub BindMouseWheel #------------------------------------------------
    {
        my $w = $_[0];
        if ($^O eq 'MSWin32') {
            $w->Tk::bind('<MouseWheel>'=>[sub{
            $_[0]->yview('scroll', -($_[1]/120)*3,'units')}, Ev('D')]);
            $w->Tk::bind('<ButtonPress-2>' => sub {$w->Tk::focus});
        }else{
            $w->Tk::bind('<4>' => sub {$_[0]->yview('scroll',-3,'units')
                                       unless $Tk::strictMotif;});
            $w->Tk::bind('<5>' => sub {$_[0]->yview('scroll',+3,'units')
                                       unless $Tk::strictMotif;});
        }
    }
    sub FlashButton #---------------------------------------------------
    {
        my $w = $_[0]; my $c1 = $_[1]; my $c2 = $_[2];
        unless($w and $c1 and $c2) { goto FlashButton_end; }
        $w->bind('<ButtonPress-1>' => sub {
            $w->configure(-relief  => 'flat',);
            $w->configure(-fg      => $c1); $w->flash;
                                            $w->flash;
            $w->configure(-fg      => $c2);
        });
    }
}
sub assign_image #------------------------------------------------------
{
    my $x = $_[0];
    my @a = (1.6931595338935,  5.07947860168049, 8.46579766946749,
             11.8521167372545, 15.2384358050415, 18.6247548728285,
             22.0110739406155, 25.3973930084025, 28.7837120761895,
             32.1700311439765, 35.5563502117635, 38.9426692795505,
             42.3289883473375, 45.7153074151245, 49.1016264829115,
             52.4879455506985, 55.8742646184855, 59.2605836862725,
             62.6469027540595, 66.0332218218465, 69.4195408896335,
             72.8058599574205, 76.1921790252075, 79.5784980929945,
             82.9648171607815, 86.3511362285685, 89.7374552963554,
             93.1237743641424, 96.5100934319294, 100,);
    if    ($x <= $a[0])  { $x = 29; }
    elsif ($x <= $a[1])  { $x = 1;  }
    elsif ($x <= $a[2])  { $x = 2;  }
    elsif ($x <= $a[3])  { $x = 3;  }
    elsif ($x <= $a[4])  { $x = 4;  }
    elsif ($x <= $a[5])  { $x = 5;  }
    elsif ($x <= $a[6])  { $x = 6;  }
    elsif ($x <= $a[7])  { $x = 7;  }
    elsif ($x <= $a[8])  { $x = 8;  }
    elsif ($x <= $a[9])  { $x = 9;  }
    elsif ($x <= $a[10]) { $x = 10; }
    elsif ($x <= $a[11]) { $x = 11; }
    elsif ($x <= $a[12]) { $x = 12; }
    elsif ($x <= $a[13]) { $x = 13; }
    elsif ($x <= $a[14]) { $x = 14; }
    elsif ($x <= $a[15]) { $x = 15; }
    elsif ($x <= $a[16]) { $x = 16; }
    elsif ($x <= $a[17]) { $x = 17; }
    elsif ($x <= $a[18]) { $x = 18; }
    elsif ($x <= $a[19]) { $x = 19; }
    elsif ($x <= $a[20]) { $x = 20; }
    elsif ($x <= $a[21]) { $x = 21; }
    elsif ($x <= $a[22]) { $x = 22; }
    elsif ($x <= $a[23]) { $x = 23; }
    elsif ($x <= $a[24]) { $x = 24; }
    elsif ($x <= $a[25]) { $x = 25; }
    elsif ($x <= $a[26]) { $x = 26; }
    elsif ($x <= $a[27]) { $x = 27; }
    elsif ($x <= $a[28]) { $x = 28; }
    elsif ($x <= $a[29]) { $x = 29; }
    return($x);
}
sub load_image #--------------------------------------------------------
{
    my $opt = $_[0]; my $color = $_[1]; my $imagedata;
    if ($color eq 'white') {
    if ($opt == 1) {
    $imagedata =
'R0lGODlhUABQALMAAAwMDJCQkEpKSszMzCYmJmdnZ66urjY2NhEREenp6d7e3ri4uFVVVXd3d5WV
lf39/SH5BAAAAAAALAAAAABQAFAAAwT/8MlJq7046827/2CYAWRpnmiqrmzLUm4sy8icwrZdozWy
q78cLkcMknwIgsv4mhCfpd3Pd5hGhU7oTHrqAZJVLWko1h2/UcRBYOSiz1Fy2XztCRgEH1E+B5q4
Xj0EDQx6bnAnfH1XjIiAPgENbl4qiossVoFIDQ5Kb39dlouBaIelpQQFAZ6koACiZUyupJqpnZOf
Y1mXK7Rwml9JnHmUjbCxv11nvjUEkUinU8dQTMy0hkgCBoXQh9NzQVbBpdcFBlWG0d9iuK2aSEgH
AQ7w42jrRYyAyz395AgFBhSo5w8fDT/RrAWDJ28AwVIGt9RxtGyhxX6pBkjqdm8XMh76/6Il7AcP
gbYFxLohiNgi3MR9wFTCa6BgIMeVHke5EukPG8mSJ0v2YCnx1Btm5BbCc5CAjU+iyoy+5HlRJrxB
A+iphBqj3ZGe/4QiYbDAIUGuKdwZhUlSqdADDhSgg4dWXFSFMcMiGaSAmyG0FCkhfedWbJKAG+nm
5PUJ5riePoEuWHB2cY7BycASjCxUQNmUPgAvoaryMed4cUHjlPAxU2PSPA1TCZBgbg3RUSeO1Hs6
noGmJXEHroj3aG+4tYNbvrwz4eOqQgtTiesUiXDXpEtDli1PQfXQy+nkcqyWs3QCv7+vfsBY8Mif
PqXDExDX9np2ySo+N/2PN8P6yrHWGv9xu8kknXQH/KaacAT6Ytp28MHDgAEoBcheH+KwdQ10hqWy
gFZ/hfeEa9g8yOFpfNmkmIAfNZhUOpH5lwSA2DB4lIsxvWOVSQYooNp97d0I2YubGRaQASV9YaNL
G1qllF4NqbiQjcPB+KSOQhGgzQC2dcRikO61Bd+JWIGoFJXuOSdmhCXBNcB3EIk44DVNFjaIAQYQ
YxqVX8X2nnzxBPBmknrwqVtxQ8JjDpIwDiVnPmz1Z6BYziyAjkVeXsgYgfxpx1kBC6gYH5BBCqmm
ZgwZYGYxunyJYWZEEqlSKnlqF6erOmHWqF4TXqpHLq88+iqiMAoQgF8OKikspDe+2Kl8D1oGUJ1I
cBh6l5+RyVPIWpUsO2JSsLUp7U2ImGAtQk3Oxga4vZyrH14+MNBAHsDKUoK71z7XDAM26esCvrk9
cgADBwA7A8AhLaPluq0c7K1OjxFwaRkI17EXvYtU/Ac0jGm86Q0Pf9xxyCJf4nHJ94qg8sost+zy
yx5EAAA7';
    }elsif ($opt == 2) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4qKikpKSsrKyicnJ6ysrGtra1xcXBkZGf39/ZmZmXt7ezw8PLy8vNfX
15CQkCH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK1ziL5O/E
/ykEAWi6EY8AAmEHNCKJCIaAmXM+gQjB4cCzXrGGx7Dm/f4QBgWXVjbzsoEA1dV25wiM+Jjusz8J
AgEKez0SflcIBwqDfIaHT4mCcyl1jzgEBoItlZY1AgsFC4UJnZCKDQwrnKUzDKAFkyWrrDEEigUP
KrO0Lq4FDQKUfbxEBwENBcKOxEAEoANrRcPMb6cNNtPUOYENDsHSy9o5CAsKAwonu+JB3ANz6uso
vt7gpPF3Br/ostn3M8YNBtTzt+2Ygz3wCJJwVsBBtIQKbRUYEIBfOIUxGOQ7Z9EeRhkS/xtcIwGR
YMiRAEr6Q/MgIBOV9xKZc/Cy38cVLAfQJGnzZpADLXem7OnzRKIHAwTyvFj0p4KAHZu2wIQUJcx4
mBQ4SLbUo9QUGhtW7PpVRZQFAR8S/fqpWyqyZVHIhBo17omsHOvaLfFpYrShTMtG6vZubVFbT3MN
3Eui74C3eu0mQst18V6GwLAFlhqoQGXLcdE8/ZbOMMazBcZq9vrV1gNYukwTzAIK8mq7gBQYGBXX
VpxNsuPBkQN8M0aNAQjFNm4yk/LlrD9iIh7jqiVbC2KpCs4s0QHt25mLw2RbhnU7AqZU4V4qyvMZ
568sIRL/CHgc9Qnm97f/Xv94IgQo4AiABBZo4AcRAAA7';
    }elsif ($opt == 3) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4eHh0ZGRmZmZicnJ8PDw6ampnZ2dpWVlf39/Tc3N1dXVxcXF7a2tmlp
aVVVVSH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/fu
/6oeMMcgDEvCI46hMAKTyhpzIfhBo7Ti4qDYXbE0wvbAyH3BM4ZgEOjWzmiZmv14T+I/gmJwGNDg
eC4MTHwOZTGAgS5ifGSId4o7U2wHjxKRPmoLbA4uiZgrRWsHAXUvkKBECpsBBk5BqKk4BKMICIcp
n7IptFutCyu6uydafAgGuCfCwyZ6vgaVubHMMnoDbAgNyUjT1DG0fK2dNt3eLb2kBsjkl+ZpArUN
pibL5qLGBgjsCe5hC6zZttUz12tLtir0yvVT4ezasWjc2i1sUUTBGjb5lCmceEKPAFYG/7QllMhR
xSBw2FyN5FeSBYFeGBu4ITHQm5qP2OStbHnuX0w/EVnyTKHFVzagNDcOBUcKQQGIPJTyRNeqwbik
JId2/JhOZ1CtDFd1RYhVKNhmXANkmxk161lRBkO+amv2LIBJAVoVSFaTGt5sDTS6BavpgK0G+nba
LcFIrYECV8suJjGlaQOZgusS5nrs8r7JACyGewxV8mSuhhsUmGvaLtWQiTMvFkVKL1nFb8VWjS37
LTjHDVh/zb0pdYBgUvv9rroN99DKahHc/gxWdNPS1JfqRnC8RV9Mq4wFaJ695Rw2AYRLG9xvEin1
6zW3R3cAfnzzmhwMII+cvc3wwNjhHzszBdl3yoCyVEQFf54kh4koAjBoiXwJ6qGAhDJ8N8RLBgpI
4YNgaMiTiC2RWJKJHImg4oostujiix9EAAA7';
    }elsif ($opt == 4) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA5CQkExMTMnJyVBQUKCgoC8vL9PT02xsbHZ2dqysrPz8/DMzM7e3t9zc
3FVVVSH5BAAAAAAALAAAAABQAFAAAwT/cMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/fu
/6oeEGcQCAxDkjBZKz6OwCWTVkQECAyfdDozGKyKBDK35cqqgYaCQJ6Yd2jFIIErv2Nf8KCQndnv
LkUBAXINfTF/gCxeCHoDbIhuijlVCAoNAw6QLYmTK0aDCnIDhyudnilohAOspSmnqCgCjYRyDgVj
QZKxVLOhmA50pru8M7MJtZkHriawxSRevqKZDgfDEs+9YKMOwbrY2V2008rfC+HG0twLwifO4UYP
ydTWNsToi76EwA4LmyXvslUSZatfAXvg8AVCgGwVvVxK7ilMpWpatwUP3EmciKIKMoKZ/xYcbLaR
YwkvXz5arKYxoUkVs6z8GrBgGUmXL08wCqDS1gIBN8/lhMkw1Mp2PErm3DmoVjdvAJUuLVrL58iI
OIdCK9Jw39OrSbNqBSDIKCuDuQIKNPBAJaaQDYKO7XiMHFy5c0/mqcXvFt68JIyM47cgQFqpLwU8
oPq2H1K1z7wsltkXwV/AimWuXFAKcjFGDEURhug5VjRaq57Wiyp2qEeHF+Ne1orkdQMH1Py1FJq3
ktOLByCG5T339aXcYLESp812G78DGXcDLiJA5dkFA4QPn/5l5kXLCJe7ltYYtznM4872ix6+eBwF
uA1eE59YwLyn2lnTN7l4X272ryAmEIEAivn3VACcCJjNE450o4ALpd1BnX+ZNJCfdK7R0gAwskGo
IC/NzWOhDBFy4UUCH2HyoB8fopISXwjSUOIUqIkCIIktAgLaPoa10RqIbH0UAFA6zOjDjkP+YKQO
aIgxxJJUkPXAE1NA2QVZb1jJkZYTcamQl/iIIOaYZJZp5pkfRAAAOw==';
    }elsif ($opt == 5) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA42NjUdHR8fHx3BwcC4uLq6urnR0dDY2Nv39/VZWVpmZmbe3t1hYWBYW
FtXV1SH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK1/jpOLl8
9z1HoSAo8IC2CRK4EzQIisKy9JvihM/AATGtWmtYQkArBXq/tUI2sFAccWf0DNsYLxZcuFIedBLE
BgYHehJ8TH5jgQFvMXGGMUIFf2yBBmWNe49XamKJgZctjpotQogLgQMMoCuioyylk6cGqYwqra4r
DogBqAMLtUmFuGCcYrIMA4MvmcMyTWu9A3m2zM0uO5x2swOpy8LWzgICnbLcD8opt+AmpVmy2w/A
JOrrJUQEdbyVAw8B1N/1SN0j1+vBqnnVAqpoR+5dv3QJFaJgOIZXuQHA6CmEReDOHQOn/x4oCJZA
4jUiWQKdOuWLpEkXRMZ1BOmwlsaA2GTq+8jgwTSEAF+mKDWO0kd+6ICWFJpLl8x3sx4wOHET55An
gKJhNFG1XiSslAwg4weqa72Ya1ia+2kW3NdJnsyNpBKRKQmiDQ5U5CWXa127AGL+6aSvZ9K21hjC
1cdvrlLAKYbIXCwWqd+gkAHQWVzu3OWlme2peXKAIDKRn0OfKAY30IPXjgEgbqYLrDF4PlOr1uy0
DkF+r8v+FdrESQCCUafqVv01X1hzC6gOf1kc7jHLy0NTDOs6d3bAOxRrS8XN5nSJkXbxGvtQOma7
RsS1xv3zMfOBWbd1c6l9cyIG7MVG18Z7xNUWCyqvbcUfZDmBJdZYyfwDGoMoHbceN7RI2J98ei0A
4QANsHKeVyj9hkx0IhJokn/rzcKAPANOyBQs+ZTDgAChjOjWaMgxkJSGDDrhXCU/AmlXGM6dsggm
KgY0UEVKwrigUIKVRkmR3siIXol2LEBADbOhsUMDOrGBI5g6joINWAsccBCTWnolpF4BnJlDmFOU
KEYDUsJpkhrjHOBGF2nK0Y4ACPRJA545SGYEH4zOwdsokUJWKWAiZKrpppx26ukHEQAAOw==';
    }elsif ($opt == 6) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4yMjE9PT8zMzG1tbaCgoC8vL+Xl5aenp1RUVHl5ebi4uNra2jU1Nfz8
/JWVlSH5BAAAAAAALAAAAABQAFAAAwT/0MlJq7046827/2CYAWRpnmiqrmzLUm4cG4ZA2I0h7wDM
/ymBLfAoJhpAlS/JpBEIgQBiMSgkdEzSMvuj2aBS6mBB4G65PC8YMR24FwnmGb2rfaNTcRX5m9Nl
dk94C1RUDAp9E39JXkNhhG4DDAVYMX6LLWqCUm2RBwN8LpeYK42bbAsIkZIMcaKKpGlCm5x6bgwH
ri+wsXVfa6iRDLitLaO9KI2OtXrDB8Urx8glNJpgnKu4B8+hKNLT1IG0ebfb2wvRvOCZ4lHYnuYH
D0rq66XtzLcD29q6Jt/2TAlCJWaYtgMOKHmrZy9FtVkDIUl6Fs8BohMAA9a48YQAuVu4//bxq6SF
YcNk4p4Ea/YMl0WMJk+aUNbxUbZVz0hmXEdzYLBVwg5cLClBZiYhv/B0kvTGzQF0JXaCe/hLgRRs
2priCiV1GtWkV1WJHDMGVxmiDoyWEpBynJhPhRgkjBpTLQA7SAVdE/vszUi0dlXgrRrAKhG+DJwi
5NMVmRe8BBRENhws3raXPeqqrdEgryDKhKjEw1UAcOAT1dpeCwOPHwPTp2ci/bX354KDDl5nLho7
XCCwD5iFnphzd9reJKrdICzlAcHQt7XpaBxLB+QnksM8h058umajqqMMT8Vd5AHvvJHfhRgFNHTu
2hwgod5r4+rD4+Ffht1bxzLK5Lyn2P826B2nHltPBOfOT2MM55ID5xmnXnKzILAgg01JAiGE/MVm
inMIFMHGUjgh9FSBE95VEydTEJRYiQjNI+GEdlgVYos/JRZSfK7Q14sNNuLIoEHELNbhacpB4dwA
Iy6lY3y6zaheIFeFNqIwE0EoD13pIUcliIR8VI6W8nFpYH9fbgeSORsOUImPmEA2iERrXobQUFL2
l5dwBblkIoQ6fdfQQ8AM19qGc/0j6KAGdCSiocQhekA3eXo4y4Lk6YOQBDEu1KWlQ9zIRlCbSsAA
SUcG1ugpBLHiJ0JnwfSpqvYpRWd8CJWWApx/ODGQc80cVNyui/IEpK16UGSOAOnMupmUr0p1QuQz
sRLrrFHMOgImU9MGYEyxXrGXYzkMyLjLtTIFEuStw+DZ7Jl2qeEOsCANU+258G52BzbNDMCsDLxy
sZFVYBa0AKXfohvQpfkM420iCk9VK7CGPICwJeDG0gB29E7ybxIBJ7HxGoRYjEbIXQiggAIhPnDF
HyjvYIPKBORASsx1gIPzhCL07PPPQAct9AcRAAA7';
    }elsif ($opt == 7) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA5GRkUhISMjIyG9vb66urjExMf39/dvb21ZWVpOTk3h4eLy8vDIyMhcX
F1lZWSH5BAAAAAAALAAAAABQAFAAAwT/8MhJq7046827/2CYAWRpnmiqrmzLUm4szzQK1zhpGMIj
NI6c6yakOXaPByGwSACLtgm05nD0CMtAQJEITgHEb+zYU2oL6IW3GBa7dldsAM1gdNlSt+xoSGKz
dAUCQm16K3wCAn9ndANqOIWGKmR+CwuMBQwDBQ01kZIofEqLc3N1mgk0n6AmZH2kc3R1AwQzq6wk
VYmjBJeMswOOMre4ADxlsLEDmgMIqUN5xZMCPH5ymMwIA88v0dIoO8e8WabZ2p3dEt8qBojW5GjB
wQgIBWspxLhVcHGAmczN6ClId2DdJH7vfjWbRw8dPm8GAVThU21cOYb0tN0zkY/VRHEW/zMtk8eQ
24mOoD5WJKDEV6NsCzeSQJnS3btLaAqMDKYJwYKH6iKe2Afyz5KcJE8FA1pQ6FA4SSxqmRNwGYMC
zqIEdZpLVNRRlqYG6Ingqk4FG2mCCodsnC+q9OpkQpAWolObUbGExalTG52sHO0K3Vcmb68FS3DO
m4VgYOCtXCVC9WENMZOpfcvGfNw0suRdhvWGjdUzIAKHYARHpJSX1yWX/zI2M6lW0mQlbt9S1VnV
8UzV6wj7uak7Z7yMvlNDvmvFh1G9vUrFQmOK3gDOniUeCf3Hl1njSMti96yr32hLxhmUyqnteona
hqwgE3s553f7m38vdzr5KH379/FGz/94nvVH3y8BCuiefp1FJo5eB76UXkAMrAGfG+4sUsAZpGny
XTMHiPcecN+U94AlsK0nklxk1UMgV8KZoSJ18Yxkzk8j7rcaEkmMZtwZAJFED20kShPjNZnQKBJJ
pqF2oRgmtlTKVRwCIyQCJxVZDGGKXDPdhv9YlVFj9zz5RZRIgvePOUNmqaNBGZ6IWXoAjYmAAW42
OJhEifQiI51sIqeVnoNVZAZfSdZpp0kMkkdGHBzSaRoCIQ4gk5lTIHQYJvG0mBGOeWbHTzLK1DFm
pTIpRyico3o5nYcgfqoCpkXo4tymKgZaT6qqkscjhHOewsCYA6AWamQZjvZlabKuQGumDkH04Vxx
nQqJFkHIVkGZq4EwWWELz+KAJjyyKMWAsUwh22p0HZo7CDRvbvnoKJiZEqYdw2iZ0jGiBbvmuzGE
a4R8YM0pCyeq6Bvfr5YZzMC1CcerTzXAvspALZAojCElFRuHbr4S73uFnF8CnIPAe1AMDxe82qKx
GDsAq8ACArQc8aq4VIRizYag3IIDDTxgQAPtsOJzdi8irYcITDft9NNQR/1BBAA7';
    }elsif ($opt == 8) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBI+Pj0dHR83Nza2trW9vby4uLuTk5JGRkVZWVrq6unZ2djY2Nv39/dra
2lhYWCH5BAAAAAAALAAAAABQAFAAAwT/sMlJq7046827/2CYAWRpnmiqrmzLUm4cG3KtwnZOGs8S
/IFFgkHTvSZGm4FXKAAJUAUiUUyacNbZo+kkBKAExcAxzZKwZpZAsG0+oYOxQ5HIotMqA3sbcP7A
BHEODgQCSXd4J0sPjG5Af19xYwMIVTWIiTsAem2OX39wkg4DdTaYmTRrbX2PgIGiYwumSJl5bG5+
n4BisAcElkcStSlLqrmgu7yTkwwxp6iLnU+6YQrKo4MDzS3P0I3Hrl/WvKMHDgfa3LTDJsXfrF5f
XmAKYZIDB+YKwCfdeMW3PLGSNy/UoHP5EARrwA6FnoCejsmrJ+hgPgeybqxruCkarj5+//zMG0Du
HMJ821D4+2eMixOBoJTlm5lPgUZhHHe44wLyR654AUqenJmx38aG7ras+vjoj5xB5syZ5LfSTFJp
TJvak/MUqkKjOHNu2lOAD0iYBWFlE5XyzFF2Szg98OlyYNNxCg6OElXUbViOxfTUdbNA4h9r9i6S
tOYALEOxcSE2KZzLx7RdCOOEOWCoRNUsSZtIewMUATIx+RaL+er3MeC4jDo5sty0VSh91sZceTss
8h7Z037QBhrp3OJzKT8niauHiVKen4IAMR0PDL6954oqXx7aZQEfQGm3ijTmoj7PvGtFfgeOeHRq
ua9nQ/8XbseAdgm6h0RQ0kx8RWxnxP960OkHRW0FRUFSICZx1hpk9+H3RD2A8OfKOAqeU4qAOqzX
hmVRhAHGZZohZmIcBxTwIGRyNUJaiBWGIomIBmXEYQ7d/URPfIhtFUc9QIoxiI3pJQIQcJAAcs8A
MkqCoZAHEFkfXGQJlIyTUZCzWDUVSekaYKrM5QiMPjJJEYo/AolPPl6Kdd83OmapzIKioGNmXgc0
cMCGRaIimU+ukLTkjxURetI2Nyohl5UTLbnXYoIsOVOAff7zUF0vxmfOjELqheIg9H2J1ENLkTZO
RaNwmc2q5xAQqptjQfRilp8KyiBXckT5KoQ8rJLkLveMQmGkqDq4ImR/2laNlo/CMoD/nubsNmVv
ixQIH5fETqLXSawBkKii79iG1yuraksTtKUc+xonVopIYadPrTnUATZJK+qojBSmrHXXYFNenvno
2Ze3lbLEiHAJ0jNoVwEDfAAw38rg0ZjULOtoVA5IAPDABE87jITIKLzwUwDr6QBVBaexB4JKnhrs
SRPoqlLKoDEw2U8TWdwvVNDSe9O91Pr6KxzYRjqvA23Z66ZcrCxw4I6DWiT1AytELAMDB+tbUJC8
CCXVOd3O7DE0bNh1IIWBzImQXmGLDfQwDAgw2a8T5YaNVHL8os7YRgrAxHgXvvyp3nu/PQwXcwVg
mn657UwJPylY7UIxZQ23oxhaTlKJcgySTy6rqfEFy/FCsJKwhQ9d5Ix5oZ1dQvNyJRhAmbKhj7F5
Dp2zANvcjJekQOu4v56FAFjP5QMCIs+RrhG5t2BAAc+LtKwUwB8ifBYJPJDAhARMATnz11shmGlC
+D1M85PDin7phYvg/vvwxy///BtEAAA7';
    }elsif ($opt == 9) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4uLi0dHR8bGxqysrHFxcS8vL7m5uZqamuDg4FFRUTQ0NHl5ef39/RYW
FlZWViH5BAAAAAAALAAAAABQAFAAAwT/sMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK1zjgOMae
z7dfzCEoPALIAKOgMAhVweeKJ3gUrkmEFsFYOKSkKPi0M1Sv2CxhTSh8n+JxiWeuWtFZxHpAYLxz
cXI6BmYPhngFSQFaBAMHBAo/gWNUAmdoWImKegedAQs4k2BlloeJaYqLnJ0HCn8xok9ldaaamqqM
a6wDfkATgmSEtHepW1tsjQSPoLC/wCSzlnZ4ecbIrMvNEs/QdNJ3BQxZqkh6erqdfMwvzsA7dIW1
msYI5QSM2OotsUKkpeCn6qWph0tZowMD+Lyy0c6dsG9Wltg6VQyfo4QDArDb9mxWnWnh/zJRS3IN
I8ZIUBpS8vgPXIBTItUoQ2jSkZMU/HJEK2UEk0+KLxfNrJkQQUqODgm19PkSU1CKyi4SRXkiZ413
Snky/RlUySKaCGkmPLAQgFUaLJdS5NrU3iM++QZQLXF2xk61SH7a8hpgDQJHrO4pY4hUTtoH05Y0
dZpInFe/jcayaVVV5aiH//RKbAxzU73IfBhpNFF3iLeWAHsiEacliTjHSKImOLCFLGnLsk4jNiSP
2q1wDIKnikpbC2W6uPuZ+ci7eU+nSa4oDiouamgEBxjcLnyZeXN5xBYpCZm361dHWhz9Ke2CCBHU
pjZjaS1RcWPHe+AmXJ/8B7xvWt3CV/9rL70mzi3mgIYQVey1EM1HdizhWD308AWUTGL1gRx3UqQF
kXR5+EWQhLAVdA9N92zYQFIC0GKHKeWcc48eq21CkjFhHaBiUstlBl0ubBA03IzGfPXIjoLc1ds8
ucg4YzkJsYHLKkgaplst0wkFpEFrxPbII1uoMtMbDbLgT4DmWXNOOiLqEmRre+gYRn/+ZXVJOHyJ
KZh1RM70yJOT2WYWnTicCRKCQiHjJ2T5iYhPJ1VaCeEhT9mToC58lBTljGskwEeko3iD2J1ZmngR
iiWBqccAnho1J4cd0jEqjJ5d+tZYqh6EDEajDQprP1R4B92Umm56Dq5fJsQgoVcpSan/Z5CtgtGe
YDli3TplTvHfN5lM6eRQUZqDkK7pDMDfr/49iBiItV6ajLHYdYJOJ66+uiIwPWB2yYDEBhqWm4GN
xct29yapbxGoxCijjBi95XAnnu5HsDsPalXNlphaCxhRRVWGbp1X4kmOkwybVC5GEcvlccGSCsta
X32ds2ZcYSUUsaeCgtodLQnLzOkefp6KcgKeJjCXvR0NE5F4alI7U9BDF52zzmAMI7I5jNg67y5R
e+oKYSyHSgRvAx2DMcDg2kz0pzgx22xmF1/KyTXVsmrSOit3RAWlL2f989Zc25yQdkeFTUkhqo38
d6AHcZzRRoaP0eIhElJI8mST1fRvvFkTJ22GEcJ5e8yuJwOWDeTcDLIAGhNmjbW/DadzAN6Fp94i
EVi07reT5ZZLAO21cyPMHa8pvOWX+dAGfPDCf25FRe76+eU9nDPf0QKHCAAbPddIn1311j+DvRXP
t74nwOMerU3kcgjgAPGhW4MOYL2E4nadtagho+xdCJGtadhjnZ7mxYCb+O9+QliAGSq3vz58DQz/
Mw0hFFAd+rgPGBG0S758kDpfsa+DIKRaCEcoghKa8IQoTKEKPxABADs=';
    }elsif ($opt == 10) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBJWVlcrKylBQULOzszExMebm5lVVVdjY2Hp6empqajMzM7e3t5CQkBkZ
Gf39/SH5BAAAAAAALAAAAABQAFAAAwT/8MlJq7046827/2CYAWRpnmiqrmzLUm7sOg5Qy/gJ57mz
KIlAIyBMHAY0nmundBWAREKAQKUKBITG4dbUTbqsQmEAJUarhKsAgWgsuF0mGDUml83o9JrdXszl
cyUOdQpACmZTU3l7bA0FcV+BJ2IDdkAJQXhRilcIawINcDKAgZR2mJmIm5ydewwHPKRgg2OFhamb
eVVqnnsJoi+RkgCmlbeaibp6nZ5sDMAqsk20hLaZUthWaFi8ald+S8KSYtW3qdhYi9ytfAjgwRLD
NuSVlphnypzLzQgGnu/RxJUypeDUOUVplFHp1Q7BM3gP5NEzZk5VFXy6mLHx5xAaCWlN/ybaunPG
IjorjPpt/BUwniRq9UYGwCVFVTJvfDjqBGgCJI+JFI/ZpHlGo86ND1H4xAHU0iGbUBNNSakyp4EE
KZbKgBkUVVRENaNQ5cOIJwCtM4BaS3WPCK5cU9t9YthGqcAu5OpYmmnRLdhcOPeoSePOi8s5TUfS
rBnkLaLBDbc1MBwxENeuZcLyRZZtlwAD/tIRhoOWxeWCiq+ZcWySSoA1oBGgQQCrRGnTaq09/So1
GUIrKtEYmGz7Lg9a9ey1Xc23Jhqo6DaKZsPl9ooBek8ZYgvWuV9kZ8guNFD7rPEcIlNjunRvueu+
vgmH5kPc/GG8BNcmMFTG6++DFnHTkP8ASVmXwiBB6bYeeBh9xxlKciFwg4EoIDhAAk7xRxRGzg3R
3VQCsvHZAB+dhwNyGRZChmqLPPdXZxexUxuFJ6BIRoKF4OFZGgy8Z9JvrulBW4n3hVTMjSNdoiNK
omkmxRXa/NYJVvZVhhghSOp3TULe6BKFiE2yUleVlhWjomLMebbOYEF60yRwY9I4SX5otpaOmyLu
0subQhInpyC5KQmXNlDy4omavajTCJFWgpFXgm+h0SM3DDAimqFvfuaPnyZuFWiOmmzjpmCFagSl
fKBxWuQ0n7qHUKmG7imkAYNdwRGVf5JATTm22CQqYQ01sw6YIZLH6Etq7ScUjHd+Ahv/WekEy4gB
E3Yqw6O1yPTiLss86w+XKeEk4bHjmKmfVNvoIeRGh2Ih4p58MFDcqkrYmKWgeVQ6ak6HAucsRwhQ
SWa52MWkbTLpdjtgrLD5Y8A7uZaQ2F7xVaGvuGS92w5HSQ08UHJdrZIRrFVt3A9oKAvssaP2oobv
yHgCvDHKKBc2b6NXZueyapfW2slRVoH2gD/y9mStp9mF/Gq3+mYcrNA0l0duuTovyy2Bw87Fj0oo
D21A0UbTaySvW+7IDbCCPS0ByiRSNkwN1fi3tLrdsGMUzWO6/TYl7JVdaLejah00G2at/HFFRaUL
K8b8cqRASzjPYaGgQGLdrOANyVyf1F1i10vQfrn0qA3gzk4bmUeGl1JPewgzSbrWMjtU+M3yEMN3
jgk4t02lVlxsMlltrxCxCdT0uqU+2vg+oIizhx354SS1uGas7TAQPES1k3D7AKEqvg+pnjDQvN7Z
374YzK3sMdwjoxzt+SnNtQ4u9SzhMHwKfLPe+tmxWq/E/RVCAu66xySNbKEJAMSfMfqSkKatIQHs
Q6D7wGCM8zmQAfUDQwLxJ4Y7UEFfGBxfDjZ4IOwUhAgNaACGRPi/CcojCdkjXwxn2D4R2PCGOMyh
DnfYgQgAADs=';
    }elsif ($opt == 11) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBIeHh0dHR8jIyKurq3FxcS8vL7m5uY+Pj/39/VJSUnR0dNfX1zQ0NJaW
llhYWCH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK17IhKMuC
IIGFQtDAyW5Gla4QcDgIh6g0SnAsiskUMlvSPZiBppNAJk+lV25pmzV4C/CwfFw2RwcDBgKbZScF
Al9wg01iTk+IdXl6fDh+OF6CYIdjlVV1ZnkDCwZGjzSRcXJzT5hQB5h4eAcCjhNcOgKDs2BhpaZ2
ZKqqCzWfMW5fD8NwggG1TaZSdge7AwidR69JkYEFkqJzZajNVLpSuweNL9OQgMPoxISTY6hQp3VT
4eMqvy2AgenX69qJ3u7boOxiMICejXKgYuVDR2sUJTNVkuFyNkBcC3srFDIUFodJLUR0/x7SyYSH
gUkCFxHmcHNOX8OPiao4MISoW0lVBBGQkwBJI0dsx0iRoWSI5p2SBAkOULACIwo3kTY2JGWJKKVD
zZCaVBrtIM+E+BjSQnZIJshCV2cSWIRUk04tKll0YtlSbMePZsvModnu5sClcL8Co9ty36ygiANg
mkl1JlaK4QInSBjL7t3EtuowRusYKxVnd5iecNqFsLrDyISCPMQXK8k87qJ4nTzD9OljqcNcGsq6
khNbIdeaHFCm4Oi4GVk+yNfRIeeraFE5cffE0KVmJy8FOC54cCDmZDv/3us4WUhbfNfmGbqWO+3B
BtIZAw49zCSH5xlbdVCSOuA1yCmhHP9DqtVHn1DS6TeedeuRwUAvAHbXwoCGTcIba0KZNZ10exX1
RFYVrYVShO+5EAwxt6G3Fxi45BIRdGXp4kxXpAEAlTVTjYKYKPFwUxEVRKV3ijN81GjjGwTmVgs7
2xzlTVq+vSMccRACUONcdRVj32Y68nWUJlJcdclIH67ylpUBpkAXioep2Fg7X3Zz4RjELfYEHiOi
KWFya56WG3BjblPRoKuEeN0q0u221plG3rjQS8992GOhfxF3ZzeJwnkAiTnYiI812LDTBBXcnGIT
ocPVqd4q7JW5KQmN9hmqmxIxc2pWWxnqZBQxdcMpfJWpg5uougUEjlI4ISpQf8pU9Ov/SmF1JIkY
2mACDqFIYYodqxsS9KqeJcrlKHhTbXYLRHfgutVWmPYHkCZ5xuoTR4eN1w661+KUK57bxrZIvGk+
5cVC0/4Zo6npOrNubCDK88yzJkblkgOieJQZNxhDtq6umiBakmjg1iYxR/Zhltk7We2qr7fFhQNi
kQGfMKBLuO0oB8oIJzyQt+4MekYeJsT6KY4eUVxzUC7+DOJNDJCqSr5nhpwDIBq1ueTJOeeLbaqF
dpNqlVLLIICjsx69wMUCaY0q18gmi0cj8o4dLT9tfpjutk+31fEiSSmVJ6wxyyx3YR6dXcDZpGjd
cLIb972uSSADvqe4fdLCJZzYgsaW/1Jtb5VArrOBRbgoaS27dN4KM873umBLHq6JWRpWbJN6awyZ
Jp7n2hXE8Fl2jKRDsuXX7Qrn/vmDktVQ+SwP5dt2OMQ7vnA9gQsMyD74CVop6hQlhfu+kQdd/VPn
1F2Kw9G7vffjejQ1PgqF/S4G7afDlv7Gqvwdek/gLcBEWaj4UebyVj/8rWJ3++PftLBmKorIA0TD
2dcqwpfAnggLOAhoIPHUxjVVULCCFpxPjB7IPUp5zxkFiIGR1BQKJmWta6fa4AeT1wblEOJgZ0Df
ABHVCmlMTnnlO5xjpKS0rkHmAA4wiPt+CETszQ4iGoyhM6Dhi/fJBTzoKdULv/S0GWKmhIk4uF4c
7oWuHy1NKZxIwgpdUD7EKSpt9dsEAqsIRiMYoAFf+N0t8pWyNKphjTlowBgXMKQz7EEN4qujGhqw
gyYQEgE9UIASuQBIRFpyia+7pCbpKIJOevKToAylKDkQAQA7';
    }elsif ($opt == 12) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA46Ojk5OTsXFxaysrGJiYi8vL21tbbu7u/39/Xt7e5ubmzY2NlZWVtfX
1xcXFyH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4sP3KdwvZsCE2h
KIFfocGg0XItHFL1MByAgQVhSkBYrYRFobhUKbslQ+P5C5jP1PQUQVBwwaRv9yEQHMi/8tmspiIG
Cw1HXXJIOzx3B0GLZgtnjgtSaggOBA1ghTVNdXd6ewRoWVGRowFUA4AMS5kxTTtkZlBAio+SoFm4
o1UDCIKDMawtm3ZknXmefGm2U7a8AwG/LsErrsRPidh5scl9bH5XbG/SE4aHiQrYxmVQ3GveaVao
VarA5JrDY+np2uy3fn3wrlwaJ8HGMGv5sh3rF2mZsklXLAGIdmLaiWp2rOnDs61WmijM/5aB40Vv
hUUTBxvYSXhtoTY+kKZ8yiIlErg/BAy8sOfiIKeN6tZ9iiRqTxSQklD9AUSxxMmJBsxl1OfypSma
R40erbIGFSoHAwocifYU40qq6I7tcdRIptZPV7x6RVCyIk9qm8YQY4lH6KOipt5mNbVULq8FTU9W
C7AXW4C+aoE0bFiUndEFhQ2HvXGXyaGVY/ItDAJEqOSPjN5inssawVinnVGY1Rg08hkoyzqqrvLn
JqoCKCyaPcCXn+C2WI/P5B2XN9nYKGfrU95IFym2gy+n4YVFSq9f0x743OcJUinspIyCuqp1MgGv
zKaUoBE+6mfRiaqbIgU49aKaSGGn3/8ulZBClwn1fWbND094hBV2yGjHVmlaWeEAAvwBB1tBTLhy
X1VtsTFZexM2UpNlWu0CiHmDBCPdHbFYld1tJvZHhSPIUGiKPI5U0SJ0JHhYByfrlLcHO2X0URNq
26C4I4Y7luRiVAKYc45aWhUJRXzeRCTgbru4oyEAU1I55BjocKSff9X905s3X14myZsIKHBEmUP+
VNsnyhHFG3xsCAZJM2xguGEC1NiXJ3H7+PelFKHEoxScaw1GRQDxZHEnkAAoOuQBZ/VFWqX7xefO
SN4MKBOAhBW6KYeyzYaIaKOZGEWXk3AXz5tF9RbSUZi99yqiKYhnJie0lWZkO1wVelP/Zis2uyqw
awzrmaefJhQjO+i5ydykX4HFpZfpXeUafUAKuWg2scAS2CLdqGgYWO8wV4V5cxJgbbHYnpVQHmqu
1c1ScckFj1I08cfVvrIdO1WatemBHUCnygUWwvJOi4uhcaRrJqj4KSQLmGswF8/FcmHxHo8g4YRY
x7CicOyVDObXkWU9wmNyYQ5crPLKIRFArwKHrqAgMQAXc+TSIHHV7K7ODNAzL7i8V+/KYTHccB3/
NrrtIqXlu7KkBUstbtWTYvjnQA8EMzPESLOpLDdYsDHAqZmd3RWvu7hWtGd6gspogyOD/ReudRe8
FL00gfMNhj/GfNFnifiLZZNliN1l/2+6GqYzhpuL9Te/nLCk0aik6WjLrlB3LjV38nDX9x91hceA
RizxI0t5f1JtWKFf/c752GyINzrptJ3T0aPeQZsyz8Jr5syYMBNLzU81w8JtSM1Lr6vz3gtvxPGk
NwDwS4qcdnD4I3nP89QX22mX5LFyTbNu3rkTLsrOgA87yj0Dy8WMhyBOzed2GtERTCoWvPCxJmoW
C+DFRDc/67HASspr0/ouxr/ntU5S+5uaviZSwVZgUIG6+FYDX9e/tIEwglMbwECCY0CU2E8bbKEJ
3rzSQQg6MFxekR9FngIV+zXIQd/ynw9baDEWMsUkNUQJAjM4ijmxTnpXLJsTnZGTpvdUzwYYPCJl
mue/xGmRhTehhxeJGAYjomg7ZXzWvMDFhkt48Ys5uN2/+vE4zsHuWdC6iUQIYsEZlO6I1tkZIKHm
R7IRQADj2wn9WoEIY9ToaYuk01wctwBxJCGKTLDGNvyxOWcB0oVYUIABIvnJScrAAAywZFsw87NM
ouowB7ijF0B5QTThhoymzGT/MMQFXdLQlQaJJYX85A5FZgYLM0QCG1sQS0Tmb4eBDMT4jMkZZBoi
lgUwETBbmEpPEoKXmniFAmICyAUcoJgk5CYUvQkHV4RGCEMowjbhUEB68hMlQQroP49ZyIEa9Jwi
SKhCF8rQhjq0AxEAADs=';
    }elsif ($opt == 13) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4yMjEpKSsfHx6urq3FxcTExMYiIiH5+fv39/VlZWTU1Nbi4uBcXF1lZ
WZycnCH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13OjGzyv
47MbcGUQFAqBh5LAJDwCCIWhMVQJq6WGo4DoBr7fh5OpVB4QAiqWdK0Wj11u1wt+lu+PwmLdxjWM
W0dycAhcR2CIZUwHe0N9NEUOgYRzdF9ziHViBAhqNY8yRQJGlAhQpl9ISZlQp0lkCjigLQ2igXOD
gphJSolgqGSdNLMrtQKShILKpXW+YbxjBwZBEzXGo7cIgVuThd5hvXeaS0qNLsQotbbLyNzLcqZ2
eE+rikqx59UyO6OAglsKAinQBW9cmUTh7uB7oS8GD2zIjrgbOMmQnExOeNEb50SJgBbo/7I8PCaJ
27YjAwnuQqXEEqt55lKEBKAOokmBKN8RWhWmEqqfGjc98GSjYbFrJSMOTJlSmTcurOL4RLCRzCZh
Mo2qqHmsQLuKywoZQvXs1KBKeJqIebDwBDp+o7xKVNbUqStWp576tNekI9ESb3uQkiu3rtOLz7o8
weXz0Ka+wbJKYMF1S6GJYS3qRWjWWyUujyGLmeZWq4kdtpClzDZWqud4B50y9qJ2zKYDRScXG1ky
52HXjWHTE/t6rKKOeGICmKUudcQCTU1VaiUd3K+pwHkFsN2LU2ndKbiSBAsV70uel7CPTTQmEVFQ
qJ2/I1uWp6XpvrK3esDAiSkkbcE30v940MEBB08HbQQFPGi1ch1wVBHQ310mCDhgb7iU90pGq2Qo
lYZJiKWSF5uYNRRgptEkXm9Q+QRNRvScQcdiB/Iym4hIlDjHA+Y8ApdNh1yCWCY/kajdfr2IGIdm
ES5G1UI+XsiidBoq6AVx2+FRT0u5KKkKE/sFgCJ4JvQgyniBBMAgItK5GBQZfTn54Xqv4DFmAukI
ZhNYnjUjY14zriVhf0l+6FodyJ24nGnNnSlJQHXh12Gb9G04qFWAYrJjGMiR9oieaLqji6arnAHO
YksM2h8DhU63C5JPNNKHMQ8lhRmDQxp0nIS8qpWeKQRc8qtCbDBahKOqETZiM9s5wSr/nL2uygSh
+2H6GS8fLUpmFv3s+VyLryI6xrjT9sXAuefSA+cDbZb3QLafdovmP0GqiUlLVKVaG6+rMjDAAKxq
hBygdciaYiTetnMgcfHklWpo/qIrIcAdWZrkXeUUuy0JkThA4EkqrbcYp7tKqyqhu2aE32ga43mC
MSVRdIsgAym5qWIPkzsowBGjLMa5wWKshBqz8nCTMgvKxm51Dtap88noDqDWEgGzxKqis/4RUTZL
6pKeK2QJClkT6PZcsVDiEoBby+F1HNaCSv46Vc7TAt3fzhTL4+sTYyBwZ9sKt+ibg9i1ovPdl6r6
79XQPBssOVCmCHM3l8lVXTw3hhaa/7mKM57Es2II3KPkbxzmFUAMUorW5pxfWvbZtgX1QIUp0tRV
awVSXqRUnI5d991lp8vXAXj4/Xd4RtScIepXfjbdY0BDTXbE5QqlBKEExDRLJJT4dhEd0x3QrKo7
m3wuz73Gif0B79VOkwHZmIUYieIfID7VUQcv7fnB/444E23Rlsva1hXwuYolyDkA1PRXLrNJrF92
I8NfiPEHUjTPgFBQ4P/OtzgHnsx1/CIAwDpIgAAKsAXwc0DNDEG4U/GLg4vjmf5eB8GJdZBVfzkh
C4w2qkLoCnoR+5cMZ1hDu8EQaCbU4W4EEClTiA9Rm4iaEHvGwPT5T4gUW1tuBliMY/+k5FUJ8h//
Rog+Gn5wVTckAGm26AIdkIQSW9JXf3g2Rf4REYJVVA7tNga456CCeAJ7YfCGaMTpEZEABWAIH5H3
LU1YSn90jF7dxChJJhhvBTMhgdZkAw4F/gySMhwbJP/Hrhx+h4su4OGonjGuO/bvipXkhClPSQOY
Ie0ZQmFgKCcJPMTdDSsgcd9WSveNU/2Ml/uL4OsulYdZshEHKQxXqnoJPLIJUjQHyJYMMomCBUiC
aXdIXAP7BcJesWuN2xQmCguIS0NyzmQN5JUCnIlJddIiEl8AJNVCuD9B/pKeikSlHxqwAAFI5zgb
pKHZEIBOWdhzHwZADBAHaTe2ADQ6BtyMgQ4WoAAEEO+Ty3zAARSgxypktJYGKCh0PIoSkl7UoYtc
g0xN+tCZ2jQfIsipTnfK0576tAMRAAA7';
    }elsif ($opt == 14) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4+Pj8rKylNTU6+vr3R0dC4uLr6+voWFhf39/VNTU39/fzY2Np6enhcX
F9bW1iH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm7MOnQt3yiMu46h
IAjCYUgkNBAFhmHn0jFRDkWAIDgIrsTsUPB4EBCMZ8opdjCCxCs2KxRa1VeCwiEukZmDIMF94O//
e0NucFYESXV3NwxTgEZ/DY17kJOBVn1VBwh0TIk8CpQNoaKjoJOjlVpDczudLAYBpqEBs6RGpbaQ
qIJ+YTetKgOwpLWOB6Btj7pVugq+EzIOwQ2ztLZ/s399jpHcWoMLmy2/JtHUwrG0ooDa2ZLdfVoC
mk3PLdELAfihuObT/rnr2AFsB28LvHkv6rEYUKChPiPm8JmrFgiZtn2SGqSyRKSBOIXA/wosKCCM
QL5ZC1JOPLeu0bBcHN9kQZBQgiuGEkWpHClRYjp1bdLhslUQ05o3zVT8itawIaynKfFFnUjM5FN/
sCxuwYJpa68cIE8MYOgUatSdK9Xtm0aVYpYqR40eCGeilQGyZVHmO3uSaiy2/cwNSuNtC02wNqGM
deiTr2OqjkSl7SdkjRuLlb/aCUvibtOpoEH7xShr5Uo+guANFYQ4gWK8Z9Gi7XsOqGnAWQN2lBVq
yIATiTwzVnlStr5/sSC2hVzMID9I8oBzXuw0tt7itNdus+rzdkboXIwBbqP5jnCH2KVKNS2U3eS0
kgM96IPVzYK6YRninbZ+NntqgGCFG/9uaQUigC2wFBEOGdHgNdFZBLKXyyg/ifcUewYeqA4Rv5FA
xl0OmqTef2wB5chVEK2FXUTUaFTEZZlslhgJ1FWnV3ej1UJgRhD5xF92Br7o4iZOMFUAWf3t1SJy
pghzYYvCGEMNjpTtw8YeAvRS5Fh4iUTSdceU8uOTErlDG5UlNZeaAElt2dRwU/4E0F/9lIaRhbdd
JVlu2hxwHwBOcNnlVJS1ExlgA7lTkVV55mbnJH0c5gQDZMFGJUaXNZlmI0JGSCFvFwLUBx2B1ujQ
l4/CJFkoKnFKmGolPoWMJE/CNCqgCi0Gm0jnLEkKLb4SpMYuFCZYxJ5rFRSGDg4c+eb/Z1nxttaq
T7JUmUxX4pIardK2s2w9TA1K0gLUAvVobVZyJJdlkBRxkbVZNMPss599Cd+Esc6JilFwqaHoFt+V
dJS84Hr5Jk+X/vRdon2mckUX7PCBxXdYpkFwYuU0tCtxfYF6ShuqvQXXGw8so9vEQL31LcbB0CsS
X4Glma67g5QMx7DLsGNJgKgdsLJrANzjMsIc1xlfRQ7zW7LN8wmSS1c6D0Jqrikd7GXVKJUmc5o6
E9bvwzZfhCXUwk49IwMv1/vYOT7Ris0uIRt089JiU3GZqwR4qJABTh2McMcEqihqQUmTDHEyBw7R
7lt/FnlkPn4/NiaAJqUMsiVxgX1g/0bbUgF1myAxhNKpU/F626rF9CzTyDcnfnlRaRAZur0j7aXP
ik6CWk0RI7+F+cOJQ82VZTICTUKzLNaJ0nFWCcjIRoOtQYi6rQ+bFK4zBj3AcZAFfq6sbCTdFRc2
4wx2+UMsoXf2AKANpZx18jORLtRzRfLNW3WhPxYeFX9Cs/Zikl5e4jxbxQR9bxhev6ygv/0d4HrY
M14JRIc6EUVlVXuq0BbKN6wE4m9uDbxC//x3Ar7JSRYwk4Vy6uRBDm7lgx4kH/o6REKxoAsSy+tL
87pVGc1xsHr10xz/WpMC5CmqNMTRkTsMVz4Ook96X+MgATSzPgmagAHkikT3DDgIGf8u7YfqemHr
slCAMXBmguTCFIJe0kMmhhB41Ytj7whAlxqigG/MQwZpprA4ODSwC+SToxjDVgQq2vGOJDGRdk52
vj8yDYh+xNkQyqiUM5pAdCUxRUtExgUvfpEQw/ukc/5USfalYHssOUXEevjIQAJSeDG034ECUEfp
mPKUx1Hj6174yk+O8WvS6wMtP3JLXDppOzDiZSMDab5fDmGYxLTiQm7Hx4EQznCufGIzMeenWpqx
mCG5YTYIB7xWOlOBB6BkDMaRAhOiiyAthKMc8TdFHLCziKiclm5iOU81ABIcrLCkC0yoz3Hm74fV
A2QDDLlOgcaAoJeTWDnn5k8R0pBMEw6VAd/u5LBednJ/AlhoHao4UnJIg36D3F8DFKC+kt5zBwbw
zPPSEIcAFMAA3kRERktagx7gNKclPWRQhzpSERj1qEhNqlKX+oEIAAA7';
    }elsif ($opt == 15) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4qKikZGRsbGxqurq2tra46Ojnt7eyUlJf39/VdXVzY2Nrm5uZiYmBYW
Fp+fnyH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK166zCEVg
PA9Cw3AoCBYOnOumPDkQhQZjSp0SrtjrIyBINk/MLzSYzTLKhCCQMOV+S2HcIpAFAhv2vN7Mfgje
cTMIB1gPDYcNAQGJiouIj4hkZwQBCE2BOQppd4eNjZ2MoJ6KeGUFljWYLAh0hoyOkJGIsLOKa2la
CqkTNAIBhouOrqANB4dqj5yRalpXB14xqigOPYoHxsqMB57H2XjDhribagsy0iYO29a2ndbXo6QN
42rDy/NAf0u8LQ4B77Bbrl0rIFCdum5rsoGjJ05Xi3MAqBXchmgiwYnqAM4jZo9ZkHwr/yBeLPiq
iMmC/g4CzBasHcM6IFOcuziSVEqTIwX6s7kIyE6ejhyh2YRK5r4UAorkbFSQYIGa/3h22pYx3reh
VxpAA3PUCcZ/X8NmDOUu5U48pYauOaBCldOTYd9CHdvOrM6UafmUKWeja4mkcHWK/fpplkGqN41h
JYNlK4lA6d4Oxmj2k6ctiROrQ5PQDoECfSWgUDAQZWaxi4yJckR557VjWL4FOYTLcZx0pcHezCn4
brJDlCf+coVr9icCDuH4JY3zNVOU76hGf3c1kXDpZxGJo7QuyNY4At8G07wOO+LXaJnedP3vlbwz
JfHEDDNnINTMdjNWhTV+1PVRpZxRFv8lJoQx0lPBmfYTPI/A04gQ2kC3DWPrDFcUE/00Jxl+ixhg
WV2JWJedZZOlZd2EfignGgm+OPUUb2WBUk87563XSECTUZQVKc6omEAJPSjV3F3UJVMPU9Vkdkwx
EpomT1aePeAFE4q4+KKCFKGFzBARxlMhWkwOFhQ9WvJ1gwMe4iRZVAdFWUthYBopImrxkAHMAw7d
sMCJcl0ES1WPePhcT7LBNhuTp60zC5kEsAXADQIYIiSCFy0JZ0mDJiPOGa6sh9hPJ/ZkyAOO3qAA
MBj52Z9VgnrSXjdYTHIHe0CVdFAnj+1TgBC7BeYgLQsy+OQVk6TxylnGAsdeiA8YkOv/igfcoRRN
RahH15tWkSIJG4Vk9Yqdyi74TQDP/gjAcExS6ut+XnLDyS1lTDIJIx5p81MeSdwQraQaBhYVN8R0
Bi8aVgDzZB7qhYhWuSTsm4iL/UZXIS0eNcMYt2wMwGkkhRyr7R356tppbmtKbI3C2m7HGBXcsnzH
LRsvqAUQDAMQRbPphgfXWWY9QpHAsRZbxcxXcQuMUFo0UPOpxVinLmVTZVeMLfRcTGwVQydLRi3y
rEHuo/tESipmcPFGkckg2jlOvGdkPUwh4GxS6j4IvIyjmOT1h5DVQbPh8hZ5bZlHnkfZkZ50hwnG
jd6/FBevGVMMYCzSZI4KhJlH7Wv4/35TkURqhW1udzXGVUg+TCvJagkEKkyceoexgqK8Xl2uDvf4
xfK6zKzhXRvuYwl1K2TVsRTBEzpWsZLud8WczPwAaDWTgC4nhHbOH/E3Ik8s20IPDDcBfIG9Iot6
vBuQn5i9SRVtWLUttBV1tM3Z19FHVErl/PrWSJpfrhw0/FezgtD8VgY8FcgvBbhYHk50F6B8algs
y5rf5AfACbJMCN/xiwNwAUCf4Ics4goC1gQIuZZtr2Uak5WjfneCfRUsadhpEEckMUIADq1YBMxY
CrNiG78AoG6iS9rUeiIqi/lNYym84QQJKC8UMkBjV4DeAcdnAk10Jgu/IYUBcnjEAf948Yk13B4O
BXhBAoXGXE7IQzM45QqfdANrX/xiGDGWvPcV6wHhmyIaTyC28plPjbmL3BOROEITGtKEspIiV6h4
ggSubUtda8b/kEjIJC4xgpd0Hv3OuAIHyOYeRWOGBUuXxBqO0X11qERIfGgCBHxyVNpznyDBWEo6
NnGJxWlAHjnJggV0pht5gZwpwVjBQLosaTExCiNT4Mtc7uFxIySkEk8ov44lU5l7XAEQBfZJ7lWS
mBekIA6NdU1syqAf5dOSJEs3zNFVkwFbO8AuV7lMFuwKlEEcJgUNWc00qNIcrOxl7zYRTFmakol0
zIIioxFQFlBDlAQL4A0xeUtKzFNqH/WMwRwiKlE5kvGdBSsnQzMqAwFIIYfiBKc+haAAx9AAIhol
hAWZqM9JHKALbxBfNr/ggKScNIKk3GEDWppTFhYVHTwgCAQJ4CEFCAABLs0pTI8aEao+pKFWzSpG
RcDVrnr1q2ANKwciAAA7';
    }elsif ($opt == 16) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4uLi8rKylNTU7CwsHV1dZeXly4uLr+/v+Pj43V1dVlZWTo6Ov39/Zqa
mhgYGCH5BAAAAAAALAAAAABQAFAAAwT/sMlJq7046827/2CYAWRpnmiqrmzLUm7cPiQt3yiMxw+z
KIYgIWhwKBaDg233mjBVjwNQkBBYEQhClsDVIgwKxvJp0pFJUoR1bdV23/Dh4nAumZ8Mwxq7jTsI
DoGCXYEEBXRndzh5V31/j4CRj4KFhIEFDGSKPAZqhJFxn59/fg4BC2Mymy0MBAJ9oVxYsZKQk6aH
O6srCrO0pG6wbnC2XIIBYje7KA96b76At8Bb0IOTxpOnyk4uzQLPb5Ti4MTildGBAQOpKsslD9e+
6abm58O2AebhgOrsOdwr4E2adSxfPWNdsuQzOA8hMQIBTvkrAzCFwEhbKEVcOO5WNI4b/88JOzag
hTsFlMJFpLdSn0NTG1eGdDCSX8SSK5YtGIcN5kyDDC2lk7mxQL5hQgMUwJSzookDDM/NCwk0Jak/
C2P6NBiuEK4CSdo5LcHRKz9xMl1e3RpTa7RaSsGCFSshxc6yx4ampVcpJcS2bLnai7h0QNh/dU/A
i1pvKt+3odhuNVowwJu4YNchboACJd7GeQ96Mda2tGlgDpbKzXRC0WLQoWHba5y1aNFBEAuDTaVo
J1+vGn/DHsUznVGlyJcKxlyAd8XXLWvRQze851GIXo8fj8vdK+G5FBOT8B2UulV01LuytEo4plHl
BWAW3B2eM9nQrnoC56lfY/SP3CWHnP9WgoCFCAlmPADgfqLFUtBUXJG2kQLJvScTZYThhCBAA8wj
nHnDZAFLNn35BWB7pn33HngbiqfAgh3hltBIMsaRkV4Dolihapq1aB8AH8kXFXrDXKHeH31QU41p
JzJX2IE6HIDdTDFOo8Y31tkTjBrysLQSQqmpJmYuPpIwQJAESjVNV2eZ5cWV3zgyFGo+jcmiDi/i
uB6doPTXIB+A8uFGhJOIiZmGeNokJFfVROZRPIEC2gZk2LgHX486GICOVhFmAYyjfT6DxSuSTiqj
p8zls5QNMDSD6mdSEXmkLElGOuorYPqhozqI6OAGWvKVKMqntAbqxR6SOiJJpRYu1av/E9546phw
VYpCqq2N3HqtUNYNeJivuP5VG2jY9EmKiLPYCueVvpQXiAHfoVImAHrg6pOXZVFnmXqjJfQmH6Tu
kV4tK2LKTSdtzFlWS/thRGS66P4rIhsS3lIUfQDg+co3Xm71m1BqzoiuugBz3JBeuCDKzQJrbOph
VcAwpoU1o0GM68iCpqfwndwwwK5NDMEapFUiAUyysWwWcQmZGXPzwDdxAn1vsOe9hZutEo+M5T4a
MW2GFzRlaY0+CIwtiLGCRsqFkaJYotQSZnQSsdlr/WfeIGlDzCWt1wrjdnN2AMRy32Vf82sk19GN
ZLK3qotUHPCqU987WIciLWp+ntv4/7oTp/u4LFwodWDT4tG78agE+UtpOR/DyUYbAL/pL7FvT14C
A6cj/at85d5dCBtVIIt6zr+wOG8Nw6c9mpe19Lf263sEDOjnKjF9/HjXbivog2s59LwVCQSPLKnU
c6FpNAUssJlirrgeqUugeK5GFeFDny011MNk/fXYwyn+9imBhevWUD/xCQ9pI0oZOzbhDQJCzxKy
qMT8wEcFKtCvgtkjXgIJM7rAle52wDNgy1QXtpJR8IKv4xLxZpcyuvzoBArYmP2yVbNjAa+CKBSe
7Dw3FMClYBcPQF30BCaif71OhBRsxOOg8ZH92S4FuMsW4URWxAHWD4M69FxXlKKhH/+OxQQFkJ7R
wjVG1xkweAZcYReUlpoeubAFvZCiL0p1OuiJ7395G8lNJuLBF1okAJGKk7oCJsMcsgFiLMQFH/vY
jRgSUknFUuEAsSjJfoFJdDFwxztiKMkkgU6SNzzkFJPixDfKYAFH+6QR7dfJIsbMh5n84gpagbVa
JQt6ahtRP3CgSWb0AnWyi6QQMdjJexiCNbyUZQsOILdAbm6GhOvDKTqoCmW6YADNLBWXspdCYzlg
DomwZjcYQJNtTrJvhCSVAYz3hF7GgAEv0pYoSwaoI1CzneLEQRSM0sxRBkEBbqwDIwVqkSgwYAAL
SN8AGHCAhhLUlA+NqEBFQNGKWvQHohjN6AciAAA7';
    }elsif ($opt == 17) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBJeXl8vLy1FRUbGxsVtbWy4uLnNzc5OTk/39/Xx8fLS0tDMzM9ra2lRU
VHZ2diH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4sA8Zsm/AdG86D
IIugIIgIFBw13WuiXDGAgqigMa0KCFdCIIBsonJeEuNhlV7PZ4I6oN0qGEkvuPk0Y9V4PDuv3wbe
YXM3Bgh2d3x8e2x+jAEHcTeCMw5SeWmHeFlrjX9+j5Ayki4MAZpYhoinen2cCgOgLqIsBaunpm1r
lqltjAoHrzayKrSZqlq8x4t7mprKjb+wK8IoCsm2uJzYuonOCn+/M9Mm1YupjMjn25ucf74DoUwu
D9pqV+xbuKm3rW6+0V/xWJArl+eeH2S51t070O/Ao1gBh+GbmKzcuUYJWTXyxskhsCUS/1iQUmbt
ILuK+BK2c9PJmR93LYQRIknQosGUBTf2u+jG4T8SwrzRy0dxIkFEOjk6KtrznbSIJhjw2rNKEbaU
VDet4+hNgVehU905TSELQa6sZ3kOLaala8uuHFm5+ggwJApaGBtUtWpxar1mbvt5Y7jRFzQVovgi
PVYVXT65LJd+fUlg8GGyUAEQS7eXsee09dJGdku41eW6CVDYtHZ2V2tTLgszJOz1AEef0QQxEBD7
KNVLbD1j1MbStiOHjAbQxQF1njPWCbNEudPs6sGrvr4adkj7NHO7JRZMNUn1NxrpGnuR9+ooO3eH
t5eXmGPA3njP9qdPoUJAvEI9SgFY2/8W773nzSuwzFFAFhcxdosZejVzVB8Faedegba5k2BEhVh3
UCV8ALcOda5VtpJtBW73y1jzRbQAf32ZVwxsiuD0F4ltwKUdhtzJN0cVHqKlC2x+sQVijhZmWOAA
3gEAhgEN8EeckCHWYpUlZgDWDnsYKqccKGA4QIVe6FD0WXBnLmOHhOwppaKXBoAZUAFR6pWNjWe6
xowqqCCpyGBMfikneAtKSd5JrWFyjXRr4mhiNx4JegIYdEYp2lUFqVOJfufxWYlJOUaK4KQBkfGp
UcRlmmmW560JpF8subJinKQSOsUhWKEaWlamtOorGqwwdtyKo36XGgl0AosRqBSyYQ//PtPd6Gq0
Ja3RY7EtgkfJFYY+91hfiGz6169pLCuWcjQYWwIDdd5aC2iY3sFrp5s2qoZSw3qJmglUZOnahFbO
mMbABG/SVRuR0qpueGMC2SuDKdknbCYEN2oHO5bJ5ySHVvQb2hnlKQpuvfRSN91Onsy677r7+WsL
g4tpZbK/BZdLYHErYgYeDRCyCvEhl6BqyCUi2szVuRvuDAACY0bJqkW3TKwmzeJigpVlOa9cQqF1
9hstZ5maqR9/rH4s4Use5QYVlF23+3U5+6Tjs73GaOTVlzofawLTUSbgtoQlYtmu19Hqx03Kn+SN
Arttu/3ZnpZ03bLFwPXmE2KZAVCF/9P7eWzkEP0uEEXjDYsH7C6xHtCF4nc5PTjnp9dDet+Dz00k
Jw6wWKveJ7woRdOEA33K7LW7nEhYx/0kS6FleD438HX6LTndYaP908ZK790x1Vk2THzDhu+T4zcK
Y559CQaI3i/htnf+PaeG59TTQyDxjsK27Hc/+uazb053TQRaXf1aoID1hW9/Bnyf10KDlH5g6ynn
O0Eh8teq9RGvDIpS1Tc0xroWTJBqL4NQ/zhlDi2kDR4RREEhfBbC0bWtZcFbTDuaNEAZkIF9LUTg
9IZ2OMNcT2sxWFDZQug99olOZLw4YTAyx4IB+K59vwMf9Xhxtx92cAaE0J/Xihi6+HilRUNKEMcK
HKA+7/3OhcGjFhUTF0Ym7kABZfQfAjGYBfFYLxBulEEWO1cGEPqHQAqwIkRSeAMHQIGCZvBPZXzB
gDAszJHoc0AAhJAl0f0xd4IMRx7DECcHFEA7BXhIJiOxSUiacomEPKUqYyCCVrrylbCMpSw/EAEA
Ow==';
    }elsif ($opt == 18) {
        $imagedata =
'R0lGODlhUABQALMAAA4ODpGRkcnJyVBQUK+vr3JycicnJ+rq6pGRkdHR0bi4uHd3dzc3N9ra2lJS
Uv39/SH5BAAAAAAALAAAAABQAFAAAwT/8MlJq7046827/2CYAWRpnihpoGvZAu+bzvRJ1fi5xrDq
5kDaLcj6uQwGhmOBaCICC4cDSSQOqzoVcolQNATgsIAQKBcGMmzqSuQhBwvBVxwmjAn48uJMVaPY
OW4ADggNc2B4iYpkeQEFjmh+NhNBgg4Eh3aLeZxkZWYFZwOSJYA4LUgICXV2d4munJ+gopGSpkWo
BpeIY3V3YwF4sJ6foaEDtWq3Mztxr3Sbiq7B1LOhDLaUNKgwBovQisGd0dWOkAUMaUDLbgzSrNWM
1IzRjbPI2FjLPjAM4s/hPMkbSK6Yo2PJgpiSgcTdt14C50msF87MQWQJc7Dr4S8WRHHx/+bRG0nM
oLFj6axoy9JNJLmI9MpsAmnRojGM+dat3HFkAcVxAyX+o/nI5qOTaNTNWNjjkkuCMIXOLHn0qNEB
OXEAyvWP4tCgXWOZnHUQpdI/O30Y8EmyHkigBWueDAUKn04JJnYYGBBt2MinUz0VNVeW7sWsQrRx
M4BgnF+gE93KPVi2LLKzJtjs4JsoGCu4b2MJu6OHcOGqCDGXUtyD8SZEPwOKhCXLKmrLZ1LWoLCY
AemwsYOLrX36pijVAIbobdxWuPCQ5eYeozVqNyW9DkWLg0UHIuxF8SIavYkRmVbWukjX496Ll+xy
MqNLH0Bd99LrLTtDfdgdor2SspCxR/9h9JV3mXUS8GSAAtO0xZ4chvgH2if2zFcfA4hNglc3DHwh
T2i+tALGKpo4Fpgne+wxl4Gq3bCDAx6CN9p37Uk4W4kzmbMiiy3it1aMos3onSbAdAYcL9NYgxRG
PSbYDQIHNPATbDU+9pR3SQ64Iz59rHEdEl54KNI/Eg4ZXJVGarllkw+0pkCUwwAnjJB9vfOZPSoW
hZB9XjqJBIRFviUnd9+UOKSEeahY12WYuQgmnEEGtB6RIYp4qJF6HtYlWn4akECEL8n5iqH9tYdj
iQZZlpGGD+iVwKdi6gcUe89AY6uIxCxQjFmNTqCXFwKQSFJY343GSI2tWEqkkSaJkmH/Zl8umEkn
R876jrG+mEmMntdsyqpemADqVmwPuuffndvSZVdinS5gyBx1NgfQdsmai2OSOz67Gl7NvAsqjfUo
EK+99s4p2JJ8fsuhvxFWWWyyMgqJ5GON7OgttPx2E+a7Ez98Kkli4LpsjtMdh2CbSKRiyKelDuOx
nSFSXI3FJytYwMocgxHjdsiKFrKZHgeDGpcnt5YErDmDSqahFN368FC7Es1uq0YXcsDVDdNmsNY8
24poRarquy/K3RhwcwNXY92wrL+sF8Yh7uV4z6qsttbNp2n76/LHDzWwit/g4DjzTRfXrRcS7qId
pd60dieiv69WmmRt1yTMaZt2H80w/+PKvr2KzgzLEbLBREGybs1apJz4u3hnTaUdrPuLtehIvqcj
RndhrmASciCdc7DZ/s3w4hF+HvSuziKXHHpln138FySK8cX0shuyuPFxi2dZ4ZfnVTXOjOtMu9++
bx75y5Sjw73haqXsG+ANHwL925tD/jNtUauvUFq7F+D728GCVe+oZz2knc8vsihLOpRHgq10oxv+
W1kYjPepv0FIb+SjnXo+VJj1dc8IhzMbzrA3QfhdcITGk1H6LFe0LIQwcauwoBgs6Dfz/YxZs8BQ
D/a3oR8oCIID7A/cali8wNFke8pYiQ5CmB7okXBEgIoQ3KYSNWwwEGOYY8nu9kKAyMBh7xAxDKDj
wKYpP2zkcBwKgBefOAeWrUJgcdKDWXZYhX2o5YFbCGAFc+ZFwB2vjNnoYQp+mLKGqLGGrzpfDKf4
GzIYgwpX/GAgMmdICCXyidk7WFJI0UAlDtJoeHTfAhQAqwMyqBcCqxhW7EYKO34yc/2AQxexxyAG
4eEJAXBASiLZwlPsUC9lM5oSdMWcWz4BK7s0Qis9OcnFlA2ShUzCAlMGS052UpBVcObuQolHOloT
iyIIpzjHSc5ymnMDEQAAOw==';
    }elsif ($opt == 19) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBJiYmE9PT8zMzK+vr1ZWVjExMWtra+Xl5Xp6epCQkLm5uTAwMN3d3Roa
Gv39/SH5BAAAAAAALAAAAABQAFAAAwT/8MlJq7046827/2CYAWRpnmiqrmzLUm6sOjTD0I6so/De
OoyCYrEYDBaEZCJhyPlkvefJkSg2jFgsIRBYHprSVjTMUDSu2QFBvU5yvQJDeDX2FRYItLGddHP/
SwkHcXMpdTIMBHp7fQFbf5BdXoMChSeHPwlpfWxujYCSB5QGcpYkmCuJWX1rnW2Ofm+Bo06WqCkF
ap2rnY5/n2+hg2C2EzIKrkmrsY++fgmSgqOlc7clDgqsBEWMkd6/zdCTAoSF1iTZ2nsDvt+Rj82h
AsO1UtbYW41tapHQoO/9pJGLU8+HtQT6YPXq5w7SI3GiBpKqZkzFnXzagDV0t0XauDjU/56gSoSx
pJ9w3vy1AyQtosSQOzA50AYLI5d4kMR9E9dy3sAvxAxWPIHQEyxnKzf+yimqqc+X9oZeW+Aso1Gc
Gx/OcjoQZMEYhwL0yljzprdmWLdGHEVuolAJJxggscnHqFmO+brIOtCSUhyQMMFKBVATY5G57eBl
vdmRb1OuEmm8fWBCLpuaV+xeTaq3bJfHjrsaAClSKjJ9VgsjbRjrc9+nEkvDJeFgoclPrJbibB3o
tUSvk0sUaJD7qierCY8+jNbbJdTg6C5XLYxRlzbEd3nKguacVFAdUS63ZsWuz1zrGv3xXC/w5XfB
sxlkRqs8txYjSOY2O8C8t6SukX0lRv9Fw4mHFCfktTJfLCq9wVdv7bXlHXQJIGDESvAcxkoRrbhy
Vk4qCQLghNDhQRxdNWlBnofL5bbTIGyRCF5FJo7lDDfm1cWbP/DkpVV3pAj4QkUN5GGgScmooR9n
4PS4l2jAzQiXAwjkcaJZPSJnG140cecXYMFRaaWPWCKH4IcOuSiMhKRJSZkDRZ5xUmL1FYfbncWx
5FybUBgDZ5H8KKZYnaoleNyckXzpVp9TXmGkTUtVleWK25iZlqJCqgDDnyoyNmieNCmjY56+wPEc
o5QBMMAVC1xJp4/i0UQdcg711BZ0BFi46paJ8QEOVZ6Gulk0fr034GwKWIlFoXQNetT/rCjexQVf
EmZqCIFnnLGHfkkAK22TTdq5Gk/TQCdAttmiJ+pJwpZJFlZ6RWTssakCgK62bOhiG6nh2vmMXiIG
CR1h6eqhjC5lvcIkJ9R5w5+IBA1cgJH4dthNjnm9k0xrLJkamAtjrBonvquyex1n6w4rSwBOyYiq
CclWWeUm8WycFILJhbOVwDFJZUAeMhu5B4ayBhPsGp5t18VA1mo6GB5VPqAsI5Nq9Eu+ZOkp78f0
niAA0FWmGyutSK6BxEKdeRzVbCaIjK7Q6myYEY5UpyXNaIu6icLE6LpN9RHddnjwJh6CwhUATV/L
tgmK7HqF2OoqswgWZ+BI5prlyFav/wkG3JsGza0ouOvoge8ob+JOL25CAviKfbDFn4++rZqzMB3G
LYo8TjgWZ6cxOYfSAXw31/BtPkWrkMeurxGTqzinx8SDPNgJBohcsvLYN8BNfn2opzZFqqNQPcnr
pMHN58B/Qq4oeWvuwviyL4/9JtityfPt06dgwBqL7LMO7LxLSO0yBz7jrcABAfidLs6Hn/tUajmC
SEDEihE+Fhxgctu4Dy+4BaJBOKASpjiH+FrFPPOVb3YZm0T7CiiFA8SPd+izy38EgLqXScEACUze
CR+4HaCYwgQiZAEOSwjDw9RvaSD8YQmC+IMD8M+BaJvHvChowDl8ECEayo0gokdFJSOiwAGjEUAB
bOdFxVWxjGiUXgXTyMbUieCNcIyjHOdIRw5EAAA7';
    }elsif ($opt == 20) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBJOTk1JSUs3NzZKSkmBgYDExMXV1daysrOnp6by8vH9/f+Dg4DIyMllZ
Wf39/SH5BAAAAAAALAAAAABQAFAAAwT/8MlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13FTFEtx
FAIDDncbonSEgVKBaC4OAoDQGCtSDQUFY6noNgMBaJBanZAbBMaWy/yCD9Ap+WUeotXKgdcNfsKD
cnMpVjNJa3p7YIpwfwcGj4IqhC4NA3iIXW0Iin1wDgJjkYN1MgV5mJlNTUx9b2KAoieTKgYIbAp6
mHytYX+hsSWzKAaZe7h6qpwBCwt9fqC/wMInxZl5qpu8y0+9B5+wwADTJQTVx8jZy85hfr0OcYGi
4wABXm3F6YrNnU9+jODSSKUwtUoVol3NEjJb6E8MpHDTHCDTZG9TvoTOFjLy9iheJGEN/yoiYELS
orJWzA5se/IO1MOAElSMLIgtGcKV/lL+6ehxzqwsqWhazMdJIcNnLnv6FFiipFBsAUzqS3iA2TZf
gJRSmbQA3cw9UInq67QRntatTAHgAgsWatSTJxsayAqRKVCKazW9FatwKsusZ4cQWjtzJBeTX26m
5NYNcOAaVgQsUdXFa81sRJvBIZv0pTyBSdpWszkUzMV9DaEJeUzDSgKnNTVdfgtX3T/VngUVacCg
bWwFUQvKdrNvGZRXjjrGKrKg93BsbO3JXuSvpepoukml0Tv0qTm3xgXcnkue9YwiawpfDmq48oBk
ZDdCUw3zAQkDCbaExTZ5pDWvzlR1lf8319VHQgMJJGDZUOdA5xQncOxT1TPf5EbGDQUkONFvbPin
lz6MLKLSeOaVERMABTyQ33OrEPZVIsUxstCADpXowg0LqKhfTVHBJhx8K0UYoU70fXbiAgkqOBtl
lzE5Vnw61bhcHUhqSNqV3YGnTD+aeeLSlCdmaOV+wTW5V3BnZvTXJza2gGF+W7BCJo+IYQYkjWxG
YaR9KDIA53tz7uUGeIkFOCI0Uux5oIY70skgK4IisA9fSCn3UR34vabGcGhSBlyk6pjWipDiJaUo
CQn6GaejWZ60SXHpVMUImxYaUcQAcK76nKBwiRUfgV+eCkCVqb43UVBldvqWVcVd9Q7/rWDyCQCC
cObHRS5eKLIKbdr4JZ+l2Z1Igqpq4FENoInNFJdKplHlCyRtSiJQALkecgq6wUGaDUb5jPhKrbYK
RG2qh6xqkW8oTWpoqaZeKi4JuCZ5yWR7cYqStsb5UWGiDktLgpgJ6GgJOpFChZpVW47Hcbgeo5qg
in/2NihpGQmIsT8Nd4wCsTqae6Wcte0yK3ZLPVxCkgSbixeTM9vEzr/xrvBTqvVOVkw9Hsa2bSfQ
RqsCruWqUaw1sR2bNYh5GpiCAWGvYS9hJLmHz0jxOQBwwEabUOUWeMRZDCaozB0gm3XlbQIBVeex
FhuAX/2pxuDqzIICud6ruDm6tBGfuxR6CkuLFhNbvgQiqGzy+E5R02H4CcT8ecw5qJTOxwKlpq56
yyuA/jbpgWeCZjMCfLKy5y0EUO7luRyUF1QRkheOOGmx4ADfl5sj3RcjEv78PMOMjPx38KUEkNo1
dHXI4vjcs5ADdtt+uxG19F193E5UlTP5Qwhgy9siKbLx89BbHQ0MYL7L1QR4dgMgCbg3Ax3YAkCN
cZ+boieIBryDWQEAhQKDQcENejCAuPvgB0VAwhKa8IQoTOEHIgAAOw==';
    }elsif ($opt == 21) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4uLi83NzVRUVLOzs3JycjAwMPn5+ZeXl1BQULi4uH19fdvb2zk5ORoa
GpubmyH5BAAAAAAALAAAAABQAFAAAwT/8MhJq7046827/2CYAWRpnmiqrmzLUm68OiQt3yqMt05T
BA9EYFEw7I4lHdJkSCAEAoL08SAOlkfl0slgQKUEaqAwMBixN+0uIeh+wY/AmFxGpydIdtf7jssL
dGZ2MmouDgh7b3B+c2Vngy2FLHp8UQSWYVQPgAOdj5ArkioLUHyXimJ/nHWgL3gxT4pQfX4LRGRk
BjatKaImDgqzUcJTjD+rnru8J741p1/EmnILqqsGAw7KyyTNAMGXYNGMtoDIjjXbSa8qsVKWtHJD
0+V0jjTavL4LDO7h7g+Z4t261cmTEXz51p1gM6wfmEzS5N1CJiidCUnAGmKCA1HgnHoG/wEgbCUp
ALGHHCMOmYir4CeLhRoEi6IA3EaAKqtR1GVRnQQUM206BFgs1Q9qEw1e6QlATQM3DxVNgVjLVlKD
L7epeaZRqqacBMsVZMpN4VN+UU1lCkM1Hr2CychqQTTLplS2bZESHJCLJ1MlDtzQdPfNElGcYuKw
DOS3p5ICXsBJqYlyKpWOtcTak7tOgdrKwy5LZpvKCmOyTdcdiFyZ8ujKHQleMzOS5KsGqxtOhQ1Q
gOuOms00hvlqQe6NKIMpICpUQGmQZWqD0oFgNT/kvevCDtio5fB0OhRY336KdeVUjeBWdIwnsIRK
rbWjFHPVJe2/ryaYR6n74eEqQ5hjj/90dsDgwHsHIIfXaMwBx5In0eH304ET3HXeIqSt9JYj64GH
hwEUKEjaIoipVMBV97E3oX5oXYiTf3GgJ5A1BBb44WoS3CXajl99NcaMLnG2IoIijvgfEBH9kB4r
Kh4gEgO5QTWfZZYgKU055LhUIxo6CJBjbrztFgYQcoiBJUVCOglAdThKmdKLYzJCJj2cVLQlEjoY
12ZkGxlWYjyAioVLisT9BABuFAimUVE7kvlRcB1q9Yp7UFbaBVehaSKFoyvxRdGdSyghHoKJCGPY
WmPOQydfTBaqJgADvGcpH/At2FGAdPaVZgnuyWrdHhBN6UeudX63zFw4yppIUTAak2v/GUs1aQKi
iS7LrKaKncgJMgBklZChJYxarZSaFqWTZp5I+CoJCVTQhXWYNHiZQFYdw5e3365LQqWJwssfnGAB
QqiH4JbQ7p6/snbqgioRIZy6KYxqaZt1RQGnufM4gA3EKIDI7x6KWpiSKq0SrK/BLIK86Bs1HTlH
pJIWfAIBbcJrapEAAeHdrioAs2cilYjMCKughqoQCpTaHHRDrl15L762ydzxx21AU7F/BLgVXdFZ
HJ2CAbOGfApHAXmqC9c7dFODZ79CM/ZuVNCTDc8xPJCw2w5laIUDUE/n9SQgm6Kjo510S7cMBnhW
qnxZk/nAZhyvEXg0zqUCubRIOBCARMrKFZP1KqipzYIDCyiunVHnHI5FAgF45ltNARBw4taq29HE
AvMuMIDuqKUmdSvZDBx576H/TbzJIiSv/PLMN+/8BhEAADs=';
    }elsif ($opt == 22) {
        $imagedata =
'R0lGODlhUABQALMAAAQEBJKSkklJSdHR0aysrHFxcTExMby8vJ6envv7+1dXV39/f9/f3zY2Nhsb
G1lZWSH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK165jKE9v
4EDSLXhqFAKIwKJQEPyItSHRUSAcCMnlw/mEzqS4RuBwJSiXTUPXKwPPHIEB2RxQFrZOB5vmji0G
AwSCdXVMPQICenttEzUNVmUIknVoeD+Kiy19KwplZoKTlYhqmYwSMnCeSQhYhXdbag6YpSubJw6s
grqgC5WWBrO0KrYluKCtunaGiFzBwjaNLbmgAVhJAYY9sMDOzybEAGOgk9bKr6Ox3rXRKgtXkmar
lL6/a+ontgLv49dnaOdc7N0rscmBKnmEevV69avbwE2sVMVL+E8bOoEDAfTRx+8TRWUP/+4EdHiv
z5xjSCYlZLLsIklvbjrNSYLlCkWWDNFlTOGGzD547+YpDHko4E587EjITLaLjr+FANMdJZgUAAE5
7ySx0qrEH8uiUqdqTNpATjKtq64prHhIDcaHSRcwiMS1X5Ze5sC+hJkUUFYkhOTdPfN1m1gh7Aww
CJQsMCGhC/KO2vtsiILFZer006w2MuElkw+PPUUCAWYsTh9v7aqQyQIfpA4POcBg7rjHdZKtXdgW
mOghDBIs1sVVc+PIUNvq+B3NgPDTKu2yQt76lVvRoxOQaBC8tk2VXRMSLtyMMq0bAp4Pd4z7KVsu
2G8oUP8dMCXWULNte1sy2uXnmeG2lv9XDFkSXzQF1OZdOeK5V1hvvokln4KYrZLabslZ5AQA5pWC
HoBmsYfXgFpo80AsHWZyA3e1ETDcZvcNWCAz/PVHmgPPDXDahZQUUF1ROsnGTneLYVUNjNXN2Axz
pAFAG4Vm8QPYPzjVw6R2JAQAJWaeoNYjS6/9cmCTAkDpV5etjCeKUUI26YCZWAniiXsl6pTiIlKY
ZqZPZPSIl493NFFem1iSUCaFXM4BGUiCxkboCbWpd6ZNn1Fp5aMmyBWpcJN25mMvRG1zJ55V4agg
p1gd0JlXFqGIqQlPKgiIX4Mg50pL10lYFQAN5OjdmYM8BuhX8OnapAl6FjlrnJqZk03xsVP1waKy
ZMQ5CAJJhjTKqydoSq1PE035jwCwjOqFLU8uexI5Qj0b4VG2OKCjulfQtVKd7+5EzAO1zTtHl/30
IsAdBgjAYbS7nnAZtQhkJU9kOBXMrQoF+Gstg/4oZ2yhLFQ8K7gInUEuwTUKA04JCqh7201M5GEu
ESeX0MABqQbFMmwb0+DAVamm+WUBbi2nb8ItFEDzvwyicZ3BQx87QwMNp7raEgsUnC9cTtMgACRk
hFKioxnFzIIA4lAK6olXqyN2C1RUQ8cC5G4IL9FBODDwp0ADUzKpWWciS1hYc4zdeXQPfq4IiCeu
+OKMN+5BBAA7';
    }elsif ($opt == 23) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA5GRkUlJScvLy3BwcC8vL6qqqj09PZ2dneTk5H19fVpaWv39/bu7uxcX
F9nZ2SH5BAAAAAAALAAAAABQAFAAAwT/kMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK167jFLyD
/6Ub8FRYKAgLQWE4FA4dgkCAgOwxgU6cQ4GQIpPLK3YCdBAMBu8C7BP/srIDIh04fg8695tM29Lt
VGx6exI0B2hSCopUAkp5gzVwKwt0iYsLPAVtkDSSKWdSdUdHaz2bnDKeJwqVioBsp6gxqiUKDaGi
VEiNVrIztACgoYuBYJq+nXwqCw1dlnZrjQfHyKnKKAW3rcS709TVLqoIc7jcSbyP4C2eZwZdCqKX
0dPp6iuS2Q2tdVOBvN/27l0rEQDNtkRfBHiLFdDGQAAHGugbNoxUkoUNXzxEoG+fq2Lo/xhmDDLw
wABtieIhSYhxZIosAQa4qwjIn5JeLk84cfBA5p86BF7tupnz5TUCDyZa0sU0mqmiOq8ZSDpTpa4F
CTOJdCmEJ9WKTJsq5AE1aiESAh70rPpx5dWb9aAKUaD2ZLmab+mVNSGkQQK1zZ6FxfovblEhA/6e
TOOKGNZojrZy5cPz79pcQiHj3HujgNqeMgVfPddyL4AbBywPGPDO3BrSm8veWPD5q9WECiObJjE7
werVjBuvhFyaMx/aoCW2fkU8tlw+AiyjCb0IWnOAsvmkBtwgNNDR57TuPs2ngOLVEhl/f6ywePaz
DlSj3/bqJvbnZwF8/p1e9FBNhuWEWP9dJy2mnmNj3XeYMggQeJI+zuTyH4C7CYFcT9111EogB4wl
2UhdnYeeUgjBhseHDTkx1X4GOmNThwoKeM0C59XVUYkXiWeaE57t55uG60njnIz5kYCAbwN8BmQ/
zaEYUBY0OqghY7jR46Q6WTiQZHIdkQPUa7oZVyQJUY445XoLWLnjQwAkyR+EEYLkzZpjkklgeoig
KcACAYLIJgAxmXlLayCRJSYDKmg5ogEkOlbANHQiqkJa6C0GVkI6XIkMLYFKJFE5/mCi6aZ/lmDA
omzJGeOTpZLgwKkP5mmdh6OiAgwAr3qKhouMpEnhgnWm8GqsfxQjaq2c3EqQrs5AM9Zle5LKYEuX
CBGw54nARiuDAIzuWi0BkCKrh7In+FFVHYQNiWWrLBxQ0DheWKvXZMHOcAAXzVqrBJHaAlFEKIws
EUaK7M6wQ1CvreoLuX086mufthY8njX1ThyJCBhnrPHGHHfsQQQAOw==';
    }elsif ($opt == 24) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA4uLi1FRUc/Pzy8vL66urm5ubpeXl/v7+zc3N3x8fLy8vF1dXdzc3Jub
mxgYGCH5BAAAAAAALAAAAABQAFAAAwT/EMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK1+5DJMTz
4MDSLWh6JAwKg+BHJA6JCYUjoEw0r08c4+BwKBiC3rWZnSUKhakBLB47J7hHAO01VAluMpzGoFPt
AmF5ehIzcn4KSUp4g2+FMQQHaVMBikuNhAiQdFOKSpeYQWUoBAtpAaiWYUyhOKMmpZyVgGGMra57
Kg+cnapttzWvJAemXam0BL/AM8IKppOVvqzLzLknCc9TvWuBytQxo7vZ29zJ098uowYDxZQKs922
6ODWJATs0KiogDzn8y/1ABAbkE8fP2//VmR50IBgwT9s5CUE+KjEAYenjq2J6G+iDWsM/x1SimYH
jIAEHT2eeGKgoaxEdritSqmSxJMFDdql8hSoX02KmkgwdHkKZkmTCH8KycUAgUtjs0oGWqVUxZAD
DRougKoIDAM2NH8OGeCUYBcvRmUmrXrjgdOsW93FFACGR1WrexI0eGuqEslPCVCGrXmjaVaXO6V2
G0x4j4K9cAvo69pzLds9Ad7mNObJpM+7Hx9hPdzXr2JzoEMHPYBgQEOCidVaVnqjwOEC7Hol8Txb
7B7WWXFv3be7MmOVNzJnHYCv09xaxz3eaLmceUZVM1ObuCFAs3XJGhdr376HAGTm1jkjiz6xrfcF
ubdFHL+0Is7q2cIvYf9viIK36OlUyf9i/M0zhF6HMSdgOb0hZw1ZhxFFySc9FIjOEwFEuJwfatFn
kzUJaAZXXH+cVCF9WWhIVBpJxAOAhctk8V+CC2x1CjcoSXTXQgmyU8yN4o1XxowBTqLGfEIGNNRr
+ZWYDIoBAUCdgs8E4ACDPmj3Ck4KFkBicU9qGSUA5jFZzDFBgiYMA6819856MLYiDAAZsiPSPnW9
mNqcAqHnBzyf7TimCbj5WBSFcYbC54sX1YgGntCpOWgRjSLyiQ6SVuSCAvgcGgiml2nqAgM1DjcL
AyfSNmkKCUhCohJgJJrHoin0IVknn4YaVBwGcHFkgzGu2sIDDFiJCgOCNSZqEAkwkIgmicruOoYR
BNCFknTCBuHDD7IGk62HCn0LbgoilGvuueimq+4HEQAAOw==';
    }elsif ($opt == 25) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA5CQkElJScrKym5ubi8vL7CwsOjo6Hp6eltbWzw8PJ2dnb29vf39/VlZ
Wdra2iH5BAAAAAAALAAAAABQAFAAAwT/sMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13UBFDqO
376WIuEQ9II1IPKkQAQIDsXSp1wWEotAoHic0qpBgsHwJHS938lUMc5CeWiqGhkwZBHvc1wGlikY
dmVcensufS5igWVGhIUthywIY1p4UEaOP3MzCIBZgpeYSZoxCAOKeFyhmRIzBKaeqAICqqsNMgKm
gZVRjbQrkCYFubCWcL4zwCVjDAueBMXHaawtpW2Uzw7G0THJwrlan73bNqMpCwOdlKgK4uMmwAoP
3+pQ7O7c5ScM6KcBCA7Z7uGblkLBgWH0Ugl8lE/ZgzFktGATYG/hi4Y7DgKiB83iRYIn/wgctObv
mSxtHsmBNMHgQCc32Hil/NWwwAF5k0paqjhTpS0UCQ6MJAaQYjuLfRYIfUiMwMmjC/s8aDAUZjGo
AvsIvcmA0hOA7LDeA1OAKtc7z+qJHZvP4M0HzPzF4tnzBJgEZplKhJJtrbu7W01du1o3BRgEN8/K
3el33OGl/BYPKuwTBWKNA9CapEsZAGCuD/dO7lwCjACqD3BaNUq6dL6ybwdkllsEVGutsTdKVHi7
4YPY6DTbJp0UcnCdJ1t7bhj05oCHdnbNUt7HZm5dz1BSPtQytWq5jKhjvOxd9z/thQ9Z//39H+f0
GAF0/30cT9jeK02QV+0mivj8JiwlT8hXMKHXEzCIpcYPLLLg99MK3skW0VfTdZZMUKkxkM55jfmS
DAALZGgNHsPV9WEBCn6DjYEefQhAAvJIuEAlJc7kIgABDMgMAqiwGFV8KBgwIBk88nYgkEFKSGQ9
2yGJwj6AkNHRkQC2cM4k//RlopMpBPDNPzX+WKULCaTzzHtZcakCG4Gc2eEeN64gBm1oOqYmCwU4
4U9ALd7ZQp48mvHmFHHGUIAAePhIS6EzHMrDoHKMGQektSi3BKOWviPCppx26umnoHoQAQA7';
    }elsif ($opt == 26) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA5KSklJSUtDQ0HBwcCgoKKurq1VVVTw8PP39/ePj43t7e5ubmxgYGLu7
uzg4OCH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13Oj43x5
96kCAlHYAXm/I6CBIAiKSmCy1zgsCI9G9DitNQhXQXbLnQARAQK2QFZ2Y41Fet12m2votJhdL0tq
AgF6Y31+CTQHBnNZWoVSdzELik4PUI6PfzEEBleUjZc9byibgp6ghi4IinpPp6gsBQ6KCwJin644
oiUMBpyUlri5kCkHDqW1lcGhwycNsgFhlbfKM7oLxnMIydTCmSgIA7OUD9xIzLvYtLbl3YcoBQqr
49PsLm8L4XN79TVvA/lq1vGrdk7AgGe/6A1c0YWBAllhnihcmKKLgn++9lGMMeWBgocG/wIS2thi
yoGLEAVom0jSxBSHB31Ja1mSmYN/KWfSZMgMpTEnrXby9LbkIkCNQisOgxcz5B6WO5MgQDlJYFIb
w04eDMDg11WlRAV8NOZ05Fcfw6bGhKaSz1m0RJnK4oT0LYAkDahCo2OXxBSqDPS4tTvlZriqwN6+
xMiVUl+/zA4cRKgSKs0pcmdZVXwOp4PAWIxwJkqCQdM0RB53OelgLq3BZ7vkjdl189c3BtaqSXz7
HACDz2ilJuwbwOSqZq+KInBYDwLLG3W15nTlAbnR7lIIeKZHtPLipYOHxs7CmTwB3oXqIrE98BUd
0PmtJxHAAIMw6S+DN1F/UX6S85HQwGJ5sOlH2goNgHYAet8diCBoBBRQYHT7oRCHYEkF2AwYTky4
kIYoCEDLNi2BaCFQ1wFYYQsFLJicfCu20EABbVHoIA8FvFiOiXDEBwqPNPjYB5DE3fgYWCIkqeSS
TDbpJAcRAAA7';
    }elsif ($opt == 27) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA42NjUpKSikpKc7OzmxsbK2trTs7OxkZGf39/V1dXXx8fJ2dnby8vNfX
1zg4OCH5BAAAAAAALAAAAABQAFAAAwT/MMlJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/eO
Dr4gbyIkIQ6Ioq+3QwgOyiAT5xQko0ui7qGAYqXaGkJRAH7BEtxgUT4Lp64D2+zOpmePQMFbtyfw
enx9O3AqAwwLVoNofy6HAQpXi4RhLAGBk4wuC4gCmZosDwaQdJ85hSUIDAx7pn4sBaMKpa41qAAI
DayCtbaVJwsNC5G9Oqi5BgWKxTiowbvMp79GDQbDktEzhQIE1svZ2tMAAdWt4DRwCAS6s+fo0w8O
7NjuLXALDqPf9fbTBvkLePFbAWedNYEDU0xBIA9awn53ShxYx4rWQxu/uOkqQO/iiSnc/ka18ahi
igJ5wyySJGGy2zCEK1s2gASTJMh8ejquHBKRxAF5mHZ+/DWgW1ChJRbmY9BFp81pDcrtEwqHXCen
HuEocNkOKctpRWUNwPqwUNQACxCQTVgoAIGrXnk2OvFTZM2y4tQZ2LWWHyq3cJGimijW6y0GGz0J
FkeCGyJiVBmTMCDrrl/JAA5sRBK5Z4oFlTvPVYFgbyKVA29JtLtTdYlYKWNiNgE6Ud9ormkztZwt
t4kAu7PORsGpK9vhKBQwRd0bOQoBpI57njFAAeR6vldYH4vd+QonB5i7yt5iwADOzac3MX+7DvkZ
7d28p1Jrfmvvi0Xo38+/v///HUQAADs=';
    }elsif ($opt == 28) {
        $imagedata =
'R0lGODlhUABQALMAAA4ODv39/U5OTi8vL2pqah8fH0JCQmBgYDk5OXt7e1VVVSgoKBYWFkRERFZW
Vjg4OCH5BAAAAAAALAAAAABQAFAAAwT/MMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/fu
/6oekMQY7oQ+htJ4nAALS2ZT4issilIfknbNArcxK9arddIYi25tTCaBVwyEul2myhiNBX34RjEM
c3tTATF4CGwziHt9JXgGil6QNIwkCAIFOJKLZisFCgNjkJoqo4MsDAqPQKVGjA0OeimKrIJ9BQeg
AFizfqd0fa+YgrQySFi3h2eyRII8E5ACDpiSu6S+XmAFBKq93bretZwmDbhsxCeIvNaT4kQHAqOi
zOjgre0A2vCFzex2jQgHHhSpds0EwW/rEObYogBXQoXzXJyrYSwBrBYTITbKgqRAAkAa/wtGVFaH
kAkEH82NlJJxBYwxDbaxOghRZTh/RQQEjIexJxkkDXMp5AlnVQwhDA7ACkUPYctrTymwOaBAYJKV
Kgfa86eLwKeINFeCpSevpEECF30aFBuy4EQkVLtoLSqyLJ9nJg4ciLW2bdO/czd+4ZTzQDKSQ566
aQfQwNBlDwXXkzwDyQKZkP/WZKvZVKhtUOiK7IuVs4seWJQK8/sj7I8tDb5qYjpXneiSTAcc4DbP
plqnP+8lNbA6M+B9pBfeAxANCk+igYnikBpxwe6DpQIbH310OQMCeSg3JYi9qOISSEs8cDAA8kSb
dqcv12U4CjXuk02tNJB2ze38/ZikgrkDD6ymXWfiSXaeCWBgsUAe8pT3mxSUGMAbYmzBpwMjDBTQ
gFCsaSRhcFypMABx2yVn3IIMencCAqDcpw5TkSlX4gqA2JYgP4vdmNwAIPpEI3B9KUaJQQMEYtod
WwlYUJL3TaiijU4WkoZrCtb42nzrFBBjlpmx6BKXrKEh5o7y+Qhgh9nx6Iyav0XZzZBbwgmgLge6
iR6ZUuKZ3Jkv8ImYjr8I2ieaS25oaGtTUijCo5BGKumklHoQAQA7';
    }elsif ($opt == 29) {
        $imagedata =
'R0lGODlhUABQALMAAAMDA/39/R0dHQ0NDSsrKxUVFWJiYg0NDRoaGgEBASIiIgAAABkZGQAAAAAA
AAAAACH5BAAAAAAALAAAAABQAFAAAwT/MMhJq7046827/2CYDWRpnmiqrmzLUm4szzQK13iuD/fu
/6oekFQY7oS+gtJ4nNCKpqJgyWxKdoAstGoN5LJZLhDpAofFPzJqa97O3GieU9aOj+dlsH2oToHh
ezl9J385gHaDA0WFgYc0iSRZAjiOe5CMiimVKptdayUFWkCdRol6mp+BLYNmma5RqZyIeCine6Qz
PUVQAqJvqK+zEm5mYY5Qxyy4OEJhvQCH0aCxgc2RvkSGJ4CVyyXN0NjA29nk5lVIAM+43qpyVyZ1
yC3c5cHn7SfprdRwy/m5aBUDoKyGNHQCn4mjd+5JGoHFpt1jAjCIk0UD+BUM5qajqh4E/zWOk7VR
DMiIrzapHBUDnC1/5SqumMdsAhuRlOzp3DVRh5BQerbQhBUL5kFPoHBSiznShdBHtDIG7SlxJtGG
D4fFO0OU1FGeV33okgrNIEWkJabqrLp0LduwMpAQWOiWY1enfC4mVUelrV+7dwXhgfISzdC88LYS
7DYNbL2SYm1Ow+TKI16JMldFJUvQ6jh2WGuQabNyZaannmtqfcUPtVXTl6EmVtyZamWmKV9n9VL1
lOV2v5vK5l2LUbLUyHe/teWQpHOfm9MWZizcXmYTagj78jjUa5xLXJu/3Vm3ZXRQ68bD7S6M+Arm
6suzvY49OhzKsB67/jucjjG4tn10nnc9SpHk2mG3CTZbC0rRR983AxKFX3wAUhjQgnmUZdt+FUaG
YUF/TGKdcw9a9CGF8CWBmHvJSddJiXFFiNxxqXCIVmxrgOWOibzR5GNMjpEwhSsi7vJjgkcm+Q6L
KroFo2Yn/tJihx4yKYZl34mg5ZZcdunllx5EAAA7';
    }
    }elsif ($color eq 'blue') {
    if ($opt == 1) {
    $imagedata =
'R0lGODlhUABQALMAAAwODISChMTCxERGRBSK/KSipNza3GRmZCQmJJSSlFRWVDQ2NKyurOTm5Gxq
bMTGxCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/fu
AwjE79Qb+hZG3iT5CyJ/ReZuMBDqolLdQGHFYbM5hOOQ+4JjViEiEPAuz0Nxohszw2lBx3xmv+MP
e3VvfjV0QAGBLX2EMwgJbS6Ld4Z0aSQDBQ6Rg4w/DgULhkScnSiiQCcICwkFJKdKEqU7XQ4CZCuS
sqglhpgCr7AEuivAriS1ZKe5w7upCwy/vCbLzLtdYgaaKdRJlibepkALBQLNVtzVlAUNA80k6GGF
4a4OBgnbpH6ixe5Wn9Fq3uVjVsmYQVerDIiCV+1gAANcDDKMMy+VQTX1IE0b2PAiCwUC/xgEFBir
ozsVloT4MjQxy6uX67y1PAPOo6oEDZ6UmInjmoyaCNZV2cWzUQqfLqysyjmqpMmj0qwBGGegXZei
OpCeXLG0nTGsk4ylCcqODlhi/VjU/AYAU9VmZ+NtZWsw4ZNzHE2euvasAcu8hPZGpQRAATlUeJ0y
Ejx3MBCQ95oKe1px78NkRAHTPJj0Ik6dOzWXKrhVJQOFMkV3g0rXIq8DAlrZUN0kq8VVAtqMDDYM
nG/HhQsoxKeYctIAAhJlLr64tWufAxK8PRl3FufBtQoEIT6ZYGcTuL1yN+6abXZg1eVJve4o2tz0
aqO2SANSGy7aTzG1KgYfD+dKn4CmQml/aFRkzCfivYCfLl1Ep4AMBMbhIB8LhoXCKg9SyFxvdKkS
QIYadkfeJQkkCGGFnSjgAD8DoqiPijtEWMMCCghYg4w/KWBiGS66xOKJG472Iw046lKkLEeWkmQn
SzIiwpNQRinllFR+EAEAOw==';
    }elsif ($opt == 2) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGxubKSmpDQyNBSK/MTCxIyKjExOTBQWFERGRNDS0Hx+fLS2tFxeXCQm
JJSWlCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szyRCl/Cts7bc
oz9AbkdMIYJF4STJNCEcA6RuCPhZS9cadqvtVrmIwUHq5JqozSbi0DgQ0emmI/AYTJdxNZbeuMHz
TGsPBmQqf4BJDgkLBg5GKFRZX16SlWaSKA4HDw+OLoeIN0GCnZ94oXE2CA0GpUA4p6h5A3QCLaCy
PCwHCwILL7G5aasPBQkrkZfKlMuTzmRSA70ChbjCOw4NDwwPhsHXMYUkBwECxinW4C5I2gwM6N/q
ieUKfSfp8jPEBQWQsZbMAj5rJs7IAQMMFBw7Ey/fCUzOqix4oMAWQwkOU21KGARfxhjS/wQocAML
40d9KrKZ61aSwMkiPVYZKKDgokuCOAUCjDgjAUIFnpSYfPnQzApaCe0JvUm0yIAGCX+R8NjUCwla
5iwurdpC3FNz76Y25OpCZYGwW3MO1Km24IpsxRT0oAoO4iVtCuSKHUqWBlyac8f2XUGM416mg8uo
QEAH8OHEhIFoo9lS8drLOzNjY6UALd1rdlFgrVgZsq6rARKyTGu6qzSaSj8P5kXTzuPWl0n87Vea
rW/MbWXMobiaNW4Vi0QqNX78ISvDvSGL+2vgnuDBQRYxOGezuZHn1Kzz1fybfO6UEwuQ7H5cykat
7L1jmbw+vnwEPgVUh8cXewpND4THH3Ziza1RTn3iIWbegsGpIIYAAQgk20matHLLdWStwYhbEzoU
Bh1BIYNhVcOFKGJ/kM2xgFvRpdjAAiYCg2JfmjTAon2DZbMQDR0Kk0ACMcbQIyr4BSnDkIg4cKOM
BL50RBpIQhZlYlMOVmVfImSp5ZZcdunlBxEAADs=';
    }elsif ($opt == 3) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGxqbBSK/Dw+PJSSlCQmJFVXVayurISGhLy+vBQWFKSipHR2dERGRCwu
LLS2tCH5BAAAAAAALAAAAABQAFAAAwT/UMhJq7046827/2CYAWRpnmiqlgq7mu2bUnJt3/gZl3Tu
/6pdrQcsGnUq4tHoUAhfz9kE5iLtrlUA1pqFDQrRn3L5uw4MjeWYbFQ4DAyHTChcs8ukApxRANrv
RQ4NAQQDYlOAOWFWAwEMBj5KW1pZk5ZdQQAOBY4Bi1F/iYGNj4sooaJAbwEIDKYmqKkokyx6rAw2
sbI5DmesAUOIu2QKBY2EkEg8wpRczs3Ql8+0UL4IC3IrusMpW8UGcAsEptvcNr0GrAvJUhLmNq9a
tggEB4vl7zLoDNe47QL5yBhLR+9An1PMpEWrxHDarBXFBjEgsAAYQncBcUwyFkCdvYsA/zMeUdBA
IoEH7JZhFPmwhoIBpBAcIACS5Uhw6h48wWdTBzo4J9PASthwocOjRqm8GNhRpj+VIXtCrFTgDcED
C07wlFpi0yBHC3QOXck1npWqDQguMDg2KlccaNU+MAT1rY+XaXOmlFRUoV9M0ILokbuXmV2l0Qbz
O2mRxFa7ghzRS/AUwONUZksUSMtvAeW2h3NwJBS2MNnQMgZ2fiDUMVGkf2EDjlfsTOcDdF2fDk3L
DSmKD7Lpdosa4qqJBxLUMdwzsxZrJw9oZV4cxT7gWUFXX0qwXoLGwxHHTjq+y5OXcK49SCA8/HYV
m4GGfVDzfYrI/JJXdv/WLMnuybXHH8NqYcTHAAMHPJDddLu958YgCMiUQGvayWYheUW5dEaEYdEU
mGXUNbcCOgUFl0SIxTHFQFgIaIMiapuxcs1HJzYo0ivosUIRhfXZp4lE/cjA14XjKQSRbfQg0AI1
lwXky2JmNfmOgfQcJOSLZZ1hQIQCumhjf/E50qWXxB1WWzqu5CClLE740oBzdRE4kAFjBvMlS2e+
WcSagESkpxF8ErNZE2QEekQBiAJiKBBOpLIoao+GFulhk9olwqWYZqrpppx+EAEAOw==';
    }elsif ($opt == 4) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBIyOjMTGxExOTBSK/GxubKyqrNza3C0uLaSipOzq7LS2tMzOzFRWVFRS
VHRydCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/fu
Iz5VL5hDGIFE0jCJawwGjeSSWUMMCoEGUjel0hANbOKxrXW9tKvBkBjkzmgZGGs4PHDweAxRoAsS
ZS55ei5gAQEJAguBLxOEO0Z9AQYCAlExg48sc4iUB26Cjpo6T4eUDAeMNqKjOJyIlQKqJpmtKld0
lIottbYor552jRK+rlCmngqzPKzFMwgPYsEMK73OJZGTugcKdynW1wCR0gIHBwyq4OFPuZXc3ifq
11ZYAbHcsqvE4c9X2skKLtFqxq/FnAIJ7LlTkEAfgYLPJK1ZqCweQYgqjPjTVk6BAlAl/+TN2zix
Y8OB+zBuMhKtUzJqKB+qLCRpUoIFAjyWEens1T9uFUNenPmrwANTCZLBY5aSaIpshzhyKxDT6aZ6
2hIAPalkqFVxnAxMWmBOwYKqX58OiJq0kkdAQpumxSbxVEeYXeXO1djOrVm0c01AIVeOG1emMgOX
GOCgbmEFAbbwdDa4XiyPSyf7MhIG2ePMXq1ylpS0bNC8iRVbaWxKACqdgFXj0kaWgQJ0sQPTE/P4
b+6vQNgdItsxoEW9wGevMQc0kOZW9I5ue+tQMViSOIEKjJs6rRU1JbnhPt4dOJ/WxalWly0G510h
oVVCDeZx+2+nnEqbrBYfY6nwsMGHHI1REhXGjX3keQcAFA8Y4B43AfDSHz9OFBDeAYcJWJ58pbRl
ziKhDAjRHCUxAGKIG47YWVKonIiiaNA06KAABtDwnBfnacNAhDZOuFln2iD4onxhLRDZGz5qwhky
ywxZ0DiHgMRFknrQEwAZUlBJBRBgOOHFja6IoweYVpHplJlEoTmTCGy26eabcMb5QQQAOw==';
    }elsif ($opt == 5) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGxqbKSipERCRBSK/ISChLy+vFxaXIyOjCwqLHx6fLSytMzOzExKTGRi
ZJSSlCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK1zia5PLN
/4nGYPdL+Yq5oCPgICIBxycu4VAgFM5fVEpLUB0IRCGL23JpjapV4NBOzsXEQGENN3JmuCw4Xy8C
ZW96PHIHCgUCAgsINXmDMUp1igtkL4KPOQMODgUIiQuUPZeYNXJVnZMGlUajpDNefZ4LBgahLY6u
LKZ0sgYMAqsmuLkqsFWyswyAlhLEU5qHsgy+wSTDzjpUkrO+BswE2F0DmqiKtMor1+Emu56TDPDB
6uskppzuoPCMrM30kOOcUIFaEI8fOH8xhGwq927fiXn+dnVyZ45BJYj05ECj+InBARut/xCuaJeo
pIBfIPuJbKGRjqKSyVIeXKmLpElfd4SFpHkC1hyOAnwVeLiTJztNx14SnEZUpdEUctJYGegLXtOZ
T3u2LNAJ1DmLOp1mPbqx1zQGOa0VzWrPStdkHsNiHVtC4ykxCOAuUyuWLoBxaQJE83RuL5S1RmEx
oTNRETzDGDOaMnTogTR0JSKv8yKVFzJ4CuT6PYF0SbRE8Bi0yYyYp5dNdKw8cAzvI+u+dAdILSAp
NVrRo+tRMcTbne8smsNF5bStqjfgwe02NudLwNXgAGAduJe3Iubbc+m2DfNpaVq+4dm2PM3N6vXR
XgrxSlSVgUPw0aMOdlz1PHrs9nCVCsw8z73n12tLWOZVVYbhd6B+B+DjmwrJEaPfId4xMJRB8AHE
CzfdpNOaSOMcgghcv1E4omSaBIAKLbTcJ9OD27lFlSrfHIiUQNz4N+NYxpxmToMcArkjArMpsuEt
K2KDIBjkLWBdDBU+IkcAgpUjY45PLVdcIktS2WQuQSqQ5GozVMkFEQ60aNkDPrqg5pq6BSRGNVyu
pJEhdriBm3IDbMdVA3jKOeYgVAzgIqFPzAlEGkKc4egzQwwyaReuXJqVpk+J4OmnoIYq6qgfRAAA
Ow==';
    }elsif ($opt == 6) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBIyOjMzOzExOTBSK/KSmpOTm5GxubC0vLaSipLy6vNza3PTy9Hx6fJSW
lFRWVCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4cI8hzDAct7wDM
/6mHLeAoPhBAlS/JpB0OgUBCIUgMkEzSMvuj2aBSqkAw4G65PC84MR0LFOXkGb1DDL7RqVjgwPLm
dDI1OGtUYgsNP4CBLjQDOHl6bgsJfi6LjCxqT3kKewIGApYvE5ldg5xSbGJUCwsPMZimKqhgqp8C
CwawLbKzKXZPa6uTuq+9pb+CNQ+QkZ7FBgtxSsnKLTSOwlGqb2PG0qMmvtclXl+2bd8G7AYK4lrW
5dh2hNxsbrntDIkp5PMAvNgjoqeVrn28Tvyb54gQlFWHXLUzUAnFwnLZmm2T9O0gO34W/+UBXKHN
ngNo33JJZLBg1EWMtZ4UzKfyY78SL681dBjmkys34caJHAlskMMGbNTla8XggFAJRBs94nmrozcq
DBI8JRBVk8BtUhzgMzZGDAM/OZVlmwo2gZQx0rwVWAAyHtSutI48EpYqDNyycLXa5Yo371RCDdL9
9WYMS1q1jzRyasAtQAG4C+AyYBDn8Swv9RCnKtBmos3BhfMa3Ua5ZyvTgj2bylaPb+soBSKy0yWq
x9DUAZvtBSulQG5DHlmiBm5iLQ6HawJ4mv6aJRLZmbLdOJrHgfHpx/UxWM48YEC2TxKH+a7gOLTG
vu+WJxEzFfX21DWfjU94/vmBrc10XP9u+hiwH3bZ4VGZd/flJ951vxWGhDMBtEYaNPfBZaABEMo3
3xFPOFDZd254QqAAm23WYX/z1eYWbiR6I6OBm7XEn38BoSJWASKyR5OGmylAXotgGZebcQmklJl4
DDgwZHmDUJbASUeeuGQoHzX1ZHk4SFlljPpIRNd+N/qnHRRiVWHkZUoepNyWwKEihXTtGTnJGJsZ
KFiZZu5FkHvt3bmhijhFiNdXRFyIUk001oiWoV2FVoiJ+eiS4mY38QmlcFCwt+hHjZIJ56Ha5BHe
JFnmueeopApTxIAKXJkijdSwGukdthy5h6WXOqkQpFHVFpadHV3KAIchecgcAm356ArEr5s5lSyL
cQYDxndsMmlgAdUom5oTnEyplEQf2egPsCMFY+GpoHi0ywoIonEmjCeqZIy03VJbGCzOeEdgZs/q
4iu86DI0XHGHrLPAwAR7e+helGFbDCKxFKxTMNyIFZEr+CLjcLADkSZjLgIkdInFatlA2Y4oLfDO
Hyh/5qdl4bnCsAzxJrFJou/1IUfMs6XHYC4JmKwI0Iwwe60nPpuBNB12NNAAjw4cEUjOPDyXmA6Z
YJ1GOV7jyJ8IZJdt9tlop71BBAA7';
    }elsif ($opt == 7) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBIyKjLy+vERGRBSK/GRiZKSmpNTW1CwuLFRSVBQWFHRydMzKzOTi5Kyu
rFxaXCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqriyqtCUFz3Rto/INvyQP
IIjEIIHw2YypnE6nABYKi0DgUVyqlFYT8qRoDh9RqeGxXWJ96FK6V2smHtCAYS5YlFN3bNYGHBTA
UXQOZEcmentqLG5+cXIGAgIGA1aHiFwufU+NdAYMAXcslZZ4aggDfgtRC3OPkA4IN6JLoFymCVBh
jq2QDytbZ4lswgBrbaaMqWJ0kAIMvTSyoyvHUGBSuswMDAvQE9JawcQm1E/JcnLMAgcHzy3R3yim
toDXjgyQDOvtK+/w433IzC1rto4BLBcxvEmjVevYrXIGHOFTt84BLWDDihVr02QeLmX4/7QdaHAg
QCiF/nZ0PPUwGZ17B/KtOzDpCspvGtV0AfgHVwF0kGbKZJDnZkpfO1mWc5lu6Mh9howexZN0yBN6
A5vJjFmmX5sjK1umWvUyKLOSSW7mzBgObJ83f8Zi09oMX1oJU1U6fPgxIp2CrZzhkGpprbidQQrc
grPgJ8iRB1wJcDAYb94WQExpwmVOigOKkz8fQOJ16sonjOg5bhWZWQOopWcwxKQ5ge2PUVarazBZ
QAOTUS2zHS5u2I2Ot/nKVfZoXbMGRIMTuNzCix8h5TiHoUNyZoODJGJ/Jc5DgVLFS3OBpNh9n3h/
XuCWA7Qa3T2KMYGHJ0y9hxvFC8ABiP96rETSyUyUJSRcYWAN8MAtqeCmjBwMsPIISQJIBw554cxG
1XX0RRiGgRZGEhQDGvangnlDLFfPI50Y6IABn+WDooLTwddhIl2wlEAuEQUC44wl2piiivFoZs0q
13DCzByfERTdfgsiWcptgdQTwIz3EGmilEcyaMMpflhzjjI1QlIgAw00YBGOGxYnp2FHUCOXhQXi
M6MDbLZ5I5U5WqkTS401KYAuj9znWpv6AfCebDuysRNc2+EJ1ETsNfroQm/9yByedLW2zmthCtqF
EHDEwYlfgeVDUJtGbDpKj4ysBqOF992jjY2xqhXpnL/qdUpfiGZFUEUnyJpFeSwuBdL/nrvARBKp
peLUVimngLGJjE1pM20DpPFH3QvmQfhEsU1B1l2C1SIZH2PMfZaoSKO2mUBlgfZnBE+NOPJZlPm0
KfCUYRpmMA0rORgGWXkGJXCb3MjpqLiIMPQWFI7N5fDD4N6Vr2m0CXEnc3WN9DBUcApagi0KN9lw
wAK/6bHKPdhZKMlnzXQAePjSjNgbBNL45VYHRGzTggdzSBwbCDw4wM2shgQTA29upOyyXTzQ4ou7
TKQNQ1dbgRyA29mTzT08H/2xisg9DXXXAN8LQ9hMAEBmOS7DOJHcc1NsmmYYu9ybKzXNQPdx1JjJ
6iN8OlC44X6nhBx9n372SSyRw2eLUED+QmK0DYdzZEqA5uzpwCuUZI6TR4IbwLcZqnMKYZYOTOHh
SVVSBwTp9QxwuzuxW7J5GL7DE/oOQ2T2O+jB06zD8c7jK8L01Fdv/fXYbxABADs=';
    }elsif ($opt == 8) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBISChMTGxExOTBSK/KyqrGRmZCwuLIyOjOTm5NTW1HRydFRWVLSytDQ2
NJSSlCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4cH3KtwnZOHsPy
BL8Aw6Fz4Yqyw8GwCAAL0IIAwaAhT8eri8cEPh5RgUDxYGhJ2fNqMDB0A4hGWEFvmK9pdUrZbjq/
cnJjdURFeXomfG5dCAhfBWBSg2RWNoeIADRcTH5fj1BiYnQCdzWXiDRsbU6skA2RknQKCQoBlhOY
K0pufl6RcpKisg2VLaeoPGysnpBRwcJjAoXGuLkoSsmdjs6gwXS0dNMrx3rYbW8BrgWv6wLesnTF
KeTlbLwLja+fke6TswkJiL2oZi2RIk5e/jwABmsMOIBkBkooeM3eAkasfPGLJQtgggXj/whSzMRn
1QI/vQAtDNXR4yxxJuidKXnPDwInjphx/Ocx4A2RFM31cXIyoydPDb59gwgQJAqZM+0tYpXyKBh/
SmcpkAcAKhKhiwwQLapQJ7yssx48BRpUqlgnCHPmvMpykjB5Xr/SRHmyk9WVosApYGkrJltr2HgU
7YvP5oO5UmJBDCWmWN4iQvsGaNJEbiNH2+ZAjJxA3GUd2MLyYhV6LrNI/0IViFjitI3Ebvs2Kmu1
GSit/egYnjhyB49NYfE9+cJbp8PBDqfZroEb+erlRv+CohXYadfDuXDXLAqGeXPfgWnRalAbPCZz
q6tGae5cmOD2xEdqOuDg3p8nUPz1CP8s3kC0FRruIZPMG4BwA4l2YYghRUcDIJhfUCRJVVZkUbzm
oCS/zXLHdNTR5AYcv7jT4VHBcChAA8I4RWISyZyDzydhABMgFINBp2KIMiZYzoIneqFjP5SBEo2E
KnZnIQHFkeSAjeQR6I2EzwwWWSi0FDbjDFKl5Jsgg/xoF5OSBXlhW/Zs5guHz/QTDHdNCuCRmlBG
uddJOUVB5pKUfSObQwCNKGQ5/d2zmzOBAspSAoF6VMiXWyyoGxy+vdNjoLIM4pEVlLawl1h9NsTl
KEie5akC+OVZHHzo4Iikp0zauZSnaj0Z5Q5T9rDMRkoORmcsZXZU2HdrFgTfRW82tNP/oJ1qNUuF
uu66C0JOvIIAoyyhCs1StAznqn58MLuhIFvaNYpSPeVarZ5TrgZZGCGuC25PCVD7LrnZNKETiN3C
ox6+4Yq7a4Zi+fDFtjrCKMxZPPXk3b5B8beKEwXE4aAoWEXcE16HqhEvn4+xw22jWhGcwLGtHrwE
g2BsG2FdkwzsElehssBfkcytw+2Vtqo8ccvwIoSUzOhShhW+7M0TshbX/mql0j225BJMRL+qygM+
pJPprA//k7IBISVbUH8DBJFOHAjUySlP3yAg0bgVr2LAv0kHLBgd7v5ktjUj/9GMzErWfFYBXGHx
tBYDLOFvI2AcSSxaAlHz93sA8PKWgT7cvC0L4jHkrLONb87MpTByyyC6Lv2R9W+q/gxtOd0Y9uBX
jlQPVorqi2NWwgGapUNgwAgkPru1AFiksKnCFKBvDquvkSjXw4tSANl49H7FEo5/4jAkzyMR/QoM
uPEYLFQYr8P4KnDhyAIMNG4N++0fTP/Bfoug//789+///xyIAAA7';
    }elsif ($opt == 9) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGxubKSmpExKTBSK/IyKjLy+vCwuLGRiZBQWFHx+fJyanMzOzLSytFRS
VAAAACH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqriyatCUFky893zgu53B9
JonDwcezsXZFAHGVGCAQBUUhGnAcksdJa5niloLOQEAhnS4EC8UQe0Iqv+wvOEwuL+6CRsPh7arc
N30uQgNOCGJkUwV4DQYGAYJ+MVozkSpBB06GY3WKd40Ge1iAcUSYhWEBh3VlUWegBVc8pHEmpwcO
q6yKZp96jg6zlEyXcIOZhU+siYuLZ3m/DQV9XG4+llunqMq8d94FAtCNjQKyMLS1NELITwjMrt7e
4Xr0DeZZEoHGLECE24h2FjTDMw+UI3vnhtUytY7dIU5SBN7x5C2aAQYI8RFI56IfKkPu/8Ys6jTR
2StQDAwI4OID3T5Jx5CBVIAoCs138gxeNDBthbWXPPplkqkLIsQyChrMc+SIQcpgfxRyVIKJ6ENW
iDhFcfbLadOL90y4/AE05sd2WG/uIrNg3EWnKRkUiJov3TWh2x4ecqeW71YpeVK+jWsAahupHKvm
FQNQwdVlEZlKbtqgGmKyxH5UtaqVjKoxAWzagRaqgeCLhifVNfImieJthrCquimabTgBoZgWXDLW
9et/dRiDXmsGjUGl4QofXr2lrK11sHWlhcxs4h24aMDNFXs56Bu8Zx+qumqzWW0FAsG9VfqJSO+g
2pKBFC7yHWRPejCeWaBc9UZ+OYAhk/8mCIC0F1/oUXFUJ4ExgAZ/25HwE2sB+iNfgbEdKNIUwXG4
S1sYoREKd8wVsUQTTVy4CScQOUMFglIwk8dOphlgznusCeLRgMl0Ul481FW3lGSG4YiDYjzCOJBJ
nfgYUQFK1RiKAv5N9YJQSQ5Qk0S3eXNfL8/wd5E0VQJ4JCEWrsjWItCggUYiAU0RjkC4HVRmjpVo
NtRZDoyXCCO3CcCLIuztZx05dyYG3WKMPelmoIXKeVAD1i0CSqJmtnaJhe0cVRyk9WQnDqXxtNVI
DUYGsigdnclJ520GPVhPpK84gqlrzw3YYkDPkOaIm6bS8yAjoaDaHRYehdcqoLD+Omf/VyrlxFSi
1zjHxBzAedZMoOKUVhBThTYowK3NUUhDfIU0xsujKFGGXKzGeTWuhMcii20ynkrUKz00hjIPRsgJ
AFeEqVby2yY4OVNQI16xFxi4KBVZrz7nroowh/Kw2y6lyU2G0o0Tw2fxE6FFxCWoDPtb6zj0pNSS
QtXiyQ94PdK0VamwjpMScm2NmR+i5ObZRUPs1DfQqznv5G80+cWVWsHFfDGyVt08826duR0kmVcM
3AN1NpvhW7JJr+Rx21uhnAbX2hHSW6JdDX20oXVmJ82U2mvDlRoAX2fD6SrbEhSo1qcNlrcBvMG8
T8yaMmThhuj1ut/CWadtOFwBoNA3/z8DAm7SnBofl3LeXln2djpWJTIsOCjPKlhcee/t9n9WApGM
LjhbjXJpTZG+UgqbXwscmHjsGyW/XxluI1201170Vr1w221uBpGeOfO2LK49nnPMZjJBxteDtlc7
9cR48CwMkMkqY6TX6zzw/9K7ZL/7FLKJhHgfOR7gnAEO8qOTTFg0dz8TqU8ZJZtc8SDVu8ItrwXo
W4H6EvCQQcUDVtObzAMhWEAeQAdwCVpgznSimwFibyonIATJYgSm+LEsGj25QQSZcIB2DKAVdDMb
8pgCiRzMcAU17BT0BLcU+YlCGKebygAoCJCq2W1K2ABeB/GXitAorFlMiQUbfniJFEO5wx1yWlgj
1FALLgKxEDZjXZsKsESOmLELmOgT6wQSgDai8I00DAIQUEjAJPLxjxz0IyAH2UcRGPKQiEykIhfJ
gQgAADs=';
    }elsif ($opt == 10) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBHR2dLy6vFRSVBSK/JyanNTW1DQyNBwaHIyOjGxqbMzKzKyqrOTi5BMA
4gAAdyH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm7sIgAt3yiM48gR
BImCMBFQDBC23WuilB0UwARjWhBYFwtB4thM6bqqw2GgUASFhalVwMAaDIlDsvsFo8Zkc2JPVWMX
bwYNDAd2dXYlPQN5RXtnDGlqAoEGC3F0TIgnYotlUAEFZ2mRaVaUCwFzMoeInIx6jmiQU36AgJUD
O6xgPXiejkFSpbQMV7eVb6k3u12unVB7kY+0Vm1/b7cCqivMSr2+v9GRxWvkbNe2lYUu3UpiCM9l
P1J9bGvGWbfHButLEpokvi3KAyXUuHvE7u1rEKifinY7xPhiFGVWtXLmTB1rwHDBNhMQ/29IHOgJ
Fp8qs6hBYtOGkqA32rhlAvgu3rxoUrQYJNbG2BuGHAUp8zLTjsB4eobQC4ZGiDU3P18CdQiyqJ2R
JD1FCQUpVhCet4ACFdTAI9F/mrDajKUUGFdZCzkyJBvgLAGAveAhBWKQKds0ZwQsCOoyKlUAIWeo
ZQTMEYPGTqUJLoztVoIcVpupDRcq2mMinZvSE+xGX5bJVBO3WFwyytcpRIB1HVUFi4C5Ze1NulwV
rdGaWeV5/hxMnNOcC4phkXu6AKA5qlcgcWakNZBZbo3zyckSUNCLBnKViL4COFJowhq/FgWYVu2X
Vqo04E2CfIqjBM2AUs/ncTHYkKBBT/9LgmRRzBtJ2JeCM6/8sNVWS83SFm1OTdKRYByJh1hmEclx
noNFRCGiLAJ09pVBkbXU0Uv0KbgJHvn98IlwsVVEi1uiTXENJVbY4KIJiuQnT4hJmRjEGiai2BQ5
ywUymI8c8gBOa+G8llJPXQUoCjGnWVhJA+v8mIgr1ZVExnUWSVLNY305lVI5kw0mnpgBedjJh8Ot
YRs5Q8hy0JrKAVLXhr5pBmOZ1u1UIml7BkhilzxZY8CgdJJAJhlC3lQKo/mwIc0UMGHxHy2W1Rfl
DXndWaZr4lxhDKNrklaJPShNZkABphaqWXBaeaWmnlDNqmMle9qThSC8VYofQVtdKdj/q8Euio6B
3QWS7KkiYVXSGSf+epp3s66BDEz/YcjQtbo2sdm2w0nyx7uV6XlKcipyhO5dadlZEnpuMvkHo/PK
io1PDFGKbQzfHMqugMVU4VNhtliz4jUZ5orvVUdBwdk43mJD1lznDMZjIA1Ama475rXG1q+cgsuQ
vC6lY4DJF181xhiIfiKFMP+9KylZ4d6GTGkwjXcwwgwi2izL8JJMrLi2DAbUoITWDAYnCoeT0D34
eDdX08gQ1k+lltqpKjTHqcHkswuNK5ZcHJllMU0w4kyQldR0DdVclMANN9VVp9XLQGtZqVvLXr/0
sd8cOUR22YcyyzO1/+YjclQ/Md6A/wAnPD444SqrDazllJGsuYZz063XWlS4mpzl+rj0Ntwx9Wb1
1ZwobThpbBMYu1SnY3ayNwBM2UiFginHdjq/Z+43fbYDVIMrQCSV0bO8V0606WLbJX3xOKM3Gtew
v7u381KhHr30QepMT616hly6VJTg+tDRMgjkfpquchpnsIqDyUdSJz1wuEYSa2vZuIBWFmwcZn10
C59+tPCmTo2ub3x7wwMhqIlvVAl55VKIrTKIDfV573vgY0x/zNEleO3DSRvsHP5wkDvhUCESXGPb
ArMRQxkOD2N5iEVCMtK0sFxiFTOUEqb4EoAbqcl8CxwKEn9oMzLUaEAhXN7ATMiOJFPy4AhWNM4T
BVYWKeLgcWGoDk5wqEVB9bAFaAxDEI1zjskIwIxNiOOCcLYfh/HuiJrQ431gtJ0ADOCNShAkC5CA
whM28pHLEIEkJ0nJSlrykh6IAAA7';
    }elsif ($opt == 11) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBHRydKSmpERGRBSK/ISGhMzKzFxaXCwuLLy+vFRSVHx+fNTW1IyOjGRi
ZDQyNCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK1zKiHMFS
/AvF44GT3YoqxCDQaAgEiag0KigEEEjVMVtSOnqFphP6hE4NggWRS9pmEd5vb7EQj8vmhGEvWGfd
SAMDDnJzYWICd3hmDAwFfjiAOEqDAXN2d4qLUAYMBgtIkjRKB3J0dE2HZHhUTwmcewkKkRNcSgqE
c5Y9DXV3r66ur1J7BgmgNKIxcLiEDqW7Pr1NZcB5wlHFBo8zyi5eCoPOpnQFvsFSZMNnsZAvtUWU
hOHOPGCoTmPD13nZxlHutMCbNADXoGaFTp1jpWdVMFjasLTwtuKBoIvNoFk6dShfMGqL/4Bp65Qg
4AmKKeBQQpjLwYI5+MaARPREURRPnRgImDiQhsWL4gjZ2ygNJB5qiBqc8cR02zsJNRA8oBQ0VzSF
RhMlslMT255GjfbMEgg1KkaEPHi8LIfpKKZ8TvR8BYvTJACUJuBMLThuV7QmdbqC9PWWWs6vnToV
IEugxs+L44ZyXKgoFU2PenCOZDAgBV4SKs8+K7QR5kJrdQi3JWZsZB8bPVuofGzVlDlUtwtsatBx
K9w82oiNNfEZNO0dX1wSNRemd82kSGkOQwzsFeyyy6gKcqaL+Vu3vrVy1ZQgbDV3xQFIhUzIB9vC
HttqBQZXJqdG1hYTj80CznYFyL03Hv9g8HX1XFtNZKNTGQacxN8KodHzRWrRYUIHE9OgUg2BqlFz
kzUGDHfXg0n8NM+EqojnmzkzTZPJgJjIJZJ+bZCY0i2l5ILPgWIQtsgvNXUknwDFcLJTCcWt15Iz
Yajmi3uaMPQKdFyRMZIBEo2I3TdxjIZVHbn1wktI/ZRRX33CFAMQkjaeoNd2LeHGWy+onALSOjLS
95Zu1TyhZgBsbimbPLhoFNNtLnLFzj8H/uhQNgk0EGhjORBq1SVieBddNXK11spvaDiazqQ57CUI
Qi/BVNhR/ejhqqusxELffNbVKGh/6/ElVA9gDFmdGbH8g1ioRMJqJjakLgPAY0H5FZP/h+pgw1pO
DLQSrDWcHqklpdkBVaizhAW2yhT+tAaWMa542ko1eyTLpX/N0jHhORoK049mN1VLhYLoSqltkrny
xas9RbEYl5SuIhYWuThhK6O777LnUkJ0bLVAn+osRRd+whaZLh8QDwqUOAFcSliK6ABX3lyJ9UtS
deaFDKFKDvyX44VQJooOueVuvG+e0zkiM4QWOQCg0To2YNp7fS4qF12tdPrP08MleWrNfeHsXmoX
m9GqunPhR4ZmU++RZZJFY83dKUsHtg/PZRfjibWvsrbfrTOPTFpzk91ZHZ5SU/szo8Fqu+0MP+VK
mkIKhbEznmo+zfG1NxUD6NBJwAvZ/1WpYnUw3GCfuxldxWR5+AwDvAnnVebc0/V05UZOujYbx3w3
t8ukLnHnWp8zrdT8MhVWYrUbcICDeBPN7ISWNOmjV2rKemXL1G7cIPK4c4nRMwtMOBOt0Uf+9LDV
h0UXjZhnfpYlppCX2fStXSl17fiZbmv22iPHfq+sEEl+sMG5kvBqh770QQhOzFsIcKgXPwB6anQ+
YwxBilayHf0iYfDD4PQGGBYR3S4eq1uLKiDnwI7JjXbVy0kBP1iEU6nledKC30hiNzuQrSA9XbgF
8+akD/+VS0Zxo925ZGQ/7CFhJe27kzocCDfJiS4WHrwO/mbgHx2dQx/TAuCrwjY3bbpEUYq22A5R
jAI6dWlwegk4ngtw6CYvLKEonDoDua6FRlkYoU3vChCGbPIzOQZQRgL4ogTZoEPv9fAafiRGp15R
xKdMkSDQABPGvrYobSygkY5kA2gKogBMKQWR/WigrATJk+QVgR6YCoki/dGwAmByjXisAZwkOa5Q
BseVXGDjoDrZPa3EMH5peGU3YgnCXvEpYVLApSbvt8wDKsA9VQjCAYQZCmI285qZxKY2aSGCbnrz
m+AMpzg7EAEAOw==';
    }elsif ($opt == 12) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGxqbKSipExKTLy+vCwuLBSK/ISChLSytGRmZBQWFJSWlMzOzDQyNKSm
pExOTCH5BAAAAAAALAAAAABQAFAAAwT/0MhJq7046827/2CYAWRpnmiqrmzLUqZSyiQ9u3iul/Ce
K4XHI3EoFhOPhkJm+70mPtayQCwuHA4EgkDYIhyLRKEZPfVw5FOwal0cFtdsVksXHJRp37lcWx/Y
Rm5vCwICCIZ0WwIPeSl5e2VBAQmURpZwmJiFhXQEDAIDjY4mezamKkADA5Vtg5kCDgKEmlecDAx3
ZZA7BQMPk5bBbnCcsLCxhbNbXAEAoim7aL2rwcFEgoSHh8WbiFwEC88o0S1LvgnA6OiTgIIHnNqI
Wd7fAko55CzTQ1Xqf//CiGlBVEdbFi5aGuCDwqvAmkkQ1aULKAveHEMEtSAkwGgUD4Y1/26E7KOK
ksSTAA8EcNUt0cBsnRAiGCByHEgXQPZFjPgPUBtNLzkRwmjoGxeFTyTocPig5KqJlfoJS1YL29Ch
RY0iQKoi34lUJX+djJoyELGKmdIm08KAS1sBNNJ4neEwLCWIPX2axYrJiis4Mb+1bdb1prOaOX0N
EfvHpBF0fmdpKjTI7BuNgt0S4GrGsCMg/E5CLWsFLbG+cCoTE9y2NdyRJOY6m/ZnSEQiuKu1Qbvp
UqY3AjTf8uTpATTPKECXRKlXN3Ci7oZJf+egrWajcpHHqLvKtrrcut29ibUt9ZvKrjB3McqAMCnt
dKetGmtkZbXUxJD1/ak60fq2XsQVG/9yNjTAnXeNBXJeWphgIctvEOJXS1ZcbEJAAp0pVVMNyi3H
zj8M0mIEGOadtsAhEr7TDXHbFNKEVzn1ggQ/Cf61iWTmuTIIApPt94onDPAoy1bvaYgKd/NJlcAr
5c1ynl973XjJgicS9yACGH5kZHKJqcLYEWZpcZoslzxolSHYUGkFZg86cIANkJhioCrLVXMNg+gR
goyZ3OwljAOePBgcnPDFSOcQllzzFzb2FYHRIXsiQiaUVFZJwJCb0ZCPAnPSeReYlg1D6XOGzOMF
iiVWmpU2HGlpACqGduePXqihNwg8y3SBqqiqYaXVmwNu2QSn8nkI3k+TSsekRsO9JCr/g4/KJICr
K3R5zgAfHvvbbrEIZNQ3u4bIF7ivAZCPgUE4hQ6NzqllzCbqaUWVQBVRVdQhmmo3RbHeTVSEfWkN
dKl/AH7bBVXkmgkTAfluGYO1svrrm5lzuJTrt7e8Rch6Yiqs0RLm6uvQNAmcc5t4i6qYUbysAQiP
TDieqEXDryI2p3xI3FWFG4CAcetAWhxEnHUZH3xvHa8AWi45sS7GExvtuFkEecZ4YTCQLmmWTEUH
IUDzCkjmjBtexy4KU0YbAZlxkJi5rMlF1DrygHwIpsNGmhLKrI1Gy6xdNMFd5PdNOMHWXFMDTc0H
TF47iyeIoBXrmrZbRV8anCcoGmLd/wFxO3LorD39gTKvMGVtsN9Br7rNFoMddm668+XV6JPCvLP3
xRirHWQhgFqna67GFQ72NMAEYDy7atbnhjd8S45xxgNdbhQ9hAobA+KKm/Spb/fp3Unb7BFn+b2/
L1NuyA5v1x07TjfXfdaB5e4yZrdvgeHXqCDe722s0B7lIeC6Wt+GE0BFYO4oRTKcI9bwHXbQSjcU
2ggB2TPBySHAdwyrngKTg7hKrGRWjnOXenznuwEOh4BrAxIXstQ5FfQiNI3Z2W7qJbPwVe6CKmwN
Cf1mHSIlMAYi4RSiAEIrvWUlheLLXWZ26DcCcO4wwmsBU8gyqmzo6nIpbM11TjhBHv+mEGQ/LIcQ
sucbPc1BOCdM4nWupkMeJiA76UsByT4UJQflqolDw2Bm0MhDByDlRfC5XlPIAi2h5TGLezxdG1MY
PDLIpgbnaMdZXoZDtQ2NNcK5pO64AKzjWA82TMDe9tTyhb5tUY1rfF7RGOAAJsBxg1JIHB2BM5Tm
LbGCbMRjW/woikeWQH/bYwks7qjJA+KOaJVbzz1W4MsSvNAffyEPoGxYQo4dsocI6UgvA6kCITgG
WUG72um2iMsuBK8FzZxBU74kTFu6ZRm4C59RHKBNdHITFfxYHKm8ACirHVCc3+LROV2Qzhiwk5Yr
c54/48nPOzABBwU1QQEa0L9JgsuDnZMjWoUCIA6bxFEHoLlbLU8lOS8ECZXgGAMUF/LRHShgiI66
gn/imUp6drQwLfVBA4AxGdOJkwELYMRDoxBRsGFrJWdhWUAdyocwNjU5MrrV5ax2iATgISQ3xSks
n3o9SdgtCfcYKlfRt9WxVgs2ZnVqWtfKBxG49a1wjatc5/qBCAAAOw==';
    }elsif ($opt == 13) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGRiZBSK/IyOjCwqLHx+fHRydLSytKSmpERGRBQWFJyanLy+vISChGRm
ZCwuLCH5BAAAAAAALAAAAABQAFAAAwT/UMhJq7046827/2CYAWRpnqaCrmzrvmpJrfFr3zhQl7s8
5UCe4vEgGBXIYG7mqvVYw4ShMRgsENgDdmBIEJ5KE5MEzj2kjUK6al1csW6Eu5Aoo+yAcbhEkBoM
BYBqBWpsC1ZtblcGD3s+Eo5kCQEBf4ANU3+BmIRsiIoIBwuNOTt6PDgJk5SVgoRpBWxUsQNUnm8H
BQQwK6cndkiqlK6ExVWBVYe0swOFbwh1Qb43Cn2rxISWl7SKnmyxDc8GeCh65GR9w4J/ra3ra93J
h4ZX9bs4003Wk9qUDsPuAE2J5aZNInlw5CTA96PUPnUF/gEMqKlQIkXzPr1xs5CGmIa//2g8dDeR
pKVNtzBm7FbvSkcX+VZ8EbZKYoB/Nh1oGljLE5yCzejVU/gi5q+HCWwCNEDR0pqeBTsdsmVIjtV7
LMxBGclqmM5KN5tahJrN4rIBcuLIwVoOZIsh1gKsCsuUqU5tJwV5q3WJWEYsgBE0aGGUjAJVk5Te
baXzrsApPRHB4jQwDcZQgRc4yOpWZFxWTMHWxXupAVVvsAauqxJYC+AFYAobQRygQDsD//44dorM
EyFl2bZhMmCldeDBbSGFJFNEWOOudQM9lp4G8i2+qqsHKnDFNWbAbEkYRcK1bqvqFTlRJginmbZi
rtB6Tyg4uYC3s4WBXvoHPaxisByEHf8mpm3SiVVWtYQAKY/cR8ZR1jwglzq4naTGZKYVyM08g5TF
CUrzpJUWWgWcEFM1tHXlQESWVGHLafRIVssr/2WCTIivBYUAWyfmpwpOluhkWozJzEhVh7JItt0a
s2A2FXcv5dEZD/usklRegCBykSfVpeHlb5HxRaAr4SDAgGCDICfelCQYUSUrK8K3YXsFFViRQMxY
YdpjOxGkBXYI1JBPczRNSBwVpSWjRUa1TIaIdL8pk0lfLXY3I3cMTkMeYhJCNGNpjEbmpTzzUIHR
cKq91wBgxWjWYAokFIEUaMQtuZeXe0KW1hUIIeAen9JdgpYcBJW4pnJHeTHJshARg1r/J+q1gWBg
cjQzCJ/WbVRPDL6giJREeNFYZKNfWvRMKK49Calw3OwK27EOpuBjoXRVdGGRGQ7pDS4HMHCmHJO9
kqZPu97T7RmfzUVhfxdSRYWpQPF7wMTtpVnIqC4Oa0VHBx+myhkTQicQgLTsqxJmE2uR7jGFEAvO
INJyPCWKKXa1MHz6hqiycRSnPPG/zaz6k7UgLiAzsiZUyaw/ox26Hb7FUZsFuir3y8DEOMJRICfJ
HB1v0ojRJNFXeqln6jFqfRfK1T7762+11CrjKEfwrlCoftDpFAukli0Ay7ko99v2275G/dPAbZAy
Dch4M53bTjuZ6mUcoGThs+D/iujk/6W2YKH4zOnsd5d0N2nzIXczps3zz25fPS3F5JLKLZsgK2Wh
bk6R+6ItgJuJsr9WEx4H1jMOK8fsSKOjn12a/KqbLdu8UtXqgwN/5iELEJ+Mk6/esXwrxWw3sotb
T4bL1FQLHvz12wOGCGBqakoAnAyTrrctAHZJBbXq+4yu239SBMW2QLnN1O0OICvdOmiluwVca3Lo
Q9+ZLue2allBFO5DUKbcEoMoNI0QKqpMwyxWJnRF8HLBcw1rXoO9OHwkeTx4nCYakBt1BGhP+ova
ztLXM9ZhMG3FiYMBD+i9YZRFNwqMxRRyJQjTBMZ1P1Pf2oBXNRZ+x2gv/NoJErgN3P8JKUPgyJdp
rsA21wGwh60zYRVDsa0svuUaF1JDRYzUBqp0p3VUZJsWrgZAtmWBjyZkQJSkhLQdRIES0PIQHQew
qOHhsXUUzKMeWUdFLPRgPHDc2sW+1J0/PtJ6/fpfFPv3SS0MsXstWN478Nerqn1ykmdMmSj5CMl3
6QCVLCBCEvFkCGn975W07B8KU/ZJBJwSlzToVBKHtJLWADOWw+QhHg+gJhOx6RfKbKJQhkdMYA6O
h9XzI4OsWUhUMGcuczyZ5TD3Sqv5cJgADEVHnlAY5tAqS0VSSzfb6c4euhOUEzMATK7pPSk4hpkY
2SMx1ydLClISeN+pZi8IigIuzjHdEVbZJyRlmb4y+tE1DSBHPU0AMtNxw3ijnOYkXUnF+YTUBiPl
gUWX2KtZ/lNlZoxmKF8KU4om0w/NQ0j2/DnMovrPmOcgIhBAJj02ZLRqKFRjQyeYlkEWxaepHEZQ
MLq2AULVqE4qwDhvENMVlNSOEmvo5cBJMQcklZxaDEIUHIDWdbK1qIJ5q30icUtV1FWqKAwmAsQa
ibLC4AFCwt46o9hSUbiVr4SMaySqISGI/VKKDQjAA/R6VRhC9pxSCMCebpKAzX4WrqdNLV8Nq9rW
NkgEsI2tbGdL29puIAIAOw==';
    }elsif ($opt == 14) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBHx+fBSK/ExKTJyenCwuLMTGxGxqbLy6vBQWFIyOjKyqrNTS1DQ2NExO
TAAAACH5BAAAAAAALAAAAABQAFAAAwT/UMhJq7046827/2CYAWRCAuapomvrvnAsk9Rsx0mu33B6
+rQJ75ZoDA6EBcJgWCIQC8VhUBjaaj1eYqBYGhgM5vOp9IIRgYYVhl3/CoFnsxkeQ+1PMNOwOABx
L21rWwoLZXiIeHthYggHam4Agj8zBYV3SkmGhlCbngRJXo1NCn83gqYuCUgLoK6vr5tJsKFjTXYH
M3+TlQqzrr6+tLStrpy2ZUwLkKdCPFzAw54Is9Rknoe21nIDqS68MAfBCsLFm+WYs4YEneytiXIM
flfOMoTkxr/4xpjH1+xkOt1SVGoGuBVbAigsB4ycMALorvVzt2mMkjm3DBSMgcrFAIUL/xs6HInv
kpJsxUBBUalIDJONgeq9OBLSVQByIEk+dGfnpDQ5GEcFQKjiIIkCBw7UJLAwJ0lYnFo9lPrr0Chb
BnLFlNCDptJgEHMuHLeTJViI/JIxYSAKIwNmK4weUaoQFE6QTUfGAlXsKb6WX1yKQpDqINKkXx3i
zauT76uS+/BdnCMq28tvMn/MdapAbOebnfXyTalXZxcEbG8d8ve2BbgCXsWCvsnYIVS7wQKghSgZ
3hN+fFxnRjGX7uLPtW3f5m0abVRFjw0ZcBB3+OGkeEOHnh15tLEoT5n/rVjZLsTf1bmqSOAAu2zu
OEtD7dTY9t9YgamZJ9CkyolJsCGWF/93oJk2FRm4lRaec0qEQVUhTWgVhHontCcgcwPa15xP5pEl
noYAiYHWaXz4gIqFdGEYkoEj+iLLfpeIZBonIrK0BHUTCqBCgNgVcheL4zC4DliGlGNgeF70tIBG
/8mE4lcEKrjPcr7oVghEQ0pZkiZynHQHYTn+8GR28U05zIgJmknNkSO18k5lF0HSxhbFiTPWZ465
qaeMGJKzDnhsluNmTxGGeRRixt2p3Gh/iuTYbmUA2lxZWEb6xFCS1APbk3Q1Nk2jvDm2kiaRRvEh
WC42lCcCChgKQAOIJgpaqFw24WaCFFl6SxKNPaZPqMcsYAIW7I1pnKqjUUMVUy52YpX/GD5Bdkk7
LfJlx7D1cGrcQ8qlFKpo/izJyDVBsjNQNC6upgaxKAagVKe/5oPbvAfu0YiSrvBhkTA7HbOuM6sI
2OlN6MqLJqU0BmUvE9aqNiQ/QA2QqXqruPuuu3d++51UU/05WUaLsDUNFLvut0AdTFBH7LvY0ZUY
c7s9GgsmWO2xRBhsKZuMg+s07JLEKyskMJnyOQfxQCS3tdYZ1yw52KjJLGnAvxSz3PJN2yo3ZTEW
OWGLHqLocW/CfMiSzBJU60iCyxZjfNyHMgMUkBM2L40azl1uIthzeWBLoQOdCeg20fNqAuncdywM
xuKLIziZ11564bfaAMARuNuJ2iap/0rARq6Nwl/gzEetS5yk6wKuwurywGTyCq5dqyUu9cKh69Gz
0xKBjOmcSZFzcXZjnarJgYjYG0/t/zzHSc43ugpA75/J+pl2opk3qNO0gy56IiDzwUQKgrSnGG0r
Fuinr6F+rgzdNjPi4ECgQ9skhSjMSj2306uKKo0XeU37zWJzSe1CtwcJnYhgMMNflWaBqmD0zw4K
S81aFmEvxi1uD8yYhANWRCtH+co+Z4NWBTNiQQHizILUKEpmKgYZ0oRmOR0KhfcqOC4KMmKCtWNc
ylRIPxNs0EzsQA639AcWJ1wwMDRUGhIveEHU8ZByJ0AKpcLiFNilqVkWFF37CLjFpf8FEEfzg2KF
EMabnESDVss7IRdDlr0J6pBhwqFfFMWBjSsSQ0/iyiETB5i9G6qRLXBxngoaoBs8pukXMsRKFt+I
sgqGDYm3kNATw7ETajHEGIERlw71wEgK4hBsqimMTIAAK+LdqiohOiEns2jDG7rRlU1QgymM8ipx
iEpZpBrU8VS5SlW28YhJkmR6xNiCH2LpUeuAoNQWyUoBvhKWC8DUVohZTAQishZeClkvj/g/0QWQ
FN4Q5AsAV5ZOBCQobCnhG9sIyVvAZJo2YI9uYvGmrmmTmd90X36U8U543sCYDDGnIvaIQn168ob9
9Oc/rfkdwCzybiP0ZAF5QEsXSPGKjuZsnz45uU8tOiiQMqioKsgJldXQEJje1KYBAhBOhVrholWx
CgA9GjrUEBAMBAApPeT4UoIFq2YF5eXiFgDGNYi0EqxAiUuYuEgD5DQSYYTqCmCTLsq4ZZFS8I9U
J0ZNqRbgMKcBis2y2lKjDmerLdDBV3OAVo6cta1wNasI5krXutr1rnjtQAQAADs=';
    }elsif ($opt == 15) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGRiZBSK/Dw6PJSSlCQiJHR2dLSytFxaXBQWFJyenExKTH5/fiwuLLy+
vKSmpCH5BAAAAAAALAAAAABQAFAAAwT/UMhJq7046827/2CYAWRpnmiqrqyatABlvnBt37js4nOD
BAyF4iEkMAKLBo2HWsYmzFUjoDhYD47s9cF9HIiMRQHnPOmipULA27W2u/A2Now2nUtlVoPh7hbh
Q3GBXlsLdU8SaHtxBI2OjQyORY0KjlxbDA01eXc3a1yTj5GPpKJGBJdfDwZjPGd5KQ2oD46RlY+0
lUSlpYNwCK5QNwu8laGQjaC4tJQEvnAMsDMlnSsJQJCju7Wjo0PfzslD4oygmjXVKQkMkey2t+3u
3ZJE38rOt0Kg9oYw6Sfr5IV7IM+AQXkCdemjxQyVkIVxDvRj8Q/PQXeiGBjQuBEhO0mB/0KSuhWn
zUQVFQFc0yiwlsGXFzGS6oLvlqiIcAZQFKYCAceNGx0BhckSITJntD7WGgmnz4NWKSou+Ak0G0yi
Rm1583hqYBU2YGlJ+1eAakd3QFm+LCqTlEd348B+mduFAUqeJxBcZdfxIta3vLhibLrlkhedKNIt
2PuWb1+2o9w2Fug07CUFnPCSSMD4bdq0LZExSDr5Y6qScAwk1gxAb2e+aAsq9VYKdmOkgIgw61Km
07q92WKXVkqpiO3GDx3SxBXAjGafwD+CFmwUd3DI8iYZZmb6gZNOQ1+Gc4yx/O1x1yeXIqQgHqqT
dwY4Xjvc/MePxkS3MwIYrhcHpLFDkP8deIVHn2wCtdROPqLV0tBxGA3xBX/vQPUKAS+5dmBovByV
XlKinCVcIAe0191EZ0x1FVZGBPWITTZRSGFblWA3lDs0mdYeNTwBkWFnFE7yUH4UdjQjbeQhZCQq
X0CEGQlntPjjhjItVAQ8EQZXXHtnddkWHKigco4OCXC54lpCgcSGZM00RAkXRwK2DJyoAIOIACTI
IuWKkWXz4lIy5TKOLzXGGY8tRviBimp3krBAjWcGZdwpk+zXolJxnbbLcIAipY9djbYGRqRIdhhk
W7gR0mSAbWHa0i1QCrNGI5Ea6V5x+u3nzWmqcEdZpdWhAqoOQSRF6qFdNVNeOJaUeMX/XODUOBqY
h3ojRKyJABCEEBxpGNN9Hi61JT7bOftsQ4DMSOku2OKpbT1m8ZlVn8WB0lQqV2ixjR8PEofPCzoY
AGe8ax1khLSSvImaqnPlu80sVsCTrD4EtEuCAfjMd+ZtzCazsBUONIwFgLsMEjKWyTSpgMUAUAFP
wZ8tyV/C2vCL77MgQ6uPuRITyjIChe5JlYJVBrkPYYSErIVTKZc4kzIsD8CttETd2A2Htnysashf
LI2ehPfMQgSjOhSwC3cxU5fQUSWp4jbIWZycT1j51WPnGfoYR53B9/UZ2TOG4TwyFm72WrJyiJ2x
LcVXc7O2e5HhlHPEXOv7SIlwKqRP/ytnAH02dwlf50wQur4jlxvOVuGG15bo5vE3K7MMQAOw10Tv
kVoKxIbbpwt+xSDAE6DyA83Jrm1yRIaCY23ugb37zajnvB1Oup0TqqMP7YMbeYHJiFvDROTrRhX6
jr8FXezymO1mENWTsVq3962NyA5HH3f0W5+rgJ3Gt/xGPQGKSbK4krRneU16WNgC+eJGCCJA5Xp5
6kLI2DAOrphIS5QY3NK4VkDf4ex+JWKU+txlAoGRz22FylIz2vQALcQNhElTGuoUwLWRLa1EvWFN
AQCniqCFCSm9GsILh5jAIkbPgy/kAv9GmIJPhIQuuEhWC2PoQqVVDoEz/ODSCPLA/v+RYIftY8/Z
GPSffA3xfjf0ILS2yAXEOGd9J1iAvXTjPmPYY3cvtKEV03hEhuFMiXeBoxOc+AyFIU2PZ5ShGsXn
lPaMhTV4cEhIhgS4Mtrwknkc3PmMGEQCFGAJ34FkCWhnrzDubgtVRGQNj0hDRvaKAG6MiihHSShJ
akp1CUSjHs81lytWhgAnkSUcVUBKcNRjEEdMpC436ceGVSKYwiShHvhFsYXwrorKXCTq4ATNaNqg
LHO8EokKiMZUWlJwfmBALHcyzBZ8go7ZO6UZi7hK3zXwC9G4QUpSIDUn+QJ1Z4QbL7epigBII5DS
tAFnkPk/8YFwnqh8ViaYsE8pQOxkiDkL6AcFp4BuomOWNSCGPVdXTiLWcH8H9QdIbTAAgeVScKl0
oRvUmdKPthMNBViM8K6oTK4RAAE11edKo5CABQQgKG9oDwLEENRg3PQQO2gqVCsK1ao6VQRYzapW
t8rVrnIgAgA7';
    }elsif ($opt == 16) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBISChExKTLy6vBSK/CwuLJyenGRmZNTS1BwaHKyqrIyOjMTGxDQ2NGxq
bExOTCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm7cJiQt3yiMx0kj
BAGDQmEwLIACQcG2e02aqkTBoWAgroyBdssdGBwNJtSkG5Omgys22zV4B8Qt0VEwl8rQRpXB7mqL
XkVGgn9CYHZ4OA0GCH6Cj4GPhG5EREcNY4k8AXxbkHGRb4VElH9eCwsOYjKaLQ0DfW5FCqJtsm5e
lUK7gqmYOK1RDrGmcoBctLRvu5GAjwECwE+bbEJckrO4WsqF2cyzpAEPqyvBJwm4uLFFC9jafs3s
1o8KC+Mx5iXood2o8tlxtLlrJylZr3st8gFIsIBUOnZHBhkheMvTxEH+AhXKZSTAAXIn//IxzGax
HSp/FHlNOjmRpSw4Fot4TDhNRQCH107qJJhym6yd7QL400brFipoTiSsENDLGUaWJuvdhLQL6FEg
C7YwkBUOyK8UwQqYnDRgrE6MEh8+tUpwmSQgBw7UAVvTBEOU3vDunEgKJ0S2QlVGAuLxQDS6SlEI
qIf239mxVB1CFGryiMvIRwrLRUwABbrGT9Ge7FvqWFm2mYP8xaUArmEB5DQ5QJnyUTvGkHuOskz5
JGWsmY8Z0Gw4R92FoJsK0ZubYkyef1MTBiKotesDxhOXmC2RoEOzklLejicv0FXphJ0V9jj3Tl10
lb1BpOdNsidLDet9xyp0OvBehB3mnv92ADzQkhFF9UKaO+DYNohDlvTHHxAOUDdUR9CIgYdqF8FC
Sm3YcCSfSZSBcx5hFU53VkebDdhZDfh5V19P37g1HHRDbTXZVYRl5ptOxblYAlMIXuigcMj005Y7
f+jEH28npSihgACUoZpLUVVlDTeeiOiMiHLg9+R5V8V1QGFM6JDAd6PJWF0XjcCEnzUwaXVfS5bx
xGOFZ8bVng4FnPJYWjhp1Yhk/hTVBR+dfHhWN9P16ZGAOhhYmZN+vaTMLbNcuBUXVhDTSztuZSbp
mZRO44CgULUmHCTLSCafNZ2w0Ucht/XFo0eT2qDDVLSdxU0cyhg0K6xaZHErG0MA0iz/hh5JCRsJ
v5r3WH4+BdRliHDQCYudfCCQxSeF+BeER75OkyBUkFEiWGnI+lHrt1f4BE5JPcI1FwxrdhNarvRp
+wY3yi7aiK2M+ksntP19RK26fMxHG4MqOUPLraCG+m0W4iJDFTtY+flwYgocvNqgIDrLDzzf0isu
o53800xqDlc5DSMR46kzRZKBQhLLG8OirMaWkKIjtHGlmxgnnVj1FGOcCrHpIECDqlXC8+nCI0I6
LNAJq5deNAnUTr3D8tcbWxHJbSfHJWSBWI9Vj1nenSLREHabtuiyyTLrTmAePfB2AwmDrTPUH6q0
4N6Lsly2bQscIPjILyaAMZ5zxwdd/3WO0mlryxjb6a6NqBzwlZrJpgNeeHeTR0jBZ2dcDFff1Wyz
dl7XaZ4ka7dFXl8tBz80F3Fu+0c4tpfxwMstP348L4HoSnWy1CfbsZ1JahqIOGnWZHnBMYsyNVX+
Omeo0NdX70idQxzR3u0vkhCAuB0XPwsXvr/EOq1W1Bvu1bbwyTaIYDv4meABw+sDlw7EEdJcCBZY
WAOoiucHvL3hCJN7Ww36xjIEyAMVPcPGxeinBv/Brg2KkpoRTBeS4wwDYaG7SKI0Qpb+RbB/nUif
nEzBiyNgp4UEWkitwvW1cc3HLfJSgw3XoDagUeJZ7stO/EqAwCXSL3UFqQURQ1VCG/8W7oQC6dZw
MiRFz+whgi/zGzO6FYcSdlGJWAhakuoEsgB8hQzHIUEDXgbHUPnNInaCoxtvKLRrbON4R8kgEKdo
AqaFK41qqODVGPVG+j2yavgqIB6DqA8/coySaAMXJQVJwjgacliOCsD7FrkCwsGskMRQn/VKScvC
rW9t4kgKI0/wQlgOL2Mwo6UbuRhK9gEIISpQyPxeWcyhgQ+HJFxi6MIUIVXQhJPn4ATorEa9hAVz
kP/DGLF6QQcXKER+zuSDBeUFPlK+Ug7GYEeLrrnLFCTAkSc8JAChqUS1gW+A61IlK/K4glXB7lZc
StsjPRm0TXUrciBJJkFbuYd5wROPmOjTWDFzYQlk4mOiK0jAqtTHLOx9M43Bs5cDFDlQbLpgESl9
5ie5KMETtm+e0nBpDAxk0i2m049C8xtOd3BOFiSAKUGFGTOT+soh5BIRIFXETZjKRIRxIQDltAPl
tGqXBszmYoX02HCmxVUNltUuBRDAAx7gAAckoQBhOGsZ5UrXTIjgrnjNq173ylcPRAAAOw==';
    }elsif ($opt == 17) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBHRydLSytBSK/ExOTJSSlNTS1ISChGxubCwuLKSmpMTCxFxaXNza3IyK
jAAAACH5BAAAAAAALAAAAABQAFAAAwT/cMhJq7046827/2CYAWRpnmiqrmzLUm4sA8lsm/AdJwTi
HIKFcCFQOBiEmu41Wa4IQIN0Km0YiIKs4sBQOnHNbymBWFiv12FwKCwq3gUEQUzKfRMHKbvodr+J
CnxvcAVzX3Y6CQ56bVhZj4+DgwUKBZaXCF43iDYMbERDCqBtWYB+lZcHlw6aM5w7BUKBe6GBg2qR
WpepB0mbYTMMtn97p5JrgLaClqgHvb8SNgiRbJKVRtZvQduO15SUqr2tTNEyAdbV38zX7IHbRViS
6s5yrsAtB9bcRczqbw7HuHVbt4ueIRevUjj4dgsQQHUM2QkSFU9XP1UFDMZIeAIBNkra/+Shugaw
3bAgqPoVTIUgE8J7KYRlk1TSH0OQ2vgI2LWSZ0Y5405wJJEA20xrN70ZdTcpo6WFGFNiqkduwApF
R7MBXEjyX0iUUqFm5CrPUsugJYYGoFQyJJyZbQdFyukTo7N1hA4EOJiCI4FJ+rQCLtBHC1JL4Qr8
cKZqWCoCfIXCLFFT7oJhJpHKhYQyFU/GIPn9pNp3MgCZbwVcMab5rWJtairdtbt4IUR6e9EmHFZy
WzbDWQGWuiwVI2LGKWU781W6nAkGbuK6TX3y6DtCBZ0tNp7veJKgr1pvPqbsq61uZYsztnsAwaW9
kdPCTEB8XVtjjd5ddyeaUhb/zTDmQ/97xsXBnGTOkVDZa/ro9EkxIkHkmnIEEohAALPl1pxVJuji
DU5METNEGr5hJ9U6O2m3XkssOgXUOIjQ1xRef/TBRgMNgBLJa48gZoku9KzYUgAs0pMAjPcwYEAR
D7k2HCQjkggIYfwZ0+N6FrZ3IQICHihfggfIMslWs6TBX36HcSOKIPHMdsAPXBapZUvxIbLAFVlR
dNlwOp6Cl0AQHmdhS+0RGQCRkLWCCI5EtMUWbHs+EptbPAJ6pyw7ZYQlY0TGeSFkCHJIwxmXRbTZ
XCi1kSefjAC5qZZaQpZoqCUQcAY/7NCoUylrnFKiiIwkE452snkK35G0ksCAFTli02T/OyCemQsy
szwYSnR3MZkRookqCoySVuCKE4On+uEIMg8G+2Cm+VxDz6ffJQsAAlPUN6FEmLnjCCNpWBvllCCO
JiuyYDhH76UL4AWSdH4MB1u/n6hrBhY0TnWstwZD7BVgxyQDm43+1jtiMmQF8gO3sxYsqpIGKLDk
IGRWRpE+HqOLDMT9zoXUkN3KaysaYuYJ8yQl+psu0PEotQWdoGpiRwJn6DGdY1mVyKfREAftVLHw
1XkPGvWuKSlrvpFttLV6iNYYYnLEq3KHVORIip4ezpyvvmjnzMaSPn6jCrwoILKIHlY0Uo0gZcvV
EMJZj7JHM363l/Lbtd6ph8Sqnplv/2+XZt2rGrFpmhjggd+TQL2FRxndmmsm/U8QjVvLOsC8yAFU
6QkCkIcBOJJ66VsUcfabELEjbLjHW2hKurzK8t47o2b+Q5gWruN0c78QS5o5dnrdjruoRD3fe72s
JeMGiKqBTbzx6A7UDJ3gTeYAs8+nHRBnha3hfBUiX4ZLiPNoD8GYR4Kf1Y9RQQteFlaDBTOIz3fr
OteMMuIlyp3ADPurQuGudr0RPZAKEUsVZgpyId2YZlmW0yCOPCepFTrvgVEzHprKcglQqYAjKaQC
73AGD+LBsH6Xu9Q+gGMEtrnkhqY5TeEuBzR0pWEKP3QhFahFRO6RZkMrGJwOgxVEHf9GEYK4gMQk
wpEJtNQhiTSwHPGQ9i80fDFqTzycH3hRwe+xgABbXOMWvQjDHWJOC36SXHzsyIIApLAN2AMaFIEo
xeyhpylEGuAKhkKZGK6vc1v8Ie8QhhL8jdF7LaAkZeqFOUXeSZPqQtUk4CcDUVYyiBED2w7Hp0Mh
ivF8ozEjIWMQAKQtaW+yfCEIpYSppmhJl7uMAcvYuLccwpF9t3xfHUOJRhUQQDXreyIT98i+6mlq
mtTM3Q5cxs1sCtNawMEEOMMJPhsQQI3c1CAs57aTYknSBq68Cr32yM912YKMyGQnHRRhufH9C5pZ
WAiXAvoScTqBAbHwI7+QhhKN0OE0jA69AxRgd0k1WGJyFwVAPpdwpB5wqXtduGdIRVrNlbp0Iy19
qUyRKIKa2vSmOM2pTjsQAQA7';
    }elsif ($opt == 18) {
        $imagedata =
'R0lGODlhUABQALMAAAwODIyKjMTCxFRSVBSK/NTS1CQmJKSmpMzOzHRydDQ2NLSytNze3AEA/gAA
FAAAACH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmgKKKWhvnBsUnLMuibu7gBf
/yca8IRr9XoGxSARaDYTg4GhOIwJq7njdHkQIArfr0CwOBwC0Cn2dQWytD1FwItACArjPNlsfkqp
ayRtMkU6Awd1dnkHC41lZXwHTGhpgFiDL28kO4dgeo6MkZEBfU9pgSWYRFk7AZ5kC2NdjqCiTmhL
UFKoqiqGC4p6eWV7jGONfKROCcxRlj+9rEgJx11eeqJ8sZCjy80DgdFHmyuzxtew2ZG02U+UAwrP
VhO+RklmsWN4AmfJ6vj8ap1ZtmRXFXFaFOAjRoZft3+MkHEbaEqXPDb0UOiIo80Mtn59//x1NDZx
GaUESi6miIZDIT6PsmyNWqcNEimKpgrGAzLIx5SbjxoVawex5C13zL5pksHSQIJHNNUlEHkzVLej
k07+gZZxHI8BEyGJhagOWSmTTJhVhMdVQhYtNSNCJUvT7NmsJ9G828m0K7kpU7nFikj4n9iwZ92d
zMpMAV8YbX51ZDd3oih2V28lTeuHbV+3f3vMWYencKix2YgJxYk2qTd4KgXR22gA7GEvZlGjDgnQ
IevW73QtVXFlh4HRVodJNGcVqth0v5FCqQjlMfGMX4fK7XKaVlC7oXyHxLp4sxLPGN3yOJ5a7mFj
p93DsnyzvvRvFueB3qFAe9xiwjSUz/9I45XRRB+bJVVQFFHoR8B6A/jX3XzCBLMdSLyBdN83DDoD
WVc/iXcZc2PUIQADwQxV1VHJpOUiFNXBY9B16u1QmmWPLJKPHQigqNw6Zh04ymYF6cKgYx9KoIMC
eFimzTANlajIYFDtEVBcG3IYhXUo0DBFbQyI+KQYVgpzYQBCweJQUAO92IyRX6b34CYJMHCjczvy
EyB0BvJR5icGekPkeTOuNNtPdorZm1D56DhXTYx+dIZab3LIZRCz9XAAA2HuhkxD4X2y0KgM8XhM
oHpRamShXR5qQAGc+hcUhWnKUssejgQ42F1qdRbPRRQYd6KdZM0lYKM55vMpNmQgQJj/KWuxiqmS
SMDaqZM1pfOcNdekuOc5NmG15aWpuDqseNhKlKtydNyBDpSDxXSUVtLOkCmTsJb2klULUVkrTMdU
iA6y0TXzq5zCFqCwb2EFZcdY1XC7px2zgJrYJMIlSQASBri7MIH9apvmrFPy4y0i86FaUZw0zjnF
pgo3GZdguYUKcMB64vxjoLkEsKXGxtVp5z7csdkcntUwpKss6RQjqM/oGapeD0JbO0zFV4IyX3K1
fiIMozYRuSWwExinAKd2JirMPs/ZCgokJers9mn8UGcR2fslcaLCdqb48DahYnbz0mo+Glx+CPO3
6dALx/1wRI4K1oWpXsOHWaoK1lvu/349DJA2pwsrjIBZ39rVaIpYS4jTkSoFyzGTaIMes3aLnNrc
5HvqWYsjmrGuMRwGLB777BOdWkxYejT+NZvKLBa11Bsb51TsaMe8e6SmG4PHK+2yyY0ymcfmpRav
Us/48dZ8+p0+McccjEQirqXG7xwDZj7opzaauz6yg7FPQAJKxi2W4Bjx3QsJsKte9VJUAG75b3vW
qp7o2PU9UqTlSJ/ZGPmo9rkI9m15Y+if+WZnJqN0BhwZBN4U8DW0z/GIexD04PDCZKptmDBz5JqW
BlVYp3y17392WFgYQDdC/wEqSBRpxvwc5JU4vMyHQwuG++7QvvsxrmT8SuLdaiAE2v+skG+wEoMQ
f/iFzynQiLixXT8IkoAlMtEeWkiAD91XxQfyzYU+JNPbBKgVN9LPHl9yirUa54kwiA6MsmPc/+wi
pJUNoTih+VIPYYWOIM7OkB38oCKy2KakHKwtOwzNTuxHRsfNLmaK/MIiSzKpxsSmVaBZhfQE+cO4
TRCRfSukGvmoRD++URou+FVtqEjMEm1PlbW0kEAOpJM1sIR8W1hA6P53hyBac4LHssVefJnCFKwn
IQr5Yfu8gAdk6hFXvGpQOPyikYQgcADiPKUQe6QcRuoFNuM4CDu9ucEVuiJf56sl266EoOq88o/1
MA4SEPjPUr4QWeHCxRsO2rIffDNZkEmgxiC5FzDuIGgrFJVTDQqx0FlyYR/BeF8f8BlShMKApCoM
pALU0q+BwGOURkAFABAiS+BBs34rTEKc1OADne50n0C4aD8V+k2jQk8EUI2qVKdK1apuIAIAOw==';
    }elsif ($opt == 19) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBHx6fLy6vExOTBSK/JyanNTW1DQyNISGhGxqbBwaHMzKzKyqrOTi5FRW
VIyOjCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm6cKoBy3Eou7yjM
t7bAQ7AoLgSMByJwoP1kvudJERAYDMbsgsFALBNNaSsqdjwMDaxWgEQyCoVAIDE4iFfkn8N6NbK5
gG9vBQ8Pc3Rhdyd5MgcMV2pEboJwlQ+EXnIDdYqLEz8KCH1FDGyTgYNwXl8JiHadJIwsjlmmtkhH
XAWACAWZh5s3sACyKntWgGtuu4KBvr5erYhOisUoZ39cRKTLl4MPztBLcgkOda931iUK4IBsRoC7
lXCX87qqvq2bnNWfLOyoGPih5IXQvF7M5HXxdchVPwkt2sUzteVNPXoGEdYjyJCOOX5i/9QNCWjq
XqVe9RDO81ZolbRg6J5Y28Ms0CSMz3IaBGcvHzk6AxzgCOkPxYFTNePJs8RUJU5WL/clklnUhIKA
zpo9xYfS284HCRo6AApmKg9ZAbBmXTrPoK9ClZIwbEinnFSzUKqSOBpPrS6LONvC+ZZJmr5N5ob+
YDSymbaAbO15A0xv3KGxdg8Eo7Yjz1Gk2f7GZWrvHsI5dIHejZkXoonGzYogVcj2Ik+tUKMmPsc5
BpkDpGxiWZaUtqWL8Qy1oht0X53evqs+qPi3jV9KggsqzW042ObFRRXkEpDU3SDIos9zSfmr+0eY
VF0DcGBAdMLrWBViXxVgXDTV57AWnf98CFB3nzvkaXPEH9bdwxM0/fWCQAKsNHdDE9CNUVQu2JV3
Si6ylaIUNJgswV+Fq2X4gj8KNGDgbWq98854pinxixxyFNbcR8KA55oDLipFiTbZbFMEFiKuR6Iq
/tk4h3MBqoiHPw+kgQRtgmxjnSQLXJFkW6atgtKEDrx3YXwEkCCAlWtpowYqNArS0oFy1aMclBdK
qYIPawbZppalWFHSPW8gAFdf4aAo1JlnfaIAGl6u5xgX9SU5aCpLDgZZR+/B1yhELTaQRnqDNYhg
NgkJVp4u/1mY56dphjqqevrZZN4WYGK6aUfOaYaXhqCKOusut3n1F0nHZmXeNxACqNj/gLEKy+Fg
WK666rLotZVJrwKuGOwCaVSU6lKI1jSJbKElKVo9c5iTmJ49OApJcBIZ95hjywRqi63k8ioVvJ64
Bu4RBlzJzGQ15WJusqdg61VD/8KqZrh+DlkrcbuwEZe62WZETsSd+VOAqJBSBwhPEp2nqUVEKjtk
oQWEBRPAJvgAJCRIcmywvaVuzPHLXMl8jo9pAjAAGmmgsaCIRPR1rcrYCkliNN9JTAKkOG8h47TM
4FobMw0HkpI4rTAasnxVZo3uQBPlyxaCPwdNdY9WG5100locsUA7psqjUqAct3WJiU8+R/Q6SEvb
ZZcGP6b1lbbpiwqxJ/XX0LOtFU1C/5XCipqFgwJlOxngUsuVyYSu0FxzVQd0LmwfI+Z3UqlMrzXX
F5uovrp8E7s+SnL3Omgng0WG+Z9Dh5swgO8lo2KqpOYuuIXJEsLxMUh1lwBuGiTj/aHj6hopiXV2
qhIWGEMnb8LNd2M93ngzLmikH1qbBE1UNaCZAgNJ4xyubBziwuK0MC9JOK0jQOkWtFJwAJxhQQ16
8wNFuvTAPvTheTZihWZ0FzDNnSAA/VNbKSJIv8VZUH43UQXEfpW5FfBhXnmLRBYqaEJ0KUkchVPg
AlWggDXBcIBHiuED1/CYwRQGeVJQB3D6x6UZEvBIBUOhGxCyrWA8xIMMVBsASRhEIMyiizjtKZsO
dzgLCo6CiyRUAwSXZpEj8uaKMejhCafXRCM9UEt/8NuEAmDFTqjDKghw0QBltLW89a09hvOjXlqQ
gDNKbw2MK4nBnEQHBQxgGH80ihUoCMlHBocSSsjhMIixyBg0soKOJOLJIJS7UZKSdzw4wMjmtUYi
DEdjhSIH3TBZyh0coEAw1BIbd1FFV5Ygky44QAIeMYpb6EIJZeNgC105AASM0A3LmNAYFQlLV9oA
MfuQpv6MSc5xlvOc0BKBOtfJzna6850biAAAOw==';
    }elsif ($opt == 20) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBHx+fLy+vFRSVNze3BSK/HR2dKyurGRiZDQyNJSSlMzOzOzu7FxaXOTm
5AAAACH5BAAAAAAALAAAAABQAFAAAwT/sMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK13GCNAFi
NIkEDncbohINxWIhEBwOCoVhIDTKilakgLBsNp/QKdUaw+ISSm73+4xKp1Xya2JEE9RMNjQaMPip
cXIpZjIKdwtcXntuCn1/QIGCJ4QtCYhqXnqMjX8DgJKDdDMNS2sHimBOfFGdY6CToi4JB0x5ArWo
mwGsnUGvJpRHmU6nXWC6u42OngO/wLEsw02lYIvJygZvP56+zsEmCtKmi24BuwaO2g2f3tAp4U7E
meSN9Zzofn4NCOy/3wAIFpwaOI9csnPmzGkTEySSoG8DmFR7wkaBQXsJHeUz0NAZgGAJ/77IG9iG
3iplyvo0gNPNn7sSJIlNLMloV0Z8Ghm2BEWpQUGSJU3WM4cOoU6HD1+GjAn0GBSDNqMSFQMIKRlC
AfRQlOl0Uzk+U/8kcOVSAopbIk9xpbnnmteN3DqWLXDCp1a0Mi1GoRf1a5+4OyWZQVttS56nFgXs
1TuUaLJ8VQPLwRLxsFrLMxeXS5jtHjO5r7AouUvQ6VOhGOFyA2DVCBYH8SbGntnV2irInyVfjZWA
gJ61TSxSbMqY0R+qkUPHCuA7b2GgitbywYf7M1nBsQxJf55KWjU3P3CPHd96SBEHmIV3l4lXYhte
G5GvVm6WNYNEtC/L82LsfcZz+lg3F/8JCTCA3kR6FbNEYbMZhw5Yy+RGH10ANMAAAxIBd4stanF1
kB8KEaVNXBOSgMCFvuVHi3vxVLQZiApRp1OJAASAokC0zSbbe5txVlSE100myokX4lhbU7QNNRSM
GpHIkyg23mdkkqZl5kZbCY04H3b1WWigkeqpRyVji2BpUyvl1XADAg60OSViQX2XYEmqWEPUACzR
iAABDhyS316nzcnjMeUURZVu5olSIHoLZhZURYFe+VaEoAlZXwIOMCBAn8SE+ahiV7ZxTVtv/MUQ
a1xSCECbfOJX5WnvlWlPcTIC9mR9ACxg4B0prgWnSTy+hQ8zQe6Gq41t9lmLWszuEan/nbNyhic3
zdyq6qJ9umkLYbGeUtysNcXXT1K45mpgn5jgIpBisCJWqC5aNpTmFdAo8KWyvpXS6HPIaMbKGxJa
awKmySqrb6fNEnoQMsfZmuoJul54nxpcsCUdhICmhCaqD5vgpcRcuCqonBjrshJL885AiIES74pI
p3rVaaZCwm6DaKLlkhAlyIc4N9y3jAQrXsr05kxCpkjzqexv7NEkpl7DbtlxXeeii26G0XWYynDW
HDpgCptarTQmXqiH10jBTbfOWF8fwarB6RLW4tnRTSdWO0aXgCyvIefhN3+A54LN2kQXreo76LZa
yjR0SxPcU5QWXsZLJ2zKq76Yt8e4uo45sSa5C/+wFvYdG2KOC+NgYoknxzSyENLVi3dx+rYl2TTt
za5RDvbla8i+7U8H7DLAOqwLXIibZG8YG16nORJApcbLMMAhyTvO9QHZUOXRR7qvYAketnDIFVh5
ehS6CgEgkjnt8kw1bus1zHLIwdER00cAUrc9xAC0zC8+j+soVvSykD48aCV4Csif/uSAhBXlZUSf
o8H5hjCWotTDE9t7Rt4yyEENHq6DICyBCEZIwhKa8IQo/EAEAAA7';
    }elsif ($opt == 21) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBHx+fLy6vFRWVBSK/JyanDQyNNza3JSWlHRydBwaHLSytMzOzOzu7IyK
jDw6PCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm7MKnLdwrb7JA6C
OIGEIUcs4YomxQDBYCyeC0RwgCQei4oH4nBoOheFX2JgGFZr19xA0OA2F4JCweFIjMln9KS4bne/
YHR1d2V5MmkuCgh+b1Bgc3R2ZGaGN3s1AwxujV9xYYMDoZSVK4grAU1/C16OkIOEpJYSMYqsT14M
AoF0QZJjBjSxKqYnCqusuE9ygjySAw9kwcIoxCUKAk5vuJ4/vK+EAwrS00aXK9jHt15yn0DfoaJm
49PVAEyA6k+egnXv8TTzhFULcODWqoNQ2AkK0MtZKAVDAgo0dyJTNke64LD7FABIwzuT/8hRo2gN
XTZ0CR8tc2cHZDwAEmOZKpDMUUJPrhg2HABylEgAiB7k+nIRjjKV3SK17AnsZ7lZJ+4dJGoTJySd
/iBScQqU5AM3jhops8qxX0t4ZXySS7Oqy1RWGTeu7NiLp0OuJK58LRgWLJg4yhQqdSgqpkyKW5Cl
w1cgMIK5dXlGU0vPnII2CHUV1dUYsGAgS3vi7QoVwIA/ufSFBcNaDlJXZycZJnVEgFubRhEW0Gy0
8Upf4QrhxXH5T8aqCHEHnhNZ9vBLD9rg+4t8d3Kcr+I15YojgHSxVb80vthkrstoz6EWaNAgtc3x
cDEGHgwv3OxKOA6wL+jkuLrb70EGD/8h2/2EA3vsXXScANiAF5ccvQRQ3z/c7XEZgtNBUZRGUMTh
TnOTROQUDBfuh1tjt6CIYmtzJLATWsIZuEd0GCqHYkbH7ebbYGdBFKNIJCLYXoYcLkdWNy7GVsZ9
ecBAY4LVtQYYN4+5wkxPTJ4BgwFCduFfFK0tJ1cYHfEiWoWzlKhfhp7pCIUPG0ViJlrpEQAThtK9
lxJNTzgg1yugFIamnQDohyCArRz1BJx0LBPamSNeskiXyR3lm0b8NPoNpDJCNemhGx4kB1k98LOU
XRBlWQUOT4KqDUpjqtSRHVMQSNlhUJXY5VDJMMBOXAvVYReWg5bARpebbMMipsw9Ktn/rbgSapqQ
rqKm6HJmOvsjkJZRux8XXKgUF2efJBmac5GWBsB61IJ7mxwIJPTZo79sla60ALR6qF+PZPSYhx/Z
BQ8A0OJHkqHtaiIevOSSSW99BRuSxgDeYujeiiq1o1MzPEUsMUkKINwuouLJm2kvSxZb0ch+3Fby
ijh1E0RaKp9wbMXWOtFYvPLmlIASqiJhSqvuJhtqopBI4nGTJJXg3aEtk5dOb+Qqte1aTZfAbhuM
4AJeKwL0MMYvda6gAAP7dgGu1zYKIlnQQmdtjciosd1fz8IKsbSWcpdggKFrKnyMNrk1xkw0cFvR
t9+AG50NICg+5oBdwCSeQz0l6bc2fHmQa1TAUuKULQO7myfXebPBiS7DaVE//p6fdIRCsOoyGGDb
5rb0CTsC6N7LR9HJ0ARv7CnXnIMCDrg7lLwLBDoa5i0oEMDttvwWEu1VDODAAm7psr2LiGOfhwED
BOAaEOXba/w04hT//OKjYa1u/HWKYP/9+Oev//4bRAAAOw==';
    }elsif ($opt == 22) {
        $imagedata =
'R0lGODlhUABQALMAAAQGBHx6fLS2tExKTBSK/DQyNJyanNTS1HRydBwaHIyKjFRWVOTi5MTCxKSm
pFxaXCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK125SDEtf
4EDSLXgqIBQGhQLhI+KGxMRC0HA4lMxF4eekQXEFxaF6XSIQg2239p0lDGOBw5BcLgbpNXsCDDQO
cnNKZj14XHoxbS0FDg0NgXR1Z3d5CYiJfDMLj3J0VmWThoeXLYoqBo9WBp+gWWkFCZakpZktb4Gs
Vmaur7KzL7UrCQ64nrq7lL2/tBIuxJ+ekYQLD3dbo8sppiUKZHNXn1hn1aKw2SvbAAG4c3RI4kzk
hr7nNsEnA6mq7ZIBZ7zX6qkwlUAfP3dYpj14ZU6gvWYpVrHjpySAAn/jKAV0eEJRgSqd/9oJGoSs
kDKOJhRRqbLqWzuS/5jgYUiPY5tN+jx16vevx8I0NVG2cQRpDpVjF88oWABQDcoSX3BOhDTIIrKf
W4I6/LIyZEuK8CZpbPgUAJQCY56tiiSt4q4sCzeWhRKAgYCd7hD2g2eS7FMof7xJY4vQasxCTufW
KsAAkKokkCO7rRoKaFkhtRY0hjQYydqLVjH6m3fZbC0DjQW/qxPOasUjPhL/rXWAAQMyn1mrBY0A
I2K/QjMlsN3YigDCCliRtJgRKDabwok7Bsu2zMWkWeQqhjiA+O2DeuskxYiAXFat9W5oJs4SMsnl
YX+XNg1xve32ed8zj4nGmuzg9XnH2f878O0XDzWGzKeed2R4Jh5oFvl2IE2XLWjbAYAg59YR/hBS
DVYAoHeOhbelpSFlr1HTgxawiJjNDYzZ5sBtx7kH3yBwJfMcdBANd2FquiCEY4fNzfQfjwSUIB2G
gtVBhz/krYgVcEiWIIB3TDbCCkL8NbWjQEMo8GNtgEw0Ukx2iKJgZliO4UguZeznT19HbhXMkkyC
VAxzvNEZYoXBzIilI488stcSdqDRi4vLQNGdd6kVKsgRR7wlX2lfQBppKpKcwRxTY32Z3j1iaupm
FTj2FsCcimaF6T0+DkpUYZSBuiigEJlwZZtu1vheT6HimmQR0qWW5zGdHvaKsCkIiiH1k8e2xd+l
s+VqQoyN5UkUNGEx0SqzKdRF5qmcsvXaGTxYVu2wKTSQrbbF0NoclaNae0IC42Z515bnukLviPec
8EC+nOz7mFug7vAngOyqoNmzju27lng94QEuCwFATBRnXAaAGKOzpFMCAs8SehxYF/HARJ0A27vC
wHkarEQS5K0cy7ozfNQrVXRQKhPLLwbMwjCn3tUWedfowDAOCBCq50sYBTTA0mA0UnA4Zuzwb6NC
yzAAFUe101s8QP8isgsDdCNxRdW4WuUaCSBgQCdLmIfzJQkM4OkZWYlKytlR6LB1yF3PpwfghgMh
wuKMN+7445B/EAEAOw==';
    }elsif ($opt == 23) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBHRydKyurDQ2NBSK/IyOjFRSVCwuLNza3MTCxKSipBQWFERGRGRiZHx+
fJSSlCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWQJLCVqrmzrvrCrllRs32eqk3OP
m7XbTHg4DIa/5CqodA0MjkCDMWjCfC6mlccoFByNhhG5VWqHZNbCoVAUpNNDuTnUJheB9hdsoKbn
P3Y4XXpRUn0LaDs5PItYN4J/PA2FAZZhfoA4aYIwAwJ6e5YMDAeJjJorkiSdLgagD14Os1JFR6ll
rSwBD72iUVOlp7hWuiZsbr9wwqvEMMYkAaBeosultyaP2o6Ljd4A0HkKsXvADX2ZzsUT2SuvoaJh
wUUqzepL7C4HCW2+s+bzsN1T9SxfC1DJZBk6RMqUvYH4JLiQ9iDhP2AG0B15CJGGQRMD/xIImCZL
1qE+9NRw+7btWzePElkUGDnugQNqX6yN6RijzkcSIUcWIHczFphzDU295MlCkAKRhRSaQ7mTqcum
PwcgEFCRKC0pDEvJsQrpZwGobm7+u8TQFkemZxBApbb2UoMA6Iq0aImKL0ctDOT2s7nQLlK3ZFey
+ihAbtdyYMFiKqIUVeKIBFIgkAurGlu8AS/HYGJgs8ihkPFauiR2mOgWTByY5ud1Ndt5b+EaTLAZ
Qb8vOW8f3tiOpWK/SxfHBNCbs1QwqjG1fl1ceeYTzWlfNIz0Wm6eQQ5kH7fdbsaGw77fC6K1N7+S
kg10p1KZOtaYpd0nqysPHTMhxwV4Ff9M1zVgGmcKlNcfKdNVp94cQQRm2lNpfRWGfAxWZZ9P+PWm
gACn0QKQfynZd991+cmVgEhGBQDQPBqaSCAJ4s22Ym1wBNPgg84EsYB7KgrghVGGHBajgH0h+ciM
JGS34nupSYEej+vtJpeKKyKkFkYoCSSjdSUo4N6T8HxxF4yufclEAGNm+ZsXOjFApTpM/DgbZ1y5
EYt0rS2JnHGAJskkCY21iRCcF5ZyzZdAfGRgc4IdilFS9an5UY1XmoaQTfJk6KVll9khJqRQcfUG
XiTOSYwdbB6Y5UjkgKZRmiaesQBvWPIDyjSXnOfQXkoG65Igj+b64TgJHoUSrfZ1YqP0SAillaNY
Y1m6nAn58QYiTQUkmGMfXqq6RSsF5AqiP4b4Wq2MrdyKJU3jmBTGAaUwCs5HPZT2ZJY4mcOAAZUG
+qegBN97LQsP7HsaNXYx0MACVVh73QuNvUpSkXEE/Bo0C4D4ZJ6xWHKeH+Lm8tNeHo908SFi/Frr
yXs95eZQRcqnF7sw75WwyvuFpXGoOU/0as+oEtds0C4woPI0NrEmR8lNQLPXTCSZGUCDGyPtSUV6
PDCKWEcfrMQA3Q7VdENhT1zGAQ3E4vU5cqxLltSbDNAAHw18ahXdSixArwEDuLy31vaaQXjhgYig
+OKMN+744x5EAAA7';
    }elsif ($opt == 24) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBHx6fMTGxFRSVBSK/JSWlCwuLOTi5GxubBwaHKyqrIyOjNTW1FxeXDQ2
NOzq7CH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK125iOE6S
4MDSLWhKOBABRONHJA6JjkBhoXQ0r0/coKBYLBoDA/MazM4cCsFUOeiRm2aXIaDoUhFt69s5qTXq
awh4bXtwfTIJC4Begnh6hWWHOXV2C0l4Y5BAcShoClOMggMDmZo1nCYGAosBl6NuppuSKgaUoHej
BgaxkRIsCYB2raJhpbwyqACUlY25sMc0qAGrdV6WxGLQOJwO1LfDYMXap7MlwN7Wl2A7xuMv5STT
q9+4YbvuM2bd1JWhee34VJgpIICaNWuiHGQLGCNLAgYMKB28s+4eQxdZCkRc5EXdumcX/1c8SXBg
Yz91rwCGNPEkwAGDjC6xKaZyJYAnChjw6yhzlDibIiUleKCTo8wGYBTWtDmkwYOX1TqKGvQTaIoh
BZ5uTCcIDNKqVk8MYXDgQUEuBRBc65oy7NVDQx8QVcNVVFKLblkeclD25aqOdwbx8JFX7CGnT6HG
TBIObOGbhwLIhfjXEsVXCx+TuLFA7oEDUY/myqz5RlayReuGU6pZyKGsnwvaUcvW3lKmhxQQ1Wmw
VRKfrFtD9gUAdkSdoBqtJv2Ys2cBqdcO0nV75Q0Ek6HPk0qVeeEbTlHzruTK8fe9k0tC/zSlfI/q
F2/EfUkZUIDLuoQPJ1BCd2zZn3DXBv9hrQ0hWUmUweRFLgSWJokDWtFnCyOjwcfQEwwkRpZsyTFo
YUBPGIcaTDN559YTEH5GFlQBJiTGh+5k4dmKO/1mDwAwapPFgX4B2EUAKeGVl0Na1ffJbAwWCE9n
CPq4RkVKEleEiuMFaAmUDkppAnYJkujIi83BQ4IC6q1CF35ChsVNkxxKleR5Wp7QAJsCIDRdg2qK
WcICOhXFTFI4wskfCzkVtN01bZhonZ4mpAFge3cKOkmV/lA3JKNFaGRQATbqcGmcLATgp5vmhZQM
Cn/A9BuYVp3aSR1qtOdTjpq4msIfXawxCq2Q2JpCAggUICwVDSiKj68qJNDAAsm9hxstqEA40EAr
iT476BtGGDBAAyAdi2kTPvzAqyzQ6ofMt+YGJcK67Lbr7rvwdhABADs=';
    }elsif ($opt == 25) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBIyKjDw+PMzKzBSK/GRiZKyqrCQmJExKTOzq7Dw6PHR2dJyanNza3Ly6
vFRSVCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK1/ih4/zN
t4jCAyH49SZGlWARKAiTRwm0dCgwGE3EYYrzJQsOQ2BRKHK7yKTAYMCSBdtzzVs7BNhYJ1yOlvIE
YWJkBVpxfDN0MgV4AWOEe4c0iS4LgY2DkJGIaTN3bZd6O5qbfjILA21uTlqjc5wuBaifC2QPma0x
kykPsliORIa4ua8rBwOBbmTAwqQEMWFhV46EwcwtuianjGPKt9YvxCjGx5/TRN8y2CQG5GKXytXo
KuoIDb2N097yKeoOA/egzu27Fq6EgASoHPgyF2/gCWwOGiAb0+RRQ4cldB1AyMadOQUX/zEC0LXA
XjSKTmzpE0lClwOOswYNCSly0kaECn05KSPADEsbBQskMCmN1iqQP/kVfImzqLJlSR8WbJBgKCOj
Q1b+TLSRqsSFT0VFzRju5tABvmQq8Dm2ZbgHVa0m6ya2bSKhQ7+CstjWxN24x9Ku0ro13IKqDfTS
WjAEaV+3pUoEqPoP1V6ojxMdHuqvzWKeNGuGwysRlSq+j0e+RUyUmxDCLBMdzPtPsMrUqiOXYP3P
Ab5QuCdRPUvONWa7BRlQ7j1LCILgQREPaIDHKILnoQfa5G0alOO+LnmzufTgO3LdJTZPlzjr+FiN
cakGdrQ2NbYBeXG6I6TAfkESmyUW2NAVQtQVlTrSDcjAG9nto85hAp40xnWZ/UfCAYnZY5oq/YFn
IQlwRdiceUmps05iDqSoUyHnOdMChiaF4RpsDn5YQgECdvcGW4Whp0IAGrLBBGol2miCASa5A897
Rh7JHDcUHtgkFeykKEgBJGJkYgoMkLOgEFlqN+UJXY4XwHUGiuljDGDIuGRsY6KwxnhvahlnCotc
gkCY32zpggILcCjamjgAyg2fwvg5wwEPkKFAh/IoWsejaeIi6Q+VjnIpblIRyilBIoQq6qiklmpq
BxEAADs=';
    }elsif ($opt == 26) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBHRydLSytDw6PBSK/C0sLZSSlMzOzFRWVBwaHGxqbISChMTCxKSipNze
3ERGRCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK13NSJHhf
3r5UYfDYBYPAIyDxUCCMSl/Sl1AEFANeFDlRKhbOh3Yr7foeBnCRrJzKEguDAltgt820gUGOGNTt
R24tDw18foB3EjQKhU6HiIF4LgsNYAhFY5A9gikBhZZQmmWKLgoCaY6ZojicJgOnfJirXKQrBQKN
Cg9Zs7QELQa4lrK9m5Iopntzu6rFM60JDKeWA7zOrMcmCwxpC5fW1zWcAwefYaHhz9kkDQyVauDp
6rWuB9zD6PIxggsO745/9M37hcKeOWYCabhB4EAatXwJX2Qz0LASwGYRVbhx4KDcw4wy/6YU4OiO
GkaQNo4F4Cjs20mUJqZQNOiNGMwVUxh0FEbn5U0AU0hyO/dTIr0EHaUZClg0Jb2R9nAF6JPA580k
D5I26sO0aUxJDB0IoJTKa4okDO0ZqETVrFOCJAaQPDV1jduv9OQaZPvoLokkSBtOw2L16jGthQLY
vDtFwIEDwqZ2dStT8FpHfn8cYyht7NR4lI/pFdAStNmNUZWJKQzSDcXOcuz6XdjQnQDFk726QcrA
XQMnEJsKcozrt4LgRQVlVVozd/J1AKJuRW6YngkFkBNfYh2xFeSx8GZDB4CAuZOqjMcDaIALlemf
rZaQ3jMV/Wn15Nt728FdXnwSazWyRm5/4fwHYCVXvIeSgUs0gGAf91m3QgKfbEegMwySQOECV+gg
HH4nJJCGZB9K6EIAoDxnogsPeNPXgiCqUAUCEMKUoQoFuATjijkU8IBsCd3YwhAXIiKkC/YJdGQO
+iyZHo+ZnSXClFRWaeWVWHoQAQA7';
    }elsif ($opt == 27) {
        $imagedata =
'R0lGODlhUABQALMAAAQCBGxubKSmpDQ2NBSK/MTCxIyKjFRSVBQWFM/Rz3x+fLS2tJyanGRiZCQm
JERCRCH5BAAAAAAALAAAAABQAFAAAwT/kMhJq7046827/2CYAWRpnmhaImtLsq8LwLNM0wCF3iqv
/sCgMDcZGo/IJFGCxKkcTqW0pJueHAOHdWuqxpSOx4BLJnl3shPicWD5al+4/E1Pn5ODxrjMvxsR
DQF7fGV+Qg4KDVqEfUVIAwoBD4yEZ28mAwaClJWOQw8MkiZ1caRzNqhUnkEDDAoPUZxWhigODAaK
sp1MoykGoYu6hasqCgKvscJStCUPC7jBycpGzDMCoYNqqael26Y41Q0LCgfB01yWowWhk+fDvCkK
47nuZLQOBcew3PVItArrNvVDR+xFgXHlgHzzxrBbnCUEUhzIR07aQGoFARjIJ+rilnQI/wqso+dx
ip8HCUaaKgnEj4IEz9oEsejRzwKYCrIJWeiQH08zBUW6asdyGTEEKQUILKrkzoCUmsz1ZHriDsoF
wKg2JXYAJrQ0Wn/caYBTT5OGPtFeGltWZ9ggd7o+M7vzLcQTcnFFufTWqteOdoXccQCTgR6avaje
QYr18MO6PX/+vHtiwQKlMgPDLbgRs1TNKPyQPZYwMT/FBQnPhQJa7CoYQgOwbp3C0EZXmSGnjazW
TsaruIiiCWyIMTa+mmkJoJibtip4J54K+Oq8y2sTyw0g02Zacu+plFOgPNYAcdhqAq4dEO682oB1
OT/LOZ/RhDFcbkFXs4ZbPvHrcTijyXs+KXjH24HzhQdEA+T511d9KBgjiXks7WfCLw2w9x90QmCY
H30cCqGAYQ4yZSEKDRj2oYkQAnGAAaXZdWIKDgRCYT0zFnhAOTdOk+MTDzwwG4shSpHFAD3K8uNM
WSTJyJJDOLlLRMJI+VGL1akAZXUidOnll2CGKeYHEQAAOw==';
    }elsif ($opt == 28) {
        $imagedata =
'R0lGODlhUABQALMAAAwODBSK/ERGRCwqLGRiZFRWVDw6PBweHHx6fBQWFExOTGxqbERCRFxaXCwu
LAAAACH5BAAAAAAALAAAAABQAFAAAwT/MMhJq7046827/2CYAWRpnmiqrmzLUm4szzQK13iuA/fu
/6oekJQY7oS+hNJ4nAAHS2ZT4jscilIfcpaAYrPTQM76BYdxA6irbE5tWQmDuv17qxKMAX1oR+Hn
AGx7M30meAaCgziFJQyIMomKJIwABgp6gSuRkiWMBw2AnDqFCQ0Mm1wlZaiLTisMoCmrmqI8rn4J
BI9ENKysOX0KCgeZd4a1brcnB7q/ssfFe28JCg1XfrzZyMlUKAcLu5DaqidfzoTKjaCzP+dn0aUN
zqju7i/pAN8Km5H90MbvVDFoxiaRwW22uploEIscth3mmCBJgCCWv2cAaUUDlu4Agjw1/woi7FHE
wMeIRkRKQcJgwaly47SpjGkGiYIC4TBe1AjmRpFSBADNg5MDizskDNWwe5hRXEASC9bx1DjT6EYt
yhJEnbPzoEOa4+x1yrqgACarV2GmFUWhTNIYP4kW8/q1lcJABIJuRJvk6s4YNoOK/UWXTzoDzcAS
XQpXcQshXVwWrquWsGEqZRYMYxpXrVxeYu/dxXtpLo6ZjvmiGw2gGqamnU9T5tjty4AGj+hV/me6
J75cDIhls8e4sV0xKKpdW8x79+zQYxXaliwTrGp2k4/LIgByTVPvQLaUbLjWoT/U5mkj94NbeG+n
nlUHZAPrtWem2/qUMuCe7lKUGGHFmqBtefyng3zh4XMCAy+BZyBA0JlAygDd4XffhSspeAKFxMRW
lyB8hZggaykYkBOIAaYyioblyFFPSJetl6KLzVHlWB0s+pHGUOXV+FSKAOz4z4sWateLkENCCOSK
JLqwo27IUPJeFwgmCVOENuS4xmsAGoPlClJ+ZRSUX64mI0RRyFUmmFqeVuUgYQKxJmBttlNLnAgd
J8KefPbp55+AbhABADs=';
    }elsif ($opt == 29) {
        $imagedata =
'R0lGODlhUABQALMAAAMDAxGI/x0dHQ0NDSsrKxUVFWJiYg0NDRoaGgEBASIiIgAAABkZGQAAAAAA
AAAAACH5BAAAAAAALAAAAABQAFAAAwT/MMhJq7046827/2CYDWRpnmiqrmzLUm4szzQK13iuD/fu
/6oekFQY7oS+gtJ4nNCKpqJgyWxKdoAstGoN5LJZLhDpAofFPzJqa97O3GieU9aOj+dlsH2oToHh
ezl9J385gHaDA0WFgYc0iSRZAjiOe5CMiimVKptdayUFWkCdRol6mp+BLYNmma5RqZyIeCine6Qz
PUVQAqJvqK+zEm5mYY5Qxyy4OEJhvQCH0aCxgc2RvkSGJ4CVyyXN0NjA29nk5lVIAM+43qpyVyZ1
yC3c5cHn7SfprdRwy/m5aBUDoKyGNHQCn4mjd+5JGoHFpt1jAjCIk0UD+BUM5qajqh4E/zWOk7VR
DMiIrzapHBUDnC1/5SqumMdsAhuRlOzp3DVRh5BQerbQhBUL5kFPoHBSiznShdBHtDIG7SlxJtGG
D4fFO0OU1FGeV33okgrNIEWkJabqrLp0LduwMpAQWOiWY1enfC4mVUelrV+7dwXhgfISzdC88LYS
7DYNbL2SYm1Ow+TKI16JMldFJUvQ6jh2WGuQabNyZaannmtqfcUPtVXTl6EmVtyZamWmKV9n9VL1
lOV2v5vK5l2LUbLUyHe/teWQpHOfm9MWZizcXmYTagj78jjUa5xLXJu/3Vm3ZXRQ68bD7S6M+Arm
6suzvY49OhzKsB67/jucjjG4tn10nnc9SpHk2mG3CTZbC0rRR983AxKFX3wAUhjQgnmUZdt+FUaG
YUF/TGKdcw9a9CGF8CWBmHvJSddJiXFFiNxxqXCIVmxrgOWOibzR5GNMjpEwhSsi7vJjgkcm+Q6L
KroFo2Yn/tJihx4yKYZl34mg5ZZcdunllx5EAAA7';
    }
    }elsif ($color eq 'big') {
    if ($opt == 1) {
        $imagedata =
'R0lGODlh4AHgAbMAAA0NDYyMjE9PT8zMzFNTU46OjioqKm9vb9zc3Kurq7a2tnJycu/v797e3pKS
kjMzMyH5BAAAAAAALAAAAADgAeABAwT/EMhJq7046827/2AojmRpnmiqrmzrvnAsz3Rt33iu73zv
/8CgcEgsGo/IpHLJbDqf0Kh0Sq1ar9isdsvter/gsHhMLpvP6LR6zW673/C4fE6v2+/4vH7P7/v/
gIGCg4SFagaGiYqLFoiMj5B/jo6RlZZxlJeam4cAiJmcoaJekxOgo6ipUKUSp6qvsEafiA8GD56x
ubpEBr21t627wsM1s7bHFa7Ey8wkxr3QzdLTKNDQt8rU2tuNntbYrNzi3Na+D+fZ4+rNvgIP7ufr
8trtAvDp8/mx9ejh+v+vrNlz1wugwVzlzimshe+gQ0kbyrmDV+uhRYgjBNpb2PCixzzK/yQKIHDv
o8lHEgmoRHeyZaFP3gQcUEnQpc0sHSOK6GVvJkVgN4NuyXkh26yeAxdyICq0KSloA1USQAc0mNOr
Yk7B/DZywYKVVbGKZWPMntcCXlmOXRvGaMwDCxyg/VqQrd0jTEFAPRCgbwCwdwM3yWnUwAG+h79O
DSu4sY28HzLxlHn4sNR4uKw63uwBsgpXUGVSVoy5qCnOqGeA1unNwECZXkkzTk17RUPPuFz3hBsb
sAbctYPrPa3ZlGvXiBcUWL4YWzXh0F1IrLxAgQK0i4unAB49OKWjlR1Yv549c/fN3M1HLq61lWGZ
ARQMGMAcqOTz+EvgPiozQYL59c1GXP9++e3XQWgH+DcfeZgxlR6BBj2oXjcUSMZTAAnINwCDwHyX
DIQESojBhRguiJ2AIKZI4YcDqudhL3xlKN91dIXVkYgtqmhXSIb19d+G9QGAIo46XnRjjkjmCCOG
GQJYwFTsjVjkWBKGJGVrfGGoIXNQTrjUlGyB4qBpjSzpn3VALlCah2AKReSVB2YGTZY/OtklnG+2
+RGbZB7IU4w/IrBcPDBpl0Geeu7Joj/GIcfkAA0AeScLiCbKCZ+ffWkcfAo2gIACX1W0mqGWTlNp
nveB5yOkDZB3n5e/lXpXOJhGNOejng4QKqyyrkVYZ1G2lltPJULKIK+V9rpOXum0p1H/jKzqCmWh
o5LaQrLKClJtCN+V42in15V2wqvZBuQDoxT6Mll//7X6ZEVyJmltuehp98k7e8U447vY0rtIv8PJ
2+dRx8GnpaSEBuvvKM3uQBRhPE1Gp3VBsrbwMKhWGDCLLronwHGVMUnxVIXGueLFhjysqcAn66fx
usT6OLKNKNs05pW1FrXuYX05IOO7Qmos9MY107PeymxqRBlf4iHsZcMtZ1R0HW7x8tvOPtYJdMkc
T22SmFGv7J7EfWkYKdDEAcyr12OoPbQMr05CdnzzAThty+2xvU/Xhzpjr05zVvbjlneb7LfecGD7
a59wasYojPDNKF+QzrEsNuJ7I1lr/3rPhFy3ieJ65jbmfGT8t+a6QYsmkAkPnTO3pHOhuHSNw24v
jNDO10ADCaiJYqyax07F6PMqDHztUuPpGpN10ud7bsULX8nvrAHH5+tpn4YcoP/NDGzf0jMCtcvj
LrVbifuSDH28jLcffttDkEu0lez9qa+Gu34fA/Hvv8B/9IzDB7qCITdOjYd1lcvbc47WP7jthIHG
q57lnnY8TYnJfj5DkwJ6By/LKXCCDbQa7YhGwnkJkG8fItuZCHeLypkAUf9rYNX2dzgIrs1xcqrF
xyamoWNFEIVhCyEmAPhCq2yLiBXaC/M2ZB011QWH7APhAIUohBm+bXyGIxOOFIiprf/cSmT7ossN
R0jFHhAJew8klfxwBkHQLElkMqJPdqZong+W0Q7/U1nHsqcq7kFKjowBm/uYdccziM6CSNOP/Xh2
sE9tbY811GMhM5U8GBwyipezGAGTkTpGtmtD6qtgDCdpSSQGsZLbGVjX8sYf2BzMbqIyoiZtSEoc
SFJstwneGNlHyJ0Ermc/cpc75CU/VtzylLV0WBoXuMs6mpBjpZjEO+AiM90NyhbIPNriknkD7iTr
mOA7WWEEsIAAOKCaZyscuarEzVLaxn1SjJog33a5xRWwnAkIQII09KldoVGVtGxnCb15LeSdEHy3
nOInDOaXYLbKibBKWgVBSE+BWuH/jOE86KII+Ce/rGp3gIQe15Y5S4sWEXkT1V8mr5jNCd7IUQ3V
3UMJgMXymfQHl9SB9TCZrrTBlC/yASm/Sra5jZLvpjZlJkUDOFGurdNiM1Ri7kw0qW0aFamyoGEz
AWbF6xlGcJ/bkBOfCMUaLvWshWSnToEnUWcmKWerWWSTWNUAtN2wl9rEKk5VilK0DhKhKTTFNAEl
03TCi1rwzKXtaqlWvsKTpC2taDhrd6+lzZVVDAAVQyYrS8kCVK+cbR8d02jHk5Y1i8Yc2DuINdfd
7e6RiEWlZ0G72FTOtqJr7CxK42ZKQ/HnAAYsLH3UEloUjpK2kdVqcgX2OqKyZ7Wc/3KopzTr3Aml
lpJANOns+jqgeR7VdkdqxWsIS9e6dmmkpuQtcm2bPLy296pc7K2SjKgbApjzlbtjgK42K8+kWpe2
Vq0ie79Hq9Nqb5rm9FmTXGverRg4sOtdRXYn7FjZws6plGFeUF0Lqif6I7eijTAWRktMtuI2oLmx
hSc7FamzfYyCLtUficPH1ZQGa8ZXxZt8vTtaC2XYP9IFZQfR21MRF+O7eKEoiKP5snYcRsEbBukC
XizI8Lq1tqCtKXZnS7/5mqzAJfWtbhraLgYrQH0uFFpOUWzklc6PuRRuUWOvKzesnam89HnxbXWb
1zaj8rg0aKvLnoVOkD50s0yOM/+O4+xnLFvYt2Wl482qzOfKsnbBDH7kY/fc5TsCOpMBli8QQbxc
Lw7EjwxGwH4dfDoSf5rG/jMuo7dsYoB20RurffKdGdyqUIp6lq9uNC6ZmmO+NVelFkrdEumqXwcw
pLqKxXKwa+Zdv5qRu1rk8x4RtGwGZ7ZwEc3eiqY9NeJV+8qbNmu220hfM20Q07tDAETJGu1oFxfW
6W5mFm1821uX+N5q/CFHBWBOINfNzL5Wr773LewRq5mNXuay6yoU3cvmdwDOnkU8u2vthqPbzRuL
L2R1XGQ5a0/ZKyxsg1m6vuSSu0DvZLjMOb1VgJd2bZT+ztK0VKeLj/XjEwYzxMv/qNFAvxfFH35r
jh8XK1uc+pWQYgAD6krlbWOb35N8kJUhDXClL1ycp5Og9jYZE9auLr+fUh/2tl5CorvTwvbOKKVk
eUS3Ot0ejwqq1DMLUbqb/JknxrdyZ411/xa5mByvsOsklkGZSp3qBXEqm4VdYzKGm4g75amDN192
QOl97x0ma1WKOu58r3fN0Lz3om1I6bGH+VDEUjBmpT5cVmsb6EEnXafVnYTWn/LmMEYvk1lNiwyX
LepSF9TdiBzqmTe66NXaPdcb90+wv15KjM9nAJBP++dBm+VjfPmUOFfyASMZ/ANkZd/ozEmZ+Oyc
7dq7oFq3raoRmfDaNfxdQ1t3//L1n9SmcRQYAn/cxwDyVhEdQnamV2z5FwQ3g392F2PiZnXhMHqe
4H7n5ACQggB7xwAF8DHX5XoPt4AX84A50H81R1p7Vk/X12rw4TPx0QAdaIDTknQ0h0huR2tW5EEr
eHuBl3rRE1sjqF6fwDQO4DP51YEFMGQKCGGcJX4e54NHVXeSxjIv4jFkloR79yTW8DcadW4Ls4O0
VnioNWv+pn4jtz70E1txg2AZ4lodeICpZUeQAYaeZnkTd4KOxXQtyHHRRBkLNoMeiIDeMIF/13Fe
A4Xq5l4yt4MhKG5Cl2KD1VoyKH/gNipiuHpROH3gN2rlF0WPCHwFxUfKhiaVqP+EsRSJI2g4iigY
0hdwPWhaIXZ1yyRR7KeKiFV8wRVvHXhmkQdFABiLYQgEudVppLZFTPWKsjVP6kJwPXeKNOgccAU4
y1WCfYgEWtZVYeeDiXY91sJ0zXgAGuJ4W0h/kqWJeoWMMEZ9xYWC/pcpoCCNY2MLC9AkZtOLNJWL
q6hLzJh1c5eGqYSJD7ZL7NdZylgW8fFuG2aJdXGFivd15faPuIcnogSEEvdl+wiRq/Rw0fQAzNMp
HFiO0SB8hzh5ymKHj+Zo5/drGRlmYIYuT8VRrlGPQFZmIfltcwhJAqmRbUJ+WlWHFKZlHAlqYWNv
/iZeceEfPiKDN4kA+Xh/Qln/jb3SivqngpNVYPX3V4eYQDGRlNqXAFoodfOmhi3JkznIAzbYdcHY
dS+ThyKXh2nzDvd1TuY0AIK4hL8ocGtIi9wkhtfIiot1f4gohWhYCg9ATR71H1MXh/nYcij5kKcn
d8UTfZEEbC15lCXHhwVUGTwDltBogGMpeYeIhu/zmIgoIn5phtjndV32iOtHd3cXMmUGjXj5XxFX
fSxZmm8HgSR3e2qlR2jkRdvTH7y2hSDYhKa5jclEUEQJcrlpbENZa1VokE1GGfDxR7qTfI25Ru74
nBFpdLRUdBvph0NHkSlYkNCUOtcZKdkJmiMZLyPleyQoK8qokYD2TZzYZ4Tk/1yhMRHbVzfWkXwZ
l3tKR5VXUXnsWJSPRZk4F3HQGYGTGZ17KSTQJQBNsyAKUIkJ8GzOVH1ZKVC4CXd8yZfyWZmQZJ5y
cnfT5DN/ZB2VqADHSZIXmS2piY2jyHrSBoyAqXltSQvoQE5HOI4ZSnsHwJ8n2nJnyZZkiI6JZ5tv
SY269CWu2XRvdQzIQYDMpl9FmpelZ54huokDmXkp9ZsBk2hu6R4K0ZmFNXUNMKDd6HzIJZ4rqVQo
eUQwqW1xR512FmWPlwAxalSqOJ+JUowd55PsNoEJ9YPPyWORlp4k8YIZKoOSmlnHuUl4JYq6J5W1
1qUp2I6GJ2jVhqkOmUM+gf9Pszd1A7CllzelRnZcJniOt2l+5Yd4HHmYBEBNGgiHRPqeXOqp7cSc
Eth2ieVm6JmWvLSjUVJZvHFOn9d9sdQNQvigBkoOkKmkcLqChPqJDHSfZBdXIlgPiOmZlegpfvqL
ruagYJJHvMebJAqL63Zl2dpq1Mio5uAO4VpeUwej0QCJysmp5bJd18qu0FpS06hJgtmaATeqPPEO
9mWqvBYpqtqrATatjqF1VvmJMakaS8WG/XqnPnUOsOEA9ahyu7MA+6qACieMlmI6srpbAwWXRIii
G+uEbQmJThcXq7KmDRAAv0gzgwmmP2mtKtlS8VmeVneBykGXs/l4eBmtDer/mN6pJ8yZidmEn416
pPn5prL2jfQ0C/WoTwejhfpKlqQZsN+Jh1GJmZqqeGuZnwpqpjByhLp2qgPwp0eLOa9mqN/1qgYV
ntI6XycEsgGwAMC1fWHZACYrse4KikCrss7JgMTmdQaWp1ibk7i2NAfgAPl1inIoUoj6s/S5rma7
uKC7tcH6tHyUtfx6OwxLThZ6qlLXtFgrY4KHg3nqiJhniJR0u3wlSdGEHLEhHp9JqZyHQ/Vplv7C
iGsrdi1Imgh7ebplrBv1fcNCADhruGE5AE8JocXGpCpyvEKLeqZreuLHoIKZrLhwmHHBrLqafIl7
rLrLtSD6uDcmupIrdudm/6wlum6iOXCZy75M2YGJG63Ka40AqWiOm7E12lPgBL0AiJ4BaKme8ADr
myCsggA3WZueS6sxSbEgwnaCan08dTxLllThxYeSmCWZG3W0yaEMylhVKYt9a5+dWJKrCb++F4w5
p74OwBfkKHVja7lH+qVU1FhBmJLI66Uimni2yEvEUk5ZCsQgaHuzGMLDqIckaKeVRKa6W7ZwhqZ4
J7I2KX+IJsHneYd4OKLkK68ECYtp+2BpSXwXOBAyE5YIELHhZ5ubaH+AB0B8668LSr9NKHAdAl3/
G8UM0JjRa3NItXttm8ee2Ltv5q8x28beGAw/mrkFALtO2YXwOp6tem0uuf+tNwiXnSqCn2sLmcyi
nnKTDNB3a8d/QtSdZqW3VWzD9RvBM+yxNGupqyWXrPyZDtCFBNxfHqwojutfpKejECin9pt+EGcf
ktkKIDsQwsuLxhmK/eWPoxu1vUXLi3zEPBi/V/l3d4d3kfqZH8ir0NvHeIvFSWyR3fxZDlpaaquT
ucEQq2UYegeNCFB1HXPM40fCsXjJSfzCL+yyUaowH1RMINuMFuparvzP7JxzyRw7C9xN/Iaa/9ZU
nhWJr7IQv7BaZTaDFC2EKuO93SHQF22Fpey2BIa+XnZQuegaCmEP1iuu/lykUGuIlNuTCmq/TEy6
kXXCkXu1G8ddHipYq6X/EsqRzv78p8HZ0v9Khmq8mzWcxtKLbij9rQE9EbzxjB2YqlzKW1GpI6Nj
INcHzkObnCvVnT0WLzcNF1Hmz9vrtJBLxBACvqa1k2y9qmFalqurtQnqrVADNu3wDhfavgaIx0b6
lyd5BdA8tFY9bBGqy+B4GvhioUH1w6/8ngm7qcs5szIbz3pcsL2UsYDld715YCBYLFGMuGUNx1Qd
HRj1dVRrlga9jth1voeXXrkME6JSMPv0sO7Lzl2b3P3z02u7zBy9jW7d3GTZzgGoLobxjKco21C7
lo8cIop6ZAlMUjiGRZPNiSm7qXI8weagYm8Y21vKyxOJ0YdqbXMmw+D1/6ACN9imW8g/OrLlVYl3
zHnV9dsoU8CDt5OQPITEKtoVOciz6FWqHMYHp4UN8N7QjUQsvQy2bNoJPnPkXaagPM6orGOC5q7S
ZL2Ee6GnKtsCrrIZTg1UGcu1fdYc3uGp29EmlyqYzBtxMeHZHQBlDGFtpdKlYmXyqTboeK4KjnXT
CZ81K9MHZr3wN47etrPmiqRIDHNjeNXjy72JRNSPWeIOLoxxh1gg+7+LTeE8y3x3C9T2XeOVDXIs
u9b0zL1H+Zapc4S7xmxtitw3190p8twyrNd/tuSHbeKmTJ2RDEXSnM8DUU6yx+cMAOQNSZitTW0x
h9urbcVYXa0vKc+srf8bIVuXLbaYvIPcqxvnAx3TMWy0oL7blw3oo8m/khzOjj4aR/jDvBPkvj3C
g+q3yJblscZMWlznN9x6cUzNMnGrPZPOe9fneM2qs3vFkD19oUbo0nnfOc688iulOMSwT8asWYoA
burkm45VfOuaidqHyyw1Mr7kftePf3IWYrziCQDaXszl+PG8QVmtBwyGFmu7jubMT94t5OQV/hHM
HegAVXeFoVq6syKRc8poUcVw583qUMWNVBqBzHgvUl4Au9aB0I7XTarvydvqvh7f5CzepIzh9QuV
x56iBiDld7aB8hcAUo2kf13gb768w97GM9ycVSuvt7ZQej4eCuDKfY7/5S4P5+cBwqhrrZgK2fX2
0bQdv/aMLJjMURTceM0qdQxf6f0bqE7fFDCUoO26cM7bpVYS3bmLv0Nds5r5DvgkI5/ZplRWtN5c
Lyap8n1tmUrafFof2FE6Y/C97el7s1BWgFJXrgWJmUSeqZIdsGQv8Nqo47K0WusbiCJ/7xp3ylOf
pOIrv6Pa1lKv6GqPywPuCAoh5bLnKSIf9lgJv5zeGEAptKJmg458wA4cWCmr1rkc9wre1ElZLNBo
5cWLrHtPG7fPmqqO8ma6/E66itkIhJ9uCyphhIsdh5Qux2zu80UC/Ev6roG3v4AP2Lw9zp+unKCq
vike6f7Ms9M9sIKt/zcBr28TmvuyPP6MrIJFL8EQ8NY6JDinxmjMe+cxDAAgTbRU1XN1y/aVZ7q2
bzzXd773f2BQFludiMPZUah0GW3OFKxYIx1bV1Y2up1KY1jDg0ARXDIDzQdURRHZNKxQPqfX7Xd8
98eUauHPGygqP71Auq8XQb6/KbcmwjCCgwMBjLMNNYSFkai3R5zFPNFR0lKdUNMe1L7P1iRWRlfB
vrhCJJ9aT8TGRFqphwpKh4RhtIYGBA+EgxG23a3ZVOlp6mrqaDslptBVWMIgqxRH304uUF7e8SoD
gfaDhWGNtI8B5jdP6F5za/5+f1Jthbrt08ctB7ZbA80paqVQVUEu2/9eQYnkDkMCeceSMRggwJm+
hYP+jSRZcqTDW+cM2YrV0qWtZ+MI1kInrtcsZ2IEjLmoQMMAZQwUiPjo5BlMk0mVLjUVbs4qlATL
gYMlE2obgd6cWp3yQMCECQESJNiw0UMCj/gidqHJ1O1buAdPuRyIUGtLiZC8PZULiK2WezZhGCAw
Bt4FssfUOOBE4gErmSvjTqZcx66cRQqj7nXlt6HItiETdmbIMiDgNgLeicXwUw2DAM1KS81X2fbt
a315OESV+WVKzCD1nOYsfOvwLF55EjvTQc0mioKxFqeO2/r1JSxf9SUu/PfeXH4Qlb5MDjhk9LW9
jDZqQjW8sRgHmPX/AJ3TPt/Sse+f7NQzns3y+gab8lSi6qrzEvRttqK8MmMsDZxTxh6sPhLPQP4y
dGszXDrzcC7wRPovMln0CvGo6fhQ8RG7UGxmDMTkk5ABBDyaLsHaONRwR5M4FBDD/7R7iC4hqXoo
pg/NW68NTsSwRD5M6EmrQvP84/FK63TsEETaQKuqOgQ/uzALg5Ab7RMSlyREBK/g88m1DwoQ4cb8
RMTyzqRQSvObHfSsTrK7klzxSzRN3A7HAUMyyrE240EDDbMYayxFpNbC81LstDxUM+p6E2VQT3dL
1FKc9HlMIDHGgPBNBTZaZtIfX9IUU1qD887OWYsE8ThSRz0UpLrS/1MwSImuCOMBCSaI502glLER
DP2myrVWam/jtM/vAP0VUcmiIy3Eb6NtqwpkJSgAMWbNUmBKtZIstFp4/Zm2S0BD1S3Qa88Utkwg
CRUR2hLKlcASVpv1QM6iuoyju3gbtoY4FLcNUFZftS2P4X8h8jDiwEol0wR24FuWrOeaUTRah1OG
a94hdeVrD5fx3fYvMWMe04uQn8TIJ1eZsSlUK1UWmtY9GSk6xw9581fhW4EL2lvpGjTMAbF8wmij
dU0GGOWo6R36ay5n3QVjrjaeGVuN+0Vt6Y9pUsevtxllB0aqlzU4BKjB5RJsvvsesWnA9bY57b0J
R+0Lr5B95yL5Wv9VJjaTT40mTZb9brjy7PhU+14ljdb8bK4n6rTzFttIvNGCDa7xvsmdrtly2EVt
WcgC0xvUtNlhnqpzL5GoPSALAxb4qwx84kDdZ9tDOnbmm+K2d85B985echimPiuv8SJ0weEJcKAA
46P0IOvWaYu4efQ3/PzXo4E1cv3QhK10+8+BF2wENnm6BBk10FqHSn0FKX3oi8rtcvW7EmnLfNny
U7jABK7TOAZ/ymrOjBggKQL9KWgD5KACbwaIMA3uZYbDT3E8NjbZRRAii3IPBSPEvwnBSk3z0xzm
OnjDeqFNcO6ykwd5ly2kYYxmL3gMG5AFD3i8UEL1mNRaHGFDHEb/0WtQdN3SJlZC3YTGbcRaW9qc
8RX4bOAYEiIfnYakPCmmUXcCNNTmcKXBs6GxG8HCIp+CJw5n5AxCDRCjBxqQAK190IzZUyMB3Yco
FH4wkbRbn0raxUazBaqROHok9nJWALJsgAN+DMCzKDVJSBZSlP3Q1Pl0KBo7njIwvCuWmpoEspBh
MpNj5KTJzCTIDY5SaKXMwxVLRMdDBvB64tpSF29CpkgMYyxiXKLP7uiu81FRl5VR2vQ89zce9kuI
gUMlIm+VtxnuLjkAKNdXZKlEP5YRWrGaZjstM5M7PE2Et+Rc7XDHr0p5Kww7SaKMJNSATspwOy4y
pjv71kAA0VCh/yn8U/Uaaqby9bBKonEMOQszAYzISA0AbeIgQ2lQKR6wYs/LYTZNKDv5QfKEw8KJ
GCjhJgUoxo9MFKi/hilNkMILp00D5kMJWTEkoSyDEiPIY4yaqsXJhz4NUOf8FubDnO4SpfQ8Twgl
6siUpkRHwwSSf2JQLjIkMab//KMndfFT9USVee2LXsYeCNViSkWf4armUCeKAjbpRDUBAB8HZjSA
gJ51oNxUa2FLYU9LpXWIRbrpYB2KzfEUwSvtaIejZMoAPsbmZ9zKpWFHWc3DhtKqoZurSafaTZwp
h7IB8AktZ0qhJ77OMzv1bJ66ldC1RVNX26wjHOE2MxV286z3QP+Waii7gFk65xj++yQoJVnbnJpS
nHtjJ6i2VL78CHaRXrQmm3ZSmHYgl5mYPUZgPbqvhtIWuhrqLG5P+byI4lOQI5wtK5A1hndUoBhj
7EBmO3qqeSp2vXjiqkptFtTOGnCNceXuzbYWHQbBIH+GcVMf+9sACgkYvT4dMKZGm7n4MZht8NXq
kkrnQ16urU3vgEcx/IpZzDL3jqssHIc7bJsC2vi0t3XuU3ucuRudtKp31cux+LkAvu5sk8o1r3SJ
DMQbx46gDA2wc0s8Uo3hM35qUTDU7js1JdPyGIDtKDi1HOUOhlh6cLUdSRMr1x9S9crsfPN6GOVS
eGBSHpskb9b/AOhm7KG5WmILnJqhBwRDA5q3bE3g2+4yt7Aoc8/NKu+UpLVhHQuaWuqtp4EQYq/b
wbkmjc4tik0sBrBUeM8boelm35toTTtMS2gkYY3fVWqJ9lQ7Ob7nhSIxgaQ+SgGJ8QBN2wU1Oocu
1kQj7CimbBxEj9THkXFyIq2NSie0iQIHqBoahk1pPyvvw8sGW4rfO0kn15q0pgUyWrVnBOVQ4gBn
sBqfOVpTB2KZ3eQu91Xp+1DaOtrKjgZYaPI3CZ4Yz3hS6mhzrcppfsfl2VBOdq43dWXt6SdWRQs1
cnKC6rDszHhMtnSQLz6siPutfR03NSVt1Vt/W1PI0H7El/UX/74IYbbVw50uoN2dcv6ANncxX+zo
lD3zUYFT5koAcJtNUNyvJJlZfl2upWH9c6CLsrE8jbPe6lTxq4+YxwxxzE7A2JORj1EBkLt0eL6Z
1azvyNypfPm524rxt35ssE+dowrKeVHGMYu/CXCmybX527hjKeCxqJPh7FpnxmI8L42HqHi6t7hl
/WSMgPVkOHueeJX50u700rWIfV7lZmdReKpFck80SfWd56OSNE836Jci9HhGO/VvrrjPEbySyPo4
HZOdmqSZOUb/Kd2SGIK47XNTUnYDk9rBdKDbvVm/t3NWssVlseuPz8fCd2yezXc+U+YlTzlnevdQ
BVoNAYeksv8TAIwBuED4qA7+JuKDt5/fd/kzNG6XobxIcjloyrfn0hePUQ/iOq5Iy6T7K6tnEq7d
6j//6zf3IqRt2iDKKTT6QoTiKgwWqxp0OoYMi0ABhKcK/D/cyJfxO4SkObm0Kh0joKz3qDAxYyp2
IZzLYMEUZC9/CztRazBuKi3aY6TFojEjLJQv2Cf5mwSY+j6A6jzEOjry68G6I8D2OjzUGoQs/Ch9
0733E4n7agcYUbIXOwYFCD/6GToKtMJ4YTSiwyo3OkBc27JAQ4pVYkLVkATk+on7GwAZK0CsQ0E3
TLM16ztPYzPUC0JX0iCdCIYwEiPYswdam8IqLMSU4bUFGsL/u2O8OTMSo4A6/OpDP5REwktAORyT
S8TET2GgVvSp3tuci3Est9IiXyCXeIMPKHk9NKCEhDnA82PFoemO2vtEwmIrfkk2IBQ+tlAtGAGf
Uny9Uwyyo5g9p9M7YZQ79cu7J8seAVy0gpovUWNGySOn4/oeM+TFtQukTAPCbNSpTIG7baS7F+SO
vSOnD1yAArCbzduAAMiw5aFDQXnH64A4hBq1n1MzAHS/KqJFGSgXulmVPzxFC/mwHSTILMm902M/
7YueAvm0HtquFcJH5cizjDo+NPhH1jFANoQ8jHQeUDrIH5NHINOtlowZXmMQqKMgCJlIZ6I1phnE
l/RBF5xH/7iTSSgTMIFztYkZQ57co340L7FTtmIcSgIbve8IRpTzKpprQ1ayMxYgw0hzFNijyP/Z
oaK0ystZsAnEPgGaQnTzOoEsj7ziwxZzsc1LAKkUSC9cRbUsCSqSL5rUQhg0rfaKji9DssMQC5Sk
yD8LNZC0sr9UigLbRL6EuXnswjgcMljctYChsBa7gAcELIDMJ1vzysk8CX7APYGDzLuzrkZqzSwD
ubvES+SDLZMTTMwsutQsyPdRxNAazDXruuxiEVRzgBZbJtjjvGOzmNPszdVcRG/sv8MMR5qZtTaa
SoD7g5yAEV3UpDEDREoEoKXMvo2Ezv3YP5LiwfrCyaQsTv9J0gaQexIl4qO1s5E57BXURE95CU7e
lExDwU6GdCw4nEByoTCy7EfHrEije06/5M93Ssrr2k/S4UwKRbr7aYKQuUsoicqGy7jhhFB47KVE
7J2dCi5ExCptCzxm8se0YNDfeFARrcm0NLAaBU5ME8quIbgv+bUHsT9/LM0A4sTsnNEVfDWiIw+Z
m9Cfqs7pBKGn4ye088Nhw00Y3TEj3TQA5UCs7EYRskn35EaG4L4WUzhNuk9rPKmNu9AsJSW1KV