extrn ExitProcess : proc

.code
Main proc
    rdrand rcx ;wygenerowanie wartości pseudolosowej w rejestrze RCX
    jnc _error ;jeśli wystąpił błąd, to przejdź do procedury obsługi błędów
    rdrand rcx ;wygenerowanie kolejnej wartości pseudolosowej w rejestrze RCX
    jnc _error
    rdrand rcx ;wygenerowanie kolejnej wartości pseudolosowej w rejestrze RCX
    jnc _error
    rdrand rcx ;wygenerowanie kolejnej wartości pseudolosowej w rejestrze RCX
    jnc _error
    rdrand rcx ;wygenerowanie kolejnej wartości pseudolosowej w rejestrze RCX
    jnc _error

_error:
    ;tutaj powinna być obsługa błędów
    sub rsp, 28h
    xor rcx, rcx
    call ExitProcess
Main endp
end