Changeset 548 for trunk/AI/StdAI/ToolAI.pas
- Timestamp:
- Apr 21, 2024, 10:57:18 AM (4 weeks ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/AI/StdAI/ToolAI.pas
r531 r548 197 197 X := Loc - Y * G.lx; 198 198 Inc(sy, Y); 199 A := 2 * pi * X / G.lx;200 su := su + cos(A);201 sv := sv + sin(A);199 A := 2 * Pi * X / G.lx; 200 su := su + Cos(A); 201 sv := sv + Sin(A); 202 202 Inc(N); 203 203 end; 204 204 end; 205 A := arctan2(sv, su);206 X := round(G.lx * A / (2 * pi));205 A := ArcTan2(sv, su); 206 X := Round(G.lx * A / (2 * Pi)); 207 207 while X >= G.lx do 208 208 Dec(X, G.lx);
Note:
See TracChangeset
for help on using the changeset viewer.