Thekneegrow
|
 Spam bot? |
|
Anyone have a golbal spammer?
|
|
|
|
|
Nerrevar
|
Joined: 7th Apr 2009
Location: That suspicious looking tree over there ----->
|
|
| Re: Spam bot? |
|
Just use Jimmyee's EoBot. |
|
|
|
|
|
tstarkley
|
Joined: 4th Apr 2009
Location: USA
|
|
| Re: Spam bot? |
|
Nerrevar posted: (22nd Feb 2010 01:05 pm)
Just use Jimmyee's EoBot.
Lol.
|
 It is proven that 90% of teens would have a mental breakdown if Miley Cyrus where to stand on the edge of a 6-story building.
Post this in your signature if your are the 10% yelling "JUMP b***h!!
|
|
|
|
Failurebot
|
| Re: Spam bot? |
|
|
or you can just use a scar script!
______________________________
program Glb_Spammer;
var Time,Run:Integer;
procedure WriteStr(Str:String);
var i,c:Integer; Check:string; Bool:Boolean;
begin
Check:='ABCDEFGHIJKLMNOPQRSTUVWXYZ!@#$%^&*()~_+{}:"<>?';
for i:=1 to length(Str) do
begin
c:=Pos(StrGet(Str,i),Check);
Bool:=(C>0);
if (Bool) then
begin
KeyDown(16);
end;
KeyDown(GetKeyCode(StrGet(Str,i)));
Wait(15);
KeyUp(GetKeyCode(StrGet(Str,i)));
if (Bool) then
begin
KeyUp(16);
end;
Wait(50);
end;
end;
begin
Time:=20;
if(FindWindow('Endless Online'))then
begin
ActivateClient;
repeat
repeat
Wait(50);
until(GetTimeRunning-Run>Time*1000);
Run:=GetTimeRunning;
WriteStr('~Works now!'+#13);
until(IsFKeyDown(9))
end else
begin
Writeln('Endless Online Not Found!');
TerminateScript;
end;
end.
|
- I'm high
- I'm flying
- I'm dieing
|
|
|
|
coolpro
|
| Re: Spam bot? |
|
Failurebot posted: (23rd Feb 2010 04:52 am)
or you can just use a scar script!
______________________________
program Glb_Spammer;
var Time,Run:Integer;
procedure WriteStr(Str:String);
var i,c:Integer; Check:string; Bool:Boolean;
begin
Check:='ABCDEFGHIJKLMNOPQRSTUVWXYZ!@#$%^&*()~_+{}:"<>?';
for i:=1 to length(Str) do
begin
c:=Pos(StrGet(Str,i),Check);
Bool:=(C>0);
if (Bool) then
begin
KeyDown(16);
end;
KeyDown(GetKeyCode(StrGet(Str,i)));
Wait(15);
KeyUp(GetKeyCode(StrGet(Str,i)));
if (Bool) then
begin
KeyUp(16);
end;
Wait(50);
end;
end;
begin
Time:=20;
if(FindWindow('Endless Online'))then
begin
ActivateClient;
repeat
repeat
Wait(50);
until(GetTimeRunning-Run>Time*1000);
Run:=GetTimeRunning;
WriteStr('~Works now!'+#13);
until(IsFKeyDown(9))
end else
begin
Writeln('Endless Online Not Found!');
TerminateScript;
end;
end.
what does this scrip do does it only spam on globle?
|
|
|
|
|
|
