![]() |
![]() ![]() |
![]() |
AlienEmperor |
![]()
Сообщение
#1
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 160 Пол: Мужской Реальное имя: Серый Репутация: ![]() ![]() ![]() |
Привет всем! Тут недавно человек просил помочь с написанием проги с "градом". Я от нечего делать написал быстренько свою версию (у меня, правда, не град, а снег). По-моему, получилось прикольно. Выложу сюда rar с exe-шником (выложил бы pas, да он много юнитов использует). Как модератор заявляю: код безвреден, написан на "чистом" турбо паскале. Если понравится и будет кому-нибудь надо, то выложу и исходник (правда, написано очень не оптимально, зато за 40 минут...).
Прикрепленные файлы ![]() -------------------- Все в жизни ботва... Кроме пчел!
|
Archon |
![]()
Сообщение
#2
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 618 Пол: Мужской Репутация: ![]() ![]() ![]() |
Класс!
![]() ![]() ![]() -------------------- Close the World...txeN eht nepO
|
Malice |
![]()
Сообщение
#3
|
![]() Профи ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 705 Пол: Мужской Репутация: ![]() ![]() ![]() |
Тоже когда-то что-то подобное писал в качестве заставки. Правда сейчас слишком быстро работает, но все равно прикольно
![]() Прикрепленные файлы ![]() |
Shpion |
![]() ![]()
Сообщение
#4
|
Группа: Пользователи Сообщений: 5 Пол: Мужской Реальное имя: Александр Репутация: ![]() ![]() ![]() |
Блин, народ, хоть бы исходники выложили... Или человеку в соседней теме ответили...
А то сделали, выложили.. Объясните, хоть, как зафиксить уровень наклонной крыши... ![]() |
AlienEmperor |
![]()
Сообщение
#5
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 160 Пол: Мужской Реальное имя: Серый Репутация: ![]() ![]() ![]() |
Я же написал: через проверку допустимого цвета: в проге видел небо везде одного цвета ? Вот - раз небо - значит "проходит", если любой другой цвет - все, останов. Даже круче можно сделать - можно и задний фон создать не одноцветный, а проверять по другому "шаблону"... Ладно, исходник выложу чуть позже...
-------------------- Все в жизни ботва... Кроме пчел!
|
AlienEmperor |
![]()
Сообщение
#6
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 160 Пол: Мужской Реальное имя: Серый Репутация: ![]() ![]() ![]() |
Вот исходник. Говорю сразу: использовал старые версии модулей для VGA, об оптимизации не думал вообще. Выкладываю все три модуля. Основной файл Snow.pas
Прикрепленные файлы ![]() -------------------- Все в жизни ботва... Кроме пчел!
|
![]() ![]() |
![]() |
Текстовая версия | 7.12.2023 21:21 |