DGL • Thema anzeigen - Timebased Rendering

Timebased Rendering

Moderator: DGL-Team

Seite 1 von 1

[ 4 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Kyro

Betreff des Beitrags: Timebased Rendering

Verfasst: So Nov 30, 2003 17:12

DGL Member

Registriert: So Okt 26, 2003 20:07
Beiträge: 249

Hi

Ich arbeite immernoch an meiner engine, habe mein letztes problem gelöst
und habe wieder eins. um welches es sich handelt könnt ihr aus der überschrift sicher
erkennen.

aber jetzt zum thema:
obwohl ich in jedem rendering-vorgang den zeitfaktor etc wie im tutorial neu berechne,
sind bei steigenden / fallenden frameraten die geschwindigkeiten immer anders. ich speichere die freq des timers am anfang in eine variable ab.
dann berechne ich den zeitfaktor, dann beweg ich mich damit.

Code:

 
QueryPerformanceCounter(QPCStartCount);
 
     glLoadIdentity;
     glRotatef(xwinkel, 1, 0, 0);
     glTranslatef(0, -1.01, 0);
 
 
     glPushMatrix;
     glPopMatrix;
 
 
     glRotatef(winkel, 0, 1, 0);
     glCallList(SBox);
     glTranslatef(tx, 0, z);
 
     DrawObject;
 
 
     QueryPerformanceCounter(QPCEndCount);
 
 
 
     ZeitFaktor := QPCEndCount - QPCStartCount;
     ZeitFaktor := Zeitfaktor / PerfCountFreq * 100;
     sw := Zeitfaktor * GW;
     gwinkel := WNKL * Zeitfaktor;
 
 
 
 
     if (keys[VK_UP]) then
     begin
          z := z + (sw * cos(-winkel * PI / 180));
          tx := tx + (sw * sin(-winkel * PI / 180));
 
     end;
 
     if (keys[VK_DOWN]) then
     begin
          z := z - (sw * cos(-winkel * PI / 180));
          tx := tx - (sw * sin(-winkel * PI / 180));
     end;
 
     if (keys[VK_LEFT]) then
     begin
          winkel := winkel - gwinkel;
     end;
 
     if (keys[VK_RIGHT]) then
     begin
          winkel := winkel + gwinkel;
     end;
 

xwinkel ist nur der winkel, der das bild um die x-achse rotieren lässt, also nicht wichtig.

_________________
I'm not the signature, I'm just cleaning the floor...

Derzeitiges Projekt:
FireBlade Particle Engine (Release R2 2009.06.29)

Nach oben

Finalspace

Betreff des Beitrags:

Verfasst: Mo Dez 01, 2003 09:53

DGL Member

Registriert: Mi Okt 16, 2002 15:06
Beiträge: 1012

hmm, also wie ich sehe ist das deine render routine, wieso machst du da am anfang nen QueryPerformanceCounter und vor den berechnungen ?

hier wie ich es machen würde:

Code:

 
procedure Initialize;
begin
  QPC.Init;
end;
 
procedure Calculate;
begin
  QPC.Calculate;
 
  // DeltaTime = Zeitfaktor
  sw := QPC.DeltaTime * GW; 
  gwinkel := WNKL * QPC.DeltaTime;  
end;
 
procedure HandleInput;
begin
  if (keys[VK_UP]) then 
  begin 
    z := z + (sw * cos(-winkel * PI / 180)); 
    tx := tx + (sw * sin(-winkel * PI / 180)); 
  end; 
 
  if (keys[VK_DOWN]) then 
  begin 
    z := z - (sw * cos(-winkel * PI / 180)); 
    tx := tx - (sw * sin(-winkel * PI / 180)); 
  end; 
 
  if (keys[VK_LEFT]) then 
  begin 
    winkel := winkel - gwinkel; 
  end; 
 
  if (keys[VK_RIGHT]) then 
  begin 
    winkel := winkel + gwinkel; 
  end; 
end;
 
procedure Render;
begin
  glLoadIdentity; 
  glRotatef(xwinkel, 1, 0, 0); 
  glTranslatef(0, -1.01, 0); 
 
  glPushMatrix; 
  glPopMatrix; 
 
  glRotatef(winkel, 0, 1, 0); 
  glCallList(SBox); 
  glTranslatef(tx, 0, z); 
 
  DrawObject; 
end;
 
procedure TForm1.OnIdle(var Done : Boolean; Sender : TObject);
begin
  Calculate;
  HandleInput;
  Render;
end;
 
procedure TForm1.Create(Sender : TObject);
begin
  Initialize;
end;
 

und hier die Klasse dazu:

Code:

 
unit HighResCounter;
 
interface
 
uses
  Windows;
 
type
  TR3DHighResolutionCounter = object
  private
    m_Frequency,
    m_Last_Time         : Int64;
    m_Time_Scale        : Single;
    m_Delta_Time        : Single;
    m_ElapsedTime       : Single;
    m_Counter_Available : Boolean;
    m_CurrentTime       : Int64;
  public
    procedure Init;
    procedure Calculate;
    function DeltaTime : Single;
    function CurrentTime : Int64;
    function LastTime : Int64;
  end;
 
implementation
 
procedure TR3DHighResolutionCounter.Init;
begin
  // High Resolution Counter Initialisieren
  m_Counter_Available := false;
  if QueryPerformanceFrequency(m_Frequency) = false then
  begin
    m_Last_Time := GetTickCount;
    m_Time_Scale := 0.001;
  end
  else
  begin
    m_Counter_Available := true;
    m_Time_Scale := 1.0 / m_Frequency;
    QueryPerformanceCounter(m_Last_Time);
  end;
end;
 
procedure TR3DHighResolutionCounter.Calculate;
begin
  if m_Counter_Available then QueryPerformanceCounter(m_CurrentTime)
  else m_CurrentTime := GetTickCount;
 
  m_Delta_Time := (m_CurrentTime - m_Last_Time) * m_Time_Scale;
  m_Last_time := m_CurrentTime;
 
  m_ElapsedTime := (m_CurrentTime - m_Last_Time);
end;
 
function TR3DHighResolutionCounter.DeltaTime : Single;
begin
  Result := m_Delta_Time;
end;
 
function TR3DHighResolutionCounter.CurrentTime : Int64;
begin
  Result := m_CurrentTime;
end;
 
function TR3DHighResolutionCounter.LastTime : Int64;
begin
  Result := m_Last_Time;
end;
 

hoffe mal das hilft weiter.

Nach oben

cyanide

Betreff des Beitrags:

Verfasst: Mi Dez 10, 2003 17:14

DGL Member

Registriert: Mo Nov 03, 2003 20:23
Beiträge: 66

Also ich habe das so gemacht:

Ich habe einfach am Anfang eines Frames die Zeit in eine Var gesichert.

Das heisst, dass du beim nächsten Frame mittels CurTime - LastTime die Zeit hast, die das Frame gebraucht hat. Die Dividiere ich einfach von jedem Vorgang, der die Camera oder irgendein Objekt bewegt...

So hast du bei 30FPS die Tatsächlich doppelte Geschwindikkeit beim laufen, wie jemand, der 60FPS hat...

Nach oben

cyanide

Betreff des Beitrags:

Verfasst: Fr Dez 12, 2003 15:20

DGL Member

Registriert: Mo Nov 03, 2003 20:23
Beiträge: 66

Erm... Korrigiere:

Du musst sie zu den Vectorten hinzumultiplizieren!

also so:

Timer.Last := myTimerProc - TimerNow;
Timer.Now := myTimerProc;

VecX := VecX + 15 * (Timer.Last/1000);

So hast du, wenn du einen FPS hast die normale Movementgeschwindigkeit... (Also 15 * 1)

Alles andere, höhere FPSzahlen drücken dann deine Movementgeschwindigkeit in den Keller...

grx_cyan

Nach oben

Seite 1 von 1

[ 4 Beiträge ]

Foren-Übersicht » Programmierung » OpenGL

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 6 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.