, en de demonstratie van een eenvoudige hasj hashelf (totaal, maar algorythm.;::: de gehele getallen); var, byte: tbytearray absolute maar;, I, X: gehele getal;, het begin. Het resultaat: = 0;: = 0 - 1, ik begin een: de,, (resultaten van de SH: = 4 bytes) + [I]; x = resultaten en f0000000 dollar; als (x < > 0) en van de resultaten (x = ingesteld, Psy, 24); de resultaten (x = niet van het einde);,,,,,