Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация

"убиваем" игроков

-

Подполье Lineage 2 (0 уровень)

- Темы, перенесенные из Подполья 1 уровня (архивные за 2008-2015). Отличная основа для поиска новых уязвимостей.

Ответ
 
Опции темы
Старый 25.03.2011, 16:24   #1
 Сержант
Аватар для vlaha
 
vlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личность
Регистрация: 15.11.2009
Сообщений: 141
Популярность: 1112
Сказал(а) спасибо: 212
Поблагодарили 421 раз(а) в 137 сообщениях
Отправить сообщение для vlaha с помощью ICQ
 
По умолчанию "убиваем" игроков

[LEVEL="2,3"]"Выключаем" недругов.
Суть скрипта - кидает френд игроку напостой. Если он его принимает,то удаляет его из друзей и опять кидает.
При этом,атакуемый испытует дискомфорт в игре - не может выделить себя,затуляется панель скиллов.

Код:
// тушилка
const
name='vlaha';   //НИК
ss=0;           //Если дон ник,то поставить 1 Если обычный ник,то поставить 0
pizdaemy='maxson'; //Ник тому,кому делаем *****
var
Timer01: TTimer;

procedure Free;
begin
  Timer01.free;
end;

procedure Init;
begin
Timer01:=TTimer.Create(nil);
Timer01.OnTimer:=@OnTimer01;
Timer01.enabled:=true;
Timer01.interval:=200;
end;


procedure OnTimer01(Sender: TObject);
begin
if ss=0 then begin
buf:=#$5E;
WriteS(pizdaemy);
SendToServerEx(name);
buf:=#$61;
WriteS(pizdaemy);
SendToServerEx(name);
               end;
if ss=1 then begin
buf:=#$38#$2E#$00#$66#$00#$72#$00#$69#$00#$65#$00#$6E#$00#$64#$00#$69#$00#$6E#$00#$76#$00#$69#$00#$74#$00#$65#$00#$20#$00;
WriteS(pizdaemy);
buf:=buf+#$00#$00#$00#$00;
SendToServerEx(name);
buf:=#$38#$2E#$00#$66#$00#$72#$00#$69#$00#$65#$00#$6E#$00#$64#$00#$64#$00#$65#$00#$6C#$00#$20#$00;
WriteS(pizdaemy);
buf:=buf+#$00#$00#$00#$00;
SendToServerEx(name);
              end;
               
end;

begin
if (FromServer) and (pck=Hstr('64 0D 02 00 00 00 00 00 00')) and  (ConnectName=name) then
begin
if ss=0 then begin 
buf:=#$61;
Writes(pizdaemy);
SendToServerEx(name);   end;
if ss=1 then begin
buf:=#$38#$2E#$00#$66#$00#$72#$00#$69#$00#$65#$00#$6E#$00#$64#$00#$64#$00#$65#$00#$6C#$00#$20#$00;
Writes(pizdaemy);
buf:=buf+#$00#$00#$00#$00;
SendToServerEx(name);
end;


end;
end.
Переменную ss делал под сервер lineage-game.ru ,т.к. там для дон ников и обычных разные команды на инвайт во френды.
Пакеты в скрипте для IT.
Спасибо J-Fobos за частичную помощь в написании скрипта.

------------------------------------
Так же,скрипт на антифренд. Если кумарят вас.
Код:
// Антизаепывалка
const
name='vlaha';

var
Timer01: TTimer;

procedure Free;
begin
  Timer01.free;
end;

procedure Init;
begin
Timer01:=TTimer.Create(nil);
Timer01.OnTimer:=@OnTimer01;
Timer01.enabled:=true;
Timer01.interval:=400;
end;


procedure OnTimer01(Sender: TObject);
begin

buf:=hstr('5F 01 00 00 00 ');
SendToServerEx(name);

end;

begin
   if FromServer and (pck[1]=#$7D)  and  (ConnectName=name) then pck:='';

end.
Написал сам [/LEVEL]
________________
==============>[[Ссылки могут видеть только зарегистрированные пользователи. ]]<==============

Последний раз редактировалось Chipito; 29.09.2011 в 14:10. Причина: Добавлено сообщение
  Ответить с цитированием
Пользователь сказал cпасибо:
Razzor (31.03.2011)
Старый 25.03.2011, 18:00   #2
обжигающий
 Главнокомандующий
Аватар для object
 
object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(object сломал счётчик популярности :(
Регистрация: 17.11.2009
Сообщений: 1,062
Популярность: 64819
Золото Zhyk.Ru: 170
Сказал(а) спасибо: 1,456
Поблагодарили 2,062 раз(а) в 822 сообщениях
 
По умолчанию Re: "убиваем" игроков

vlaha, а что мешает отодвинуть панель со скиллами, и играть спокойно?
________________
Полные взломы игрулек VK:
Качок | Баббла Кадабра | Академия монстров | Клуб Искателей(?fix) | [HOT-NEW] Толстая птица онлайн
  Ответить с цитированием
Старый 25.03.2011, 18:02   #3
 Сержант
Аватар для vlaha
 
vlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личностьvlaha определенно авторитетная личность
Регистрация: 15.11.2009
Сообщений: 141
Популярность: 1112
Сказал(а) спасибо: 212
Поблагодарили 421 раз(а) в 137 сообщениях
Отправить сообщение для vlaha с помощью ICQ
 
По умолчанию Re: "убиваем" игроков

Вношу поправку: Игрок не может вообще никого взять в таргет.
________________
==============>[[Ссылки могут видеть только зарегистрированные пользователи. ]]<==============

Последний раз редактировалось vlaha; 25.03.2011 в 18:05.
  Ответить с цитированием
Старый 25.01.2019, 01:08   #4
 Разведчик
Аватар для Lineage2t
 
Lineage2t никому не известный тип
Регистрация: 09.11.2018
Сообщений: 4
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Re: "убиваем" игроков

такая проблема, в наше время до сих пор не устранена, уже скрипт готовый лежит, а админы его не применяют
________________
Давай крафтить свой мир вместе с [Ссылки могут видеть только зарегистрированные пользователи. ]
  Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Руководство] "Эмулятор нажатий клавиш" или "Один поток и пара Процедур" zaparca Pascal/Delphi 3 11.03.2011 00:28
[Предложение] Выставить "По умолчанию" галочку "Без перенаправления" при переносе тем Jumper Team of development 4 25.02.2011 16:08
[Руководство] "Воизбежание"-"Логин в прцессе подключения"+"Дисконект при выборе сервера" K.Rezonans Баги, читы и статьи по Point Blank 19 27.06.2010 03:24

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 14:29.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net