SnowScreenSaver Phoenix

[xZise]

Zitat von Sunlight7:

Zitat von xZise:

Ehrlich gesagt, weiß ich nicht, warum der Wind immer einen Linksdrall hat.
Generell müsste ich die "Zufallswindengine" verbessern

Kannst mir ja ein Tipp geben Source liegt ja bei

Nö, der Konkurrenz Tips geben

Ich würde dich nicht als Konkurrenz sehen

Zitat von Sunlight7:

Na gut Okay
Also da hast den Random falsch gesetzt:

Ergebnisse von Random(10)-5

-5, -4, -3, -2, -1, 0, 1, 2, 3, 4

Deshalb zieht es mehr nach Links
Einfachste Lösung: Random(11)-5


Aber ich würde es eher so in etwa machen:

Delphi-Quellcode:

Case Random(3) of
   0: If Wind>50 then Dec(Wind, 1);
   2: If Wind<50 then Inc(Wind, 1);
end;

Image.Left:=Image.Left+(Wind div 10);

Somit hast Du sanftere Bewegungen.

Ah ok Danke