OutGame Бот на ПакеХак!

[VORON]

я делал бишопа- удерживающего меня в УД нонстопом через релог.. само собой для етого надо клиент овязывать и норм работало.. бишоп за мной бегал и когда надо ставил в УД и релог производил.. и бегал по команде (т.е. выполнял мои команды без клиента).. впринципе возможно всё сделать..

[rootKit]

PHP код:

Const
  Name='kolobok';
var
ok, srvconst, pingid, ping: integer;



procedure Init; //Вызывается при включении скрипта


begin
NoFreeOnClientDisconnect;
NoFreeOnServerDisconnect;
ok:=0
end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

procedure OnConnect(WithClient: Boolean); //Вызывается при установке соединения

begin

end;

procedure OnDisonnect(WithClient: Boolean); //Вызывается при потере соединения
begin

end;




Procedure Say(msg:string);
begin
  buf:=hstr('4A 00 00 00 00');
  WriteD(2);
  WriteS(Name);
  WriteS(msg);
  SendToClientEx(Name);
end;

begin
NoFreeOnClientDisconnect;
NoFreeOnServerDisconnect;
 if (ok=0) and fromclient and (ConnectName=Name) and (pck[1]=#$A8) then
 begin
 srvconst:=ReadD(10);
 Say('Константа сервера получена, можно выключать клиент=');
 pck:='';
 ok:=1;
 end;


 if (ok=1) and FromServer and (ConnectName=Name) and (pck[1]=#$D3) then
 begin
 pingid:= ReadD(2);

 ping:= 31 + (int(random()*3));
 buf:= #$A8;
 WriteD(pingid);
 WriteD(ping);
 WriteD(srvconst);
 SendToServerEx(Name);
 say(inttostr(ping));
 end;
end. 


Супер. спасибо работает. Но есть одно но. Когда я выключаю клиент ПакетХак начинает в окно лога писать WSA error 10038/284 и очень сильно загружать процессор. Можно ли както избежать вывода этого сообщения и соответственно разгрузить проц?

[kristalik]

Умоляю, поясните мне как режимом АутГейм пользоватся, я скрипт запускаю, клиент оффается, пакет хак остается и пакеты посылает... но и чар с серва тоже оффается, его просто в игре нету((... в чем смысл?? что я упустил?

[QaK]

kristalik, ну. ка бы тебе помягче-то сказать - кури тонны мануала, в двух словах не объяснишь...

[rootKit]

Что ни как нельзя подавить сообщение об ошибке?

[QaK]

rootKit, нахрена в запихал месту и не к месту

Сообщение от rootKit

begin
NoFreeOnClientDisconnect;
NoFreeOnServerDisconnect;*
if*(ok=0)*and*fromclient

выделенный кусок убери

[rootKit]

Блин... Я конечно тоже слепой) Мог бы и заметить...

Сообщение от QaK

rootKit, нахрена в запихал месту и не к месту
выделенный кусок убери

Я и не пихал) тупо содрал из поста Poison)

[Imperial2008]

Я конечно извиняюсь за столь нубский вопрос.
У меня постоянно компилятор выбивает на "NoFreeOnClientDisconnect" Undeclared Identifier. Как понимаю незадекларированный идентификатор. Скажите как это "исправить"?)

[NLObP]

Imperial2008, переименованы. Воспользуйся поиском.

[Imperial2008]

Сообщение от NLObP

Imperial2008, переименованы. Воспользуйся поиском.

Лажу уже который час, и так и сяк ищу, но не упоминается об этом. Я понимаю что легче послать "в поиск", но можно и просто "ткнуть меня носом". Понимаю что достал) Пожалуйста