Создание игровых программ Тема урока

Игровое программное обеспечение – это третья по размерам доходов отрасль индустрии программного обеспечения после текстовых процессоров и электронных таблиц.

С появлением Интернета многие люди, которых уже не пускают в обычные казино, стали играть в on-line-Казино. В обычном казино против вас играет случайность, а в Интернет казино – программа.

Современные игровые автоматы работают на основе компьютерной программы генератора случайных чисел

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

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

Серьезные карточные системы (например, Таро) также обзавелись своими электронными аналогами.

Для чего используются случайные числа в этой программе?

Генератор случайных чисел 1. Какая функция является генератором случайных чисел в системе VisualBasic? (Rnd*X – получает случайное число на интервале [0, X]) 2. Каково назначение оператора Randomize? (Определяет начало случайной последовательности в зависимости от компьютерного времени) 3. Как работает эта процедура? Private Sub Command1_Click() Randomize Label1.Caption=Int(Rnd*10) End Sub

Процесс настоящего гадания по Книге перемен очень непрост и сопряжен с необходимостью выполнения сложных ритуалов. Предлагаемый в Интернете сверхсовременный способ гадания - на трех монетах - практически не заслуживает никакого доверия, ибо не имеет ничего общего с настоящим гаданием. Гадание по Книге Перемен.

В очень многих игровых программах используется таймер для ограничения времени.

1. Какой объект определяет ограничение по времени в системе программирования? (Объект Timer) 2. Что означают эти свойства объекта Timer?: Timer1. Enabled= True Timer1. Enabled= False Interval 3. Чему равен интервал времени при значении 1000 миллисекунд? ( Равен 1 сек)

Объект Timer Свойства: Enabled – Включение Timer1. Enabled= True (Включен) Timer1. Enabled= False (Выключен) Interval – задает дискретность счета При значении 1000 (миллисекунд) интервал счета равен 1 сек

Какие действия происходят в данной процедуре? Private Sub Timer1_Timer() Timer1. Enabled = True Label5. Caption = Time End Sub

Программа «Lucky Seven»

Фрагмент программы «Lucky Seven» Private Sub Timer1_Timer() Timer1.Interval=1000 Label5. Caption = Time k = k + 1 счетчик секунд If k = 10 Then Label2. Visible = True Label2. Caption = "Ваше время вышло" Timer1. Enabled = False Command1. Enabled = False End If End Sub