Enviado por Luis Dujovne
<?php function dv($r){$s=1;for($m=0;$r!=0;$r/=10)$s=($s+$r%10*(9-$m++%6))%11; return chr($s?$s+47:75);} ?>