Вниз
Скачать: 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.025 c
4-1120038815
Dmitrij_K
2005-06-29 13:53
2005.08.21
CreateProcess


4-1119944529
Хинт
2005-06-28 11:42
2005.08.21
Аналог ShowCursor для других приложений


5-1093435790
velial
2004-08-25 16:09
2005.08.21
Обращение к Delphi


14-1122443195
Digitman
2005-07-27 09:46
2005.08.21
Проблема FoxPro 2.x ISAM в MS Access 2003


3-1121166715
Максим
2005-07-12 15:11
2005.08.21
Работа с полями DBGrid ?




   Наверх