changed variations

This commit is contained in:
ronaldhordijk
2005-09-11 18:05:31 +00:00
parent fafa848225
commit 05f68f0c1d
5 changed files with 250 additions and 8 deletions

View File

@ -49,8 +49,8 @@ begin
r := r * (FLow + (FHigh - FLow) * (0.5 + 0.5 * sin(FWaves * Angle)));
FPx^ := FPx^ + vvar * r * cos(Angle);
FPy^ := FPy^ + vvar * r * sin(Angle);
FPx^ := FPx^ + vvar * r * sin(Angle);
FPy^ := FPy^ + vvar * r * cos(Angle);
end;
///////////////////////////////////////////////////////////////////////////////