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

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

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 29.05.2008, 19:29   #1
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,284
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию Скрипт на заточку

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

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

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

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


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

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

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

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

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

PS: скрипты - это облегчение рутинной работы человека.
Миниатюры
Нажмите на изображение для увеличения
Название: Безымянный.JPG
Просмотров: 14624
Размер:	24.8 Кб
ID:	39  
Вложения
Тип файла: rar breadfan_enchant.rar (5.9 Кб, 4142 просмотров)
Тип файла: rar credo_enchant.rar (2.7 Кб, 2270 просмотров)
Тип файла: zip enchant_by_NLObP_01.zip (7.4 Кб, 2786 просмотров)
Тип файла: zip enchant_by_NLObP_02.zip (71.6 Кб, 1390 просмотров)
Тип файла: zip enchant_by_NLObP_03.zip (71.8 Кб, 1200 просмотров)
Тип файла: zip enchant_by_NLObP_04.zip (73.3 Кб, 1531 просмотров)
Тип файла: zip enchant_by_NLObP_06.zip (9.4 Кб, 1200 просмотров)
Тип файла: zip enchant_by_NLObP_07.zip (9.4 Кб, 1507 просмотров)
Тип файла: rar enchant_by_NLObP_08.rar (6.3 Кб, 1790 просмотров)
Тип файла: rar enchant_by_NLObP_09.rar (6.3 Кб, 5450 просмотров)
Тип файла: rar shadow_enchant.rar (9.6 Кб, 3597 просмотров)

Последний раз редактировалось NLObP, 31.08.2009 в 01:20.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 114 спасибками от:
4erteg, 4iter, 8tomat8, abyabar, Agat, Alan, AlexStar, Alta1r, AoWpwnz, aSeSSoR, BEJIEC, bestar, BimSkaLaBim, BioDread, BOTt, Breadfan, BuKbI4, C0derxWarr1or, cadaver, catchy, ChiterEPT, coffee, Comedylife, CriticalError, Crypto, Dagon, DarthShelL, DARTY, David, DeadForz, dfackk, dmitrix, Doberman, dyh9l, dynda2000, eGoIST, Elfinit, ERASE, esk71, Fer123, Fvbkm, Ga6pueL, GanGsta0, GANsss, givemexxx, Gray314, Green, Grinch, Gurg, HooleeCheeter, Hwoarang, idkfa, Imperial2008, Irritant, iSee, jiroo, KPOT^^, KrasX, LamerOK, LeroI, leto, Leviy, lodek, LostQ, LoveCoderX, lPomalSveNl, maxstro, Meth0d, micoach, MONDBLITZ, Necrolity, Nerevar, Niksan, nneett, Op4er, Paulo, Pinko, Piter, Pitkin, Porcupine, Porshesh, Random-al, ReaGeN, ReiN, Ribnadzor, RinZo, RODMAN91, rubela, saidbek, SELLER, Sergey, SexGuru, Shadow, Siberia, skaner, someonce1, Source, TAMBIK, Tanuxa, tiranosaur, Tos, Tzio 7, vahes, VanTG, VasQ, winer, WOLf!, Xelat, YssurTiger, zotrussia, Виталий, Витя, Р0ма, ®ennie™
Старый 06.07.2008, 13:32   #11
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,284
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от Morier Посмотреть сообщение
Packets.ini поставил от YuLaw, пробовал с l2ph 3.1.8, 3.1.9, 3.2.0.
3.1.8 и 3.2.0 выдают такую ошибку

3.1.9 просто виснет...
В списке соединений я не вижу имени чара. Обычно такая ошибка выскакивает из-за несоответствия соединения и настроек скрипта.
К тому же скрипт проверялся на С4 и Интерлюдии.
Для Камаэля есть несоответсвия в пакетах.
В Интерлюдии 58=RequestEnchantItem:d(ObjectID), а в Камаэле 5F=RequestEnchantItem:d(ObjectID).

Последний раз редактировалось NLObP, 06.07.2008 в 13:35.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от:
Старый 15.07.2008, 04:14   #12
Новичок
 
Аватар для eGoIST
 
Регистрация: 22.05.2008
Сообщений: 1
Сказал Спасибо: 3
Имеет 1 спасибку в 1 сообщении
eGoIST пока неопределено
По умолчанию

Цитата:
Для С4, надо внести изменения в procedure CreateItemBase;
...
было --> if interlude then inc(j,12) else inc(j,8);
надо --> if interlude then inc(j,12) else inc(j,4); //для С4 проверено, спасибо Mulder
Изменил все как указано выше, все точит отлично до +4, после этого пишет заточка прервана, а все из-за того что оно видит в моем инвентаре неправильное количество заточек и оружия. Хотя в инвентаре 60 шт. заточек и 40 шт. оружия, программа видит только 4 шт. заточек и 3 шт. оружия, хотелось бы узнать с чем может быть это связано и как исправить, что бы программа видела правильное количество предметов в инвентаре.
PS: Заранее спасибо
eGoIST вне форума   Ответить с цитированием
За это сообщение eGoIST нажился спасибкой от:
Старый 19.07.2008, 00:24   #13
Местный
 
Аватар для Breadfan
 
Регистрация: 29.04.2008
Сообщений: 831
Сказал Спасибо: 80
Имеет 230 спасибок в 169 сообщенях
Breadfan пока неопределено
По умолчанию

Уважаемы NLObP, а как изменить скрипт чтобы перс докупал точи? Пробовал банально добавить проц-ру
PHP код:
procedure Skupka;
begin
//-------------------------------------------------------------------------------------------------
buf:='21 6E 00 70 00 63 00 5F 00 32 00 36 00 38 00 34 00 37 00 34 00 32 00 34 00 37 00 5F 00 6D 00 75 00 6C 00 74 00 69 00 73 00 65 00 6C 00 6C 00 20 00 36 00 38 00 39 00 00 00';
sendtoserver;
buf:='A7 B1 02 00 00 60 E3 16 00 01 00 00 00 00 00 00 00 00 00 00 00';
SendToServer;
end
и потом её вызов
PHP код:
msg.Lines.Add('Пробуем улучшить ItemID='+IntToStr(ItemID)+' ItemOID='+IntToStr(ItemOID));
      
RequestEnchantItem(ItemOID);
      
skupka;
      
ready:=false
Но результата нет
Breadfan вне форума   Ответить с цитированием
За это сообщение Breadfan нажился спасибкой от:
Старый 19.07.2008, 14:31   #14
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,284
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от Breadfan Посмотреть сообщение
Уважаемый NLObP, а как сделать чтоб перс сам докупал заточки?
Сделать что бы покупал можно, но это для каждого сервера будет немного по своему, поэтому делать не буду.
Посмотреть, как это сделать самому, можно в рыбалке и в теме алгоритмов.
Немного подскажу. Надо знать ID продавцов. Знать как продается - обычный магазин/мультиселл. Знать bypass из html-менюшки, который посылать для покупки. Нужно запоминать ListID в ответе продавца.

покупка состоит из следующих шагов:
1. таргет на продавце, пауза, снова таргет (c04=Action, c04=Action)
2. приходит s0F=NpcHtmlMessage:d(MessageID)s(HTML)d(d) - берем из него bypass требуемого пункта меню
3. шлем выбранный пункт из меню c21=RequestBypassToServer:s(Cmd)
4. приходит s11=BuyList:d(Money)h(ListID)w(ListCount)w(ItemTyp e1)h(ObjectID)i(ItemID)d(maxcnt)w(ItemType2)w(h)d( ItemBodyPart)... - берем ListID
5. FindItem(ID) найдем OID, Count нужной вещи по ID - это отдельная процедура поиска в инвентаре и здесь не требуется!
6. шлем c1F=RequestBuyItem:h(ListID)d(BuyCount)i(ItemID)d( Count)i(ItemID)d(Count)

На некоторых серверах не обязятельно подходить к продавцу, на других обязательно. Тоже самое с ListID - на некоторых можно 0 ставить.

Последний раз редактировалось NLObP, 03.08.2008 в 00:51.
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 2 спасибками от:
Старый 19.07.2008, 17:17   #15
Новичок
 
Аватар для raid
 
Регистрация: 01.07.2008
Адрес: Пермь
Сообщений: 21
Сказал Спасибо: 0
Имеет 37 спасибок в 10 сообщенях
raid пока неопределено
По умолчанию

Цитата:
Сообщение от NLObP Посмотреть сообщение
Сделать что бы покупал можно, но это для каждого сервера будет немного по своему, поэтому делать не буду.
Посмотреть, как это сделать самому, можно в рыбалке и в теме алгоритмов.
Как вариант:
Делаешь функцию настройки скрипта:
В ПМ пишеться: выдели нпц, выбери пункт меню, купи 5 точек, используй одну точку на любом оружие...

Всё довольно просто после чего сохраняешь параметры в стринглист тот же и в файл.

PS: Жаль что на l2r.ru сложная шифрация пакетов, которую я одолеть не могу, так бы было много скриптов от меня(автокачающийся ВК был бы точно) ну и карту бы закончил в dll.
__________________
Emo-chan style.
raid вне форума   Ответить с цитированием
За это сообщение raid нажился 2 спасибками от:
Старый 19.07.2008, 17:49   #16
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,284
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от eGoIST Посмотреть сообщение
А я могу услышать ответ на свой вопрос, или оно настолько сложный, что даже нечего ответить ?
Скрипт писался под Интерлюд. Пакеты отличаются в С4 и в Интерлюде (в конце вроде 8 байт и 4 байт лишних). Я проверить не могу, так как на сервере сменили защиту (lagam.net). Чем я еще могу помочь? Для всех я тоже не могу проверять и так 9 разных клиентов. Только если ты сам будешь ковыряться и проверишь, какие надо внести изменения в скрипт, чтобы заработало.

Скорее всего это в
Код:
procedure CreateItemBase; //пакет 1B, Создает базу ObjectID по ItemID
...
    if interlude then inc(j,12) else inc(j,8);
и в
Код:
procedure InventoryUpdate; //пакет 27, обновляет базу ObjectID по ItemID
...
    if interlude then inc(j,10) else inc(j,2);
PS: какой у тебя сервер?

Добавлено через 2 минуты
Цитата:
Сообщение от raid Посмотреть сообщение
Как вариант:
Делаешь функцию настройки скрипта:
В ПМ пишеться: выдели нпц, выбери пункт меню, купи 5 точек, используй одну точку на любом оружие...

Всё довольно просто после чего сохраняешь параметры в стринглист тот же и в файл.
Может сделаешь? Я ведь не всё умею.

Последний раз редактировалось NLObP, 19.07.2008 в 17:49. Причина: Добавлено сообщение
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 2 спасибками от:
Старый 19.07.2008, 18:08   #17
Новичок
 
Аватар для raid
 
Регистрация: 01.07.2008
Адрес: Пермь
Сообщений: 21
Сказал Спасибо: 0
Имеет 37 спасибок в 10 сообщенях
raid пока неопределено
По умолчанию

Цитата:
Сообщение от NLObP Посмотреть сообщение
Может сделаешь? Я ведь не всё умею.
http://coderx.ru/showpost.php?p=11661&postcount=545
Для тебе больше важен BufferBot.txt именно сам процес бафа и использования переменной BS - BuffStep.

Идея довольно простая... Учись.
__________________
Emo-chan style.
raid вне форума   Ответить с цитированием
За это сообщение raid нажился 2 спасибками от:
Старый 20.07.2008, 14:28   #18
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,284
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от eGoIST Посмотреть сообщение
Играю я на С4, вообщем изменил значения в procedure CreateItemBase и procedure InventoryUpdate, а именно:
Код:
procedure CreateItemBase; //пакет 1B, Создает базу ObjectID по ItemID
..............
if C4 then inc(j,4) else inc(j,8);
Код:
procedure InventoryUpdate; //пакет 27, обновляет базу ObjectID по ItemID
..............
if C4 then inc(j,2) else inc(j,10);
И все стало работать отлично
Вроде именно так я и предлагал поменять.
CreateItemBase;
if interlude then inc(j,12) else inc(j,4); //для С4 проверено, спасибо Mulder

Эта процедура была правильной:
procedure InventoryUpdate;
if interlude then inc(j,10) else inc(j,2);
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от:
Старый 28.07.2008, 23:29   #19
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,284
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от korp Посмотреть сообщение
а как сделать чтоб скрипт точил предмет до определённого уровня и если он ломался то начинал точить следующий?
Как сейчас сделано, больше шанс, что по максимуму заточится. Теоритически можно и по одному сделать, только я уже не буду делать. Посмотри в теме, выложены еще два скрипта, может там как раз то, что надо?

Добавлено через 1 минуту
Цитата:
Сообщение от andrey93 Посмотреть сообщение
а есть для камельки такая штука??
Для Камаеля другие пакеты нужны, если напишешь, какие там используются, могу и поправить.

Последний раз редактировалось NLObP, 28.07.2008 в 23:29. Причина: Добавлено сообщение
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился 2 спасибками от:
Старый 02.08.2008, 03:23   #20
Новичок
 
Аватар для NeRv1k
 
Регистрация: 02.08.2008
Сообщений: 8
Сказал Спасибо: 0
Имеет 2 спасибок в 1 сообщении
NeRv1k пока неопределено
По умолчанию


Что делать ??? Запуска на С6 имя прописал
NeRv1k вне форума   Ответить с цитированием
За это сообщение NeRv1k нажился 2 спасибками от:
Ответ

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


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

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

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


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

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

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