Working Chronicles walker

[dmitry501]

<<SKIP>>

I copy pasted the script from you

 

 

Heh, you unhide author first post ^)

 

P.S.

sltbnjr, replace CHR(ORD()) with PInt(). Working faster.

[Boter+]

XorString contains the xor values loop

'i-4' because the encryption starts at fourth byte

 

'and 7' because the loop is 8 bytes long... the effect of the 'and' here is to mask the higher bits. This will result in 0-1-2-3-4-5-6-7-0-1.....

 

'+1' because delphi indices start at 1 instead of 0

Ammm, seems easy. But i would have it done in another way. I usually put the loops outside, you put the loop inside(in the index of the string). :)

[DNEEJ]

release new update and now walker stoped to working...cuz of new IP, but change ip in walker and WP dont help...maybe need new script?

[destay]

only change the IP to the current one, it still works..

[DNEEJ]

only change the IP to the current one, it still works..

 

dunno why...but for me is fail ;/

[sltbnjr]

Heh, you unhide author first post ^)

 

P.S.

sltbnjr, replace CHR(ORD()) with PInt(). Working faster.

L2 tcp connections aren't time critical

or at least not that much.

[dmitry501]

L2 tcp connections aren't time critical

or at least not that much.

Run 10 walkers with this script. And you see slow work :)

[destay]

yep I think dmitry is right xD dunno the difference tho but the system messages sometimes start showing only when you click on the walker to be on top :P and sometimes it has trouble logging in, but thats normal right? :P

[kuako300]

hey dmitry501 do u know how to set up a script for use Blessing of Queen buff?

[sltbnjr]

god you just have to merge them

 

you're never gonna learn anything if you just keep asking people to do everything for you

var
XorString : string;
Message : string;
gserver : boolean;
i : integer;

Procedure OnCreate;
begin
//gSys.tLA2BFToken:= 'a%S[{&*-94}^#%xx-P]a'+#0;
XorString := HStr('00 00 00 12 18 85 a0 00');
end;

function Crypt(buffer : string): string;
begin
  for i := 4 to length(buffer) do begin
    buffer[i] := Chr(ord(buffer[i]) xor ord(XorString[((i-4) and 7)+1]));
  end;
  Result := Buffer;
end;

begin
  if(not _gfromserv) and (_gAbsNumPkt=3) then begin
     gserver := true;
  end;
  if (not _gFromServ) and (copy(_gBuff,3,1)=#$38) then begin
    ScanPck5(_gBuff,4,'s',Message,null,null,null,null);
    if Message = 'Cat'+#0 then begin
      GSys.EnSendS(crypt(HStr('0C 00 45 EF 03 00 00 00 00 00 00 00')));
      gBlockPacket;
    end;
  end;
  if gserver and (length(_gBuff)>3) then begin
     _gOutBuff:=Crypt(_gBuff);
  end;
end.

[jdman2002]

thnx! 15 post heheh

[jdman2002]

sorry to post again, but its not working, maybe some change on server's security? if u can edit and put all the info together you're my hero, tnx!

 

ps: the loginserver ip now is 67.228.134.114 port 2106 and protocol version 685

 

[Hirion]

no puedo verlo asta ke no tenga 15 post!!!

 

[kuako300]

sorry to post again, but its not working, maybe some change on server's security? if u can edit and put all the info together you're my hero, tnx!

 

ps: the loginserver ip now is 67.228.134.114 port 2106 and protocol version 685

 

 

 

mmm they updated to C5 and dont work anymore

[gacha]

since i didn't try the walker before it was c5, i wanna ask if no1 can run it now? when it's c5?

or there's still people who can connect? thanks