Andorra 2D [Ver. 0.4.5.1, 31.12.08]

[igel457]

Hallo Xcessive_,
Danke für die umfangreiche Bug-Liste...

Zu 1: In der aktuellen Version kommt diese Meldung theoretisch überhaupt nicht mehr
Zu 2: Behoben
Zu 3: Hm... Das Spiel ist eher suboptimal programmiert, das muss ich ehrlich zugeben. Das Sample soll ja auch eher die grafischen Effekte zeigen. Aber ich schau mal, was ich machen kann.
Zu 4: Schick mir am Besten mal das gesammte Projekt, dann kann ich besser danach schauen.

Nochmal Danke,
Igel457

[nonex]

hi Xcessive,
also so wie ich dein programmcode verstanden hab, hast du 2 Instanzen von TAddraw und versucht dan auf diesen zu rendern, das geht soweit ich weis nicht, oder igel ? ^^
probiers doch einfach mal so, mache eine instanz von Addraw und dann einfach eine unterschiedung

Delphi-Quellcode:

    AdPerCounter.Calculate;

    AdGameDraw.ClearSurface(clBlack);
    AdGameDraw.BeginScene;
if Stage = 1 then
  begin

    AdSplashImgLst.Find('Splash').Draw(AdSplashDraw, 0, 0, 0);

    Inc(Frames);

    if Frames > 300 then
      Inc(Stage);
  end
  else
  if Stage = 0 then
  begin

    AdSpriteEngine.Move(AdPerCounter.TimeGap / 1000);
    AdSpriteEngine.Draw;
    AdSpriteEngine.Dead;

    if AdSpriteEngine.GetCountOfClass(TBrickSprite) = 0 then
    begin
      CreateLevel;
    end;
end;

    AdGameDraw.EndScene;
    AdGameDraw.Flip;
  end;

so in der art ;)

[igel457]

Du hast recht, das mit den beiden AdDraws habe ich übersehen... Das geht natürlich nicht!

[Xcessive_]

Danke für den Tipp. Ja, war blöd von mir, hätte ich auch selber drauf kommen können. Nein, das geht schon so wie ich das geschrieben habe, bloß wie gesagt, die Partikeleffekte sind nicht da, jedenfalls nicht bei dem Ball, aber bei der Explosion beim Treffer eines Steins. War etwas spät gestern :) Aber ich freue mich schon auf die weiteren Versionen, echt klasse. Werde wohl mal anfangen damit ein bissl zu basteln. Habe auch mal damit angefangen sowas zu schreiben, aber leider auf Grund von Zeitmangel wieder eingestampft. Und ich finde es super, dass jemand mal sowas für Delphi schreibt :thumb:

// edit:

Die AdApps.pas in der Revision 1.2 im CVS ist leer, ist das richtig? ;)

http://andorra.cvs.sourceforge.net/*...s?revision=1.2

[igel457]

Zitat:

Zitat von Xcessive_

Die AdApps.pas in der Revision 1.2 im CVS ist leer, ist das richtig? Wink

:shock:

Jetzt nicht mehr...

[Xcessive_]

Zitat:

Zitat von igel457

Zitat:

Zitat von Xcessive_

Die AdApps.pas in der Revision 1.2 im CVS ist leer, ist das richtig? Wink

:shock:

Jetzt nicht mehr...

:) Ich habe zu danken.

[g0rmed]

Bei mir verschwinden die Ball-Partikel auch immer.

Ich hab auch noch nen paar mehr Probleme, aber da die Telekom streikt und hier Beispiele und so schon viel weiterhelfen, muss ich warten bis die rosanen aufhören und mein internet heile machen... :twisted:

[wicht]

Ich bin auch begeistert, läuft alles super!
Allerdings, ist es normal, dass immer 50% CPU verbraucht werden? Das ist bei Dual-Core hier so, dann wäre das auf einem normalen PC 100%?
Zweite Sache: Wie geht das mit der OpenGL-Geschichte?

Weiter so!

[igel457]

Hallo,
danke für das Lob.

Das mit dem 100% liegt an dem OnIdle. Du kannst versuchen einfach ein Sleep(0) oder Sleep(1) in die Prozedur einzufügen, schon sinkt die Auslastung auf 4-3%. Allerdings beträgt die maximale Framerate dann 512FPS.

Mit dem OpenGL geht das ganz einfach: Du kompilierst das Plugin und schreibst dann einfach AdDraw.DllName := 'AndorraOGL.dll'; Schon läuft's mit OpenGL. Allerdings werden (noch) weder Indexbuffer oder Lichter unterstützt.

Igel457

[wicht]

Ha, so einfach... daran hätte ich eigentlich auch selber denken können :wink:
Jetzt springt der Lüfter vom Notebook nicht ständig an, da ist das arbeiten entspannter :)