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

Жесткий скриптинг Раздел для обсуждения готовых и тестируемых скриптов
Внимание! В разделе введена жесткая модерация, темы и сообщения публикуются только после проверки модераторами

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 12.01.2010, 09:23   #31
Местный
 
Аватар для Breadfan
 
Регистрация: 29.04.2008
Сообщений: 830
Сказал Спасибо: 80
Имеет 230 спасибок в 169 сообщенях
Breadfan пока неопределено
По умолчанию

Цитата:
Сообщение от QaK Посмотреть сообщение
это значит, что скрипт над переделывать, разбор пакета инвентаря неправильный
Да примеров - море, к примеру те же скрипты на заточку от NLobP
__________________
На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."

А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Breadfan вне форума   Ответить с цитированием
Старый 26.01.2010, 12:21   #32
Новичок
 
Регистрация: 06.11.2009
Сообщений: 6
Сказал Спасибо: 9
Имеет 0 спасибок в 0 сообщенях
skaner пока неопределено
По умолчанию

баян, куча подобного повсюду, но удобная чтука, на х10 и выше, - в том что порой он думает что у тебя кончились ЛСы....
skaner вне форума   Ответить с цитированием
Старый 05.02.2010, 15:56   #33
Пользователь
 
Регистрация: 11.07.2009
Сообщений: 65
Сказал Спасибо: 64
Имеет 0 спасибок в 0 сообщенях
Imperial2008 пока неопределено
По умолчанию

Захотел я попробовать на интерлюде поагментить. Но вот какая проблема. На первой странице она уже была указана, но толком решения я не нашел. Пакеты все верны, пуха агментится 1 раз, потом дисагментится 1 раз и на этом весь процесс заканчивается. Я думал, возможно, не правильно пересчитываются гемы, но нет, все пересчитывается верно. При чем ни обновление инвентаря, ни одевание/снятие пухи, ни выброс ее на землю, ни положение в ВХ ничего не исправляет. Помогает только одно - перезапустить скрипт предварительно поменяв кол-во гемов (каждый раз), но тогда и смысл скрипта теряется. Кто-то знает какой то выход? Буду очень благодарен.
__________________
Если вы умные в программировании и скриптописании это не значит что все такие умные! Относитесь, пожалуйста, с пониманием к таким людям!
Imperial2008 вне форума   Ответить с цитированием
Старый 07.02.2010, 18:53   #34
Новичок
 
Регистрация: 07.02.2010
Сообщений: 9
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
dAsk пока неопределено
По умолчанию

В чем ошибка? Вот скрин: ИД предметов вводил опираясь на ItemsID.ini

Последний раз редактировалось NLObP, 07.02.2010 в 23:50.
dAsk вне форума   Ответить с цитированием
Старый 10.02.2010, 00:32   #35
Пользователь
 
Аватар для BioDread
 
Регистрация: 06.02.2010
Сообщений: 42
Сказал Спасибо: 20
Имеет 2 спасибок в 2 сообщенях
BioDread пока неопределено
По умолчанию

Я думаю дело в том что каждый ЛС если находится в разных слотах имеет свой уникальный ид
Вот если б ЛСы лежали стопкой то ИД у каждого из них был бы одинаковым.
Люди кто знает если я не прав просвятите мну плиз)
BioDread вне форума   Ответить с цитированием
Старый 10.02.2010, 21:23   #36
Новичок
 
Регистрация: 07.02.2010
Сообщений: 9
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
dAsk пока неопределено
По умолчанию

На моем сервере ЛС стопкой лежат. Хронини HellBound
Проблема актуальна
dAsk вне форума   Ответить с цитированием
Старый 14.02.2010, 17:42   #37
Рыцарь
 
Аватар для mks
 
Регистрация: 21.09.2007
Сообщений: 376
Сказал Спасибо: 11
Имеет 218 спасибок в 106 сообщенях
mks пока неопределено
По умолчанию

Цитата:
Сообщение от BioDread Посмотреть сообщение
Я думаю дело в том что каждый ЛС если находится в разных слотах имеет свой уникальный ид
Вот если б ЛСы лежали стопкой то ИД у каждого из них был бы одинаковым.
Люди кто знает если я не прав просвятите мну плиз)
правильно думаешь)
__________________
FA©Q!
mks вне форума   Ответить с цитированием
Старый 28.02.2010, 11:46   #38
Пользователь
 
Регистрация: 19.02.2010
Сообщений: 49
Сказал Спасибо: 1
Имеет 35 спасибок в 12 сообщенях
Vilson пока неопределено
По умолчанию

Наконец-то удалось полностью автоматизировать этот процесс, теперь аугментация перебирается сама пока не будет получен нужный скил. Для тех кому интересно как определить какой нам попался скил:

в таймере где выбираем предметы первым делом вызваю

Цитата:
RequestExRqItemLink(MyName, TargetItemObjID);
в основном блоке:

Цитата:
if (ConnectName=MyName) and (FromServer) then
case pck[1] of
#$FE:if ReadH(2)=108 then //RequestExRqItemLinkReply
begin
ReadAugSkillID:=ReadH(34);
if NeedAugSkillID=ReadAugSkillID then
begin
TimerItemSelect.Enabled:=False;
TimerAugItem.Enabled:=False;
StartAug:=False;
SendMsg2(MyName, ' УСПЕШНО ПОЛУЧЕН СКИЛ : '+IntToStr(NeedAugSkillID));
Exit;
end;
SendMsg2(MyName, 'НУЖЕН : '+IntToStr(NeedAugSkillID)+ ', ПОЛУЧЕНО : '+IntToStr(ReadAugSkillID));
RequestRefineCancel(MyName, TargetItemObjID);
pck:='';
exit;
end;
end;
Только помните что AugSkillID это не SkillID, смотрите таблицу соответствия. Например
Цитата:
<augmentation id="16333"> <skillId val="3249"> <skillLevel val="10"> <!-- Passive: Increases your critical attack rate. -->
<augmentation id="16284"> <skillId val="3244"> <skillLevel val="10"> <!-- Passive: Increases your P. Def. -->
Vilson вне форума   Ответить с цитированием
За это сообщение Vilson нажился спасибкой от:
Старый 05.03.2010, 20:56   #39
Новичок
 
Аватар для Pitkin
 
Регистрация: 19.04.2008
Сообщений: 4
Сказал Спасибо: 6
Имеет 1 спасибку в 1 сообщении
Pitkin пока неопределено
По умолчанию

Вот скрипт переделанный под Gracia Epilogue (фришка).На простом финале не тестил,если кому надо проверьте сами....
Код:
const
   nik='name';

var
   WeaponID, LsID, GemID, GemCount, zero: integer;

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

end;

procedure OnTimer01(Sender: TObject);
begin

end;

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

end;

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

end;

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

end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
    if FromClient and (pck[1]=#$D0) then
        begin
           WeaponID:=ReadD(4);
           LsID:=ReadD(8);
           GemID:=ReadD(12);
           GemCount:=ReadD(16);
        end;

//Cancel Augment

    if FromClient and (pck = HStr('56 19 00 00 00 00 00 00 00 00')) then   //62 AB 07 00 00 00 00 00 00 (Social No)

       begin
       buf:=hstr('FE 52 00 ');//окно удаления арГ
        SendToClient;
        delay(400);
          pck:='';
          Buf:=#$D0#$42#$00;
          WriteD(WeaponID);
          SendToServerEx(nik);
          Buf:=#$D0#$43#$00;
          WriteD(WeaponID);
          SendToServerEx(nik);

       end;

//Augment
    if FromClient and (pck = HStr('56 18 00 00 00 00 00 00 00 00')) then    //62 A5 07 00 00 00 00 00 00 (Social Yes)
       begin
       buf:=hstr('FE 51 00 ');//окно Арг
          SendToClient;
          delay(400);
          pck:='';
          Buf:=#$D0#$26#$00;
          WriteD(WeaponID);
          SendToServerEx(nik);
          delay(350);
          Buf:=#$D0#$27#$00;
          WriteD(WeaponID);
          WriteD(LsID);
          SendToServerEx(nik);
          delay(400);
          Buf:=#$D0#$28#$00;
          WriteD(WeaponID);
          WriteD(LsID);
          WriteD(GemID);
          WriteD(GemCount);  
          WriteD(zero);
          SendToServerEx(nik);
          delay(400);
          Buf:=#$D0#$41#$00;
          WriteD(WeaponID);
          WriteD(LsID);
          WriteD(GemID);
          WriteD(GemCount); 
          WriteD(zero);
          SendToServerEx(nik);
          end;
end.
Pitkin вне форума   Ответить с цитированием
За это сообщение Pitkin нажился спасибкой от:
Старый 06.03.2010, 21:33   #40
Новичок
 
Регистрация: 07.02.2010
Сообщений: 9
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
dAsk пока неопределено
По умолчанию

На моем сервере (Хроники HellBound) при нажатии на соц. действие просто ничего не происходит. Я сравнивал пакеты вроде все сходится, есть подозрение что менять что-то нужно в этой части
Код:
        begin
           WeaponID:=ReadD(4);
           LsID:=ReadD(8);
           GemID:=ReadD(12);
           GemCount:=ReadD(16);
        end;
какие пакеты нужно просматривать чтобы что-то подстраивать под свой сервер в этой части скрипта?
dAsk вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Жесткий скриптинг


Опции темы
Опции просмотра

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

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


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

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

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