Rnd/
Rnd_1.bas
' |@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@|
' | Rnd Example 1 |
' | by |
' | GDN Black Ops : FreeBASIC Division |
' |@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@|
' http://gamedesign.wikidot.com/freebasic:rnd
' 'Rnd' generates a number between 0 and less than 1.
' 'Randomize Timer' seeds the random number generator.
Randomize Timer
Print Rnd(1)
Sleep
End
Rnd_2.bas
' |@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@|
' | Rnd Example 2 |
' | by |
' | GDN Black Ops : FreeBASIC Division |
' |@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@|
' http://gamedesign.wikidot.com/freebasic:rnd
' This generates a number between 1 and 100.
Randomize Timer
Print Int(Rnd(1)*100)+1
Sleep
End
page revision: 2, last edited: 10 May 2007 16:18