роботы
робототехника
микроконтроллеры
Главная
Как сделать робота
Новости
Спорт
Статьи
Wiki
Форум
Downloads
Ссылки
Контакты  


 Страниц (1): [1]   

> Описание: Простейший симулятор езды по шоссе
Admin Администратор
Отправлено: 06 Июля, 2011 - 19:49:32
Post Id


Администратор


Сообщений всего: 844
Дата рег-ции: Май 2006  





Пример реализации простого симулятора дороги на GameLogo .

Пример предложен uiouio в ветке Добавить массивы

Пример симулятора езды по шоссе незначительно доработан. Добавлен элемент случайности в появлении встречного грузовика. Введено ограничение на перемещение автомобиля.

Играет один игрок. Управление с помощью стрелок на клавиатуре.

Стрелки влево и вправо управляют автомобилем.
Стрелики вверх и вниз управляют скоростью.

Для игры необходим файл с фоном, который необходимо поместить в папку "Фоны".


А также файлы с картинками автомобилей и разделительной полосы, которые необходимо положить в папку "Картинки".








фон = road.gif
спрятать черепаху

переменная скорость
переменная расстояние

картинка полоса1
полоса1 = bar.bmp
полоса1.х = 400
полоса1.у = -34

картинка полоса2
полоса2 = bar.bmp
полоса2.х = 400
полоса2.у = 86

картинка полоса3
полоса3 = bar.bmp
полоса3.х = 400
полоса3.у = 206

картинка полоса4
полоса4 = bar.bmp
полоса4.х = 400
полоса4.у = 326

картинка полоса5
полоса5 = bar.bmp
полоса5.х = 400
полоса5.у = 446

картинка полоса6
полоса6 = bar.bmp
полоса6.х = 400
полоса6.у = 566

картинка машина
машина = car.bmp
машина.х = 400
машина.у = 540

картинка грузовик
грузовик = truck.bmp
грузовик.х = 360
грузовик.у = 30

скорость = 5

повторять пока 1 = 1 {

полоса1.у = полоса1.у + скорость
полоса2.у = полоса2.у + скорость
полоса3.у = полоса3.у + скорость
полоса4.у = полоса4.у + скорость
полоса5.у = полоса5.у + скорость
полоса6.у = полоса6.у + скорость
грузовик.у = грузовик.у + скорость + 5

если полоса1.у > 686 то полоса1.у = -34
если полоса2.у > 686 то полоса2.у = -34
если полоса3.у > 686 то полоса3.у = -34
если полоса4.у > 686 то полоса4.у = -34
если полоса5.у > 686 то полоса5.у = -34
если полоса6.у > 686 то полоса6.у = -34

расстояние = (грузовик.х - машина.х)

если расстояние < 0 то расстояние = -расстояние

если расстояние < 40 то если машина.у - грузовик.у < 60 то звук = bom.wav


если грузовик.у > 600 то
грузовик.у = -80
грузовик.x = случайное * 120 + 320
конец условия

}


событие нажата клавиша 37
если машина.х > 320 то машина.х = машина.х - 2.5
конец события

событие нажата клавиша 39
если машина.х < 440 то машина.х = машина.х + 2.5
конец события

событие нажата клавиша 38
если скорость < 10 то скорость = скорость + 0.05
конец события

событие нажата клавиша 40
если скорость > 0 то скорость = скорость - 0.05
конец события
 
 Top
cjA
Отправлено: 20 Июля, 2011 - 22:42:17
Post Id



Генерал


Сообщений всего: 3291
Дата рег-ции: Янв. 2010  





пожалуйста, выкладывайте код так же как и присоеденненый текстовый файл- у некоторый (у меня в частности) полная беда с копированием с экрана, плиз Замешательство
 
 Top
Страниц (1): [1]
« Проекты для GameLogo »


Все гости форума могут просматривать этот раздел.
Только зарегистрированные пользователи могут создавать новые темы в этом разделе.
Только зарегистрированные пользователи могут отвечать на сообщения в этом разделе.
 





Powered by Exclusive Bulletin Board
ExBB FM 1.0 RC1 Smiles by Fool from Foolstown