Продажа ненужных логов. program sel_log; const logs=$1BDD; // тип логов kol_log = 19; //Кол-во цветных дров type mas_cvet = array[1..kol_log] of Integer; //Создаем массив цветов дров var Cvet : mas_cvet; procedure Cvet_log; //Примерное положение дел на рынке ДРВ //Name - Color - Цена магаз - Цена ры...

кнопка так и весит, а второй вопрос решился когда указал путь до папки с игрой.

я нашел причину. у меня был указан путь до клиента и клиент запускался. Но путь до самой папки с игрой не был указан. изза этого, как я думаю, он просто не находил нужные тайлы и писал вообще ноль деревьев. а по скрипту вообще 0-1=-1 выходило. Сейчас указал папку и все заработало. Надо бы в программ...

да я уже нашел что там оказывается 4 способа на лошади два и пешком два и каждому нужно указывать скорость. а я делал пешком а сам тестил сидя на лошади.

Разобрался. Не был указан путь к папке с игрой. Хотя клиент запускался.

Какая то странная кнопка батон1 http://clip2net.com/clip/m78984/1304000710-clip-8kb.png Это так у меня не работает карта http://clip2net.com/clip/m78984/1304000748-clip-7kb.png При нажатии на кнопку слева снизу, этого же рисунка, выходит такое окно http://clip2net.com/clip/m78984/1304000872-clip-168...

Я так понимаю, что параметры у неё такие же как и у movexy (Xdst,Ydst: Word; Optimized: Boolean; Accuracy: Integer; Running: Boolean): Boolean; // Поиск пути. Accuracy - точность приближения: 0 - прямо на точку, 1 - рядом в радиусе одного тайла и т.д. длина ограничена 1000 точек(тайлов). Optimized -...

Ребят эти функции про тайме на ходьбу в версии 3.6.0 работают. или только в бете? На простой код:

program bestr;
begin
WalkUnmountTimer := 450;
WalkmountTimer := 450;
end.

Стелс мне пишет Unknown identifier 'WalkUnmountTimer'

function GetStaticTilesArray(Xmin,Ymin,Xmax,Ymax: Word; WorldNum: Byte; TileType: Word; var FoundTilesArray: TFoundTilesArray): Word; // Получение массива статик тайлов по типу TFoundTile = record X : SmallInt; Y : SmallInt; Z : ShortInt; Tile : Word; end; type TFoundTilesArray = array[0..999] of TF...

SetArStatus(true); //WalkUnmountTimer = 450; //WalkMountTimer = 500; init; sum:=0; MoveXY(start_p.X,start_p.Y,true,1,false); // поиск деревьев и составление массива arr_sum:=0; for i:=0 to 9 do begin rs:=GetStaticTilesArray(RegArr[j].minX,RegArr[j].minY,RegArr[j].maxX,RegArr[j].maxY,1,TreeTile ,tfta...