Alguien me explica como funciona esto?

[omar1977]

y que tal ahora.....
creo que la traduccion esta media julera...
seria mas o menos asi...

% Devuelve el residuo de una división 10 % 3 = 1
$a /= $b //Asigna a $a la división de $a entre $b

$s=1;$r=12345678;
//para m=0 mientras r<>0 hasta r/10 o (1234567.8)
for ($m=0 ; $r!=0 ; $r/=10 ){
//s = el residuo de (s +(el residuo de r y 10) por (9 - el residuo de (m = m + 1) y 6 ) y 11;
$s = ($s+ $r%10 * (9 - $m++ % 6 ) ) % 11;
}
// retornamos el caracter( si($s es verdadero) entonces sumamos 47 a s de lo contrario entregamos 75 )
return chr ( $s ? $s+47 : 75 );


el asunto del retorno es para los codigos ASCII ejemplo el ASCII de 75 es K.... jejeje
espero quede mas claro

si te das cuenta
r=12345678
r=1234567.8
r=123456.78
r=12345.678
etc...
r=0.123..... es decir ya no cuenta para el ciclo.... jejejejej