Partikel in bestimmtem Winkel erzeugen

[igel457]

Zitat von Khabarakh:

Hm, machs doch einfach so:

Delphi-Quellcode:

Alpha := Random * 2 * Pi;
X := cos(Alpha);
Y := sin(Alpha);

Bereits normalisiert und natürlich über Alpha extrem leicht anpassbar.

Ok, jetzt hab ichs hinbekommen.

Delphi-Quellcode:

var alpha,max,min,h : double;
begin
  with FDir do
  begin
    max := (CreationAngle+CreationAngleOpen / 2) * PI / 180;
    min := (CreationAngle-CreationAngleOpen / 2) * PI / 180;
    Alpha := Random * (max-min)+min;
    X := cos(Alpha);
    Y := sin(Alpha);
  end;
end;

Danke an alle
igel457