Michael: Prüfsumme berechnen

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?

Michael

  1. 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?

    Michael

    mit if else vielleicht?

    1. Oh thnx, muchas gracias, spasibo, dzienkuje, merci, grazie, xiexie

      ... wenn es euch nicht gäbe ...

      Michael

  2. Hallo Michael

    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?

    Google ist dein Freund und liefert dir folgende Seite: http://www.zend.com/tips/tips.php?id=2&single=1

    Xor funktioniert in PHP - wie in C auch - mit dem ^-Zeichen.

    MfG

    Tom2

    1. Hallo!

      Google ist dein Freund und liefert dir folgende Seite: http://www.zend.com/tips/tips.php?id=2&single=1

      Oder halt mal einen Blick ins Manual riskieren: http://www.php.net/manual/de/language.operators.logical.php

      Grüße
      Andreas

  3. Hallo Michael!

    worin besteht nun das Problem?

    c: http://www.php.net

    Gruss Sven

  4. 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