lumber drw(guard zone)

Beren · Post by **Beren** » 03.04.2011 18:41

Это не проблема скрипта, а проблема ДРВ, у меня тоже один перс получил бан из-за их кривого, хоть они этого и не признают, анти SH. Но тот же перс рубил без перерыва 3-е суток.
И это не из-за MoveXY, у меня по крайней мере. Многие жалуются на частые дисконекты, а следовательно автоматический бан.
Ну и Гуру как-то крайне отрицательно относится к стелсу, версию 1.0 прикрыли. Ей уже невозможно зайти.

grundick · Post by **grundick** » 03.04.2011 19:39

Нууу, как Вам сказать ...
Определить, чья проблема, несложно.
Запускаем перса на стелсе по прямой на длинной дистанции и бежим рядом на клиенте.
По поводу кривости антиСХ ДРВ!
По логике вещей они правы. Ведь никого не дисконнектит, если он бегает на чистом клиенте. Значит проблема всё таки в стелсе. Не в скриптах, и даже не в moveXY , а чуть поглубже.
Я ради интереса побегал на древней 1.0.9 по ДРВ, за ночь ни одного дисконнекта. Сейчас запустил ту же беготню на 3.6.0 - дисконнект меньше чем через минуту.

Beren · Post by **Beren** » 03.04.2011 19:51

Я знаю что старый стелс умел бегать быстро( вернее не то что бы быстро, а на стелсе он порой как бы перескакивал), выяснилось это в процессе тетстирования скрипта из данной темы. Но в это время никаких дисконектов не было. Дисконектит у них по определённым дням, причём у каждого по разному эти дни распределены. И как раз в эти дни совершенно не важно на чём ты бегаешь. Дисконектит и на голом клиенте, и на инжекте и на стелсе исключительно при передвижении.
Да, наверняка это проблема инета/провайдера игрока, но это не отменяет того, что анти-СХ банит игрока если у его провайдера критические дни и не банит игроков в окло передвигающихся каким-то образом тоже крайне быстро. Потому что об этом темы на форуме тоже появляются.

grundick · Post by **grundick** » 03.04.2011 19:54

Сегодня какой-то особенный день?

Бегаю на клиенте, никаких проблем. На стелсе дисконект очень быстро наступает.

Beren · Post by **Beren** » 03.04.2011 19:56

Ну я же говорю про себя, а не про других. У меня сейчас на 3.6 стелсе бегает без проблем на ДРВ.

grundick · Post by **grundick** » 03.04.2011 19:59

http://stealth.od.ua/forum/viewtopic.php?p=8123#8123
Эти параметры устанавливал?

Beren · Post by **Beren** » 03.04.2011 20:02

нет, в 3.6 просто запустил скрипт который писал для 1.0 ничего не менял.

grundick · Post by **grundick** » 03.04.2011 20:05

Понятия не имею ,что у тебя за скрипт.
10мин назад я запустил свой скрипт, который просто бегает от дерева к дереву по координатам. Минуты не прошло , как наступил дисконнект.

Code: Select all


22:06:02:203 [DRW_tester]: Загружаем координаты из файла...
22:06:13:765 [DRW_tester]: Character Speaker Disconnected.

Beren · Post by **Beren** » 03.04.2011 20:06

у меня простой, бегает за птичками в тринсике, убивет и добывает перья)

grundick · Post by **grundick** » 03.04.2011 20:08

Покажи скрипт.

Beren · Post by **Beren** » 03.04.2011 20:11

Code: Select all

program trinsic;

{$Include 'all.inc'}

const
 bird=$0006;
 bird_body=$2006;
 feathers=$1BD1;
 
var
 t_bird,loot: cardinal;
 i:integer;
 
 
procedure Wait_Target(time_ms:Cardinal);
var
 TempTime,SumTime:Cardinal;
begin
 SumTime:=0;
 repeat
  checksave;
  wait(250);
  TempTime:=Timer;
  SumTime:=SumTime+(Timer-TempTime);
 until ((targetpresent) or (dead) or (not connected) or (SumTime>time_ms));
end;

function redcheck:boolean;
var
 nn : integer;
 l : TStringList;
 finded : Boolean;
begin
 finddistance:=7;
 finded := False;
 l := TStringList.Create();
 Ignore(self);
 FindType(-1,ground);
 GetFindedList(l);
 if (l.count > 0) then
 begin
  for nn:= 0 to (l.count-1) do
     if (IsNPC(StrToInt('$'+l.strings[nn]))) then
      if (GetNotoriety(StrToInt('$'+l.strings[nn]))>3) then
       if (not IsDead(StrToInt('$'+l.strings[nn]))) then finded := true;
 end;
 l.free;
 if finded then AddToSystemJournal('просто гвардуем криминала!');
 if finded then result:=true else result:=false;
end;

Begin

 while (not dead) or (Weight<700) do
 begin
  if HP<100 then alarm;
  checksave;
  FindDistance:=30;
  t_bird:=FindType(bird,ground);
  if t_bird<>0 then
   begin
    if redcheck then UOSay('guards');
    Attack(t_bird);
    while GetHP(t_bird)>0 do MoveXY(GetX(t_bird),GetY(t_bird),false,1,false);
    wait(1000);
    FindDistance:=2;
    t_bird:=FindType(bird_body,ground);
    FindDistance:=20;
    MoveXY(GetX(t_bird),GetY(t_bird),true,1,false);
    UseObject(ObjAtLayer(RhandLayer));
    Wait_Target(5000);
    TargetToObject(t_bird);
    wait(1000);
    if t_bird<>0 then
     begin
      if redcheck then UOSay('guards');
      checksave;
      UseObject(t_bird);
      i:=0;
      repeat
       checksave;
       wait(1000);
       i:=i+1;
       if redcheck then UOSay('guards');
      until ((LastContainer=t_bird) or (i>40));
      wait(1000);
      loot:=FindType(feathers,t_bird);
      wait(1000);
      Grab(loot,count(loot));
      ignore(t_bird);
     end;
   end;
  end;
  SetArStatus(false);
  Disconnect;
End.

старт из:
1892 2774 - Trinsic Garden

grundick · Post by **grundick** » 03.04.2011 20:14

Парень, ты не бегаешь, а ходишь пешком.
ПОпробуй во всех moveXY выставить последний параметр как true

Beren · Post by **Beren** » 03.04.2011 20:15

ну это понятно, но дисконекты выдавал и пешем ходе.
я на голом клиенте даже с клавиатуры ходил, по одному шагу в секунду и это не помогало. хотя попробую конечно.

grundick · Post by **grundick** » 03.04.2011 20:19

попробуй, потом расскажешь

Beren · Post by **Beren** » 03.04.2011 20:31

первые 10 минут всё нормально, запустил второго чара на бег:

Code: Select all

Program Move_test;

Begin
 while true do
  begin
   MoveXY(2750,2179,true,0,true);
   MoveXY(2750,2154,true,0,true);
  end;
End.

бегаем уже 5 минут