Раньше в бандитах такие пвп были народ бегал целые кланы на разборки приходили весело а ща ТИШИНА
Добавлено через 2 часа 56 минут
delphi Код:
ar
Heading,i, j, k: integer;
Message,Title :string;
begin
If FromServer then
case pck[1] of
#$0C: if ((ReadD(6)>=1018257) and (ReadD(6)<=1018286))then begin
i:=26;
Heading:=ReadD(i);
i:=i+95;
j:=i;
Title:=readS(i);
k:=i;
buf:=copy(pck,1,j-1);
Message:=''+Title+''+'='+ ''+inttostr(Heading)+'';
WriteS(Message);
j:=length(buf);
buf:=buf+copy(pck,k,length(pck)-k+1);
pck:='';
SendToClient;
end;
end;
end.
так разные цифры
могет можно попроще сделать я прост неумею