Brauche Hilfe bei meinem Spiel *verzweifeltist*

[Dapaetz]

hallo leute
bin neu hier in der community, da ich grade erst angefangen habe,
mit delphi zu arbeiten ;)
naja wie dem auch sei ich habe mir viele einführungen, theorie usw.
durchgelesen und hab dann mal munter drauflos programmiert

ich habe ein spiel programmiert, wo ich allerdings auf ein problem gestoßen bin:
die idee ist einfach ein spielfeld auf dem ein ball hin und her eiert
wenn er gegen den rand kommt prallt er ab
der spieler muss versuchen den ball per mausklick zu erwischen, wobei der
ball natürlich zunehmend schneller wird
so weit so gut.

dass was ich jetzt will ist dass der ball mit jedem level schneller wird
bis sagen wir level 10
ab level 11 geht der speed wieder runter zum anfangsspeed und die ganze chose geht von vorn los
mit der ausnahme dass der ball jetzt halt kleiner is
das ganze wollte ich dann ne zeitlang fortführen aber irgendwie komme ich nicht sehr weit

dass der ball schneller wird habe ich auch hinbekommen aber als nächste schwierigkeit wollte ich
den ball noch verkleinern nach einer bestimmten zeit
und da ist der haken, das bekomme ich einfach nicht hin
sitze nun schon 2 stunden da dran und komme nicht weiter
natürlich könnte ich immer wieder ne neue if-schleife machen á la
"if level=3 then ball schneller machen and ball kleiner machen"
das bei 30 levels oder so durchzuziehen ist natürlich nich wirklich gut
ich suche ne elegantere lösung, habe es mal mit ner for und auch mit ner repeat schleife versucht
aber irgendwie bekomm ich es nich zum laufen :(
wäre euch sehr dankbar wenn ihr euch das mal anschauen könntet (quellcode findet ihr als anhang zum beitrag)
schönen dank schonmal falls sich einer die mühe machen sollte nem anfänger wie mir zu helfen ;)

[supermuckl]

ich würde das level kontinuierlich hochzählen und bei jeder änderung des levels überprüfen ob es eine bestimmte größe überschritten hat und dann einfach den speed erhöhen oder den ball kleiner machen usw..

kannst ja dann auch multible abfragen machen wo du dann z.b. für jedes level auch ein speed vorgeben könntest.. mit einem array z.b.
oder auch die ballgröße

so bist du nacher sehr flexibel wenn du da was ändern willst oder es sogar per datei einlesen willst

**deklaration array**
geschwindigkeiten: array[0..30] of integer;

**füllen des arrays**
geschwindigkeiten[0] := 1;
geschwindigkeiten[1] := 2; usw

[freak4fun]

Zitat:

supermuckl schrieb:

**füllen des arrays**
geschwindigkeiten[0] := 1;
geschwindigkeiten[1] := 2; usw

for i := 0 to 30 do
geschwindigkeiten[i] := i + 1; :roll:

mfg
freak

:coder:

[Treffnix]

Er will ja die Geschwindigkeit ab 10 wieder kleiner haben. Du kannst aber auch ein konstantes Array definieren

Delphi-Quellcode:

const Geschwindigkeiten: Array[1..30] of Byte = ( 1,2,3,4,5,6,7,8,9,10,10,9,8,7,6,5,4,3,2,1,1,2,3,4,5,6,7,8,9,10);

[Patricius]

Ne, er wills so haben ;)

Delphi-Quellcode:

const Geschwindigkeiten: Array[1..30] of Byte = ( 1,2,3,4,5,6,7,8,9,10,1,2,3,4,5,6,7,8,9,10,1,2,3,4,5,6,7,8,9,10);

[Ben1]

:coder2:
Geschwindigkeit: = ( Level_Nr - 1 ) mod 10 + 1;