Thread: Fehler mit ISBN in Bücherliste

 
<?php
function mache_ean_aus_isbn($isbn) { 
   $isbn = str_replace("-","",$isbn) ; 
   $ean = '978'.substr($isbn,0,-1); 
   settype($ean, "string"); 
   $q = 0; 
   $m = 1; 
   $l = strlen($ean); 
   if($l!=12) { return false; } 
   for($i=0; $i<$l; $i++) { 
      $q = $q + ($ean[$i] * $m); 
      if($m==1) { $m = 3; } else { $m = 1; } 
   } 
$q = 10 - ($q%10) ; 
if($q==10) { $q = 0; } 
$ean = $ean . $q; 
return $ean; 
}
/*Beispiel*/
$isbn10='3-8273-2136-0'; //ISBN-10 für Linux-Firewalls mit Iptables & Co. von Ralf Spenneberg
$isbn13=mache_ean_aus_isbn($isbn10);
print 'ISBN-13 für Linux-Firewalls mit Iptables & Co. von Ralf Spenneberg lautet:' .$isbn13;
?>