Spiel: Scrolling shooter

[Corpsman]

Was auch echt Cool wäre so ne Art Highscore.

So das Rechts Oben die Punktzahl steht die man hat und die dan schön hochzählen.

Must sie ja net speichern.

Vielleicht wäre auch eine Anzeige was für sachen man gerade on board hat net schlecht.

bzw habe ich das gefühl das es irgendwann nichts mehr Bringt diese Buchstabenfelder auf zu sammeln. Wenn das dann angezeigt werden würde wär das Cool.

Aber mal so im Vertraun. Als Easter Egg ist das Game fast zu schade. Ich Zock das die Ganze Zeit wie blöd. Da könntest echt mehr draus machen .

[Edit]

Ich habe mir mal deinen Source angesehn und mir ist da ein bischen was aufgefallen

1.TBlubGame.CreatemitParam Es fehlt der Befehl Randomize denn solltest du rein machen.

2. TBlubGame.OnTimer; da warnt er die ganze Zeit das spawnTime nicht initialisiert sei. Was im Intervall 11 bis 15 für Level 15 tatsächlich stimmt !!

geh da lieber her und mach die 1. If weg. in etwa so

Delphi-Quellcode:

    //if LevelCounter=1 then // Läst man das weg it dieSelbe Semantic aber ohne Compilerwarnung
    spawnTime := 1000;
    If LevelCounter = 2 Then spawnTime := 900;
    If LevelCounter = 3 Then spawnTime := 800;
    If LevelCounter = 4 Then spawnTime := 700;
    If LevelCounter = 5 Then spawnTime := 600;
    If LevelCounter = 6 Then spawnTime := 500;
    If LevelCounter = 7 Then spawnTime := 400;
    If LevelCounter = 8 Then spawnTime := 300;
    If LevelCounter = 9 Then spawnTime := 200;

3. TStern.move;

mach die ganzen Variablendeklarationen raus , wenn du sie nicht benutzt.