Вниз
Скачать: CL | DM;

Шум Перлина?   Найти похожие ветки 

← →
D-Man   (2005-04-18 00:51) [0]

Видел тут в форуме кто-то рекомендовал для генерации текстур использовать шум перлина. Я нашел несколько статей на эту тему, но все коды там С++. Не поможете ли разобраться как следующее реализуется на Паскале...

_inline float CMyNoise::Noise2D(int x, int y)
{
 int n = x + y * 57;
 n = (n<<13) ^ n;
 return ( 1.0f - ( (n * (n * n * 15731 + 789221) + 1376312589) & 0x7fffffff) /
     1073741824.0f);
}

в частности в тупик меня поставила строка
n = (n<<13) ^ n;
Что сие "<<" означает?


← →
Санёк   (2005-04-18 01:22) [1]

побитовый сдвиг влево на 13.
надеюсь, пояснять ^ и & не надо?


← →
XProger ©   (2005-04-18 02:15) [2]


function TMyNoise.Noise2D(x, y: integer): single;
var
n : integer;
begin
n := x + y * 57;
n := (n shl 13) xor n;
Result := (1 - ((n * (n * n * 15731 + 789221) + 1376312589) and $7fffffff) / 1073741824);
end;


← →
wiz   (2005-04-18 03:14) [3]

не так давно писал, может быть кому-то полезно (создание текстур на основе "шума Перлина"):

http://www.rust-game.com/tex_maker_src.zip (~12Kb, sources only)
http://www.rust-game.com/tex_maker_bin.zip (~170Kb, exe+sources)

всё сделано под Делфю, максимально простым способом (ничего лишнего)


← →
D-Man   (2005-04-18 09:29) [4]

Респект всем!


← →
parovoZZ ©   (2005-04-19 09:49) [5]

Так это псевдо случайный сигнал или настоящий шум?


← →
D-Man   (2005-04-19 12:13) [6]

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


← →
Zer0[np]   (2005-04-23 05:35) [7]

посмотри на code.rpro.ru
я там делал с помощю перлина фоны к ксониксу и шарики и фоны к беджевелед =)

вообще перлин в умелых руках может творить чудеса...


← →
Zer0[np]   (2005-04-23 05:40) [8]

// wiz, u rox man!


← →
wiz   (2005-04-26 14:20) [9]

2 Zer0 :)))



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
1-1122385279
vigo
2005-07-26 17:41
2005.08.21
Перекодировка из DOS в WIN...


4-1120277194
mr.IL
2005-07-02 08:06
2005.08.21
AveSync


4-1117471883
Terech
2005-05-30 20:51
2005.08.21
Запуска файла ДОС под Win9x


10-1100072720
Polevi
2004-11-10 10:45
2005.08.21
TCP туннель DCOM


14-1122581559
Katya21
2005-07-29 00:12
2005.08.21
Где ФОРУМ в архиве




   Наверх