GetSocketData(SSockl,Packet,2); //я так понимаю считываются 2 первых байта
  if Thread[id].IsGame then begin //Если уже в игре
    Thread[id].AutoPing:=True; // устанавливаем автопинг (зачем хз  :) )
  end;
  IsGamel:=Thread[id].IsGame; 
  Thread[id].NoUsed:=False; //Резервируем поток? а где это проверяется?
  if L2PacketHackMain.CheckBox2.Checked and (not IsGamel) then begin //если не игровые можно пропустить
    send(CSockl,PacketB,2,0); // это что? в пакет копируем первые 2 байта?
    repeat until send(CSockl,PacketB,recv(SSockl,PacketB,$FFFF,0),0)<=0; //скачиваем весь пакет?
  end else repeat 
 //иначе скачиваем пакет без 2х байт откуда берется Size? Или я не догоняю
    if not GetSocketData(SSockl,Packet.DataB,Packet.Size-2) then Break;
// тут понятно в обработчик пакетов отправляем пакет и идентификатор типа пакета - в/из игровой/логин
    if IsGamel then PacketProcesor(PacketB,CSockl,id,4)
      else PacketProcesor(PacketB,CSockl,id,2);
    if not GetSocketData(SSockl,Packet,2) then Break; // а это что?
  until False; //тоже строчечка  %)