Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Огонь [D5, Win95/98, WinME, Win2k, WinXP]


HellTrooper ©   (2002-04-02 16:41:00) 

Есть ли какие нибудь алгоритмы чтобы сделать эффект огня?


JibSkeart   (2002-04-05 15:51:00) [1]

Только позже через два дня (дома надо появится)
сорри что не в тему ...


Yaro   (2002-04-05 02:02:00) [2]

И мне!!!!!! Дайте огоньку!!!!!


konusov   (2002-04-05 00:54:00) [3]

И мне -:)


Mirovodin   (2002-04-05 00:04:00) [4]

Берите готовый компонент
http://delphigfx.mastak.ru/libs.htm


Mastak   (2002-04-04 20:42:00) [5]

И мне -:)


HellTrooper   (2002-04-03 11:09:00) [6]

Кинь плз


JibSkeart   (2002-04-02 17:51:00) [7]

а вообше у мя есть исходники на паскале
мох демок тама и огонь есть, если интерестно могу кинуть


JibSkeart   (2002-04-02 17:50:00) [8]

Конечно !!!
и даже несколько но я знаю только один вот такой :

есть массив из NxM элементов
вокруг Х ишются точки и суммируется элементы
и находится средне арифметическое
ООО
ОХО
ООО

Var
mass:array[1..n,1..m] of byte;
a,b:Integer;

for i:=1 to n do
for j:=1 to m do
begin
a:=mass[j,i]+mass[j,i+1]+mass[j,i-1]+mass[j-1,i-1]+
mass[j-1,i+1]+mass[j-1,i-1]+
mass[j+1,i+1]+mass[j+1,i-1];
b:=Round(a/8);
mass[j,i]:=b;
end

вот помойму и все ...


Наверх

Титульная страница Поиск, карта сайта Написать письмо