Скрипт на заточку

[NLObP]

Автоматизация заточки предметов до необходимого уровня by NLObP

Возможности скрипта
--------------------
+ Панель управления;
+ Затачиваем по очереди все предметы с ItemID пока не переломаем
или не заточим. Один предмет всегда остаётся.

Необходимо затариться оружием, заточками и валерьянкой.
Name='NLObP'; //Вписать сюда имя чара
//установить константу в зависимости от типа игры (С4 или Интерлюд)
interlude=true; //Interlude - true, C4 - false

Внимание!
Из комбобокса обязательно надо выбрать вещь, чтобы скрипт узнал
ID и количество, только потом ставить напротив галочку.
Галочки снимать не надо, если кончились заточки/вещи - можно сразу идти
покупать и продолжать заточку.
В инвентаре должно быть не менее двух одинаковых затачиваемых вещей, степень заточки значения не имеет

Скрипт распространяется как есть, и я не несу ответственности за то, что ВЫ натворили у себя, его используя.

by NLObP
для С4 и Интерлюдии можно взять здесь
для Грации можно взять здесь

by Breadfan
скрипт переделанный под камаель (с автопокупкой).

by Shadow
Скрипт заточки предметов с их закупкой при необходимости

Этот скрипт помогает в рутине, когда разрешено пользователям 100% точить до большой величины, скажем до +200, ручками то замучаешься точить.

PS: скрипты - это облегчение рутинной работы человека.

[MarioUP]

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

и чем там секс? тоже самое... только всего 2 варианта:
точка ушла, шмотка точнулась(сломалась)
шмотка точнулась(сломалась), точка ушла
поэтому можно даже не гонять цикл, а просто проверять эти два момента на айди предмета двумя if.

Да это то ясно секс будет со структурой пакета ее не хило потрепали)

[lodek]

NLObP, где в скрипте enchant_by_NLObP_09.rar строка отвечающая за распознавание предметов инвентаря? ItemsID.ini обновил под сервер и прописал к нему путь в скрипте, но всего 2 предмета из списка реально есть в инвентаре. Или в чём может быть проблема? Видит правильно первый предмет из списка и ещё пару.
Кусок из ItemList:

Type:0x11 (ItemList)
Size: 4485+2
Recive time: 14:42:32:831
0002 h  ShowWindow: 1 (0x0001)
0004 h  ItemCount: 70 (0x0046)
              [begin of repeat block  1/70]
0006 h  ItemTypeID: 4 (0x0004)
0008 d  ObjectID: 1075161562 (0x4015A9DA)
000C d  ItemID: Blessed Scroll: Enchant Armor (S) ID:6578 (0x19B2)
0010 d  LocationSlot: 50 (0x00000032)
0014 q  Amount: 1161
001C h  ItemType2: 5 (0x0005)
001E h  CustomType1: 0 (0x0000)
0020 h  isEquipped: 0 (0x0000)
0022 d  BodyPart: 0 (0x00000000)
0026 h  EnchantLevel: 0 (0x0000)
0028 h  CustType2: 0 (0x0000)
002A d  AugmentID: 0
002E d  Mana: -1 (0xFFFFFFFF)
0032 h  AttackElement: 65534 (0xFFFE)
0034 h  AttackElementPower: 0 (0x0000)
0036 h  FireDefElementPower: 0 (0x0000)
0038 h  WaterDefElementPower: 0 (0x0000)
003A h  WindDefElementPower: 0 (0x0000)
003C h  EarthDefElementPower: 0 (0x0000)
003E h  HolyDefElementPower: 0 (0x0000)
0040 h  UnholyDefElementPower: 0 (0x0000)
0042 d  RemainingTime: -9999 (0xFFFFD8F1)
              [End of repeat block  1/70]
              [begin of repeat block  2/70]
0046 h  ItemTypeID: 4 (0x0004)
0048 d  ObjectID: 1075161561 (0x4015A9D9)
004C d  ItemID: Soulshot: S-Grade ID:1467 (0x05BB)
0050 d  LocationSlot: 41 (0x00000029)
0054 q  Amount: 9800
005C h  ItemType2: 5 (0x0005)
005E h  CustomType1: 0 (0x0000)
0060 h  isEquipped: 0 (0x0000)
0062 d  BodyPart: 0 (0x00000000)
0066 h  EnchantLevel: 0 (0x0000)
0068 h  CustType2: 0 (0x0000)
006A d  AugmentID: 0
006E d  Mana: -1 (0xFFFFFFFF)
0072 h  AttackElement: 65534 (0xFFFE)
0074 h  AttackElementPower: 0 (0x0000)
0076 h  FireDefElementPower: 0 (0x0000)
0078 h  WaterDefElementPower: 0 (0x0000)
007A h  WindDefElementPower: 0 (0x0000)
007C h  EarthDefElementPower: 0 (0x0000)
007E h  HolyDefElementPower: 0 (0x0000)
0080 h  UnholyDefElementPower: 0 (0x0000)
0082 d  RemainingTime: -9999 (0xFFFFD8F1)
              [End of repeat block  2/70]
              [begin of repeat block  3/70]
0086 h  ItemTypeID: 4 (0x0004)
0088 d  ObjectID: 1075161560 (0x4015A9D8)
008C d  ItemID: Charm of Courage: S-Grade ID:8520 (0x2148)
0090 d  LocationSlot: 42 (0x0000002A)
0094 q  Amount: 3
009C h  ItemType2: 5 (0x0005)
009E h  CustomType1: 0 (0x0000)
00A0 h  isEquipped: 0 (0x0000)
00A2 d  BodyPart: 0 (0x00000000)
00A6 h  EnchantLevel: 0 (0x0000)
00A8 h  CustType2: 0 (0x0000)
00AA d  AugmentID: 0
00AE d  Mana: -1 (0xFFFFFFFF)
00B2 h  AttackElement: 65534 (0xFFFE)
00B4 h  AttackElementPower: 0 (0x0000)
00B6 h  FireDefElementPower: 0 (0x0000)
00B8 h  WaterDefElementPower: 0 (0x0000)
00BA h  WindDefElementPower: 0 (0x0000)
00BC h  EarthDefElementPower: 0 (0x0000)
00BE h  HolyDefElementPower: 0 (0x0000)
00C0 h  UnholyDefElementPower: 0 (0x0000)
00C2 d  RemainingTime: -9999 (0xFFFFD8F1)
              [End of repeat block  3/70]

Смещение поменял на 48 тут:

begin
  j:=4; //смещение для ListCount
  ListCount:=ReadH(j); //количество итемов не должно превышать max!
  for i:=1 to maxitems do
    if (i<=ListCount) then begin
      BaseItems[i,1]:=ReadH(j);  //ItemType1
      BaseItems[i,2]:=ReadD(j);  //ObjectID
      BaseItems[i,3]:=ReadD(j);  //ItemID
      BaseItems[i,4]:=ReadD(j);  //LocationSlot
      BaseItems[i,5]:=ReadD(j);  //Count
      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
      BaseItems[i,11]:=ReadH(j); //CustType2
      BaseItems[i,12]:=ReadD(j); //AugmentationID
      //debugmsg('OID='+inttostr(BaseItems[i,2])+' ID='+inttostr(BaseItems[i,3]));
      inc(j,48);
    end else for k:=1 to 12 do BaseItems[i,k]:=0; // забиваем нулями

InventoryUpdate заменил на 46

[Breadfan]

дело как минимум в этом -> BaseItems[i,5]:=ReadQ(j); //Count
И насколько помню - аналогично правится функция апдейта итемлиста.

[lodek]

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

дело как минимум в этом -> BaseItems[i,5]:=ReadQ(j); //Count
И насколько помню - аналогично правится функция апдейта итемлиста.

Оставил в инвентаре 5 предметов (адена, заточки и 3 разных вещи, чтоб точить). Комбибокс видел правильно только заточки, они первые в списке и ещё 4 белых поля.
Попробывал заменить в нескольких местах -
BaseItems[i,5]:=ReadD(j); //Count
на
BaseItems[i,5]:=ReadQ(j); //Count
не помогло, стало показывать вещей 40 случайных, в разброс с пустями полями.

[Breadfan]

На твоем примере:
0002 h ShowWindow: 1 (0x0001)
0004 h ItemCount: 70 (0x0046)
[begin of repeat block 1/70]
0006 h ItemTypeID: 4 (0x0004) // отсюда начинается перебор
0008 d ObjectID: 1075161562 (0x4015A9DA)
000C d ItemID: Blessed Scroll: Enchant Armor (S) ID:6578 (0x19B2)
0010 d LocationSlot: 50 (0x00000032)
0014 q Amount: 1161
001C h ItemType2: 5 (0x0005)
001E h CustomType1: 0 (0x0000)
0020 h isEquipped: 0 (0x0000)
0022 d BodyPart: 0 (0x00000000)
0026 h EnchantLevel: 0 (0x0000)
0028 h CustType2: 0 (0x0000)
002A d AugmentID: 0 <<-- вплоть досюда считываются параметры. После ReadD(j) - j должен указывать на ItemTypeID следующего итема. И идет приращивание j (inc(j,X)), чтобы оказаться на следующем итеме. Т.е. к j надо прибавить:
002E d Mana: -1 (0xFFFFFFFF) +4
0032 h AttackElement: 65534 (0xFFFE) +2
0034 h AttackElementPower: 0 (0x0000) +2
0036 h FireDefElementPower: 0 (0x0000) +2
0038 h WaterDefElementPower: 0 (0x0000) +2
003A h WindDefElementPower: 0 (0x0000) +2
003C h EarthDefElementPower: 0 (0x0000) +2
003E h HolyDefElementPower: 0 (0x0000) +2
0040 h UnholyDefElementPower: 0 (0x0000) +2
0042 d RemainingTime: -9999 (0xFFFFD8F1) +4
[End of repeat block 1/70]
[begin of repeat block 2/70]
0046 h ItemTypeID: 4 (0x0004)
0048 d ObjectID: 1075161561 (0x4015A9D9)
004C d ItemID: Soulshot: S-Grade ID:1467 (0x05BB)
0050 d LocationSlot: 41 (0x00000029)

(или иначе $0046 - $002E = $18 = 24)
по-моему получилось - 24, если не ошибаюсь. Это для ItemList. Для апдейтитемлист там несложно пересчитать, по аналогии.

[lodek]

Не знаю, почему и как, в InventoryUpdate высчитал по методу NLObP 46 и для итемлист также считал вначале 48, но потом в ItemList методом научного перебора правильным оказалось 28, всё видит.

1. А что убрать в скрипте, чтоб надо была 1 вещь, а не 2 одинаковых для начала заточки?
2. Оставил в инвентаре 4 вещи: адена, заточки, 2 одинаковые вещи, выбираю желаемый уровень заточки 6, начинает точить и пишет, что достигнул желаемый уровень 32768 (это проблема InventoryUpdate или другая?).

[Breadfan]

инфа 100% что указав +28 ты оставил там как есть ReadD(j)

(все рассуждения из расшифрованого куска ItemList приведенного выше)

[FrankJScott]

In response to the man inquiring about live slot online, bandar togel terbesar dan terpercaya, situs slot promosi, togel hongkong terbaru, angka jitu singapore, situs live casino online, judi slot888 online, game slot web, slot withdraw dana, semua nama situs judi slot online, live slot 4d, poker resmi, I highly recommend this click this link on asian toto casino link or main casino online, situs slot online, slot dana terbaik, setiap permainan, main game slot online, daftar situs slot terbaru, bermain judi online, sports slot, nama situs judi slot online terpercaya, bola terpercaya, situs slot togel 4d, game judi online terpercaya, as well as this what do you think on asian toto casino details together with play idn, judi online game, idn poker terpercaya, slot bisa deposit pulsa, slot dana ovo, bo slot online, situs togel terbesar terpercaya, situs slot asli, keluaran toto, game online dari web, situs slot terpercaya indonesia, pemain slot, and don't forget this website about Asian Toto Casino forum which is also great. Also, have a look at this this contact form for asian toto casino forum and don't forget slot game dana, web togel, result togel singapore, situs live casino, daftar judi togel, daftar situs terbaik, semua situs judi slot online, situs terupdate, judi online live, togel indonesia online, link resmi togel singapore, agen toto terbaik, on top of this best asian toto casino tips which is worth considering with slot member baru, slot online gampang menang, slot baru, situs slot pragmatic, situs togel toto, good for which is worth considering with bandar togel hadiah terbesar, angka jitu angka jitu, info angka togel hari ini, live judi slot, slot indonesia online, and read full report about for good measure. Check more @ Cool Asian Toto Casino Website 30c9ac2