АвТОзаТоЧкА

[Breadfan]

если не остановить, то, когда заточки закончатся, скрипт будет слать серверу запросы на юз несуществующего итема.

[hopuah1991]

А де взять для эпилога такую темку?

[QaK]

hopuah1991, м.б. переделать самому из существующего?

[Nickers]

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

hopuah1991, м.б. переделать самому из существующего?

Как смещения редактировать под версии? Есть темка такая?
(Я случаем не бред несу?)

[NLObP]

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

Как смещения редактировать под версии?

Берешь конкретный сервер, точишся руками, смотришь пакеты: ItemList, InventoryUpdate. Если во всех предметах видно правильное описание по ItemID (смещение 10 и 78 по рисунку), то смотришь, в например этот кусок скрипта:

procedure ItemList;
var
  i, j, k: integer;
  ListSize: integer;
 begin
   j:=4; //пропускаем дo ListSize
  ListSize:=ReadH(j); 
  for i:=1 to ListSize do
  if (i<=ListSize) then begin
      BaseItems[i,1]:=ReadH(j);  //ItemType1- 1:одето броня. 0:бижа. 4:в рюкзаке
      BaseItems[i,2]:=ReadD(j);  //ObjectID
      BaseItems[i,3]:=ReadD(j);  //ItemID
      BaseItems[i,4]:=ReadD(j);  //LocationSlot
      BaseItems[i,5]:=ReadD(j);  //  q Amount: 
               j:=j+4;           //  q Amount: 
      BaseItems[i,6]:=ReadH(j);  //ItemType2
      BaseItems[i,7]:=ReadH(j);  // CustomType1
      BaseItems[i,8]:=ReadH(j);  //isEquipped: 
      BaseItems[i,9]:=ReadD(j);  //BodyPart
      BaseItems[i,10]:=ReadH(j); //EnchantLevel
        inc(j,30);// ФИНАЛ 
 end else for k:=1 to 10 do BaseItems[i,k]:=0;    // забиваем нулями
 if (0<ItemID) then objectOID:=GetObjectID(ItemID);//находим по ItemID  предмет с ObjectID
 end;

Нас интересуют смещения ObjectID, EnchantLevel и кусочек скрипта - inc(j,30). Так вот. На рисунке, в первом блоке EnchantLevel находится по смещению 36 он размером 2 байта, за ним идет CustType2 смещение 38. Оно нам и надо. В следующем блоке ObjectID по смещению - 74. Вычисляем разницу 74-38=36. Вот поэтому сюда inc(j,30); надо не 30, а 36 вставить. Так как по видимому другие хроники. Процедура должна быть такая:

procedure ItemList;
var
  i, j, k: integer;
  ListSize: integer;
 begin
   j:=4; //пропускаем дo ListSize
  ListSize:=ReadH(j); 
  for i:=1 to ListSize do
  if (i<=ListSize) then begin
      BaseItems[i,1]:=ReadH(j);  //ItemType1- 1:одето броня. 0:бижа. 4:в рюкзаке
      BaseItems[i,2]:=ReadD(j);  //ObjectID
      BaseItems[i,3]:=ReadD(j);  //ItemID
      BaseItems[i,4]:=ReadD(j);  //LocationSlot
      BaseItems[i,5]:=ReadD(j);  //  q Amount: 
               j:=j+4;           //  q Amount: 
      BaseItems[i,6]:=ReadH(j);  //ItemType2
      BaseItems[i,7]:=ReadH(j);  // CustomType1
      BaseItems[i,8]:=ReadH(j);  //isEquipped: 
      BaseItems[i,9]:=ReadD(j);  //BodyPart
      BaseItems[i,10]:=ReadH(j); //EnchantLevel
        inc(j,36);// ФИНАЛ 
 end else for k:=1 to 10 do BaseItems[i,k]:=0;    // забиваем нулями
 if (0<ItemID) then objectOID:=GetObjectID(ItemID);//находим по ItemID  предмет с ObjectID
 end;

С пакетом и процедурой InventoryUpdate, поступаем аналогично.
Кроме этого из лога надо проверить соответствие ID пакетов, тем которые в скрипте. Ну и сама логика заточки в скрипте должна соответствовать хроникам сервера.

[NLObP]

Если описание по ItemId не видно, то надо сначала исправить описание пакетов ItemList, InventoryUpdate в файле packets.ini в комплекте пакетхака под свой сервер.

[rediska32rus]

народ помогите переписать данный скрипт под фрею, сижу пол дня башню ломаю, ничего не выходит при нажатии соц действия "да" пишет "предмет не заточен или пакеты не приняты", плюс ко всему знания в скриптописании равны 0, помогите плз
ps использую последнюю версию хлапы 3.5.33.166
в моих попытках было измение скрипта в этой части
BaseItems[i,1]:=ReadH(j);
BaseItems[i,2]:=ReadD(j);//ObjectID
BaseItems[i,3]:=ReadD(j);//ItemID
BaseItems[i,4]:=ReadD(j);//LocationSlot
BaseItems[i,5]:=ReadD(j);// Amount:
BaseItems[i,6]:=ReadD(j);// Amount:
BaseItems[i,7]:=ReadH(j);//ItemType2
BaseItems[i,8]:=ReadH(j);// CustomType1
BaseItems[i,9]:=ReadH(j);//isEquipped:
BaseItems[i,10]:=ReadD(j);//BodyPart
BaseItems[i,11]:=ReadH(j);//EnchantLevel
после просмотра структуры пакета фреи переделал в следующее
if (i<=ListSize) then begin
BaseItems[i,1]:=ReadH(j);//Show window
BaseItems[i,2]:=ReadH(j);//itemcount
BaseItems[i,3]:=ReadD(j);//objectid
BaseItems[i,4]:=ReadD(j);//itemid
BaseItems[i,5]:=ReadD(j);// locationslot
BaseItems[i,6]:=ReadQ(j);// Amount:
BaseItems[i,7]:=ReadH(j);//ItemType2
BaseItems[i,8]:=ReadH(j);// CustomType1
BaseItems[i,9]:=ReadH(j);//isEquipped:
BaseItems[i,10]:=ReadD(j);//BodyPart
BaseItems[i,11]:=ReadH(j);//EnchantLevel
но результат остался прежним(
еще раз все проверив пришел к выводу что вышепроделанное мной бред

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

Если описание по ItemId не видно, то надо сначала исправить описание пакетов ItemList, InventoryUpdate в файле packets.ini в комплекте пакетхака под свой сервер.

невидно только описание предметов фреи, остальные читает правильно
pss приложил лог заточки предмета(серьга элегии) вроде лишних пакетов о продаже и прочего нет

[NLObP]

rediska32rus, что то ты совсем не то сделал. Дай ссылку на скрипт, патч клиента и тестовый аккаунт. Я завтра вечером могу попробовать.

[Gray314]

to rediska32rus вот возможное решение твое проблемы, покрайней мере мен помогло: http://coderx.ru/showthread.php?t=6043

з.ы. на каком сервере играешь?

[rediska32rus]

NLObP, я использую тот же скрипт что и Gray314, я зашел в его тему, почитал, закоментил нужную строку, но результата нет, даже не определяет нужный уровень заточки, и соответственно ничего не работает, сервер и тестовый акк в личке.

Так после комбинирования настроек хлапы процесс сдвинулся с места теперь все определяет, но есть проблема, нельзя указать уровень заточки, в пакетах отображается что я пишу число 16, но скрипт на ннего не реагирует.

Все скрипт теперь работает, нашел свой старый косяк в скрипте, ОГРОМНОЕ СПАСИБО NLObP за решение проблемы и Gray314, за то что подсказал где посмотреть подобную тему