FILTER spam DS
library rPE_ex;
uses
windows,
Winsock2,
winsock,
rpefuncs;
function Send_WS1(s: TSocket; var Buf : PChar; len, flags: Integer; pSendWs1, pRecvWs1, pSendWs2, pRecvWs2: Pointer; var IsWorking : Boolean):Integer; stdcall;
var
CurHex: string;
i : integer;
begin
CurHex := GetBufferAsHex(buf, len);
if (pos('7200',CurHex) <> 0) and (pos('002E00',CurHex) <> 0) then
begin
@Send_Callback := pSendWs1;
for i := 0 to 100 do // How often this packet will be sent. Change to suit your server.
begin
sleep(15); // The delay (Time in ms). You can change this value to best align with your server.
SendPacket(s,CurHex);
end;
end;
result := 0;
end;
procedure DLL_Load;
begin
IntLog('C:\rpe_log.log');
end;
procedure DLL_UnLoad;
begin
Running := false;
EndLog;
end;
procedure DLLMain(dwR: integer);
begin
case dwR of
DLL_PROCESS_ATTACH:
DLL_Load;
DLL_PROCESS_DETACH:
DLL_UnLoad;
end;
end;







