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

L2PacketHack Форум программы L2PacketHack, всё что с ней связано находится тут.
Правила раздела! Обсуждение багов Lineage ЗАПРЕЩЕНО!

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 05.10.2007, 22:00   #1
Новичок
 
Регистрация: 05.10.2007
Адрес: Украина
Сообщений: 19
Сказал Спасибо: 0
Имеет 23 спасибок в 13 сообщенях
DeVolf пока неопределено
По умолчанию Кружок нубов(Вопрос-Ответ)

//QaK:отдельная тема по подкючению пакетхака к серверу >>>>>>>>тут
любые вопросы по данной тематике в этом топе будут удаляться без предупреждения.


Код:
const
mp='8A 1B 15 01 10';
hp='8A 1A 15 01 10';
begin
if fromclient and (pck[1]=#$38#$F5#$00#$EF#$00#$00#$00#$03#$00#$00#$00) then
begin
buf:=hstr(hp);
SendToServer;
end;
if fromclient and (pck[2]=#$33#$F5#$00#$EF#$00#$40#$00#$03#$00#$00#$00) then
begin
buf:=hstr(mp);
SendToServer;
end;
end.
где я ошибся?

Последний раз редактировалось QaK, 30.08.2010 в 18:56.
DeVolf вне форума   Ответить с цитированием
За это сообщение DeVolf нажился 6 спасибками от:
Старый 25.12.2010, 13:35   #1591
Местный
 
Аватар для J-Fobos
 
Регистрация: 09.06.2008
Сообщений: 867
Сказал Спасибо: 175
Имеет 468 спасибок в 259 сообщенях
J-Fobos пока неопределено
По умолчанию

Напоминаю всем:
Цитата:
Правила раздела! Обсуждение багов Lineage ЗАПРЕЩЕНО!
__________________

В любом из нас спит гений. И с каждым днем все крепче.

Переходим на протокол нового поколения jabber
J-Fobos вне форума   Ответить с цитированием
За это сообщение J-Fobos нажился спасибкой от:
Старый 25.12.2010, 19:33   #1592
Новичок
 
Регистрация: 19.10.2010
Сообщений: 1
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
benqush пока неопределено
По умолчанию

сдравствуйте, вот нашол такой скрипт ,показывает в окне персов пол раса профа..
Код:
var
m:TMemo;
frm:TForm;
RaceID, SexID, ClassID, i: Integer;
Message, Name, Sex, Race, Class: String;

procedure Init;
begin
//ShowTab;
frm := TForm.Create(nil);
frm.Caption := 'Char Info!';
frm.BorderStyle := bsSizeable;
frm.Position := poScreenCenter;
frm.Width:=400;
frm.Height:=600;
m:=TMemo.Create(frm);
m.parent:=frm;
m.align:=alClient;
m.ReadOnly:=true;
m.ScrollBars:=ssBoth;
frm.Show;
end;

procedure Free;
begin
m.Free;
frm.Free;
//HideTab;
end;

begin
if FromServer and (pck[1]=#$03) then
  begin
   i:=22;
   Name:=ReadS(i);
   RaceID:=ReadD(i);
   SexID:=ReadD(i);
   ClassID:=ReadD(i);
   case RaceID of
    0:race:='Люди';
    1:race:='Светлые эльфы';
    2:race:='Темные эльфы';
    3:race:='Орки';
    4:race:='Гномы';
    end;
   case SexID of
    0:sex:='Мужской';
    1:sex:='Женский';
    end;
   case ClassID of
    0:class:='H_Fighter';
    1:class:='H_Warrior';
    2:class:='H_Gladiator';
    88:class:='H_Duelist';
    3:class:='H_Warlord';
    89:class:='H_Dreadnought';
    4:class:='H_Knight';
    5:class:='H_Paladin';
    90:class:='H_PhoenixKnight';
    6:class:='H_DarkAvenger';
    91:class:='H_HellKnight';
    7:class:='H_Rogue';
    8:class:='H_TreasureHunter';
    93:class:='H_Adventurer';
    9:class:='H_Hawkeye';
    92:class:='H_Sagittarius';
    10:class:='H_Mage';
    11:class:='H_Wizard';
    12:class:='H_Sorceror';
    94:class:='H_Archmage';
    13:class:='H_Necromancer';
    95:class:='H_Soultaker';
    14:class:='H_Warlock';
    96:class:='H_ArcanaLord';
    15:class:='H_Cleric';
    16:class:='H_Bishop';
    97:class:='H_Cardinal';
    17:class:='H_Prophet';
    98:class:='H_Hierophant';
    18:class:='E_Fighter';
    19:class:='E_Knight';
    20:class:='E_TempleKnight';
    99:class:='E_EvaTemplar';
    21:class:='E_SwordSinger';
    22:class:='E_Scout';
    23:class:='E_PlainsWalker';
    101:class:='E_WindRider';
    24:class:='E_SilverRanger';
    102:class:='E_MoonlightSentinel';
    25:class:='E_Mage';
    26:class:='E_Wizard';
    27:class:='E_SpellSinger';
    103:class:='E_MysticMuse';
    28:class:='E_ElementalSummoner';
    104:class:='E_ElementalMaster';
    29:class:='E_Oracle';
    30:class:='E_Elder';
    105:class:='E_EvaSaint';
    31:class:='DE_Fighter';
    32:class:='DE_PaulusKnight';
    33:class:='DE_ShillienKnight';
    106:class:='DE_ShillienTemplar';
    34:class:='DE_BladeDancer';
    107:class:='DE_SpectralDancer';
    35:class:='DE_Assassin';
    36:class:='DE_AbyssWalker';
    108:class:='DE_GhostHunter';
    37:class:='DE_PhantomRanger';
    109:class:='DE_GhostSentinel';
    38:class:='DE_Mage';
    39:class:='DE_DarkWizard';
    40:class:='DE_Spellhowler';
    110:class:='DE_StormScreamer';
    41:class:='DE_PhantomSummoner';
    111:class:='DE_SpectralMaster';
    42:class:='DE_ShillienOracle';
    43:class:='DE_ShillienElder';
    112:class:='DE_ShillienSaint';
    44:class:='O_Fighter';
    45:class:='O_Raider';
    46:class:='O_Destroyer';
    113:class:='O_Titan';
    47:class:='O_Monk';
    48:class:='O_Tyrant';
    114:class:='O_GrandKhauatari';
    49:class:='O_Mage';
    50:class:='O_Shaman';
    51:class:='O_Overlord';
    115:class:='O_Dominator';
    52:class:='O_Warcryer';
    116:class:='O_Doomcryer';
    53:class:='D_Fighter';
    54:class:='D_Scavenger';
    55:class:='D_BountyHunter';
    117:class:='D_FortuneSeeker';
    56:class:='D_Artisan';
    57:class:='D_Warsmith';
    118:class:='D_Maestro';
   end;
   Message:='Раса: '+race+', Пол: '+sex+', Класс: '+class+'.';
   m.Lines.Add(Name+': '+Message);
  end;
end.
возникло 2 вопроса, 1: можно ли сделать авто сохранение в файл и как
2: как сделать чтобы не повторялись ники..
benqush вне форума   Ответить с цитированием
Старый 25.12.2010, 19:48   #1593
Местный
 
Аватар для Nickers
 
Регистрация: 23.11.2009
Сообщений: 574
Сказал Спасибо: 134
Имеет 117 спасибок в 82 сообщенях
Nickers пока неопределено
По умолчанию

Хм авто сохранение эт нада в TstringList исходную инфу переписывать и там есть встроенное сохранение...
Вот в этой теме есть примеры(с сохранением)...

Как это понять "не повторялись"? Ты про сохранение? Тогда нужно добавлять TStringList массив

delphi Код:
A:array[1..10] of TstringList;

туды все вводить (По счету 1й, 2й, 3й) Добавлять функцию проверки (Когда новый покакет делается проверка в цикле всего массива на переменную Name и при повторении прост выходит и не записывает...)

delphi Код:
function NameRepeat(NameX:string) : boolean; var   i : integer; begin   for i:=1 to max do     if A[i].Name=NameX then begin       result:=True;       exit;     end;   result:=false; end;
delphi Код:
Procedure Init; begin    f:=0; end;
delphi Код:
if FromServer and (pck[1]=#$03) and (not NameRepeat(Read( )) then    begin       inc(f);       A[f].Name:=...
Как-то так исправьте если дурак))

А переписывать скрипт этот мне лично влом))
__________________
Пишу что думаю, но ничего не знаю...
[LameGuard|Скрипты l2phx]

Последний раз редактировалось Nickers, 25.12.2010 в 22:25.
Nickers вне форума   Ответить с цитированием
За это сообщение Nickers нажился спасибкой от:
Старый 26.12.2010, 20:03   #1594
Новичок
 
Регистрация: 26.12.2010
Сообщений: 1
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
саша242 пока неопределено
По умолчанию

подскажите когда распаковую программу пишит :введите пароль для зашифрованного файла ... вопрос какой пароль?)

//J-Fobos: угадайте с 1-го раза

//nlobp: коммент к архиву прочитать никак?

Последний раз редактировалось NLObP, 27.12.2010 в 00:54.
саша242 вне форума   Ответить с цитированием
Старый 29.12.2010, 18:25   #1595
Новичок
 
Регистрация: 29.12.2010
Сообщений: 3
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
B0o0M пока неопределено
По умолчанию

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


29.12.2010 17:18:05 Библиотека C:\Documents and Settings\Влад\Рабочий стол\пх\inject.dll успешно загружена
29.12.2010 17:18:05 Стартует L2ph v3.5.33.166
29.12.2010 17:18:05 На 7788 зарегистрирован локальный сервер
29.12.2010 17:18:10 Надёжно пропатчен новый клиент l2.bin (1668)


Версия хлапы v3.5.33.166
Вот сервер http://only-game.kiev.ua/
Тестовый АК лог : raz123
пароль : raz123

Последний раз редактировалось B0o0M, 29.12.2010 в 19:28.
B0o0M вне форума   Ответить с цитированием
Старый 29.12.2010, 19:15   #1596
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

B0o0M, уважаемый, вы перепутали название программы! В следущий раз называйте её правильно.
__________________
| Для самых ленивый | Телепаты в отпуске |Мы работаем над этим |
Не умеешь - учись, не хочешь учиться - плати © Суровый Закон Жизни


NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от:
Старый 29.12.2010, 22:56   #1597
Местный
 
Аватар для Nickers
 
Регистрация: 23.11.2009
Сообщений: 574
Сказал Спасибо: 134
Имеет 117 спасибок в 82 сообщенях
Nickers пока неопределено
По умолчанию

А еще перепутал тему
Click!

Цитата:
//QaK:отдельная тема по подкючению пакетхака к серверу >>>>>>>>тут
любые вопросы по данной тематике в этом топе будут удаляться без предупреждения.
__________________
Пишу что думаю, но ничего не знаю...
[LameGuard|Скрипты l2phx]

Последний раз редактировалось Nickers, 29.12.2010 в 23:05.
Nickers вне форума   Ответить с цитированием
Старый 13.01.2011, 07:47   #1598
Новичок
 
Регистрация: 13.01.2011
Сообщений: 3
Сказал Спасибо: 1
Имеет 0 спасибок в 0 сообщенях
Dark Maxim пока неопределено
По умолчанию Подскажите мне

Я решил занятся созданию сайтов на PHP. В книжке которую я читаю скрипты пишутся на я зыке С. Вопрос: можно ли писать скрипты на Turbo Pascal 7.0 ? Ведь я его нормально знаю, и не хочу ломать голову над новым я зыком. Да и не как не пойму как компилировать С файлы в скрипты.

Добавлено через 6 минут
Если можно то покажите как написать на Паскале скрипт который отправит браузеру на экран слово МАМА

Последний раз редактировалось Dark Maxim, 13.01.2011 в 07:47. Причина: Добавлено сообщение
Dark Maxim вне форума   Ответить с цитированием
Старый 13.01.2011, 13:07   #1599
Местный
 
Аватар для Nickers
 
Регистрация: 23.11.2009
Сообщений: 574
Сказал Спасибо: 134
Имеет 117 спасибок в 82 сообщенях
Nickers пока неопределено
По умолчанию

Цитата:
CoderX :: Forums > Lineage II > L2PacketHack
Click
__________________
Пишу что думаю, но ничего не знаю...
[LameGuard|Скрипты l2phx]
Nickers вне форума   Ответить с цитированием
Старый 25.01.2011, 17:25   #1600
Новичок
 
Регистрация: 24.01.2011
Сообщений: 3
Сказал Спасибо: 0
Имеет 1 спасибку в 1 сообщении
Никитка990 пока неопределено
По умолчанию

здрасте, ребят кто может помочь сделать визуально из А грейда S к примеру в моём случае это перчатки ну вот читайте
помогите сделать ID вещи через DWord в данном случае МЖ перчи вот от них обжект ID "6B F7 5F 13" или уже переведённые через DWord "325056363" сделать так чтобы грейд у них был не "А" a "S" отсылать пакеты надо к клиенту
Никитка990 вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack



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

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


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

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

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