|
|
|
Oskom Forums Добро пожаловать на Oskom Forums.
|
-
анти инжэкт такого клиента не будет ни когда! на любой клиент можно зати с инжэкта!
-
Да успокойтесь вы с этой инжой,помойму все давно привыкли и знают,кто на инже,а кто нет.Щас админы доделают всё,а потом разберуться со злосными инжектерами.Перебанят их нафик и всё.
-
в скором будушем все будет
-
Re: КОГДА ЖЕ !!! ???( анти инжект)
Сообщение от Morlok
Долго ли нам еще ждать этого супер клиента???
Чтоб никакого инжетка ничего этого небыло, одни руки и все ? Админы прошу Вас ответить...
надеюсь такого клиента некогда не будет..... лучше бы всё офицыально розрешили инжу и всё )))
П.С. обратно наверника + получу))))
-
-
-
Ну да... Анти-инжект очень нужен.
У Оскомы было всегда 2 пути.
1) Разрешить инжект всем.
2) Сделать, чтобы он НЕ РАБОТАЛ НИУКОГО.
2 вариант, как правило лучший. Будем ждать!
-
-
Типо, как без Читинг Деф не поиграть на нормальных серваках Кса
-
Бог всего и ничего
Угу, только наш ЧД будет включать в себя половину разрешённых "читов" которые упростят игру.
-
Товарищ Палкин
Я думаю к сентябрю-октябрю сделают эту прогу и тогда посмотрим кто что из себя представляет Кто руками кидает, а кто с инжы.
Кстати, вы не забыли, что сундуки замечательно кидаются и с УОскрипта ОЕ ?
-
Бог всего и ничего
да и не только сундуки Вот скрипт кидает и кеги и сено под курсор Надеюсь в нашем антиинжекте синтаксис такой же будет А то много скриптов переписывать придётся
Код:
Program UOScriptTest;
const
{ X,Y игрока }
PX = 414;
PY = 316;
aDelay = 250;
aChestType1 = 3709;
aChestType2 = 2474;
aSheafType = 3894;
aKegType = 3711;
function GetChestXY(var ax,ay : LongInt) : boolean;
var
GumpsList, ChestList : LongInt;
GumpsListLng, ChestListLng : LongInt;
GumpNum : LongInt; // номер окна
Gump,Chest : LongInt; // указатель на окно и объект
ex : Boolean; // аварийный выход (если нашли сундук)
s : String; // тмп строка
o : Boolean; // тмп булеан
gx,gy : LongInt; // координаты окна
ox,oy,oz : Word; // координаты сундука в окне
begin
GetGumpsList(GumpsList);
ex := false;
//сканируем все Гампы
GetListCount(GumpsList, GumpsListLng);
Result := false;
for GumpNum := 0 to GumpsListLng-1 do begin
GetListItem(GumpsList, GumpNum, Gump, s);
GetObjectsListByType(Gump, aChestType1, ChestList);
GetListCount(ChestList, ChestListLng);
if ChestListLng > 0 then begin
ex := true;
Result := true;
// получаем руду
GetListItem(ChestList, 0, Chest, s);
// получаем координаты окна
GetGumpInfo(Gump, o, gx, gy);
// получаем координаты руды в окне
GetObjectPos(Chest, ox, oy, oz);
ax := ox + gx + 14;
ay := oy + gy + 14;
end;
FreeObjectsList(ChestList);
if ex then Break;
GetObjectsListByType(Gump, aChestType2, ChestList);
GetListCount(ChestList, ChestListLng);
if ChestListLng > 0 then begin
ex := true;
Result := true;
// получаем руду
GetListItem(ChestList, 0, Chest, s);
// получаем координаты окна
GetGumpInfo(Gump, o, gx, gy);
// получаем координаты руды в окне
GetObjectPos(Chest, ox, oy, oz);
ax := ox + gx + 14;
ay := oy + gy + 14;
end;
FreeObjectsList(ChestList);
if ex then Break;
GetObjectsListByType(Gump, aSheafType, ChestList);
GetListCount(ChestList, ChestListLng);
if ChestListLng > 0 then begin
ex := true;
Result := true;
// получаем руду
GetListItem(ChestList, 0, Chest, s);
// получаем координаты окна
GetGumpInfo(Gump, o, gx, gy);
// получаем координаты руды в окне
GetObjectPos(Chest, ox, oy, oz);
ax := ox + gx + 14;
ay := oy + gy + 14;
end;
FreeObjectsList(ChestList);
if ex then Break;
GetObjectsListByType(Gump, aKegType, ChestList);
GetListCount(ChestList, ChestListLng);
if ChestListLng > 0 then begin
ex := true;
Result := true;
// получаем руду
GetListItem(ChestList, 0, Chest, s);
// получаем координаты окна
GetGumpInfo(Gump, o, gx, gy);
// получаем координаты руды в окне
GetObjectPos(Chest, ox, oy, oz);
ax := ox + gx + 14;
ay := oy + gy + 14;
end;
FreeObjectsList(ChestList);
if ex then Break;
end;
FreeObjectsList(GumpsList);
end;
procedure Drag(x1,y1,x2,y2 : Word);
begin
LeftDown(x1,y1);
Delay(aDelay);
LeftUp(x2,y2);
end;
{364,305 -25 -25
390,330 0 0
408,351 +25 +25 }
var
mx,my : LongInt;
Chestx,Chesty : LongInt;
begin
GetMouseCoords(mx,my);
if GetChestXY(Chestx,Chesty) then begin
Drag(Chestx,Chesty,mx,my);
end;
end.
-
Товарищ Палкин
Хе, у меня ток на сундуки..
-
Сообщение от PALADIN
Кстати, вы не забыли, что сундуки замечательно кидаются и с УОскрипта ОЕ ?
Да. Под курсор
-
Товарищ Палкин
Хе, у меня ток на сундуки..
-
Бог всего и ничего
-
лучше, чтоб сделали просто клиент, без упрощения игры, чтоб никаких функций в себя не врубала ... а то это бред, так все одинакого играть будут, не интересно, а так пускай все сами руками попробуют поделать, успеть щит одеть, манку тыркнуть, бинт юзнуть и т.д.
-
Сообщение от TopSecret
ужОс , примерно то же самое можно делать пилотом нажав 2 кнопки
-
Бог всего и ничего
-
[+] [+] [+]
Re: КОГДА ЖЕ !!! ???( анти инжект)
Сообщение от Old Rambler
лучше бы всё офицыально розрешили инжу и всё
Рыло не треснет ?
Ваши права
- Вы не можете создавать новые темы
- Вы не можете отвечать в темах
- Вы не можете прикреплять вложения
- Вы не можете редактировать свои сообщения
Правила форума
|