anchor.diff:    LT,RT,RD,LD,repeatWhile: Boolean;
   begin
     // Cellular automaton, Moore neighborhood:
  -  //    ____________________________                         _________
  +  //    ___________________________                          _________
     //   | [Y0,X0]  [Y0,X1]  [Y0,X2] |    indexes of Result:  | 0  1  2 |
     //   | [Y1,X0]     X     [Y1,X2] |                        | 7  x  3 |
     //   | [Y2,X0]  [Y2,X1]  [Y2,X2] |                        | 6  5  4 |
  
positive.code: ﻿{
  Random Map Generator
  @author: Martin Toupal
  @e-mail: poznamenany@gmail.com
  
negative.code:   try
      for i := Low(Locs) to High(Locs) do
      begin
        step := 1;
        X1 := Locs[I].X;
        Y1 := Locs[I].Y;
        while (step < 10) AND not WT[ TilesPartsArr.Terrain[Y1,X1] ] do
  