@@ -190,23 +190,23 @@ Internal helper function for {ref}`TRSEntity.GetCuboidArray`.
190190function TRSEntity._GetCuboid(me: TPoint; vector: TVector2; size: TVector3; height, radians: Single): TCuboid;
191191var
192192 corners: TVector3Array;
193- pt, currLoc : TPoint;
193+ pt: TPoint;
194194 arr: TPointArray;
195195begin
196- currLoc := me + vector.ToPoint() - Minimap.Center;
196+ pt := me + vector.ToPoint() - Minimap.Center;
197197
198198 size.X := size.X*2;
199199 size.Y := size.Y*2;
200200
201201 corners := [
202- [vector.X-size.X, vector.Y-size.Y, Self.Walker^.Height(currLoc - [1,3], False) - height],
203- [vector.X+size.X, vector.Y-size.Y, Self.Walker^.Height(currLoc + [3,-3], False) - height],
204- [vector.X+size.X, vector.Y+size.Y, Self.Walker^.Height(currLoc + [3,1], False) - height],
205- [vector.X-size.X, vector.Y+size.Y, Self.Walker^.Height(currLoc - [1,1], False) - height],
206- [vector.X-size.X, vector.Y-size.Y, Self.Walker^.Height(currLoc - [1,3], False) - height+size.Z],
207- [vector.X+size.X, vector.Y-size.Y, Self.Walker^.Height(currLoc + [3,-3], False) - height+size.Z],
208- [vector.X+size.X, vector.Y+size.Y, Self.Walker^.Height(currLoc + [3,1], False) - height+size.Z],
209- [vector.X-size.X, vector.Y+size.Y, Self.Walker^.Height(currLoc - [1,1], False) - height+size.Z]
202+ [vector.X-size.X, vector.Y-size.Y, Self.Walker^.Height(pt - [1,3], False) - height],
203+ [vector.X+size.X, vector.Y-size.Y, Self.Walker^.Height(pt + [3,-3], False) - height],
204+ [vector.X+size.X, vector.Y+size.Y, Self.Walker^.Height(pt + [3,1], False) - height],
205+ [vector.X-size.X, vector.Y+size.Y, Self.Walker^.Height(pt - [1,1], False) - height],
206+ [vector.X-size.X, vector.Y-size.Y, Self.Walker^.Height(pt - [1,3], False) - height+size.Z],
207+ [vector.X+size.X, vector.Y-size.Y, Self.Walker^.Height(pt + [3,-3], False) - height+size.Z],
208+ [vector.X+size.X, vector.Y+size.Y, Self.Walker^.Height(pt + [3,1], False) - height+size.Z],
209+ [vector.X-size.X, vector.Y+size.Y, Self.Walker^.Height(pt - [1,1], False) - height+size.Z]
210210 ];
211211
212212 arr := MM2MS.Run(corners, radians);
@@ -227,9 +227,8 @@ function TRSEntity.GetCuboidArray(me: TPoint; out coordinates: TPointArray; radi
227227var
228228 weights: TDoubleArray;
229229 meLocal, pt: TPoint;
230- h, diff: Single;
231230 i: Integer;
232- dist: Double;
231+ h, dist: Double;
233232 vector: TVector2;
234233 dots: TPointArray;
235234begin
@@ -242,7 +241,6 @@ begin
242241 Self.Walker^.Height(meLocal + [3,1], False) + Self.Walker^.Height(meLocal - [1,1], False);
243242 h := h/4;
244243
245- WriteLn 'here';
246244 if Self.Filter <> [] then
247245 begin
248246 dots := Minimap.GetFilteredDotArray(Self.MinimapDots, Self.Walker^.FiltersToMM(me, Self.Filter, radians));
0 commit comments