RS banning script

[WinterDreamZ3]

I'm looking for a script that gets me banned for
Most of the rules

I pay 100 to 200K
it must have

-Auto Spam
-Auto Click on same collor and same time between the clicks

 

[-------owned-------]

Why do you want to get banned?

 

[goller]

Ya lol why?

 

[the scar noob]

kk what the script has to have?? it has to click at a specify place all the time??
Can the character be moving??
And also spam, you have to set the message by your own??
More info plz lol

 

[Town]

Don't buy one, you can get one for free easily. Just look.

-- But I would love to take your money.

 

[WinterDreamZ3]

kk what the script has to have?? it has to click at a specify place all the time??
Can the character be moving??
And also spam, you have to set the message by your own??
More info plz lol

Well if you could fix this script for me i would be happy
I will pay you 50 to 100K if you got it to work

{=========================================================================]
[ Title: Ban Yourself Fast v.4 ]
[ Author: Ron from moparisthebest.com ]
[ Notes: Press F12 to stop. ]
[ ]
[ Instructions: ]
[ 1. Fill out the Const. ]
[ 2. Go to some public place in RuneScape such as varrock west. ]
[ 3. Place the target onto RuneScape. ]
[ 4. Then run the script. ]
[ 5. Add/Del a message if you want. ]
[ 6. Click on Start Script! ]
[ ]
[ Features ]
[ * Guaranteed to get you banned! So don't try this on your main acc! ]
[ * Progress Report of how long the script has been running! ]
[ * Much easier to add your own sentences! ]
[=========================================================================}

program BanYourselfFast;

const
// Wait in between messages.
WaitT = 3000;

var
frmDesign : TForm;
Memo1 : TMemo;
i,n,x,SST : integer;

// Procedure to figure out how long the script has been running for.
function TimeRunning : String;
var
CST, SRT, TiH, TiM, TiS : integer;
begin
// Get current system time.
CST := GetSystemTime;
// Get total seconds by subtracting the StartingST from the CurrentST and dividing
// by 1000. Divide by 1000 to convert milliseconds into seconds.
SRT := (CST-SST)/1000;
// Total in Hours - Converting seconds to hours by multiplying all the
// seconds by 3600. 3600 is obtained by Minutes times Seconds. (60 X 60)
TiH := SRT/3600;
// Time in Minutes - Not quite sure about this one. Kind of lazy...
TiM := SRT/60-TiH*60;
// Time in Seconds - Not quite sure about this one. Kind of lazy...
TiS := SRT-TiM*60-TiH*3600;
Result := IntToStr(TiH)+' Hours '+IntToStr(TiM)+' Minutes '+IntToStr(TiS)+' Seconds';
end;

// display progress report each time you type
procedure ProgressReport;
begin
ClearDebug;
n := n + 1;
WriteLn('/===== Ban Yourself Fast v.4 by Ron =====\');
WriteLn(' Typed: '+IntToStr(n)+' time(s)');
WriteLn(' Ran for: '+TimeRunning);
WriteLn(' Press F12 to end script!');
WriteLn('\========================================/');
end;

procedure StartTalking;
var
a : array of string;
begin
SST := GetSystemTime; // set start system time
SetArrayLength(a, Memo1.Lines.Count); // set array length for "a" array.
// check if any of these are empty
for i := 0 to Memo1.LINES.Count - 1 do
if(Memo1.LINES = '')then
Memo1.LINES.Delete(i)
else
a := Memo1.LINES;

// if the first line is empty then there are 0 messages, so kill script.
if(Memo1.Lines[0] = '')then
begin
GetApplication.MESSAGEBOX('You need to have at least 1 message in the box!','',0);
TerminateScript;
end else // otherwise save messages
SaveSetting('BanYourselfFast','Messages',Memo1.LINES.Text);

{// free memo and form to free up memory.
try // why can't the script free the form!?!?
Memo1.Free;
FreeForm(frmDesign);
except
WriteLn('Could not free form.');
end;}

ActivateClient;
// display messages
while not(isfkeydown(12)) do
begin
SendKeys(a[Random(GetArrayLength(a))] + Chr(13));
ProgressReport;
Wait(WaitT);
end;
end;

procedure ButtonClick(sender : TObject);
begin
frmDesign.MODALRESULT := 1; // kill the form.
x := 1;
end;

procedure ShowHintLines(sender : TObject; Shift: TShiftState; X, Y: Integer);
begin
Memo1.Hint := 'This contains '+IntToStr(Memo1.LINES.Count)+' lines.';
end;

// main init form
procedure InitForm;
var
Button1 : TButton;
Label1 : TLabel;
begin
frmDesign := CreateForm;
with frmDesign do
begin
BorderIcons := [biSystemMenu, biMinimize];
BorderStyle := bsSingle;
Caption := 'Ban Yourself Fast v.4 by Ron';
ClientHeight := 330;
ClientWidth := 440;
Position := poScreenCenter;
end;
Label1 := TLabel.Create(frmDesign);
with Label1 do
begin
Parent := frmDesign;
Left := 60;
Top := 20;
Width := 307;
Caption := 'Ban Yourself Fast and Annoy Jagex!';
Font.Height := -16;
Font.Name := 'Lucida Calligraphy';
end;
Memo1 := TMemo.Create(frmDesign);
with Memo1 do
begin
Parent := frmDesign;
Left := 20;
Top := 60;
Width := 400;
Height := 218;
WORDWRAP := False;
SCROLLBARS := ssBoth; // both scrollbars
if(LoadSetting('BanYourselfFast','Messages') = '')then
begin
LINES.Add('macroing fuckin rules!!!');
LINES.Add('jagex swcks');
LINES.Add('fwck swck spawnk asz fwck shyt');
LINES.Add('andrew swcks bals');
LINES.Add('runescape is gai');
LINES.Add('report me report me fwcker');
LINES.Add('you all eat shyt and also... cwnt prostetute howoker wh0re beitch');
LINES.Add('FWCK YOU ALL!!!');
LINES.Add('autoing rules!!! AUTOING IS AWESOME!!!');
LINES.Add('go to w double u w. yahoo . cee oh em for free porn');
LINES.Add('kaitnieks will never die!!!');
LINES.Add('hey everyone im a mod');
LINES.Add('i macro, i multi login, i impersonate jagex');
LINES.Add('i encourage others to break rules');
LINES.Add('i block adverts, i ask for personal details, i misuse the official forums');
LINES.Add('if you want to block adverts get firefox and download adblock and filterset');
LINES.Add('take out your favorite item and press alt+F4 and enter real fast to dupe items');
LINES.Add('to start autoing on runescape go to w double u w. autoing on runescape . cee oh em');
LINES.Add('i drop trade and share accounts');
LINES.Add('andrew throws ball like a girl');
LINES.Add('andrew is a nerd');
LINES.Add('jagex have small bals and have no cex lives');
LINES.Add('fagex jagex are fwcking ex jag offs and pedofiles');
LINES.Add('jagex bowoger each other all day');
LINES.Add('well ello der shyt face, oh sorry ''bout that love. i thought you were a mod');
LINES.Add('mods become mods by sleeping with mods who fwck andrew');
LINES.Add('jagex people can''t ban people cause their pwenus is too small');
LINES.Add('everyone around me has no life');
LINES.Add('seven dirty words: shit piss fuck cunt cocksucker motherfucker and tits');
LINES.Add('im using an autoer so fuck you all!');
LINES.Add('hey hey check it out, my girth is 5 inches! I''m as big as a donkey! woo!');
LINES.Add('jkhsdfyhasd89fy893890f34 fuck you ladfsldfh2409r43jkwel;fsd92092309480');
end else
begin
TEXT := LoadSetting('BanYourselfFast','Messages');
end;
Hint := 'This contains '+IntToStr(LINES.Count)+' lines.';
ShowHint := True;
ONMOUSEMOVE := @ShowHintLines;
end;
Button1 := TButton.Create(frmDesign);
with Button1 do
begin
Parent := frmDesign;
Left := 20;
Top := 290;
Width := 400;
Caption := 'Start Script and GET BANNED!';
Font.Height := -20;
OnClick := @ButtonClick;
end;
end;

procedure SafeInitForm;
var
V: TVariantArray;
begin
SetArrayLength(V, 0);
ThreadSafeCall('InitForm', V);
end;

procedure ShowFormModal;
begin
frmDesign.ShowModal;
end;

procedure SafeShowFormModal;
var
V: TVariantArray;
begin
SetArrayLength(V, 0);
ThreadSafeCall('ShowFormModal', V);
end;

procedure MainForm;
begin
SafeInitForm;
SafeShowFormModal;
FreeForm(frmDesign);
end;

begin
ClearDebug;
MainForm;
if(x = 1)then
StartTalking;
end.

 

[opoweroil]

you could use a mouse macro which would duplicate your actions... i got 180 black marks by just using an auto typer.