中国和阿曼足球直播时间/法国球员/k联赛/体球网足球即时比分 - 丹东一句定三码牛彩网

function isbn_sum($isbn, $len)
{
/*
 * 該函數用于計算ISBN加權和
 * 參數說明：
 *   $isbn : isbn碼
 *   $len  : isbn碼長度
 */
    $sum = 0;
    if ($len == 10)
    {
        for ($i = 0; $i < $len-1; $i++)
        {
            $sum = $sum + (int)$isbn[$i] * ($len - $i);
        }
    }
    elseif ($len == 13)
    {
        for ($i = 0; $i < $len-1; $i++)
        {
            if ($i % 2 == 0)
                $sum = $sum + (int)$isbn[$i];
            else
                $sum = $sum + (int)$isbn[$i] * 3;
        }
    }
    return $sum;
}
function isbn_compute($isbn, $len)
{
/*
* 該函數用于計算ISBN末位校驗碼
* 參數說明：
*   $isbn : isbn碼
*   $len  : isbn碼長度
*/
    if ($len == 10)
    {
        $digit = 11 - isbn_sum($isbn, $len) % 11;

        if ($digit == 10)
            $rc = 'X';
        else if ($digit == 11)
            $rc = '0';
        else
            $rc = (string)$digit;
    }
    else if($len == 13)
    {
        $digit = 10 - isbn_sum($isbn, $len) % 10;

        if ($digit == 10)
            $rc = '0';
        else
            $rc = (string)$digit;
    }
    return $rc;
}
function is_isbn($isbn)
{
/*
 * 該函數用于判斷是否為ISBN號
 * 參數說明：
 *    $isbn : isbn碼
 */
    $len = strlen($isbn);
    if ($len!=10 && $len!=13)
        return 0;
    $rc = isbn_compute($isbn, $len);
    if ($isbn[$len-1] != $rc)   /* ISBN尾數與計算出來的校驗碼不符 */
        return 0;
    else
        return 1;
}