DGL • Thema anzeigen

FreeBridge

Moderator: DGL-Team

Seite 2 von 2

[ 16 Beiträge ]

Gehe zu Seite Vorherige 1, 2

Druckansicht

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

luketheduke

Betreff des Beitrags:

Verfasst: Mo Mär 28, 2005 14:59

DGL Member

Registriert: Fr Mai 14, 2004 18:56
Beiträge: 804
Wohnort: GER/OBB/TÖL-WOR/Greiling

doppelpost damit ihr es auch lest:

hab mich jetzt mal an die displaylisten angenähert.

und folgenden code produziert:

Code:

//==============================================================================
//buildlists - baut die displaylisten für das terrain
//==============================================================================
procedure buildlists(map:TMap);
var l,i,k:integer;
    qw,qh:single;
begin
 
if not f_hm_loaded then
 begin
 setlength(HM,map.HeightMap.Width,map.HeightMap.Height); // Heightmap-Array initialisieren
 for i:= 0 to map.HeightMap.Width-1 do
  for k := 0 to map.HeightMap.Height-1 do
   begin
   //value:=map.HeightMap.Canvas.Pixels[i,k];
   HM[i,k]:=getrvalue(map.HeightMap.Canvas.Pixels[i,k]);
     //hextoint(copy(inttohex(value,6),0,2));
      //^Rot-Wert wird zur Höhe^
   end;
 f_hm_loaded:=true;
 end;          //das braucht man wohl - denn die displaylist will ja keine leere heightmap haben.
 
if not f_tm_loaded then
 begin
 setlength(TM,map.heightmap.Width,map.heightmap.Height); // Texturemap-Array initialisieren
 for i:= 0 to map.TextureAssignment.Width-1 do
  for k := 0 to map.TextureAssignment.Height-1 do
   begin
   TM[i,k]:=getrvalue(map.TextureAssignment.Canvas.Pixels[i,k]);
     //^Rot-Wert wird zum Texturindex^
   end;
 f_tm_loaded:=true;
 end;          //wie oben - aber jetzt mit texturemap
 
 
if not f_tex_loaded then
 begin
  for i:=0 to high(map.textures) do
   begin
    textures[i]:=TGLBitMap2d.Create;
    textures[i].SetTextureWrap(GL_REPEAT, GL_REPEAT);
    textures[i].SetFilter(GL_LINEAR_MIPMAP_LINEAR, GL_LINEAR);
    textures[i].loadfromfile(map.textures[i]);
    textures[i].GenTexture;
   end;
  f_tex_loaded:=true;
 end;          //sollte eigentlich nicht nötig sein, habs aber trotzdem drin.
 
 
qw:=1/map.HeightMap.Width;          //für die textur- wie hiess das? naja ausrichtung oder so
qh:=1/map.HeightMap.Height;         // \"
 
glGenLists(1+length(map.textures));  // eine liste für die anchors und eine für jede textur
glnewlist(LIST_ANCHORS,GL_COMPILE);  //kompilierung der anchors-liste
 Levelrender(level);          //gibt nur die anchors aus
glEndList;
 
 for l:= 2 to high(map.textures)+2 do begin  // für alle texturen
  glNewList(l,GL_COMPILE);
  glbegin(gl_triangles);
  for k:= 0 to high(HM[0])-1 do
   for i:= 0 to high(HM)-1 do
    if l=TM[i,k] then  // und hier liegt der fehler - denn da ich zurzeit nur 2 texturen habe, kann ich gar nichts angezeigt bekommen.
     begin
      gltexcoord2f(i*qw,k*qh);        glvertex3f(i,  HM[i,k],    k);
      gltexcoord2f(i*qw,(k+1)*qh);    glvertex3f(i,  HM[i,k+1],  k+1);
      gltexcoord2f((i+1)*qw,(k+1)*qh);glvertex3f(i+1,HM[i+1,k+1],k+1);
 
      gltexcoord2f(i*qw,k*qh);        glvertex3f(i,  HM[i,k],    k  );
      gltexcoord2f((i+1)*qw,(k+1)*qh);glvertex3f(i+1,HM[i+1,k+1],k+1);
      gltexcoord2f((i+1)*qw,k*qh);    glvertex3f(i+1,HM[i+1,k],  k  );
 
     end;
  glend;
  glEndList;
 end;
 
 
end;

und der bericht, dass ich nichts sehe, hat sich eigentlich erübrigt - denn mein letzter kommentar sagt eigentlich alles.
:roll:

ich schicks trotzdem ab, damit ihr das mal seht.

EDIT: hab das jetz mal geändert(if l-2=TM[i,k]) - aber ich seh immer noch nichts.

EDIT2: habs jetz n bisschen umorganisiert, es flackert jetzt auch nicht mehr, wie es bisher tat, aber ich sehe immer noch nichts. werd ich wohl noch n bisschen rumprobieren müssen.

EDIT3: es geht! juhu! siehe projektthread!

_________________

"User Error. Replace User and hit Continue."

Nach oben

Seite 2 von 2

[ 16 Beiträge ]

Gehe zu Seite Vorherige 1, 2

Foren-Übersicht » Sonstiges » Meinungen zu den Projekten

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 14 Gäste

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.