Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.01.2011, 07:22   #1
Rin
Негодник
Форумчанин
 
Аватар для Rin
 
Регистрация: 10.11.2009
Сообщений: 880
По умолчанию аттрактор Лоренса. Не пойму, каким фигом делается проекция из 3D в 2D

раздобыл код аттрактора Лоренса в просторах инета.
Надыбал ещё один исходник , который создаёт что-то похожее на сферы и крутит-вертит их.
Очень хочется этот аттрактор со всех сторон посмотреть)))
вот значит код аттрактора:
Код:
  
var
gd, gm: Integer;
x1, y1, z1,xxx,yyy,zzz: Real;
x: Real = 3.051522;
y: Real = 1.582542;
z: Real = 15.62388;
dt:real = 0.0001;
sigma:real = 10;              // сигма
r:real = 28;                  // r
b:real = 2.66666666667;       // b
i:integer;
............
............
............
 for i := 1 to 500000 do
  begin
     x1 := x + sigma*(-x+y)*dt;
     y1 := y + (r*x-y-z*x)*dt;
     z1 := z + (-b*z+x*y)*dt;
     x := x1;
     y := y1;
     z := z1;
     xxx:=19.3*(y - x*0.292893) + 420;
     yyy:=-11*(z + x*0.292893) + 592;
     randomize;
     canvas.Pixels[round(xxx),round(yyy)]:=random(35000);
мозговой штурм в одиночку ни к чему не привёл.
нужно привести точки (коих 500 тысяч) к виду (x,y,z) , а в выложенном коде они имеют вид (x,y).
Но так , как в математике я что-то не очень, то прошу помощи.
Если помог, проси поставить минус. Будь оригинален!

Последний раз редактировалось Rin; 05.01.2011 в 08:53.
Rin вне форума Ответить с цитированием
Старый 05.01.2011, 13:29   #2
Rin
Негодник
Форумчанин
 
Аватар для Rin
 
Регистрация: 10.11.2009
Сообщений: 880
По умолчанию

sorry. Сам дурак. там не надо было мудрить . А просто взять x1,y1,z1!!!!
Если помог, проси поставить минус. Будь оригинален!
Rin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
проекция точки на прямую AnDre_rus Общие вопросы C/C++ 4 25.08.2013 17:33
Проекция Кавалье newStudent Помощь студентам 0 28.11.2010 19:32
как делается 0creator0 Microsoft Office Excel 6 13.10.2010 15:23
Проекция Rectangle _-Re@l-_ Паскаль, Turbo Pascal, PascalABC.NET 8 09.09.2010 11:13
Проекция файла и запись/чтение объектов класса в C++ sd13 Помощь студентам 26 25.05.2008 12:05