1259             haveDivided := true;

  1259             haveDivided := true;

  1260             break

  1260             break

  1261             end;

  1261             end;

  1262         nx := nx - tx;

  1262         nx := nx - tx;

  1263         ny := ny - ty;

  1263         ny := ny - ty;

  1266         // len := len - _0_3 // should be the same as increase step

  1265         // len := len - _0_3 // should be the same as increase step

  1267         len.QWordValue := len.QWordValue - _0_3.QWordValue;

  1266         len.QWordValue := len.QWordValue - _0_3.QWordValue;

  1268         end;

  1267         end;

  1269 

  1268 

  1270     if not haveDivided then

  1269     if not haveDivided then