Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.03.27;
Скачать: CL | DM;

Вниз

Как задать SmoothNormal?   Найти похожие ветки 

 
Trimp   (2004-12-29 13:38) [0]

Продолжаю изучать OpenGl. У меня есть прога c  3d ландшафтом, просчитывается коллизия, к каждому треугольнику просчитана одна нормаль. Из-за этого кажется что ландшафт сделан из бумаги, так как переход яркости от одного треугольника к другому резкий. Мне нужно научиться задавать SmoothNormal, чтоб ландшафт был плавным. Расскажите как это сделать, а лучше скиньте процедуру просчёта SmoothNormal, пожалуйста.


 
Darthman ©   (2004-12-29 13:58) [1]

ShadeModel задай Smooth и будет сглаженно


 
Trimp   (2004-12-29 14:31) [2]

Darthman, увы не помогло. Я слышал, что вроде надо задавать нормаль не одну к треугольнику, а 3, к каждой вершине. Но каков алгоритм? Вот в чём вопрос, поэтому мне нужна процедура.


 
XProger ©   (2004-12-30 00:45) [3]

Сперва расчиай нормали к каждому треугольнику затем считай для каждой вершины как средне арифметическое между нормалями треугольников к которым она принадлежит.

 // Calc face normals
 for i := 0 to Header.Faces - 1 do
  with FNormal[i] do
   begin
   v1 := Vertex[Face[i, 0]];
   v2 := Vertex[Face[i, 1]];
   v3 := Vertex[Face[i, 2]];

   w1.X := v2.X - v1.X;
   w1.Y := v2.Y - v1.Y;
   w1.Z := v2.Z - v1.Z;

   w2.X := v3.X - v2.X;
   w2.Y := v3.Y - v2.Y;
   w2.Z := v3.Z - v2.Z;

   X := w2.Y * w1.Z - w2.Z * w1.Y;
   Y := w2.Z * w1.X - w2.X * w1.Z;
   Z := w2.X * w1.Y - w2.Y * w1.X;
   end;

 // Calc smooth normals
 for i := 0 to Header.Vertices - 1 do
  with VNormal[i] do
   begin
   X := 0;
   Y := 0;
   Z := 0;
   for j := 0 to Header.Faces - 1 do
    if (Face[j, 0] = i) or
       (Face[j, 1] = i) or
       (Face[j, 2] = i) then
     begin
     X := X + FNormal[j].X;
     Y := Y + FNormal[j].Y;
     Z := Z + FNormal[j].Z;
     end;

   d := sqrt(X*X + Y*Y + Z*Z);
   if d > 0 then
    begin
    X := X/d;
    Y := Y/d;
    Z := Z/d;
    end;
   end;

Что-то типа этого, но я угол не учитываю между гранями...

Затем отрисовка:

glBegin(GL_TRIANGLES);
 for i := 0 to Header.Faces - 1 do
  begin
  glNormal3fv(@VNormal[Face[i, 0]]);
  glVertex3fv(@Vertex[Face[i, 0]]);

  glNormal3fv(@VNormal[Face[i, 1]]);
  glVertex3fv(@Vertex[Face[i, 1]]);

  glNormal3fv(@VNormal[Face[i, 2]]);
  glVertex3fv(@Vertex[Face[i, 2]]);
  end;
glEnd;



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

Текущий архив: 2005.03.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.076 c
4-1108560083
oleg_SYS
2005-02-16 16:21
2005.03.27
Menu средствами Windows API


1-1110570982
idiot
2005-03-11 22:56
2005.03.27
Ламерский вопрос


10-1086774323
Sea Eagle
2004-06-09 13:45
2005.03.27
OLE + StarOffice


1-1110902849
Руслана
2005-03-15 19:07
2005.03.27
Как узнать какой текущий сепаратор для даты


9-1104950702
Бульдозер
2005-01-05 21:45
2005.03.27
Опять коллизии