там прироста особо быть не должно по идее

Зависит от компилятора

т.к. оно не "компилится" а аттачится к транслятору

да, всё надо проверять

заменил димы на локалы
исправил возникшие из за этого ошибки и
Общее Время 18771.2303306566 милисекунд

Все равно дохрена

там по коду видно что лишний ход. нужно структурно подходить к шагу - не в цикле направление перебирать, а словом из 8 значений.  тогда можно в 7 раз скорость повысить

For $i = 0 To 7 ; смотрим куда можно идти 8 направлений
                       $Px = $x + $Dx[$i]
                       $Py = $y + $Dy[$i]
                       If $Px >=0 And $Py >= 0 And $Px < $SizeX And $Py < $SizeY And $Arr[$Px][$Py] == $LI_BLANK Then ; ходим только туда где -2
                           $Stop = False
                           $Arr[$Px][$Py] = $D + 1 ; запишем в ячейки шаг + 1
                       EndIf
                   Next

покажи оптимизацию

от димы избавиться полностью не выходит

вот, я всё
кодом аутоита дальше сами разбирайтесь
притрагиваться к нему не охота)))

Руслан Ты гений!

))
че?

рано ранодоваться )

Total Time (Lee) 29.4703026005151c

ну видимо от проца еще зависит

у тебя что за комп такой ?

ноут i7 3612QM

у меня i5

ноут 12 го года