[Screensaver] Волны.

Приветствую!

Написал тут на досуге скринсейвер, попутно тестируя собственный движок.

Написано на Lazarus.

Выход - LMB

Волны двигаются, уходят к краю от центра и затухают. Грид 50 х 50, сетка - 16, если надо, могу изменить.

Как оно?

Миниатюры

 

Вложения

Saver.zip (44.8 Кб, 97 просмотров)

4

Sophos, А можно с каждой волной цвет менять(цвет волны)?

Тут в принципе дело опять таки упирается в матан - в нахождении скорости удаления волны.

Ведь что из себя вообще представляет эта заставка? Открою секрет.

Основа данной заставки - это матрица, размером MAX_X на MAX_Y. Суть в том, что в самом начале матрица заполняется числами типа Integer - а заполняется по следующеу принципу:
1) Находится расстояние от считаемой ячейки до центра матрицы (R).
2) Далее ячейка заполняется по следующей формуле - Sin(R) / (R + 10). // +10 для "смягчения" начальной вершины и антиошибки деления нуля на ноль.

Таким образом имеем матрицу, заполненную Z-координатами вершин.

Затем в цикле по X и Y картина рисуется на экран. Схема очень проста - проводим линию от одного полигона к ближайшему. Для каждой точки достаточно провести 2 линии - LU (Left-Up) и RU (Right-Up).

Вот и все. Затем в таймере некий счетчик I инкуется за каждый тик. Матрица пересчитывается по формуле: Sin(R-I/10)/(R+10). Матрица рисуется.

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

Если у кого-то есть еще пара интересных формул - милости прошу, реализуем.

2

А вот теперь я применил настоящее 3D пространство. Весь день матанного запоя прошел не зря.

Заставка "Сфера". Крутится.

Если надо, могу изменить размер\количество полигонов\цветовую гамму.

Миниатюры

 

Вложения

SaverSphere.zip (44.8 Кб, 21 просмотров)

1

Еще одна фигура - цилиндр.

Миниатюры

 

Вложения

SaverCylinder.zip (45.0 Кб, 16 просмотров)

1

Sophos, было бы прикольно внедрить возможность конфигурирования, например через .ini , пользователи сами могли б выставить

Сообщение от Sophos размер\количество полигонов\цветовую гамму

0

ini мой движок пока кушать не умеет. Как только доделаю в нем элементы интерфейса (сейчас только полноценная кнопка), тогда сделаю доступным пункт "настроить" в заставке. (Главное - не забыть )

1

интересно что выйдет, если на цилиндр наложить волны(сделать что то типа 1огй заставки только в обьеме

Добавлено через 32 секунды

Сообщение от Sophos наверное для этого нужна неделя матанного запоя

0

если на цилиндр наложить волны

Вы вынуждаете мой мозг работать... Попробую...

1

Ну что ж... Ловите ваш волновой цилиндр.
__________________

наверное для этого нужна неделя матанного запоя

Сегодня, 17:23 [ТС]

Сегодня, 18:21 [ТС]

Не угадали. Ровно час.

Миниатюры

 

Вложения

SaverWaveCylinder.zip (45.0 Кб, 22 просмотров)

1

спасибо,красотища то какая можно часами смотреть

0

Если хотите, могу "имитировать" бочку с водой, добавив выступающие края и сменив цвет "воды". Надо?

1

как хотите программа то ваша =)

0

как хотите программа то ваша =)

Но запросы то ваши... Вы историю этой темы почитайте В общем, ждите...

1

Вот. Бочка. Крутится и булькает.

Какие еще желания будут?

Миниатюры

 

Вложения

SaverBarrel.zip (45.0 Кб, 25 просмотров)

1

У меня предложение по шару.Сделать цвет.гамму желтой,увеличить размер шара в 1.5 раза,и сделать его более сферическим(мне кажется,или там сфера не круглая?)

0

(мне кажется,или там сфера не круглая?)

Сфера сама круглая. Это у меня ума не хватило подобрать коэффициенты для плоскости камеры. Сейчас что-нибудь придумаю...

Сделать цвет.гамму желтой,увеличить размер шара в 1.5 раза

Сейчас будет.

1

Алекс, есть налезание края волновой sinx/x на цилиндр, ты там со смещением не напутал?

0

Вот ваше солнышко.
----------------

Алекс, есть налезание края волновой sinx/x на цилиндр, ты там со смещением не напутал?

Обведите, пожалуйста, место на скриншоте, я так не сориентируюсь...

Миниатюры

 

Вложения

SaverSun.zip (44.9 Кб, 17 просмотров)

1

Sophos, А солнышко по-центру повесить можно?

0

Пожалуйста:

P.S. На самом деле это моя ошибка. Забыл убрать самописный коэффициент.

Вложения

SaverCenteredSun.zip (44.9 Кб, 16 просмотров)

1

обвел...

Миниатюры

 

0