АвТОзаТоЧкА

[Белый]

Что-то может помочь от автокика?

[TAMBIK]

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

[Pirat48]

TAMBIK, чёт попробывал оч долго точит так и должно?
заточит на +2 и остоновится на оч долгое время есть заного не нажать соц действие да так и не прододолжит.
Скрипт обалденый ток у меня чёт оч плоха пашет.
http://i058.radikal.ru/0912/98/99bcdded3abe.jpg стопорится

http://i043.radikal.ru/0912/1d/6741f190b8b7.jpg настройки всё на минимум поставил

http://i034.radikal.ru/0912/df/118c1f9b4267.jpg если инвентарь открыть то продолжается!

[Shooters]

Тамбик или другие шарящие . помогите уже который раз здесь спрашиваю - реакции на вопрос 0. Надеюсь на этот вопрос мне ответят

Сервер http://lineage-hell.servegame.com/ . запускаю л2пнх (3.4.8.1.38 вроде такой) при вводе логина/пароля он просто не заходит на сервер. вырубаю пакет хак - происходит дисконнект. Все делал как написанно. помогите плз! Очень прошу!

[Pirat48]

скачай новый 3.5

[TAMBIK]

Shooters,
все что вам надо найдете у меня в подписи
прога и гайд

[Maxima]

Здравсвуйте, вообщем настроил скрипт от Тамбика для Финала, на свой сервер, там пакеты были другие, я их правил и скрипт работает, спасибо за скрипт Тамбик. Проблема в том, что скриптом можно точить только на одном аккаунте. Вообщем попробывал переделать следующие строки

     const

   myname ='MypKo'; //<<== пишем свой НИК

   max = 200;//<<== колличество ячеек в рюкзаке

   chat = 3;// <<== какой ЧАТ выводить сообщения
==========================================
ВЫРЕЗАНО по причине, Ограничение колва знаков на форуме
==========================================
procedure OpenInventory;//открыть инвентарь.14=RequestItemList
begin
buf:=hstr('2F');
SendToServerEx(myname);
end;
//=========================
procedure RequestActionUse;
begin
case ReadD(2) of
  12:begin autoMsg:=true;end; 
  13:begin autoMsg:=false;end; 
 24:begin
   if (maxlvl=0) then SendMsg2 ('   Неуказан Уровень Заточки ');
   if (autostart=false) then SendMsg2( 'предмет незаточен или пакеты неприняты !' );
   if autostart and (maxlvl>0) then begin
      SendMsg2( '     ! ! !   П О Е Х А Л И    ! ! !' );
      SendMsg2( '_______________________________' );
     start:=true;
      GetItemID ;
      end;
     end;
 25:begin
    stopEnchantItem;// остановка скрипта
    SendMsg2( '         ! ! !   С Т О П   ! ! ! ' );
    stopselectskrol;
   end;
end;
end;
//=========
procedure  stopEnchantItem;// остановка скрипта
begin 
  autoMsg:=true;
  start:=false;
  deleteBase;
  enchantID:=0;
  ItemEnch:=0;
  stopselectskrol;// отмена выбора скролл
  SendMsg2 ('     ___ О С Т А Н О В Л Е Н О ___ ');
  Timer01.enabled:=false;
  Timer02.enabled:=false;
  Timer03.enabled:=false;
  end;
//=========
begin
//не обрабатываем пустые пакеты
  if pck='' then exit; 
 if (ConnectName=myname) and FromServer and (pck[1]=#$11) then begin ItemList;end;
 if (ConnectName=myname) and FromServer and (pck[1]=#$7C) then begin ChooseInventory;end;
 if (ConnectName=myname) and FromClient and (pck[1]=#$38) then begin Resultmaxlvl;pck:='';exit;end;  
 if (ConnectName=myname) and FromClient and (pck[1]=#$15) then begin RequestActionUse;pck:='';exit;end; 
begin
 if (start=false) and (ConnectName=myname) and FromClient then   
    case pck[1] of
 #$0C:begin 
       t:=0;
  OpenInventory;//открыть инвентарь
  skrolObjectID:=0;
  skrolID:=0;
  skrolObjectID:=ReadD(2);
  skrolID:= Getitem(skrolObjectID,2,3);//находим по ObjectID скрол с ItemID
 stopselectskrol;
 if (skrolID = 0) then SendMsg2(' . SKROLL  ID  НЕТ .' );
 if (skrolID > 0) then begin 
      t:=1;
  sumskrol:=0;
  sumskrol:=Getitem(skrolID,3,5);
    SendMsg2(' .................' );
    SendMsg2('   активирован SKROLL  ID : '+IntToStr(skrolID)+'  =  '+IntToStr(sumskrol)+' ШТ' );
    SendMsg2(' .................' );
     end;end;
 #$43:if  ReadH(2)=76 then  begin
       l:=1;
       SendMsg2('   Выбор Предмета для Заточки ' );
       SendMsg2(' .................' );
     end;
 #$65:begin
    enchantObjectID:=0;
    enchantObjectID:=ReadD(2);
    itemOID:=0;
    itemOID:=Getitem(enchantObjectID,2,3);//находим по ObjectID предмет с ItemID
 if (itemOID > 0) then begin
         d:=1; 
 if (t=1) and (l=1) and (d=1) then begin
   autostart:=true;
   SendMsg2 (' заточен предмет  c  ID  :  '+IntToStr(ItemOID)+'  ');
   SendMsg2(' .................' );
   addIDtoarray(ItemOID);//добавляем в базу ID предмета
   stopselectskrol;
  end;
end;
end;
end;
end;
end.

Теперь я так понял что пакеты(в строках которые я изменил) не отсылаются/принимаются, на сервер/ от клиента. Собственно вопрос, можно ли с помощью Пакетхака и соответственно переделав Скрипт от Тамбик, точить на нескольких аккаунтах, и где моя ошибка. Спасибо заранее. За ответ буду безгранично благодарен.
с/y

[TAMBIK]

в скрипте
Tип: 0x19 (UseItem)
19 79 C1 18 40 00 00 00 00
skrolObjectID:=ReadD(2); считываем

Tип: 0x5F (RequestEnchantItem)
5F 7A C1 18 40
enchantObjectID:=ReadD(2);считываем
и т.д

те надо все пакеты проверять
и делать как у тебя

проще от MKS скрипт переделать
и там поднимали вопрос с теми же пакетами как у тебя

[Maxima]

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

в скрипте
Tип: 0x19 (UseItem)
19 79 C1 18 40 00 00 00 00
skrolObjectID:=ReadD(2); считываем

Tип: 0x5F (RequestEnchantItem)
5F 7A C1 18 40
enchantObjectID:=ReadD(2);считываем
и т.д

те надо все пакеты проверять
и делать как у тебя

проще от MKS скрипт переделать
и там поднимали вопрос с теми же пакетами как у тебя

Или я тебя не понял или ты меня
В нормальном виде скрипт у меня работает, я нашел все нужные пакеты для заточки и правил их в скрипте. Проблемма в том что если я хочу использовать паралельно второе соединение(то бишь второй подключенный акк) для заточки у меня начинаются глюки. Почему это происходит, я понимаю, а именно изза того что скрипт перехватывает пакеты от клиента и сервера сразу от обоих соединений в итоге получается киш миш. Я попробывал ето исправить тем что дописал в скрипте где идет перехват Соц Действий итд.. команду (ConnectName=myname) в скрипте выделил красным цветом, Тем самым как я понимаю я перехватываю эти пакеты только с соединения myname. Но что то не пашет, ето видно из того что когда я теперь нажимаю соц действие на заточку, он у меня етот пакет не тормозит а пропусакет дальше. Надеюсь ты понимаешь о чем я? от МКС я не хочу переделывать скрипт, так как у него там два таймера для моего серва нужно 3, там переделывать короче больше нужно, да и не вижу смысла, твой мне в полне подходит)) буду рад ответу

[alexteam]

1. поубирать все эти (ConnectName=myname)
2. SendToServerEx(myname) позаменать на SendToServer
3. в ините добавить одну строчку:
UseForConnectName := myname;
она заменит все эти ненужные на уровне скрипта проверки и "лишний текст".
4. отметить к исполнению и проверить работоспособность.
5. создать еще один такой же скрипт и сменить в нем имя на имя второго персонажа. отметить к исполнению.
6. повторят 5й пункт если нужно.

Добавлено через 2 минуты
описание действия переменной UseForConnectName можно найти тут
http://l2phx.pp.ru/arhive/l2ph_help/...=scripting.htm