Thomas Meinike: Prüfsumme berechnen

Beitrag lesen

Hallo,

ich stehe vor dem Problem, eine Basicroutine in PHP übersetzen zu müssen; darin kommt eine Prüfsummenberechnung vor, die mit einem XOR arbeitet:

a% = 0
For i% = 1 To Len(STRING$)
a% = Asc(Mid$(STRING$, i%, 1)) Xor a%
Next i%

und da bin ich mit meinem Latein doch am Ende. Kann mir jemand weiterhelfen?

<?php

$strvar="abcde";
$a=0;

for($i=0;$i<strlen($strvar);$i++)
{
  $a=ord(substr($strvar,$i,1)) ^ $a;
}

print $a; // 97

?>

MfG, Thomas