DGL • Thema anzeigen

FPS Limiter

Moderator: DGL-Team

Seite 1 von 2

[ 25 Beiträge ]

Gehe zu Seite 1, 2 Nächste

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

Seth

Betreff des Beitrags: FPS Limiter

Verfasst: Mo Aug 11, 2008 11:53

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

hi,
Ich suche gerade nach einer Möglichkeit eine Beschränkung der FPS in meine Idle Prozedur einzubauen.
Ich habe schon ein paar Ansätze probiert, aber bisher hat nichts so recht funktioniert.
Die Idle Prozedur sieht so aus:

Code:

procedure TForm1.IdleHandler(Sender: TObject; var Done: Boolean);
begin
  MTimer.Update; // Liefert dt (Timestep)
  glClear(GL_COLOR_BUFFER_BIT Or GL_DEPTH_BUFFER_BIT);
  Init2D;
  glPushMatrix;
    BERECHNUNGEN UND RENDERPROZEDUREN 
  glPopMatrix;
  DrawText;
  CheckError;
  Swapbuffers(DC);
  FPSCounter.Update; // Berechnet die FPS
  Done := false;
end;

mfg

Nach oben

Philip

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 12:14

DGL Member

Registriert: Di Jul 29, 2003 00:11
Beiträge: 436

Vielleicht hilft dir das? Eine kleine Java-Klasse, die einen Thread startet und eigentlich genau das tut, die FPS begrenzen.

Code:

 
package client.glBase;
 
import javax.media.opengl.GLCanvas;
 
/**
 * Eigener FPSAnimator, der in einem Thread läuft und sleep benutzt. Sollte also
 * nicht mehr 100% CPU-Last erzeugen, wenn die ZielFPS erreicht werden. :-D
 */
public final class FPSAnimator extends Thread {
 
    /** Flag, ob der Thread abgebrochen wurde. */
    private boolean aborted;
 
    /** GLCanvas, der aktualisiert werden soll. */
    private GLCanvas glCanvas;
 
    /** Millisekunden, die ein Frame mit der ZielFPS brauchen wird. */
    private long fpsTime;
 
    /**
     * Konstruktor.
     * 
     * @param glCanvas
     *            Der GLCanvas.
     * @param targetFPS
     *            Die ZielFPS.
     */
    public FPSAnimator(GLCanvas glCanvas, int targetFPS) {
        this.glCanvas = glCanvas;
        this.fpsTime = 1000 / targetFPS;
    }
 
    /*
     * (non-Javadoc)
     * 
     * @see java.lang.Thread#run()
     */
    @Override
    public void run() {
 
        long oldTime;
        long curTime;
 
        this.aborted = false;
 
        // Läuft solange, bis abgebrochen wird.
        while (!this.aborted) {
            oldTime = System.currentTimeMillis();
            this.glCanvas.display();
            curTime = System.currentTimeMillis();
            // Ggf. noch die verbleibende Zeit abwarten, wenn das
            // Framerendern schneller war, als die verfügbare Zeit
            // für ein Frame.
            if (curTime - oldTime < this.fpsTime) {
                try {
                    Thread.sleep(this.fpsTime - (curTime - oldTime));
                } catch (InterruptedException e) {
                    this.aborted = true;
                }
            }
        }
 
    }
 
    /**
     * Thread-Abbruch.
     */
    public void abort() {
        this.aborted = true;
    }
 
}
 

Nach oben

Seth

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 12:42

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

Ist das nicht ein wenig zu kompliziert ?

Nach oben

Philip

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 12:48

DGL Member

Registriert: Di Jul 29, 2003 00:11
Beiträge: 436

Naja, ansich musst du ja nur den Kern übernehmen, muss ja nicht unbedingt in einem Thread laufen.

Code:

 
         oldTime = System.currentTimeMillis();
         rendern();
         curTime = System.currentTimeMillis();
         // Ggf. noch die verbleibende Zeit abwarten, wenn das
         // Framerendern schneller war, als die verfügbare Zeit
         // für ein Frame.
         if (curTime - oldTime < this.fpsTime) {
               Thread.sleep(this.fpsTime - (curTime - oldTime));
         } 
 

Nach oben

Seth

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 13:17

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

Etwas ähnliches hatte ich schon probiert, allerdings am Anfang der Prozedur:

Code:

  MTimer.Update;
  if MTimer.Timestep < (1/MaxFPS) then
  begin
    d := (1/MaxFPS) - MTimer.Timestep;
    d := d * 1000;
    sleep(round(d));
  end;

irgendwo steckt bei mir noch ein Denkfehler. Ich berechne ja FPS und dt getrennt...

Nach oben

Philip

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 13:29

DGL Member

Registriert: Di Jul 29, 2003 00:11
Beiträge: 436

Naja, du must ja schon messen, wie lange du gebraucht hast, um ein Frame zu rendern.

Nach oben

Seth

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 14:50

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

tue ich ja auch:

Code:

MTimer.Update; 

Code:

procedure TMoveTimer.Update;
var
  FCurrTime: int64;
begin
  QueryPerformanceCounter(FCurrTime);
  FTimestep := min((FCurrTime - FCalcTime) / FFrequency, Flimit);
  FCalcTime := FCurrTime;
end;

Nach oben

The-Winner

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 15:00

DGL Member

Registriert: Di Jun 06, 2006 09:59
Beiträge: 474

viewtopic.php?t=5356&start=15

_________________

Nach oben

Seth

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 15:23

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

Kann ich statt DeltaT mein Timestep benutzen ?

Das müsste die Frames dann ja auf 30 begrenzen (30/1000 = 0,03)

Code:

  if MTimer.Timestep<=0.03 then
  begin
    sleep(1)
    exit;
  end;

Aber dann ruckelt es so sehr, dass ich nichtmal mehr ein Bild bekomme. Kleinere Werte ruckeln weniger, aber es ruckelt halt nur anstatt gescheit zu funktionieren.
Eigentlich ruckelt es immer wenn ich mit den FPS über der Grenze liege.

€: Generell scheint das Problem zu bestehen, dass mein Programm bei höheren FPS Zahlen (sprich mit niedrigerem DeltaT) langsamer läuft, obwohl es das nicht tun sollte.

mfg

Nach oben

The-Winner

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 23:06

DGL Member

Registriert: Di Jun 06, 2006 09:59
Beiträge: 474

Miss nur einmal pro frame die Zeit. Und nur in frames die du nicht mit sleep(1)+exit abbrichst.
Bei mir erfolgt die Zuweisung LastTick:=Now; nur falls DeltaT groß genug für nen frame war.

_________________

Nach oben

Seth

Betreff des Beitrags:

Verfasst: Mo Aug 11, 2008 23:22

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

Naja aber es kann doch nicht sein, dass ich insgesamt an drei Stellen GetTickCount bzw. den PerfomanceCounter abfragen muss. Kann ich die FPS-Berechnung, Limitierung und die Timestep Berechnung nicht unter einen Hut bringen ?
Und wie kann es sein, dass sich mein Objekt bei höheren FPS langsamer bewegt ?

Code:

  FPosition := v2f_add(FPosition, v2f_add(v2f_scale(FAcceleration, dt * dt * 0.5), v2f_scale(FVelocity, dt)));
  FVelocity := v2f_add(FVelocity, v2f_scale(FAcceleration, dt));    
  FVelocity := v2f_scale(FVelocity, friction);

Nach oben

The-Winner

Betreff des Beitrags:

Verfasst: Di Aug 12, 2008 00:06

DGL Member

Registriert: Di Jun 06, 2006 09:59
Beiträge: 474

Weil du nicht die korrekte Zeitdifferenz misst. Die Zeit die er in Sleep verbringt zählt bei dir nicht.
Mein code misst die Zeit genau einmal pro frame und der gesamte Timercode ist an einer Stelle konzentriert. Und handhabt afaik alle Fälle korrekt. Was gefällt dir an dem Code nicht?

_________________

Nach oben

GTA-Place

Betreff des Beitrags:

Verfasst: Di Aug 12, 2008 09:38

DGL Member

Registriert: Sa Dez 30, 2006 20:52
Beiträge: 43
Programmiersprache: Delphi

Irgendwo hab ich das mal aufgegriffen zur Berechnung der FPS:

Code:

IsFPS := RoundTo(Freq / (TNow - CalcTime), -2);

Und ich dachte mir jetzt (ich hatte irgendwas ganz kompliziertes, auch mit DeltaT und kA was noch ^^), dann müsste dass doch so gehen:

Code:

  if IsFPS > MaxFPS then
  begin
    Sleep(1);
    Exit;
  end;

Ist das ein Denkfehler? IsFPS ist jetzt tatsächlich etwas kleiner als MaxFPS, aber was mich wundert: Ich hab dann in dem Teil danach mal immer eine Variable um 1 erhöht und das ganze an die Caption ausgegeben. Das ging aber nur 1x pro Sekunde. Etwas langsam?

Nach oben

Seth

Betreff des Beitrags:

Verfasst: Di Aug 12, 2008 10:26

DGL Member

Registriert: Di Mai 24, 2005 16:43
Beiträge: 710

The-Winner hat geschrieben:

Naja selbst ohne das Sleep tritt der Fehler auf

Ich dachte ein Framelimiter würde dieses Problem beheben, aber vielleicht gibt es ja noch eine andere Ursache.

Jetzt habe ich es so versucht:

Code:

procedure TForm1.IdleHandler(Sender: TObject; var Done: Boolean);
begin
  if not MTimer.BeginUpdate then
    exit;
  MTimer.EndUpdate;  

Code:

function TMoveTimer.BeginUpdate: boolean;
begin
  result := true;
  QueryPerformanceCounter(FCurrTime);
  FTimestep := min((FCurrTime - FCalcTime) / FFrequency, FMinlimit);
  if FTimestep <= FMaxLimit then
  begin
    sleep(1);
    result := false;
  end;
end;
 
procedure TMoveTimer.EndUpdate;
begin
  FCalcTime := FCurrTime;
end;

(MinLimit war testweise 0,2 und MaxLimit 0,05)
Kein Erfolg, nur tierisches ruckeln.

Nach oben

GTA-Place

Betreff des Beitrags:

Verfasst: Mi Aug 13, 2008 15:48

DGL Member

Registriert: Sa Dez 30, 2006 20:52
Beiträge: 43
Programmiersprache: Delphi

Was kommt denn bei dir danach? Wie rechnest du die Variable aus, die mit der Bewegung multipliziert wird?

Nach oben

Seite 1 von 2

[ 25 Beiträge ]

Gehe zu Seite 1, 2 Nächste

Foren-Übersicht » Programmierung » Allgemein

Wer ist online?

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