Вернуться   CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг
Войти через OpenID

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 29.07.2008, 18:03   #21
Местный
 
Аватар для PanAm
 
Регистрация: 18.01.2008
Сообщений: 286
Сказал Спасибо: 24
Имеет 133 спасибок в 80 сообщенях
PanAm
По умолчанию

Кстати, вот пример почти бот )
Вложения
Тип файла: rar la2_client_emu.rar (212.2 Кб, 184 просмотров)
PanAm вне форума   Ответить с цитированием
За это сообщение PanAm нажился 8 спасибками от:
Старый 29.07.2008, 19:23   #22
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

procedure init;
begin
NoFreeOnClientDisconnect:=true;
end;
if FromClient and (ConnectName='Amorality')
and (pck=HStr('1b 04 00 00 00')) then begin
DisconnectClient;
end;

---
Значит такой код получается?

На счет Ему проги , если исходники то гляну , как скачаю дельфи 2006 , спасибо
Amorality вне форума   Ответить с цитированием
Старый 29.07.2008, 19:40   #23
Admin!
 
Аватар для xkor
 
Регистрация: 04.08.2007
Сообщений: 2,360
Сказал Спасибо: 113
Имеет 1,566 спасибок в 651 сообщенях
xkor на пути к лучшему
По умолчанию

Amorality, скорее такой:
delphi Код:
procedure init; begin   NoFreeOnClientDisconnect:=true; end; begin   if FromClient and (ConnectName='Amorality')   and (pck=HStr('1b 04 00 00 00')) then begin     DisconnectClient;   end; end.
__________________
Я здесь практически не появляюсь!, Skype - ikskor
xkor вне форума   Ответить с цитированием
За это сообщение xkor нажился спасибкой от:
Старый 29.07.2008, 21:11   #24
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Теперь другая проблема , как я говорила выше 3.2.0 работает у меня только под Камаель , в общем пытюась зайти на сервер La2.theabyss.ru , запускаю ПНХ , снимаю все галочки , кроме первой и второй , запускаю клиент , логинюсь чаром , разворачиваю ПНХ , в списке соединений везде пусто , на вкладке просмотр ни одного пакета нету
Amorality вне форума   Ответить с цитированием
Старый 29.07.2008, 22:52   #25
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Я от клиента отключаюсь так:
delphi Код:
var   NetPing: string; // здесь запомним Нетпинг от клиента, будем сами его посылать   LogOutOk: boolean; // флаг показывающий, что мы отключили клиент begin   if (ConnectName=Name) and FromServer then begin     case pck[1] of   //****************************************************       #$D3: begin // D3=NetPing:d(kID) на Нетпинг сервера шлем сохранённый пакет Нетпинга от клиента         msg.Lines.Add('S>Пакет NetPing #$D3');         if LogOutOk then begin           buf:=NetPing;           SendToServerEx(Name);           msg.Lines.Add('C>Пакет NetPing #$A8');         end;       end;     end;   end;   //****************************************************   if (ConnectName=Name) and FromClient then begin     case pck[1] of       #$09: begin //C>09=LogoutRequest - выходим ручками из клиента         msg.Lines.Add('S>Пакет LogoutRequest #$09');         // вроде не надо тут их ставить?         NoFreeOnClientDisconnect;         NoFreeOnServerDisconnect;         pck:='';         // шлем s7E=LogOutOk, для отключения клиента         msg.Lines.Add('S>Пакет LogOutOk #$7E');         buf:=#$7E;         SendToClientEx(Name);         LogOutOk:=true;       end;       #$A8: begin        // C>A8=NetPing:d(kID)d(PING)d(dta)         msg.Lines.Add('C>Пакет NetPing #$A8');         NetPing:=pck; // запомним его         pck:='';       end;     end;   end; end.

Цитата:
Сообщение от Amorality Посмотреть сообщение
Теперь другая проблема , как я говорила выше 3.2.0 работает у меня только под Камаель , в общем пытюась зайти на сервер La2.theabyss.ru , запускаю ПНХ , снимаю все галочки , кроме первой и второй , запускаю клиент , логинюсь чаром , разворачиваю ПНХ , в списке соединений везде пусто , на вкладке просмотр ни одного пакета нету
На TheAbyss x300 работает, только что проверил.

Добавлено через 29 минут
Цитата:
Сообщение от PanAm Посмотреть сообщение
Кстати, вот пример почти бот )
Где вы такое берете? Ссылку плиз.

Последний раз редактировалось NLObP, 29.07.2008 в 22:52. Причина: Добавлено сообщение
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 2 спасибками от:
Старый 29.07.2008, 23:04   #26
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Разобралась почему не работал 3.2.0 , попробовала прошлый скрипт , он не пашет , не признается часть :=true .. А вот последний скрипт похоже будет работать , чуть позже попробуем , спасибо

Добавлено через 11 минут
ПС в твоем скрипте вместо Name Надо подставлять ник? или оставить все как есть?

Последний раз редактировалось Amorality, 29.07.2008 в 23:04. Причина: Добавлено сообщение
Amorality вне форума   Ответить с цитированием
Старый 29.07.2008, 23:10   #27
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от Amorality Посмотреть сообщение
Разобралась почему не работал 3.2.0 , попробовала прошлый скрипт , он не пашет , не признается часть :=true .. А вот последний скрипт похоже будет работать , чуть позже попробуем , спасибо

Добавлено через 11 минут
ПС в твоем скрипте вместо Name Надо подставлять ник? или оставить все как есть?
Это константа, её надо описать в начале программы
Код:
const
name='имя чара';
а можно сразу вписать имя чара, если скрипт небольшой.

Сразу предупрежу. Отключать клиент не безопастно. Делай на свой страх и риск. Клиент шлет много пакетов, которые надо будет за него посылать скриптом. В частности NetPing, ValidatePosition и т.п.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от:
Старый 29.07.2008, 23:13   #28
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Цитата:
Сообщение от NLObP Посмотреть сообщение
msg.Lines.Add
ругается на это , конкретно на "Msg"

Не работает , что не так?
Amorality вне форума   Ответить с цитированием
Старый 29.07.2008, 23:17   #29
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от Amorality Посмотреть сообщение
ругается на это , конкретно на "Msg"

Не работает , что не так?
Убери эти строчки. Я взял этот кусок скрипта из своей рыбалки, там есть, куда выводить сообщения.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от:
Старый 30.07.2008, 01:38   #30
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Супер , отлично работает.. А что там еще кроме NetPing'a нужно посылать? можешь сказать? Просто боюсь чара забанят , жалко бд ..

Добавлено через 1 минуту
А вот еще вопрос , можно ли сделать так , чтобы от ника Amorality этот выгруженный клиент сразу принимал пати . а при команде в пати чат '-dance' танцевал 2 дансА?

Последний раз редактировалось Amorality, 30.07.2008 в 01:39. Причина: Добавлено сообщение
Amorality вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг



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

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


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

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!