OpenGL. Независимое движение объектов.

[Krechet]

Доброе время суток, уважаемые форумчане! Ранее была похожая тема от моего имени по такой задаче: внутри прозрачного куба летают и отталкиваются от его граней 2 объекта, сфера и тор. Собственно вопрос 1): как добиться того, чтобы они летали независимо друг от друга? Есть ли смысл использовать потоки? И вопрос 2) Как задать в начале движения каждой из фигур рандомный вектор полета ? Спасибо заранее, поверьте, очень надо)

[Selestis]

1) храните для каждого объекта, скажем, скорость, положение, матрицу. И отображайте и перемещайте их согласно этим данным.
2) Собственно, задавайте вектор направление для вышеупомянутой структуры данных, а по таймеру или что у вас там перемещайтесь по этому векторую...

[Krechet]

Сообщение от Selestis

1) храните для каждого объекта, скажем, скорость, положение, матрицу. И отображайте и перемещайте их согласно этим данным.
2) Собственно, задавайте вектор направление для вышеупомянутой структуры данных, а по таймеру или что у вас там перемещайтесь по этому векторую...

Матрица для каждого объекта своя, скорости тоже указаны разные. Они должны начинать движение из центра куба, с одинаковыми скоростями но с разными векторами движения. Вопрос как задать этот вектор движения?

procedure TForm1.FormPaint(Sender: TObject);
var
 ps:TPaintStruct;
begin

  glEnable (GL_NORMALIZE);
  glEnable (GL_LIGHTING);
  glEnable (GL_LIGHT0);
  glEnable (GL_AUTO_NORMAL);
  glEnable(GL_COLOR_MATERIAL);
  glEnable(GL_DEPTH_TEST);
    glLightModelf (GL_LIGHT_MODEL_TWO_SIDE,1);
    Position [0] := 0;
    Position [1] := 0;
    Position [2] := 0.2;
    Position [3] := 1;
    glLightfv (GL_LIGHT0, GL_POSITION, @position);

  glPushMatrix;

  glscalef(4.0,4.0,1.0);

  glEnable(GL_FOG);
  glFogi(GL_FOG_MODE,GL_EXP2);
  glEnable(gl_Blend);
  glFogfv(GL_FOG_COLOR,@FogColor);

  BeginPaint(panel1.Handle, ps);
  glClearColor(0.1,0.3, 0.1, 0);
  glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);

  glRotated(45, 0, 0, 0);

  glRotated(RX,1,0,0);
  glRotated(RY,0,1,0);
  glRotated(RZ,0,0,1);

     glPushMatrix; //отрисовка сферы 

       draws;
       glEnable(GL_TEXTURE_2D);
       glTexImage2D(gl_texture_2d,0,3,64,64,0,GL_RGBA,GL_UNSIGNED_BYTE,textures[1]);
       glTexParameterf(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
       glMaterialfv(GL_FRONT_AND_BACK,GL_AMBIENT_AND_DIFFUSE,@back_color);
       glCallList(1);

     glPopMatrix;

     glPushMatrix; // отрисовка тора

          drawt;
          auxSolidTorus(0.02,radT);

     glPopMatrix;


     glPushMatrix; // отрисовка куба, в котором "летают" эти фигуры

  glBegin(GL_QUADS);
   glColor4f(0.0, 1.0, 0.0, 0.25);
   glVertex3f(0.25, 0.25, -0.25);
   glVertex3f(0.25, 0.25, 0.25);
   glVertex3f(0.25, -0.25, 0.25);
   glVertex3f(0.25, -0.25, -0.25);
  glEnd;

  glBegin(GL_QUADS);
   glColor4f(0.0, 0.0, 1.0, 0.25);
   glVertex3f(0.25, -0.25, 0.25);
   glVertex3f(0.25, -0.25, -0.25);
   glVertex3f(-0.25, -0.25, -0.25);
   glVertex3f(-0.25, -0.25, 0.25);
  glEnd;

  glBegin(GL_QUADS);
   glColor4f(1.0, 0.0, 0.0, 0.25);
   glVertex3f(-0.25, -0.25, -0.25);
   glVertex3f(-0.25, -0.25, 0.25);
   glVertex3f(-0.25, 0.25, 0.25);
   glVertex3f(-0.25, 0.25, -0.25);
  glEnd;

  glBegin(GL_QUADS);
   glColor4f(0.25, 1.0, 0.5, 0.25);
   glVertex3f(-0.25, 0.25, 0.25);
   glVertex3f(-0.25, 0.25, -0.25);
   glVertex3f(0.25, 0.25, -0.25);
   glVertex3f(0.25, 0.25, 0.25);
  glEnd;

  glBegin(GL_QUADS);
   glColor4f(0.5, 1.0, 0.25, 0.25);
   glVertex3f(0.25, 0.25, 0.25);
   glVertex3f(0.25, -0.25, 0.25);
   glVertex3f(-0.25, -0.25, 0.25);
   glVertex3f(-0.25, 0.25, 0.25);
  glEnd;

  glBegin(GL_QUADS);
   glColor4f(0.0, 0.25, 0.5, 0.25);
   glVertex3f(0.25, 0.25, -0.25);
   glVertex3f(0.25, -0.25, -0.25);
   glVertex3f(-0.25, -0.25, -0.25);
   glVertex3f(-0.25, 0.25, -0.25);
  glEnd;

         glPopMatrix;
   glPopMatrix;

  glDisable(GL_DEPTH_TEST);
  glFlush();
  swapBuffers(DC);
  endPaint(panel1.Handle,ps);
end;

[Rin]

в твоём примере ты задаёшь движение объекту так:

 gltranslatef(px,py,pz);
 gltranslatef(sx,sy,sz);

это те, что в Draws и DrawT.


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

type t=record
x,y,z:real;
end;
var
 m:array:[0..499] of t
i:integer;

........
begin
for i :=0 to 499 do
begin
m[i].x:=i/1000;
m[i].y:=sin(i mod 360);
m[i].z:=0;
end;
.....

end;

далее делаешь какую то переменную-счётчик , допустим "К",
в FormCreate ей присваиваешь нуль и в FormPaint делаешь так:

.........
 gltranslatef(m[k].x,m[k].y,m[k].z);
 gltranslatef(m[k].x,m[k].y,m[k].z);
if k<499 then inc(k) else dec(k);
if k<0 then inc(k);
........

либо
gltranslatef(m[k].x-m[k-1].x,m[k].y-m[k-1].y,m[k].z-m[k-1].z);
gltranslatef(m[k].x-m[k-1].x,m[k].y-m[k-1].y,m[k].z-m[k-1].z);
я просто не всматривался в код)))
ну и в таком духе. То есть просто нужно задать какую то функцию и записать всё это в массив.

[Krechet]

Благодарю, попробую)

[Rin]

да, не за что=). получилось ?
спасиб кстати за небольшое пояснение про сферу.
правда я так её и не сделал))))

[Krechet]

Вчера на ДР был, пока не пробовал)) А что именно со сферой не ясно?)

[Krechet]

Всем спасибо, сам разобрался, сам дурак)