helpme pleseeee T.T

01/01/2009 11:11 gdlink#1
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;
01/01/2009 15:02 Aimless Angel#2
GIVEN WARNING FOR POSTING IN A NO QUESTION AREA! READ THE RULES!

~moved~
01/02/2009 00:39 gdlink#3
dear Aimless Angel thousand apologies, I do not speak English and germany

plese reply me my question :(
-----------------------------------------------------------------------------------------


here is the problem, specifically "(pos('7200',CurHex) <> 0)"I delete, the program works(regular works)
ergo*

if (pos('00xx00',CurHex) <> 0) then xx=skill id

What language used by the program and that wrong?

I sure this will help those who have problem

The rpe and filter ds (regular works): [Only registered and activated users can see links. Click Here To Register...]

open the rpe
Select process (Ragnarokclient)
extras,filter,custom filter
load the filter
press build
Active Custom Filter
enjoy!
01/06/2009 20:51 ChibiEbil#4
The program uses Delphi.

Hideki