Случайные числа

[Sun07]

Подскажите, пожалуйста, как в определённый момент времени получить 30 случайных байт (не псевдослучайных)? Есть идея взять их из определённого участка памяти, но как и из какого участка?

[ANDLL]

Подскажите, пожалуйста, как в определённый момент времени получить 30 случайных байт (не псевдослучайных)? Есть идея взять их из определённого участка памяти, но как и из какого участка?

Гхм. Если ты думаешь, что "случайное" число взятое по твоему алгоритму более случайно, чем вщятое, скажем, по алгоритму VB то ты сильно заблуждаешься

[|( () ( T |/| |(]

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long
Private Sub Form_Load()
Dim b(29) As Byte
CopyMemory b(0), GetDC(Me.hwnd) , 30
End Sub

Подойдёт???)

[Sun07]

ANDLL, смотря из какого участка памяти брать, в этом и вопрос. Но явно не постоянный код программы

[ANDLL]

Sun07
И что, правда думаешь, что сложная функция времени более предсказуема чем содержимое заданной области памяти?

[|( () ( T |/| |(]

->Но явно не постоянный код программы

CopyMemory b(0), GetDC(Me.hwnd) , 30
Выдаёт вполне случайный массив, каждый раз разный.

[Sun07]

Sun07
сложная функция времени?

Если ты имел ввиду случайное от времени, то там можно взять только миллисекунды, что будет вроде только 4 байта, а генерить от них псевдопоследовательность мне не подходит.

Sun07
CopyMemory b(0), GetDC(Me.hwnd) , 30

Объясни новичку, что сей код делает

[|( () ( T |/| |(]

Sun07, CopyMemory копирует в массив b участок памяти длинной 30байт, начиная с GetDC(Me.hwnd). что такое GetDC - точно не скажу, но возращяет указатель.

[Sun07]

Sun07, CopyMemory копирует в массив b участок памяти длинной 30байт, начиная с GetDC(Me.hwnd). что такое GetDC - точно не скажу, но возращяет указатель.

Так это, наверное, указатель на загруженный код моей программы или на ёё область данных Где ты это взял, если не знаешь до конца?

[BV]

lol

The GetDC function retrieves a handle to a display device context (DC) for the client area of a specified window or for the entire screen. You can use the returned handle in subsequent GDI functions to draw in the DC.

Т.е. GetDC(Me.hWnd) = Me.hDC

[Хакер]

Господа, прекращаем маятся дурью. Rnd даст вам гораздо более случайные числа, чем ваш убогий способ.

А вот ваш убогий способ скорее всего вернёт вам нечто неслучайное. И я даже предположу, что 70% сгенерированных таким способом чисел будут либо 0 либо 255 (не проверял, когда писал, проверил - так и есть).

Поэтому если уж вам хочется чего то Extra - измеряйте обороты куллера что-ли

[|( () ( T |/| |(]

Таким способом можно получить что-то случайное, если опиративу забить по максимуму (7zip очень хорошо это делает))) Но эффективнее конечно
Randomize(timer)
for i=0 to 29
b(i)=Cint(255*rnd)
next

Ну или свою какю функцию написать: 1/(1+Abs(cos(timer)+sin(-sqr(timer+1)))), или в этом роде

[Хакер]

А что если выполнить

Код: Выделить всё

1/(1+Abs(cos(timer)+sin(-sqr(timer+1))))

30 раз мы получим каждый раз разные числа?

И потом, случайные числа будут повторяться, если функция будет вызвана в одно и тоже время.

Вобщем, народ, в лице Sun07 и |( () ( T |/| |(:
Прекращаем маяться дурью и дружно юзаем RND

[|( () ( T |/| |(]

Хакер. заместо timer поставить n, и потом прибовлять к нему по 0,5.

->Прекращаем маяться дурью.
А кто маиться. был задан вопрос, я ответил.
Это веть ты начал парня критиковать, может ему подходит "что 70% сгенерированных таким способом чисел будут либо 0 либо 255":)