sub setHidden {
    my ($self, $val) = @_;
    if($self->{'czy_blokada'}){
        $self->{'czy_ukryty'} = 1;
        $self->{'status'} = 0;
    }else{
        $self->{'czy_ukryty'} = $val?'t':'f';
    }
}