Работа над Goddess of Destruction (part 6)

[R2D2]

ребят, поделитесь плиз пакетиками новыми типа ExUser ExNpc ExPet итд, просто хочу глянуть что в новых хрониках появилось, а с пакетиками этими у меня туго

Вот Вам пакетики смотрите

[VenomRaider]

как раз то что искал, прям от души тебе за это......=)))))

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

[Hint]

ребят, поделитесь плиз пакетиками новыми типа ExUser ExNpc ExPet итд, просто хочу глянуть что в новых хрониках появилось, а с пакетиками этими у меня туго

[SRC=Pascal]procedure TGameStream.ExUserInfoPacket(Packet: TGamePacket);
var
I: Integer;
Flags: TGamePacketBitFlags;
// ...

function ReadBlockSize(Fixed: Integer = 0): Integer;
begin
Result := Packet.ReadH;
if (Fixed > 0) and (Result <> Fixed) then raise EBadPacket.Create('Invalid block size!');
end;

begin
with Packet do
begin
Player.ObjectId := ReadD;
ReadH; // Size
ReadH;

Flags := ReadBitFlags(23);

if Flags[0] then
begin
ReadD;
end;

if Flags[1] then
begin
ReadBlockSize;

Player.Name := ReadS2;
ReadC;
Player.Race := ReadC;
Player.Sex := ReadC;
Player.BaseClassId := ReadD;
Player.ClassId := ReadD;
Player.Level := ReadC;
end;

if Flags[2] then
begin
ReadBlockSize(14);

Player.Str := ReadH;
Player.Dex := ReadH;
Player.Con := ReadH;
Player.Int := ReadH;
Player.Wit := ReadH;
Player.Men := ReadH;
end;

if Flags[3] then
begin
ReadBlockSize(14);

Player.MaxHP := ReadD;
Player.MaxMP := ReadD;
Player.MaxCP := ReadD;
end;

if Flags[4] then
begin
ReadBlockSize(38);

Player.HP := ReadD;
Player.MP := ReadD;
Player.CP := ReadD;
Player.SP := ReadQ;
Player.Exp := ReadQ;
Player.ExpProgress := ReadF;
end;

if Flags[5] then
begin
ReadBlockSize(3);

ReadC;
end;

if Flags[6] then
begin
ReadBlockSize(15);

Skip(13); // Hair Style, Hair Color, Face
end;

if Flags[7] then
begin
ReadBlockSize(5);

ReadC;
Player.PrivateStoreType := ReadC;
ReadC;
end;

if Flags[8] then
begin
ReadBlockSize(56);

ReadH;
Player.PAtk := ReadD;
Player.PAtkSpd := ReadD;
Player.PDef := ReadD;
Player.EvasionRate := ReadD;
Player.Accuracy := ReadD;
Player.CriticalHit := ReadD;
Player.MAtk := ReadD;
Player.MAtkSpd := ReadD;
Player.PAtkSpd := ReadD;
Player.MAccuracy := ReadD;
Player.MDef := ReadD;
Player.MEvasionRate := ReadD;
Player.MCriticalHit := ReadD;
end;

if Flags[9] then
begin
ReadBlockSize(14);

Player.Elements.Fire := ReadH;
Player.Elements.Water := ReadH;
Player.Elements.Wind := ReadH;
Player.Elements.Earth := ReadH;
Player.Elements.Holy := ReadH;
Player.Elements.Dark := ReadH;
end;

if Flags[10] then
begin
ReadBlockSize(18);

Player.Pos.X := ReadD;
Player.Pos.Y := ReadD;
Player.Pos.Z := ReadD;
ReadD;
end;

if Flags[11] then
begin
ReadBlockSize(18);

for I := 1 to 4 do
begin
ReadH; // Run Speed
ReadH; // Walk Speed
end;
end;

if Flags[12] then
begin
ReadBlockSize(18);

ReadF;
ReadF;
end;

if Flags[13] then
begin
ReadBlockSize(18);

ReadF;
ReadF;
end;

if Flags[14] then
begin
ReadBlockSize(5);

Player.Elements.AttackType := ReadC;
Player.Elements.AttackPower := ReadH;
end;

if Flags[15] then
begin
ReadBlockSize;

Player.Title := ReadS2;
ReadH; // Subdivision
Player.Clan.Id := ReadD;
ReadD;
Player.Clan.CrestId := ReadD;
ReadD;
ReadC;
Player.Clan.AllyId :=ReadD;
Player.Clan.AllyCrestId := ReadD;
ReadC; // PartyRoom
end;

if Flags[16] then
begin
ReadBlockSize(22);

Skip(12); // PvP, Karma, Noble, Hero, Pledge Class, PK
Player.PvP := ReadD;
Player.Recomendations := ReadH;
ReadH; // Recomendations Left
end;

if Flags[17] then
begin
ReadBlockSize(11);

Skip(9);
end;

if Flags[18] then
begin
ReadBlockSize(9);

Skip(7);
end;

if Flags[19] then
begin
ReadBlockSize(4);

ReadC;
Player.IsStanding := ReadBoolC;
end;

if Flags[20] then
begin
ReadBlockSize(10);

Player.NameColor := ReadD;
Player.TitleColor := ReadD;
end;

if Flags[21] then
begin
ReadBlockSize(9);

Skip(7);
end;

if Flags[22] then
begin
ReadBlockSize(13);

Skip(11);
end;

EndOfPacket;
end;

// ...
end;[/SRC]

[Reiner]

Как вы ассемблером дастаете - точный код на C++ из Engine.dll ???

[Pendant]

Как вы ассемблером дастаете - точный код на C++ из Engine.dll ???

off

Ручками, ручками...:Olen':

[darkevil]

Как вы ассемблером дастаете - точный код на C++ из Engine.dll ???

IDA + HexRay

P.S. Кто вам сказал про точный код? Это декомпил причем на столько паршивый что проще разбираться в асме чем в декомпиле, декомпил иногда помогает понять некоторую суть происходящую в некоторых механизмах и не более, точный код как был у программеров нксофт так там и остался. :redlol:

[Reiner]

IDA + HexRay

P.S. Кто вам сказал про точный код? Это декомпил причем на столько паршивый что проще разбираться в асме чем в декомпиле, декомпил иногда помогает понять некоторую суть происходящую в некоторых механизмах и не более, точный код как был у программеров нксофт так там и остался. :redlol:

У меня еще хуже декомпил получался, мне нужно одну lib подключить к Engine.dll предварительно кое что оттуда вырезав(Адреса) это просто ужасно сложно(забросил на время), завидую тем кто это умеет как нечего делать.

[BoneBreaker]

А не подскажете правильный опкод ExUserInfo для текущего птс клиента руоффа 929?

У меня новые пакеты получились как то так:

Список

Код:

/*[0xFE:0x14E]*/ExValidateActiveCharacter,
        /*[0xFE:0x14F]*/ExCloseCommissionRegister,
        /*[0xFE:0x150]*/ExTeleportToLocationActivate,
        /*[0xFE:0x151]*/ExNotifyWebPetitionReplyAlarm,//
        /*[0xFE:0x152]*/ExEventShowXMasWishCard,
        /*[0xFE:0x153]*/ExInvitation_Event,//new Epesod
        /*[0xFE:0x154]*/ExInvitation_Event_1,//new Epesod 2
        /*[0xFE:0x155]*/ExCheckAbusing,//new
        /*[0xFE:0x156]*/ExPathToAwakening,
        /*[0xFE:0x157]*/ExPutEnchantScrollItemResult,
        /*[0xFE:0x158]*/ExRemoveEnchantSupportItemResult,
        /*[0xFE:0x159]*/ExShowCardRewardList,//
        /*[0xFE:0x15A]*/ExGmViewCharacterInfo,
        /*[0xFE:0x15B]*/ExUserInfo,
        /*[0xFE:0x15C]*/ExUserInfoEquipSlot,
        /*[0xFE:0x15D]*/ExUserInfoCubic,
        /*[0xFE:0x15E]*/ExUserInfoAbnormalVisualEffect,
        /*[0xFE:0x15F]*/ExUserInfoFishing,
        /*[0xFE:0x160]*/ExPartySpelledInfoUpdate,
        /*[0xFE:0x161]*/ExDivideAdenaStart,
        /*[0xFE:0x162]*/ExDivideAdenaCancel,
        /*[0xFE:0x163]*/ExDivideAdenaDone,
        /*[0xFE:0x164]*/ExPetInfo,
        /*[0xFE:0x165]*/ExSummonInfo,
        /*[0xFE:0x166]*/ExNpcInfo,
        /*[0xFE:0x167]*/ExAcquirePotentialSkillList,
        /*[0xFE:0x168]*/ExStartLuckyGame,
        /*[0xFE:0x169]*/ExBettingLuckyGame,
        /*[0xFE:0x16A]*/ExTraining_Zone,
        /*[0xFE:0x16B]*/ExTraining_Zone_1,
        /*[0xFE:0x16C]*/ExPeriodicHenna,
        /*[0xFE:0x16D]*/ExNpcInfoState,
        /*[0xFE:0x16E]*/ExNpcInfoAbnormalVisualEffect,
        /*[0xFE:0x16F]*/ExShowPotentialSkillList,
        /*[0xFE:0x170]*/ExUserInfoInven,
        /*[0xFE:0x171]*/ExClosePotentialSkillList,
        /*[0xFE:0x172]*/ExEnchantOneOk,
        /*[0xFE:0x173]*/ExEnchantOneFail,
        /*[0xFE:0x174]*/ExEnchantOneRem,
        /*[0xFE:0x175]*/ExEnchantOneRem1,
        /*[0xFE:0x176]*/ExEnchantTwoOk,
        /*[0xFE:0x177]*/ExEnchantTwoFail,
        /*[0xFE:0x178]*/ExEnchantTwoRem,
        /*[0xFE:0x179]*/ExEnchantTwoRem1,
        /*[0xFE:0x17A]*/ExEnchantSuccess,
        /*[0xFE:0x17B]*/ExEnchantFail,
        /*[0xFE:0x17C]*/ExAccountAttend,
        /*[0xFE:0x17D]*/ExBeautyItemList;

[Mifesto]

ну как бы на руофе сей час 558 протокол, даже на корее нет 929

[BoneBreaker]

ну как бы на руофе сей час 558 протокол, даже на корее нет 929

Не тот клиент, который общий на скачку. А тот который на ПТС2.