Генератор случайных событий.

[Ник: YushikИмя: Андрей(Симферополь)]

Здравствуйте коллеги мне для создания одного проекта понадобился генератор случайных (false, true) битов. Суть его состоит так: допустим мы имеем переменную ULong в которой мы будем использовать только младшие 20 битов. Мне нужна случайная последовательность из 0 и 1 в которых количество битов равных нулю будет равна 10, а также количество битов равных единице будет тоже равно 10. При этом единицы и нули не должны повторяться 5 раз подряд. Функция С+ random(); мне не подходит т. к. не удовлетворяет данным требованиям. Может у кого есть такие наработки, при изучении функции random(); я выяснил что она генерит случайные числа в диапазоне от 0....32767 внизу я дал пример генератора случайных чисел в заданном пользователем диапазоне может кому сгодиться.

[Ник: EnigmИмя: Enigm(Сочи)]

А чем не устраивает ?
Чет будет 1 , нечет будет 0. или что вам там нужно.
Или я нифигаане понял.

[Ник: YushikИмя: Андрей(Симферополь)]

А чем не устраивает ?
Чет будет 1 , нечет будет 0. или что вам там нужно.
Или я нифигаане понял.

Здравствуй Enigm Я сёйчас делаю контроллер управления кабаном бегущей мишенью в тир. По регламенту соревнование состоит из 20 выстрелов, мишень может двигаться с двумя скоростями быстрой 4 м\с. и медленной 2 м\с. На тренировках обычно используют 20 медленных проходов или 20 быстрых проходов, на соревновании используют смешанный режим при том же количестве выстрелов. В моём случае быстрой скорости будет использоваться лог. 1 медленной лог. 0, по тому же регламенту количество быстрых проходов должно быть 10 из 20, медленных столько же. Медленные и быстрые проходы могут идти друг за другом в случайном порядке но повторяться только медленные или только быстрые могут не больше 5 раз подряд.
P. S. С помощью кода который я дал выше можно сгенерить лог. 0 и 1 в случайном порядке но количество нулей и едениц не совпадёт при этом.

[Ник: EnigmИмя: Enigm(Сочи)]

Тогда походу только всякими условиями отфильтровывать нужные параметры.
И да рандом может быть совсем не рандомный, если его запускать с одинаковыми параметрами.
Вам похоже надо сначала набивать 20 проходов с нужными параметрами и только потом отсылать их на исполнение.
Так будет думаю проще, ибо параметров всего 2 , нужно 10 едениц и нулей, и не более 5 раз подряд.

[Ник: EnigmИмя: Enigm(Сочи)]

В общем посидел покумекал и вот что получилось.
На основе, четное рандомное число или нет.
Но можно прикрутить что нить другое.
Хотя пробовал и сразу 0 или 1 рандомить, и от 0 до 10 , разницы с чет, нечет не заметил.
Макрос заполняет массив из 20 элементов нулями и единицами.
Единицы или нули не могут быть больше чем пять штук подряд.
В массиве всегда 10 единиц и 10 нулей.
Так что.
Пускаем макрос, заполняем массив.
Дольше уже ваша автоматика по очереди вытаскивает из массива данные и выполняет нужные действия.
Как массив весь прочитали, опять вызываем макрос и массив,опять готов к работе.
Может и перемудрил немного, но все что по быстрому пришло в голову.
Может криво и косо, но работает как указанно в ТЗ.
Может кто лучше алгоритм придумает.
Погонял в протеусе , сбоев не обнаружил.
Да писал для пик , ибо авр у меня не компилит.
Но думаю это не проблема.

2.fcf

[Ник: EnigmИмя: Enigm(Сочи)]

Ах да, забыл про недостатки данной реализации.
1) Если с самого начало или с середины выпало 5 нулей или едениц, то следующие будут обязательно тоже 5 нулей или едениц.
2) если нужно больше 20 значений, то так же могет быть так что, на стыке буферов будет больше 5 едениц или нулей, тоесть первый буфер например закончился на 4 нулях, то новый может начаться тоже с 4 нулей и будет уже 8 ))
Поэтому тут уже надо нарашивать сам буфер если это надо.
Первый вариант бывает очень редко, но бывает и могут стрелки просечь ))
Но тут можно тогда сделать ограничение не в 5 символов, а в 4 , тогда не будет такой четкой зависимости.

[Ник: YushikИмя: Андрей(Симферополь)]

Огромное спасибо Enigm теперь у меня появился толчок к пониманию подобных алгоритмов, поскольку для меня такая задача встретилась впервые. Да в нём имеется минус и он хорошо просматривается если было например 3 единицы то следующими обязательно будут 3 нуля. Ну да ладно я прекрасно понимаю, что в технике да и в жизни тоже, если ты гонишься за определёнными плюсами то при этом появляются определённые минусы. Нам дан только выбор наслаждаться плюсами и как то противостоять или смириться с появившимися минусами. Я пожалуй попробую побороться с данным минусом или на основе твоего алгоритма сделать что-то своё если получится обязательно выложу. Но даже в таком виде уже готовое решение.