equal
deleted
inserted
replaced
481 end; |
481 end; |
482 stChWin: if not CheckForWin then |
482 stChWin: if not CheckForWin then |
483 begin |
483 begin |
484 if not bBetweenTurns then |
484 if not bBetweenTurns then |
485 begin |
485 begin |
|
486 ParseCommand('/nextturn', true); |
486 SwitchHedgehog; |
487 SwitchHedgehog; |
487 ParseCommand('/nextturn', true); |
|
488 end; |
488 end; |
489 inc(step) |
489 inc(step) |
490 end else step:= stDelay; |
490 end else step:= stDelay; |
491 stWater: begin |
491 stWater: begin |
492 if TotalRounds = 17 then bWaterRising:= true; |
492 if TotalRounds = 17 then bWaterRising:= true; |