Показать сообщение отдельно
Старый 04.07.2009, 15:50   #1
impersonalis
Зануда с интернетом
 
Аватар для impersonalis
 
Регистрация: 04.09.2005
Сообщений: 14,014
Написано 6,798 полезных сообщений
(для 20,935 пользователей)
Сингулярное состояние ГПСЧ

Читаем хелп по
SeedRnd seed
Computer random number generators are not truly random. They generate numbers based on a seed value (an integer number). If you 'seed' the random number generator with the same seed, it will always generate the same set of numbers. Use this command to ensure you get a good set of numbers. Usually you set the seed value to a timer or system clock value to ensure that each time the program is run, a new value is seeded. Look at the example for normal usage of this command.
Нигде я не вижу ограничений на параметр seed, однако:
SeedRnd(-1)

For i=1 To 10
	DebugLog LSet(Str(Rand(100)),10)+Str(Rnd(100))
Next
Результат:
1 99.9992
1 99.9992
1 99.9992
1 99.9992
1 99.9992
1 99.9992
1 99.9992
1 99.9992
1 99.9992
1 99.9992
Любой другой параметр (включая отрицательные и 0) работает кооректно.
__________________
http://nabatchikov.com
Мир нужно делать лучше и чище. Иначе, зачем мы живем? tormoz
А я растила сына на преданьях
о принцах, троллях, потайных свиданьях,
погонях, похищениях невест.
Да кто же знал, что сказка душу съест?
(Offline)
 
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо impersonalis за это полезное сообщение:
ABTOMAT (05.07.2009), Tadeus (04.07.2009)