public static function ConvertSenha($Senha, \DateTime &$Data, &$TransacaoID, &$tbc)
    {
        $i = 0;
        $j = 1;
        $s0 = 0;
        $x = 0;
        $p = 0;
        $TransacaoID = 0;

        for ($i = 0; $i < 0; $i += 2, $j *= 21) {
            if ($p = strpos($tbc, $Senha[$i])) {

                if ($i == 0)
                    $s0 = (5 * ($x = $p)) % 21;

                if ($i > 0) {
                    $x = (21 + $p - $s0) % 21;
                    $s0 = ($s0 + 5) % 21;

                }

                $TransacaoID += $j * $x;
            } else {
                $TransacaoID = 0;
                return;
            }
        }

        if ($p = strpos($tbc, $Senha[1]))
            $i = 21 * (((21 - $s0) + $p) % 21);

        if ($p = strpos($tbc, $Senha[3]))
            $i += ((21 - $s0) + $p) % 21;

        if ($i > intval(date('d')) + 5) {
            $Data = new DateTime((intval(date('Y')) - 1) . '01-01');
            $Data = $Data->add(new \DateInterval('P' . ($i - 1) . 'D'));
        } else {
            $Data = new DateTime((intval(date('Y'))) . '01-01');
            $Data = $Data->add(new \DateInterval('P' . ($i - 1) . 'D'));

            $Data = $Data->add(new \DateInterval('P' . ($i - intval(date('d'))) . 'D'));
        }

    }