Генератор случайных чисел на Atmel контроллере

[DVD-RW]

А если брать младший, или даже два младших разряда с 10-битного ацп с условием какой-нибудь полусантиметровой антеннки или любой детальки? Из них собирать целое число нужной длины. Скорость не ахти, зато случайность на высоте.

[picavr]

Единственный вопрос - стартовое значение.

Когда то понадобилось случайное значение. Сделал так. При старте МК (это был 16F84. других с FLASH ещё не было) сгружал в EEPROM всю RАМ. А затем анализировал какие ячейки устанавливаются хаотично после подачи питания. Нашёл 3-5 ячеек. После старта сохранял эти значения и применял для формирования случайных чисел .

[Godzilla82]

Да чем вам псевдо-случайные не нравятся? Надо больше хаотичности - вызывайте его каждую миллисекунду. Это, правда, только если возвращаемый результат зависит от времени, напрмер, человек нажимает кнопку - выдаётся результат. Если результат надо выдавать строго каждые 10 секунд, например, то придётся хитрить

[OlegNZH]

Ёлки зелён.. да если есть "кнопка+чел"-никто даже и не заморачивается ....а вот если система закрытая-вот суть проблемы.А если вдруг ? - нужно распределение , допустим не Белое , а Розовое..или- "Фиолетовое" ...
Upd . Простейший пример ...Игровой автомат - при "Белом"- Игрок и Хозяин -50\50 расходятся.Для Прибыли- нужно Распределение сместить в одну сторону.(Пример Абсолютно утрирован...но смысл-понятен)

[Godzilla82]

Upd . Простейший пример ...Игровой автомат - при "Белом"- Игрок и Хозяин -50\50 расходятся.Для Прибыли- нужно Распределение сместить в одну сторону.(Пример Абсолютно утрирован...но смысл-понятен)

value = pseudo_random(100);
switch(mode)
{
case pribil: porog = 70; break;
case porovnu: porog = 49; break;
case ubitok: porog = 30; break;
}
if(value›porog) otdat_babki_igroku(); 

[OlegNZH]

[quote=OlegNZH;253803]Пример Абсолютно утрирован[/quoe]
Сказал ведь. Куча вероятностных приложений есть .Например Статистическая физика.Да и в Математике.Мильон!Я конечно- далёк от того, что кто-то-то будет считать на AVR-ке - так мы ведь не услышали ЗАДАЧУ, которую ТС поставил!

[Mixer79]

Курсовая как то была по М-последовательностям. В железе реализовывал 8 битную псевдослучайную последовательность (на логических ИЛИ). вот тут есть немного информации. Может пригодится.

[mtit]

от того, что кто-то-то будет считать на AVR-ке

А какая разница? AVR по сравнению с IBM-XT по БЫСТРОДЕЙСТВИЮ сильно разняться? А случайные последовательности - как появились ЭВМ - так и встала такая задача. Моя любимая присказка: "Во времена Королёва полёты рассчитывали на компьтере, вычислительная мощь которого меньшь, чем у современного калькулятора."

[-Dreamer-]

Еще на заре «домашних пк» использовал простую формулу
псевдо-случайных чисел в интервале ]0,1[ - Xn+1=D[11*Xn+πи]
D-дробная часть числа.
Дает неплохое равномерное распределение. При визуальном
выводе последовательных чисел (x,y) узор не наблюдается.
Число неповторяющихся чисел зависит от разрядности операндов.
При 16 разрядных - более 32000. При задании разных начальных Xn последовательности будут разные. Полностью готовый к «употреблению»
модуль: вход – r20,r21- Xn; выход- r20,r21-Xn+1 (r20-младший)

mov r22,r20
mov r23,r21
lsl r22 ;Умножаем значение в r20,r21 на 11
rol r23 ;Целая часть числа нам не нужна
add r20,r22
adc r21,r23
lsl r22
rol r23
lsl r22
rol r23
add r20,r22
adc r21,r23
ldi r22,$3f ;Число "Пи" (дробная часть) целая часть нам не нужна.
ldi r23,$24
add r20,r22
adc r21,r23
Для приведения чисел к интервалу [A,B] используется простая формула- Xn+1=A+((B-A)+1)*Xn
Например, для имитации кубика Xn умножаем на 6 и прибавляем 1.
Используем 3-х байтовую арифметику:

push r20
push r21
clr r17
lsl r20
rol r21
rol r17
mov r16,r17
mov r22,r20
mov r23,r21
lsl r20
rol r21
rol r17
add r22,r20
adc r23,r21
adc r16,r17
inc r16
pop r21
pop r20
в r16 - целое значение кубика.

[XRuZzz]

А если брать младший, или даже два младших разряда с 10-битного ацп с условием какой-нибудь полусантиметровой антеннки или любой детальки? Из них собирать целое число нужной длины. Скорость не ахти, зато случайность на высоте.

И я того же мнения, тока не понимаю зачем, что-то подключать. У меня АЦП всегда шумело и без этого, ну или брать значения с температурного датчика, который встроен в МК.