Removed left-over comments from TStepCounter
This commit is contained in:
parent
4e28a7a4c2
commit
197e5f81b9
|
@ -112,7 +112,6 @@ var
|
||||||
currentStep: Integer;
|
currentStep: Integer;
|
||||||
currentPlots, nextPlots, temp: TPoints;
|
currentPlots, nextPlots, temp: TPoints;
|
||||||
plot, direction, next: TPoint;
|
plot, direction, next: TPoint;
|
||||||
//s: string;
|
|
||||||
begin
|
begin
|
||||||
FWidth := Length(FLines[0]);
|
FWidth := Length(FLines[0]);
|
||||||
FHeight := FLines.Count;
|
FHeight := FLines.Count;
|
||||||
|
@ -144,15 +143,7 @@ begin
|
||||||
|
|
||||||
// Positions where the number of steps are even can be reached with trivial backtracking, so they count.
|
// Positions where the number of steps are even can be reached with trivial backtracking, so they count.
|
||||||
if currentStep mod 2 = 0 then
|
if currentStep mod 2 = 0 then
|
||||||
//begin
|
|
||||||
Inc(FPart1, currentPlots.Count);
|
Inc(FPart1, currentPlots.Count);
|
||||||
// for plot in currentPlots do
|
|
||||||
// SetPosition(plot, 'O');
|
|
||||||
//end;
|
|
||||||
|
|
||||||
//for s in FLines do
|
|
||||||
// WriteLn(s);
|
|
||||||
//WriteLn;
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
currentPlots.Free;
|
currentPlots.Free;
|
||||||
|
|
Loading…
Reference in New Issue