W dniu czwartek, 30 listopada 2017 07:32:20 UTC+1 użytkownik Radoslaw Szwed napisał:
> Użytkownik "Adam Klobukowski" <a...@g...com> napisał w wiadomości
> news:aef027f7-2063-41a0-9f50-2136a3fd1032@googlegrou
ps.com...
> Poszukuję prostego (szybkiego) generatora pseudolosowego liczb 8bitowych z górnym
limitem, tj. jak bym chciał sobie wylosować liczbę
> z zakresu 0-44. Możecie coś polecić?
>
> Mały (16 bajtów na x86) szybki generator liczb pseudolosowych generujący wartości
losowe od 0-255.
> Wprowadzenie limitu chyba nie będzie problemem dlatego go nie uwzględniłem.
>
> Generowane liczby zależą od wartości początkowej rnd i wartości używanej przy
> rozkazie xor. Dla poniższych ustawień kod generuje 254 różne wartości.
> Żadna z wartości się nie powtórzy dopóki wszystkie nie zostaną wygenerowane.
> Można zamiast $e7 użyć $71, $7f, $e9 dają równie dobre rezultaty.
>
> Przeniesienie poniższego kodu na Motorolę (Amiga/Atari ST),
> MOS 6502 (Atari 8bit/C64) czy "ARMa" nie powinno stanowić kłopotu.
> W przypadku problemów dołączyłem komentarze.
>
> rnd db 20 ; wartość początkowa
>
> mov al, rnd ; załadowanie zmiennej do akumulatora
> sal al, 1 ; przesuniecie bitów w akumulatorze o 1 w lewo najstarszy bit
wpada do c
> jc pomin ; jeżeli c=1 skocz do pomin
> xor al, $e7 ; suma symetryczna
> pomin:
> mov rnd, al ; akumulator do rnd (wartość pseudolosowa)

Dzięki :)

AdamK