[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Where does the Applesoft RND() function get its data?



On Feb 25, 7:18 am, Toinet <antoine.vig...@laposte.net> wrote:
> "PSUEDO-RANDOM NUMBER GENERATOR.
>
> IF ARG=0, THE LAST RANDOM NUMBER GENERATED IS RETURNED.
> IF ARG .LT. 0, A NEW SEQUENCE OF RANDOM NUMBERS IS STARTED USING THE
> ARGUMENT.
> TO FORM THE NEXT RANDOM NUMBER IN THE SEQUENCE, MULTIPLY THE PREVIOUS
> RANDOM NUMBER BY A RANDOM CONSTANT AND ADD IN ANOTHER RANDOM CONSTANT.
> THE THEN HO AND LO BYTES ARE SWITCHED, THE EXPONENT IS PUT WHERE IT
> WILL BE SHIFTED IN BY RMAL, & THE EXPONENT IN THE FAC IS SET TO 200 SO
> THE RESULT WILL BE LESS THAN 1. THIS IS THEN NORMALIZED AND SAVED FOR
> THE NEXT TIME. THE HO AND LOW BYTES WERE SWITCHED SO THERE WILL BE A
> RANDOM CHANCE OF GETTING A NUMBER LESS THAN OR GREATER THAN .5."
>
> There is a routine in ROM as well as a table for the use of it.
>
> Sorry about the capital letters but it is not my writing (I am not
> responsible for the mistakes)
>
> antoine

Yes, in the source code of days gone past, they didn't think they were
yelling.  Probably because they didn't have caps lock back then.  ;-)