Re: Random number ?

[Jim Langston <jimlangston@xxxxxxxxxxxxxxxx>]

0 to 1.  I believe it's a 32 bit double float.

Call it returning a 15p 15

Then multiply it by the range you want and take the integer and add one.

The code in basic is:

Random = Int(Rand() * 100) + 1
which would give a random number from 1 to 100.

One out of a zillion times it might actually give 101, not sure, which 
would only occur if the random number generated was 1.00000000000 which
is not likely likely, usually they look like 0.89382010392 (in which case
the Random would contain 90.  0.89382010392 * 100 = 89.382010392.
Integer of 89.382010392 = 89. + 1 = 90.

HTH

Regards,

Jim Langston

Me transmitte sursum, Caledoni!

Slava Zharichenko wrote:
> 
> Hi,
> is there are any examples of Random Number generator written in RPG?  I
> found only 'Basic Random Number Generation (CEERAN0) API', which gives only
> 0 or 1 and i have to assemble it to create longer number
> 
> Thanks
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---