Code: Select all
var
LootTypes : Array of Word;
i,k : Integer;
Items : Array of Cardinal;
begin
NewMoveXY(AtHomePoint.X, AtHomePoint.Y, true, 1, true); //233 строка
if GetZ(Self) > 9 then
repeat
ClearBadLocationList;
NewMoveXY(2171, 893, true, 1, true);
NewMoveXY(GetX(PrizeBag), GetY(PrizeBag), true, 1, true);
until GetZ(Self) < 15;
{UseObject(PrizeBag);
WaitLag;}