Радар своими руками

[xkor]

Sherman, не боись, всё на местах останется)

[Morfik]

public: virtual void __thiscall UNetworkHandler::RequestPledgeWarList(int,int)

подскажет кто назначение параметров int,int ?) надо как то получить список клан варов, тоесть заствить сервер прислать их список

[alexteam]

1 - хз. второй по идее страница.

[CodeMonkey]

пакет RequestPledgeWarList:d(Unknown)d(Tab)
мне кажется 1 int - unknown, 2 - Tab
1 не ид клана случаем? лови пакет смотри что там первое dword шлется

[Yegor]

D017=RequestPledgeWarList:h(subID)d(Page)d(Tab)

Морфик ты хочешь оправдать платность своего 4гея?

[Morfik]

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

D017=RequestPledgeWarList:h(subID)d(Page)d(Tab)

Морфик ты хочешь оправдать платность своего 4гея?

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

ЗЫ: описание пакетов то я и сам могу прочитать, тока все равно не очень ясно что такое d(Page)d(Tab) - мб одно из них тип варов (кинули вы, кинули вам, двухсторонки). Да и писать хук лишний раз лень, думал мб кто уже делал.

[Yegor]

Morfik, надо посмотреть при премем пактов что означеют эти значения

[Эдвадко]

Это все для того, чтобы высвечивать игроков из кланов с которыми вар ?

Может проще завести файлик с именами игроков и кланов, о которых хочется знать, что они бегают вблизи ?
И при разборе пакетов CharInfo сравнивать имена из файла с именем чара и названием клана ?

Я на клан не проверяю. Только имя и карму.

} 
else if (Cmd==0x31) {//31=CharInfo:
...
  if (AhtungDetected(name) || (Karma>0)) {
    PlaySound("Ahtung.wav", NULL, SND_FILENAME | SND_ASYNC);
    swprintf(wstr, 199,L"Ahtung %s %i", name, Karma);
    WriteUsrW(wstr);
    Chars.SetChar(ObjectID, name, X, Y, RunSpd, MoveMul, 0x0000FF);
} else Chars.SetChar(ObjectID, name, X, Y, RunSpd, MoveMul, 0x7F7FFF);
...

[destructor]

Эдвадко, просто и красиво но есть минус:
если к тебе подкрался только что принятый криса тыха.....

[Эдвадко]

Ну, можно имя клана проверять на в хождение в список ахтунгов.
Да и как техашник подберется если у меня радар ?
А в радаре пока самое полезное это Взятие в таргет -

} else if (Cmd==0x23) { //23=TargetSelected:d(ObjectID)d(TargetID)d(X)d(Y)d(Z)d(0)
  ParseMasked(SavedArg4, d(ObjectID)d(TargetID)d(X)d(Y)d(Z) 0);
  Chars.SetTarget(ObjectID,TargetID);
  swprintf(wstr, 199,L"%s -> %s",Chars.GetName(ObjectID), Chars.GetName(TargetID));
  static DWORD PreviosID = 0;
  if ((TargetID==UserID) && (ObjectID!=PreviosID)) { 
    PreviosID=ObjectID;
    WriteUsrW(wstr);   
	  PlaySound("TargetSelected.wav", NULL, SND_FILENAME | SND_ASYNC);
  } else 
    WriteLogW(wstr);
  fprintf(LogFile,"TargetSelected   %s -> %s %i,%i,%i\n", NAME(ObjectID), NAME(TargetID), X, Y, Z);

да MoveToPawn:

} else if (Cmd==0x72) { //72=MoveToPawn:d(CreatureObjId)d(TargetObjID)d(Distance)d(CreatureX)d(CreatureY)d(CreatureZ)d(TargetX)d(TargetY)d(TargetZ)
  ParseMasked(SavedArg4, d(ObjectID)d(TargetID)d(Distance)d(X)d(Y)d(Z)d(ToX)d(ToY)d(ToZ) 0);
  Chars.SetXY(ObjectID, X, Y);
  Chars.GotoXY(ObjectID, ToX, ToY, Distance);
  swprintf(wstr,100,L"%s %i> %s", Chars.GetName(ObjectID), Distance, Chars.GetName(TargetID));
  if (TargetID==UserID) WriteUsrW(wstr);
  else if (ObjectID!=UserID) WriteLogW(wstr);
  fprintf(LogFile,"MoveToPawn       %s %i> %s  %i,%i,%i -> %i,%i,%i\n", NAME(ObjectID), Distance, NAME(TargetID), X, Y, Z, ToX, ToY, ToZ);

Где по Distance можно прикинуть что именнно противоестественное хочет сделать со мной павнящий чар - 1000 и больше - лучник стрелу хочет всадить в мяккое место, поменьше (около 900-700) - маг скиллом хочет обласкать, еще меньше значит тирант хочет фаербол метнуть, ну а меньше 100 - это значит хотят проткнуть даггером, мечом или пикой.