Lissajous-Figuren

[Luckie]

Und wie hast du das sinusz beim Line zeichnen mit einbezogen:

Delphi-Quellcode:

  sinusx := trunc(sin(Pi * i * a / 180) * 180);
  sinusy := trunc(-sin(Pi * i * b / 180) * 180);
  LineTo(hdcMem, sinusx + (WINDOWWIDTH div 2), sinusy + (WINDOWHEIGHT div 2));