[HaBo]

00, i,j,k,l     CALL (i,j,k,l)
01, i[s,t]      XOR Rs, Rt        ; XOR Register, s, t sind Low und High Nibble von i
38, i[s,t]      ADD Rt, string[Rs];Addiere den Wert von String an der Stelle Rs zu Rt
55, i[s,t]      XOR Rt, string[Rs]
88, i, j        SETF Ri, j       ;Set Zero Flag F0 (Bit0), >= Flag F1 (Bit1), < Flag F2 (Bit2) aus Vergleich Ri, j
90, i,j,k,l,m   XOR Ri, DWORD(j,k,l,m)
CC, i, j        SUB Ri, j
D4, i           JSetF2, i        ;JMP i if F2 is set
E8, i, j        ADD Ri, j
F1, i           POP Ri           ;TOS--> Ri, SP->SP+1 (vier Byte)
FF              EXIT

etc...

F1,1           POP R1
F1, 5          POP R5
01, 33         XOR R3, R3
01, 44         XOR R4, R4
88, 5, B       SETF     R5, B    ; R5 hat Länge des Serial, Min Länge == 0x0b
D4, 59         JSF2, $+059        ;Springe 59 weiter, falls F2 gesetzt ist, also wenn die Länge < 0x0b ist
 
...
...

59 Plätze weiter:
00, d0,6f,40,00    CALL 406fd0        ;Show "badboy"
FF        EXIT

bool checkSerial(byte[] name, byte[] serial)
{
     if (((serial[0] + serial[5]) ^ serial[6]) != 0x6b)
         return false;

     int sum1 = 0;
     for (int i = 1; i < 5; i++)
         sum1 += serial[i];
     sum1 *= 2;

     int sumName = 0;
     for (int i = 0; i < name.Length ; i++)
         sumName += name[i];

     if (sum1 != sumName)
         return false;

     int sumSerial2 = 0;
     for (int i = 7; i < serial.Length; i++)
         sumSerial2 += serial[i];

     if (sumSerial2 != (sumName * 2))
         return false;
     return true;
}