Zelf encryptie maken

Haha Ken jij dan de "methode" waarop ze een willekeurige tekenreeks omzetten naar een reeks van 32 getallen?

//Opmerking: Alle variabelen hebben als type een 32-bits integer zonder teken tijdens de berekening

//Definieer r als het volgende
var int[64] r, k
r[ 0..15] := {7, 12, 17, 22, 7, 12, 17, 22, 7, 12, 17, 22, 7, 12, 17, 22}
r[16..31] := {5, 9, 14, 20, 5, 9, 14, 20, 5, 9, 14, 20, 5, 9, 14, 20}
r[32..47] := {4, 11, 16, 23, 4, 11, 16, 23, 4, 11, 16, 23, 4, 11, 16, 23}
r[48..63] := {6, 10, 15, 21, 6, 10, 15, 21, 6, 10, 15, 21, 6, 10, 15, 21}

//Use binary fractional part of the sines of integers as constants:
for i from 0 to 63
k[i] := floor(abs(sin(i + 1)) × 2^32)

//Initialiseer variablen:
var int h0 := 0x67452301
var int h1 := 0xEFCDAB89
var int h2 := 0x98BADCFE
var int h3 := 0x10325476

//Voorbewerking:
voeg "1" bit aan het bericht toe
voeg "0" bits aan bericht toe totdat berichtlengte in bits ≡ 448 (mod 512)
voeg lengte van bericht als 64-bit little-endian integer toe aan bericht

//Verwerk het bericht in opeenvolgende blokken van 512-bit:
for each 512-bit chunk of message
break chunk into sixteen 32-bit little-endian words w(i), 0 ≤ i ≤ 15

//Initialiseer de hashwaarde voor dit blok:
var int a := h0
var int b := h1
var int c := h2
var int d := h3

//Hoofdlus:
for i from 0 to 63
if 0 ≤ i ≤ 15 then
f := (b and c) or ((not b) and d)
g := i
else if 16 ≤ i ≤ 31
f := (d and b) or ((not d) and c)
g := (5×i + 1) mod 16
else if 32 ≤ i ≤ 47
f := b xor c xor d
g := (3×i + 5) mod 16
else if 48 ≤ i ≤ 63
f := c xor (b or (not d))
g := (7×i) mod 16

temp := d
d := c
c := b
b := ((a + f + k(i) + w(g)) leftrotate r(i)) + b
a := temp

//Tel de hash van dit blok op bij het resultaat tot nog toe:
h0 := h0 + a
h1 := h1 + b
h2 := h2 + c
h3 := h3 + d

var int digest := h0 append h1 append h2 append h3 //(uitgedrukt als little-endian)

Haha Ken jij dan de "methode" waarop ze een willekeurige tekenreeks omzetten naar een reeks van 32 getallen?