SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
kushal - SRL Member Application Form
kushal

What is the meaning to life?


Where you Referred to SRL? If yes, by whom?
no


Programming Knowledge
Some HTML

Other Communitys
Sythe, Fagex, Ex-SCAR mod on RSGhetto

How Long have You Played Runescape
3-4 Years

Are you affilated in anyway with Jagex LTD?
No
—————————————————–
Please write down a paragraph about Yourself.

I was a SCAR section mod on RSghetto.com but then it got closed down. I am very trusted on Sythe.org and have been on Fagex.net a bit too. I know quite a bit about SCAR, but i stopped scripting a while back, all my made scripts were on RSghetto.com and when my computer got formatted i lost them all. I had one left which a friend of mine had with him, so i thought ill post it. It isn't compatiable with SRL 4 and is preety old, i was thinking i will start scripting again and learning new fuctions when i'm a SRL member. On all sites my name is and was kushal.

——————————————————
Please Post a Sample of your Work. Only SCAR Scripts Accepted

program PowerMinerForm;
{.include SRL/SRl.scar}
var//Form Vars
  frmDesign : TForm;
  Label1 : TLabel;
  Label2 : TLabel;
  Label3 : TLabel;
  Label4 : TLabel;
  Label7 : TLabel;
  RockType : TComboBox;
  ChatsOfff : TComboBox;
  RunDirection : TComboBox;
  RandChat : TComboBox;
  Button1 : TButton;
  Button2 : TButton;
var
  hfrmDesign : TForm;
  hLabel1 : TLabel;
  hLabel2 : TLabel;
  hLabel3 : TLabel;
  hLabel4 : TLabel;
  hLabel5 : TLabel;
  hLabel6 : TLabel;
  hLabel7 : TLabel;
  hLabel8 : TLabel;
  hLabel9 : TLabel;
  hLabel10 : TLabel;
  hLabel11 : TLabel;
  hButton1 : TButton;
{------------------------}
var
 Rock, RunDir, Chats, RandC, Tin, Copper, Iron, Gold : String;
 TinColor, CopperColor, IronColor, GoldColor,
 Clay, OreMask, OresMined, Loads, RockColor : Integer;
 ChatsO, RandCh : Boolean;

 //----------------------------------------
Const
  LoadsToDo = 100;//How many loads?
  VNumber = '3.2';//Please dont touch.
//-----------------------------------------

procedure DeclarePlayers;
begin
  HowManyPlayers :=2;
  NumberOfPlayers(HowManyPlayers);
  CurrentPlayer:=0;

  Players[0].Name :='Namehere';
  Players[0].Pass :='PassHere';
  Players[0].Nick :='ame'; //Few letters from the name for the antirandoms sake.
  Players[0].Active:=True;

  Players[1].Name :='Namehere';
  Players[1].Pass :='PassHere';
  Players[1].Nick :='ame'; //Few letters from the name for the antirandoms sake.
  Players[1].Active:=True;
end;

procedure CloseHelp(sender: TObject);
begin
  hfrmDesign.Caption := hfrmDesign.Caption + '.';
  hfrmDesign.ModalResult := mrOk;
end;

procedure InitHelpForm;
begin
hfrmDesign := CreateForm;
hfrmDesign.Left := 250;
hfrmDesign.Top := 114;
hfrmDesign.Width := 696;
hfrmDesign.Height := 480;
hfrmDesign.Caption := 'PowerMiner Help';
hfrmDesign.Color := clBtnShadow;
hfrmDesign.Font.Color := clMaroon;
hfrmDesign.Font.Height := -15;
hfrmDesign.Font.Name := 'Roman';
hfrmDesign.Font.Style := [];
hfrmDesign.Visible := False;
hfrmDesign.PixelsPerInch := 96;
hLabel1 := TLabel.Create(hfrmDesign);
hLabel1.Parent := hfrmDesign;
hLabel1.Left := 234;
hLabel1.Top := 44;
hLabel1.Width := 6;
hLabel1.Height := 17;
hLabel2 := TLabel.Create(hfrmDesign);
hLabel2.Parent := hfrmDesign;
hLabel2.Left := 274;
hLabel2.Top := 29;
hLabel2.Width := 137;
hLabel2.Height := 22;
hLabel2.Caption := 'PowerMiner Help!';
hLabel2.Font.Color := clMaroon;
hLabel2.Font.Height := -19;
hLabel2.Font.Name := 'Roman';
hLabel2.Font.Style := [fsUnderline];
hLabel2.ParentFont := False;
hLabel3 := TLabel.Create(hfrmDesign);
hLabel3.Parent := hfrmDesign;
hLabel3.Left := 11;
hLabel3.Top := 74;
hLabel3.Width := 658;
hLabel3.Height := 17;
hLabel3.Caption :=
'To start this script fill out the form, Then drag the crosshair ' +
'over to the RuneScape screen and press';
hLabel4 := TLabel.Create(hfrmDesign);
hLabel4.Parent := hfrmDesign;
hLabel4.Left := 30;
hLabel4.Top := 96;
hLabel4.Width := 649;
hLabel4.Height := 17;
hLabel4.Caption :=
'play to start this script. If the script is having trouble findi' +
'ng the rock then edit the colors on lines';
hLabel5 := TLabel.Create(hfrmDesign);
hLabel5.Parent := hfrmDesign;
hLabel5.Left := 33;
hLabel5.Top := 122;
hLabel5.Width := 638;
hLabel5.Height := 17;
hLabel5.Caption :=
'391-398. If there is any over problems contact me on kushal' +
'4@gmail.com ';
hLabel6 := TLabel.Create(hfrmDesign);
hLabel6.Parent := hfrmDesign;
hLabel6.Left := 32;
hLabel6.Top := 144;
hLabel6.Width := 650;
hLabel6.Height := 17;
hLabel6.Caption :=
'@Gmail.com, only contact me on those adresses if you are having ' +
'major problems. If it isn'#39't a major';
hLabel7 := TLabel.Create(hfrmDesign);
hLabel7.Parent := hfrmDesign;
hLabel7.Left := 30;
hLabel7.Top := 164;
hLabel7.Width := 245;
hLabel7.Height := 17;
hLabel7.Caption := 'problem post it on the scripts thread.';
hLabel8 := TLabel.Create(hfrmDesign);
hLabel8.Parent := hfrmDesign;
hLabel8.Left := 302;
hLabel8.Top := 225;
hLabel8.Width := 90;
hLabel8.Height := 22;
hLabel8.Caption := 'Infomation!';
hLabel8.Font.Color := clMaroon;
hLabel8.Font.Height := -19;
hLabel8.Font.Name := 'Roman';
hLabel8.Font.Style := [fsUnderline];
hLabel8.ParentFont := False;
hLabel9 := TLabel.Create(hfrmDesign);
hLabel9.Parent := hfrmDesign;
hLabel9.Left := 13;
hLabel9.Top := 281;
hLabel9.Width := 668;
hLabel9.Height := 17;
hLabel9.Caption :=
'This script was made by me,(Kushal) and it is 100% free! if you h' +
'ave brought this script you have been ';
hLabel10 := TLabel.Create(hfrmDesign);
hLabel10.Parent := hfrmDesign;
hLabel10.Left := 34;
hLabel10.Top := 304;
hLabel10.Width := 641;
hLabel10.Height := 17;
hLabel10.Caption :=
'scammed, If you have been scammed there nothing i can do sorry, ' +
'just report them for selling my';
hLabel11 := TLabel.Create(hfrmDesign);
hLabel11.Parent := hfrmDesign;
hLabel11.Left := 36;
hLabel11.Top := 326;
hLabel11.Width := 410;
hLabel11.Height := 18;
hLabel11.Caption := 'script and i will back you up. My name on all sites is Kushal.';
hLabel11.Font.Color := clMaroon;
hLabel11.Font.Height := -16;
hLabel11.Font.Name := 'Roman';
hLabel11.Font.Style := [];
hLabel11.ParentFont := False;
hButton1 := TButton.Create(hfrmDesign);
hButton1.Parent := hfrmDesign;
hButton1.OnClick := @CloseHelp
hButton1.Left := 321;
hButton1.Top := 377;
hButton1.Width := 75;
hButton1.Height := 25;
hButton1.Caption := 'Close!';
hButton1.TabOrder := 8;
end;


procedure SafeInitHelpForm;
var
  v: TVariantArray;

begin
  SetArrayLength(V, 0);
  ThreadSafeCall('InitHelpForm', v);
end;


procedure ShowHelpFormModal;
begin
  hfrmDesign.ShowModal;
end;


procedure SafeShowHelpFormModal;
var
  v: TVariantArray;


begin
  SetArrayLength(V, 0);
  ThreadSafeCall('ShowHelpFormModal', v);
end;

procedure ShowHelp(sender: TObject);
begin
  frmDesign.Caption := frmDesign.Caption + '.';
  SafeInitHelpForm;
  SafeShowHelpFormModal;
end;

procedure Start(sender: TObject);
begin
  frmDesign.Caption := frmDesign.Caption + '.';
  frmDesign.ModalResult := mrOk;
end;

procedure InitForm;
begin
frmDesign := CreateForm;
frmDesign.Left := 250;
frmDesign.Top := 114;
frmDesign.Width := 696;
frmDesign.Height := 450;
frmDesign.Caption := 'PowerMiner V3 By Kushal';
frmDesign.Color := clBtnShadow;
frmDesign.Font.Color := clMaroon;
frmDesign.Font.Height := -13;
frmDesign.Font.Name := 'Roman';
frmDesign.Font.Style := [];
frmDesign.Visible := False;
frmDesign.PixelsPerInch := 96;
Label1 := TLabel.Create(frmDesign);
Label1.Parent := frmDesign;
Label1.Left := 216;
Label1.Top := 47;
Label1.Width := 221;
Label1.Height := 24;
Label1.Caption := 'PowerMiner V3 By Kushal!';
Label1.Font.Color := clMaroon;
Label1.Font.Height := -21;
Label1.Font.Name := 'Roman';
Label1.Font.Style := [fsUnderline];
Label1.ParentFont := False;
Label2 := TLabel.Create(frmDesign);
Label2.Parent := frmDesign;
Label2.Left := 219;
Label2.Top := 116;
Label2.Width := 200;
Label2.Height := 15;
Label2.Caption := 'What Is The Rock You Want To Mine?';
Label3 := TLabel.Create(frmDesign);
Label3.Parent := frmDesign;
Label3.Left := 221;
Label3.Top := 151;
Label3.Width := 175;
Label3.Height := 15;
Label3.Caption := 'Do you Want To Turn Off Chats?';
Label4 := TLabel.Create(frmDesign);
Label4.Parent := frmDesign;
Label4.Left := 224;
Label4.Top := 231;
Label4.Width := 306;
Label4.Height := 15;
Label4.Caption := 'What direction Do You Want To Run If A Fight Is Found?';
Label7 := TLabel.Create(frmDesign);
Label7.Parent := frmDesign;
Label7.Left := 222;
Label7.Top := 192;
Label7.Width := 175;
Label7.Height := 15;
Label7.Caption := 'Do You Want To Randomly Talk?';
RockType := TComboBox.Create(frmDesign);
RockType.Parent := frmDesign;
RockType.Left := 70;
RockType.Top := 109;
RockType.Width := 145;
RockType.Height := 23;
RockType.ItemHeight := 15;
RockType.TabOrder := 8;
RockType.Text := 'Rock Type?';
RockType.Items.Add('Tin');
RockType.Items.Add('Copper');
RockType.Items.Add('Iron');
RockType.Items.Add('Gold');
ChatsOfff := TComboBox.Create(frmDesign);
ChatsOfff.Parent := frmDesign;
ChatsOfff.Left := 70;
ChatsOfff.Top := 148;
ChatsOfff.Width := 145;
ChatsOfff.Height := 23;
ChatsOfff.ItemHeight := 15;
ChatsOfff.TabOrder := 9;
ChatsOfff.Text := 'Chats Off?';
ChatsOfff.Items.Add('True');
ChatsOfff.Items.Add('False');
RunDirection := TComboBox.Create(frmDesign);
RunDirection.Parent := frmDesign;
RunDirection.Left := 69;
RunDirection.Top := 227;
RunDirection.Width := 145;
RunDirection.Height := 23;
RunDirection.ItemHeight := 15;
RunDirection.TabOrder := 10;
RunDirection.Text := 'Run Direction';
RunDirection.Items.Add('N');
RunDirection.Items.Add('E');
RunDirection.Items.Add('S');
RunDirection.Items.Add('W');
RandChat := TComboBox.Create(frmDesign);
RandChat.Parent := frmDesign;
RandChat.Left := 70;
RandChat.Top := 187;
RandChat.Width := 145;
RandChat.Height := 23;
RandChat.ItemHeight := 15;
RandChat.TabOrder := 13;
RandChat.Text := 'Random Chat?';
RandChat.Items.Add('True');
RandChat.Items.Add('False');
Button1 := TButton.Create(frmDesign);
Button1.Parent := frmDesign;
Button1.OnClick := @Start;
Button1.Left := 278;
Button1.Top := 356;
Button1.Width := 64;
Button1.Height := 25;
Button1.Caption := 'Start!';
Button1.TabOrder := 14;
Button2 := TButton.Create(frmDesign);
Button2.Parent := frmDesign;
Button2.OnClick := @ShowHelp
Button2.Left := 351;
Button2.Top := 356;
Button2.Width := 69;
Button2.Height := 24;
Button2.Caption := 'Help!';
Button2.TabOrder := 15;
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 SetupAll;
begin
  Rock := RockType.Text;
  RunDir := RunDirection.Text;
  Chats := ChatsOfff.Text;
  RandC := RandChat.Text;
 case Rock of
  'Tin'    : Rock := Tin;
  'Copper' : Rock := Copper;
  'Iron'   : Rock := Iron;
  'Gold'   : Rock := Gold;
 end;
 case Chats of
  'True'  : ChatsO := True;
  'False' : ChatsO := False;
 end;
 case RandC of
  'True'  : RandCh := True;
  'False' : RandCh := False;
 end;
end;

procedure Write(Text : String);
begin
  WriteLn(Text)
end;

procedure LoadColors;
begin
  Write('Loading Colors...')
  TinColor    := 9539996;
  CopperColor := 5541863;
  IronColor   := 2832988;
  GoldColor   := 2017267;
end;

procedure LoadBitmaps;
begin
Write('Loading Bitmaps..')  //These bitmaps were from a guy on RSghetto.com when it closed down i lost his name.
  Clay := BitmapFromString(4, 4, '86714C89734D8B7650907A52978' +
       '1569781569A8357957E55A1895CA38B5D9F875B9C8559AC9262A8' +
       '8F60A58D5FA1895C');

  OreMask := BitmapFromString(11, 11, 'z78DA73730301033070436' +
       '2238B60024C35B84CC0A5923C13F0BB937813F0EB22DE04CC5022' +
       'CF04CADD404CC890EA0BFCE2F85D4E4C6A212FF470998FCC0600F' +
       'B599CC1');
end;

procedure ModSetRun(Run: Boolean);
var
  WX, WY: Integer;

begin
Write('Setting The Run...')
  GameTab(11);
  if Run then
  begin
    if (not (FindColorTolerance(WX, WY, 1711220, 663, 431, 665, 433, 5))) then
    begin
      Mouse(648, 431, 20, 20, true);
      Wait(100+Random(100));
    end;
  end else
  begin
    if FindColorTolerance(WX, WY, 1711220, 663, 431, 665, 433, 5) then
    begin
      Mouse(648, 431, 20, 20, true);
      Wait(100+Random(100));
    end;
  end;
end;

procedure MyAntiBan;
begin
  case 1 + Random(6) of
    1 : BoredHuman;
    2 : PickUpMouse;
    3 : HoverSkill('random', false);
    4 : RandomMovement;
    5 : RandomRClick;
    6 : GameTab(1 + Random(13));
  end;
end;

function FindFastRandoms: Boolean;
var
  i: Integer;
begin
Status('Finding Randoms...');
  for i:=1 to 7 do
  begin
    case I of
     1:  If FindDead then
           Result := True;
     2:  If FindMod then
           Result := True;
     3:  If FindMime then
           Result := True;
     4:  If FindMaze then
           Result := True;
     5:  If FindQuiz then
           Result := True;
     6:  If FindDemon then
           Result := True;
     7: begin
           if NoGameTab then
           begin
             Result := True;
                  if(not(solvefrog)or (solvesandwich)) then
                  begin
             Logout;
             terminatescript;
             Exit;
           end;
         end;
         end;
     7: begin
           if InBlack then
           begin
             Result := True;
             if(not(solvefrog)or (solvesandwich)) then
             begin
             Logout;
             terminatescript;
             Exit;
           end;
         end;
       end;
    end;
    wait(2);
  end;
end;

procedure FindRandoms;
begin
setupsandwich;
FindNormalRandoms;
  if ( not ( LoggedIn )) then Exit;

  if ( not ( UseBoxSolver )) then
    if FindNewBox and
     not ( GambleNewBox ) then
     begin
       Logout;
       Exit;
     end;
  Wait(1);
  if NoGameTab then
  begin
     if(not(solvefrog)or (solvesandwich)) then
     begin
    Logout;
    Exit;
    end
    end
    else
    FindFastRandoms;
  FindNormalRandoms;
  findtalk;
  findmod;
  finddead;
  findmime;
  FindDemon;
  FindLamp(LampSkill)
  Wait(1);
  Releasesandwich;
end;

procedure IfFight;
begin
if (FindFight) then
  begin
    RunWhere(RunDir, True);
    Wait(10000 + random(200))
    RunBack;
  end;
end;

procedure SetOreColor;
begin
  case RockType.Text of
    'Tin'    : RockColor := TinColor;
    'Copper' : RockColor := CopperColor;
    'Iron'   : RockColor := IronColor;
    'Gold'   : RockColor := GoldColor;
  end;
end;

procedure IfChats;
begin
If ChatsO = True then
  ChatsOff;
end;

procedure RandomChatt;
begin
if RandCh = True then
  RandomChatEvery(5+random(10));
end;

procedure DropOres;
begin
  If (invfull) = True Then
  DwarfItem;
  ClickAllItemsBmpMaskTolWait('rop', OreMask, 20, 25, 30 + Random(30));
  ClickAllItemsBmpTolWait('rop', Clay, 10, 30 + Random(30));
end;

procedure PReport;
begin
Write('|---------------------------------------|')
Write('|    Kushal''s PowerMiner Version ' + VNumber +'|')
Write('|---------------------------------------|')
Write('|                                       |')
Write('|       Time Worked: ' + TimeRunning+ ' |')
Write('| Current Time:  ' + TheTime+ '         |')
Write('| Total Ores Mined: ' + IntToStr(OresMined)+ ' |')
Write('|---------------------------------------|')
Write('|---------------------------------------|')
end;

procedure MineRock;
begin
  repeat
    If (FindColorSpiral(x,y,RockColor,3,3,515,336)) then
    Begin
      Mmouse(x, y, 3, 3)
      Wait(10+Random(10));
      if (IsTextAt2(x, y, 'ine', 5) = True) then
      begin
        Mouse(x, y, 1, 1, True)
        Flag;
        FindNormalRandoms;
      end;
    end;
  Until(InvFull)
  if (invfull) = True Then
  begin
    OresMined := OresMined + 27;
    Loads := Loads + 1;
  end;
end;

begin
  SafeInitForm;
  SafeShowFormModal;
  SetupAll;
  SetupSRL;
  LoadColors;
  SetOreColor;
  LoadBitmaps;
  SRLRandomsReport;
  ActivateClient;
  ModSetRun(True);
  repeat
  IfChats;
  MineRock;
  DropOres;
  RandomChatt;
  MyAntiBan;
  FindRandoms;
  PReport;
  until(Loads = LoadsToDo)
  if Loads = LoadsToDo then
  LogOut;
end.

——————————————————
<!– END TEMPLATE: formanswers –>

The script is pretty messy, lot places where SRL could've been used a lot more,
for example IsTextAt2, SRL has IsUpText(UpText: string), which is much simplier, easier and propably better.

Not too much failsafes, No DTMs, no FreeBitmap used, its really simple,
and that "Write" procedure is completely useless, just takes 3 extra lines.

To become SRL Member:

1. FailSafes.
2. Multiplayer well utilized.
3. AntiRandoms, and better put in, not like all of them at a time (my 0.02$)
4. Your own good cool Antiban procs/functions will be +
5. Complex, good script.

YoHoJo, close?


But anyways, Kushal, dont get discouraged. Learn, atleast try, the most of the stuff I told and apply in a month, or more if you think youre not ready in a month.

What he said^
You also didn't use multilayer correctly, i see no NextPlayer(False) in your script.
I will close after he receives more feedback.

Oke

SILLY GOOSE

OH MY GOD!!!

Congratulations!!!!!

I KNEW NO-ONE WOULD USE ISTEXTAT2!!!!

Ill whip you a "50th bust pic"

Looky:
JAD has alot of copybusts to do to catch on lol

Speaking of JAD, where is he?

ROFL
Nice pic thanks.
JAD is taking a break from SRL because its taking over his life he says.

Okay…

Im activity 99% and my life couldnt be better =)

who the hell is Arr0w, and what do u mean busted, if u r saying i copied this script, i never did. I made it when i was on RSghetto.com even go to rstrades.com and ask the admin if i was a SCAR mod there, or if i made scripts. I've made a lot more than this one alone.

"Okay i'm not going to go into to mcuh detail but this is my powerminer 3.1 with forms, it took me about a week to make cos forms kept mucking u, so here it is."

^ wtf is that, its like obvious its not his. This is unfair, i try to contribute to these forums and u go around saying busted or some shit.

Lol, a noob who got bustend and then says we are noobs.
BTW Arr0w is a scripter, you are a leecher, if not proove otherwise by writing a powerfisher. If you can write a powerminer you can write a powerfisher too :)

lol, YOU? A Scripts Section MOD?

ROFLMAO

The script has to compile anyways so i think its a no-go..

It's a no for me.
You don't use multiplayer correctly and have no failsafes. Don't get discouraged, though! Look at some other people's scripts to see how they use multiplayer and such.

Kikwit, he copied, thats an auto no.

Yeah lol, you dont have to be friendly for copiers, they can be discouraged lmao.

Close already plx? Unless, arr0w (didn't look at link, just read the kushal's post) copied this script from him. Too much drama.. Just, ehh, make a new script and try again in 30 days.

EDIT: Congratz on 50th copybust :spot:

Oh, also.

From: n3ss3s
Okay…

Im activity 99% and my life couldnt be better =)

What life?

roflmao

My life peeking at people using my script through SRL Stats ofcourse.

I voted yes so i could be known as the one who always votes yes on copied app's
(why not, it will be locked anyway ;) )

From: pwnaz0r
I voted yes so i could be known as the one who always votes yes on copied app's
(why not, it will be locked anyway ;) )

Except for that one time..Everyone decided it would be funny to vote yes, and Fakawi was away on holiday, and just glanced at the overwhelming numbers of Yes and let them in…….then they leeched all the scripts..even posted them on RS Official forums….

Ok, maybe I exaggerated that last part a little bit :rolleyes:

@Kushal…So Arrow copied you huh….that Dirty Rat….

I have never heard of Arr0w before, and even look at what he said, "Okay i'm not going to go into to mcuh detail but this is my powerminer 3.1 with forms, it took me about a week to make cos forms kept mucking u, so here it is."

thats like 100% obvious he copied it off someone, and that someone being me. "not going into much detail but this is my powerminer, he says, that is 100% obvious u should b able to see through that.

And yes i was a SCAR section mod, ages ago when SRL was new and scripting was mainly done with normal SCAR. I even told u, go to RST and ask any admin there.

Don't accuse me of something i didn't do, if u don't want me to be an SRL member fine. But don't say i copied someone else when it is obvious they copied me.


And to to markus im not a leacher u retart and i've never heard of Arr0w before, and doubt anyone else has either.

http://www.srl-forums.com/forum/member.php?u=2289

Well, Unfortunately He hasn't been active in quite a few months, so maybe that's why you haven't heard of him, or thought you could get away with copying his script….

BTW, here is links to the first versions of it if you are interested…did he copy those from you as well ?

http://www.srl-forums.com/forum/showthread.php?t=4559

http://www.srl-forums.com/forum/showthread.php?t=3924

http://www.srl-forums.com/forum/showthread.php?t=3980

http://www.srl-forums.com/forum/showthread.php?t=3897

http://www.srl-forums.com/forum/showthread.php?t=3591

Unfortunately it's not uncommon for people to apply with copied scripts…..and i will give you this bit of advice….it's better to come clean now…then keep digging your hole deeper……So Is there anything else you would like to add ?

~RAM

and BTW it's RETARD…..not ReTART….

A Retard is a person with slowed mental or physical development. Originally bred as a source of amusement, retards have over the years come to dominate politics, business, academia, and the arts.

ok, fine if u dont believe me i dont care, but im telling you i never copied anyone, but tell me this, the only script he ever released is a power miner, and thats the the script i put in here and i made last year. he double posted in almost all his threads and idk how the hell he became an SRL member with my script and when i try to use it u say its copied and no.

I understand why u say no, but if i had come to this site before u would have known, this isn't the only script i've made, ill get my other scripts from my friend if i can, then post them here and prove im not copying someone else's script.

And if u go to this link http://www.villavu.com/forum/showthread.php?t=2942?t=3591

u can see in the script that the username in there for an account is Pur3min3r44, that was my first ever account i macroed on, but is now banned. I've got screenshots of me on that account too. When i get them ill post them here.

and at the end i think u all owe me an apology.


and i know its retard, but i say retart, ive said that for ever and im not going to change cause u decided u need to prove ur english is better than mine.

And to to markus im not a leacher u retart and i've never heard of Arr0w before, and doubt anyone else has either.

Thats not very nice is it Kushal? Markus aint a retart his a awesome scripter :). (Retart is a weird word btw)

Just make a Leet script with banking, DTM and etc and come back and apply again :)

Exactly. Even if you didnt copy this, you need to make a better script anyway.

I personally think this script was copied given the evidense. But another reason is you aren't taking this with a good attitude.

I would rather someone say the copied and are sorry, and try again in 30 days with their own script, than a person who says they didn't do it, call people a retard, and continue saying they didn't copy EVEN tho we have those other scripts to show.



retards have over the years come to dominate politics, business, academia, and the arts.

are they talking about George Bush, or soon to be Hilary Clinton?

he called me a leecher when i was just trying to try out with my own script. And i gave u more than enough proof already, and if i find a screenshot of me playing on that account ill show u that too. Or any of my other scripts. and if marcus is a good script writer doesn't mean he is a nice guy, by what he said to me for no reason doesn't seem to show he is a nice guy.

If i did copy it i would have confessed, im not stupid to just make this keep going for ever and ever, but im not confessing to something i didn't do.

Dude look at the post under mine.

From: 3garrett3
Exactly. Even if you didnt copy this, you need to make a better script anyway.

You would need to make 1 heck of a good power miner/cutter to get in, becuase they are simple to write up.

So i suggest you go back to your normal self (Not angry) and write a leet script with banking, DTMS, RadialRoadwalk or DDTMS for walking and so on.

Also

procedure ModSetRun(Run: Boolean);
var
  WX, WY: Integer;
 
begin
Write('Setting The Run...')
  GameTab(11);
  if Run then
  begin
    if (not (FindColorTolerance(WX, WY, 1711220, 663, 431, 665, 433, 5))) then
    begin
      Mouse(648, 431, 20, 20, true);
      Wait(100+Random(100));
    end;
  end else
  begin
    if FindColorTolerance(WX, WY, 1711220, 663, 431, 665, 433, 5) then
    begin
      Mouse(648, 431, 20, 20, true);
      Wait(100+Random(100));
    end;
  end;
end;

You can just do:

SetRun(False); //False is to set Run to Off and true is to set it on :)

Oh ye and FindFastRandoms is Fawkis function, please credit him :)

[ADVERTISE/ADVICE] Look at my SecurityGobliner, and other scripts, you can learn from them how to do things. (Run my script for 3 hours, and you will get a pixel cookie)

Lol, mmm a Pixel cookie.

Id vote yes because I belive you over the other srl members here but Im a retart and dont know how to read. Damn my retartness!

Is it retarted that I typed that I dont know how to read? Ya its pretty retarted. Retarted kinda sounds like you take the sour away from something and then put it back again doesnt it? Ok im done really.

Oh and if you guys play halo 2 or battlefield 2 modern combat I can give you a pixel tbag to go with those pixel cookies.

i really dont care about how i can get in and how i cant anymore, i just dont want Arr0w taking credit for my work, and i want it to be proven that it is my script, i said all i can to prove it and now i cant do anything else, so you can make up ur own minds about whos script it really is.

+1 RetarT point also.

Edit: Don't be offended. I give all script copiers special points. You're not that special…

Lol… retart point, good one.

You actually didn't do such a bad job of covering it up. You fixed all the forms and everything. Too bad you still f41l.

Bye bye.

From: kushal
I have never heard of Arr0w before, and even look at what he said, "Okay i'm not going to go into to mcuh detail but this is my powerminer 3.1 with forms, it took me about a week to make cos forms kept mucking u, so here it is."

thats like 100% obvious he copied it off someone, and that someone being me. "not going into much detail but this is my powerminer, he says, that is 100% obvious u should b able to see through that.

And yes i was a SCAR section mod, ages ago when SRL was new and scripting was mainly done with normal SCAR. I even told u, go to RST and ask any admin there.

Don't accuse me of something i didn't do, if u don't want me to be an SRL member fine. But don't say i copied someone else when it is obvious they copied me.


And to to markus im not a leacher u retart and i've never heard of Arr0w before, and doubt anyone else has either.

http://www.srl-forums.com/forum/member.php?u=2289

SRL Member here, here's his/her profile.

http://www.villavu.com/forum/showthread.php?t=3798?t=4559

Exact place where he posted the script. Almost a YEAR ago. :] Stop fooling around with us. Thanks.

If you check his profiles for his "last posts, posted", you can see him creating step by step through the SRL Scripting help sections.

So how could he have copied it then?

From: WhiteShadow
http://www.srl-forums.com/forum/member.php?u=2289

SRL Member here, here's his/her profile.

http://www.villavu.com/forum/showthread.php?t=3798?t=4559

Exact place where he posted the script. Almost a YEAR ago. :] Stop fooling around with us. Thanks.

If you check his profiles for his "last posts, posted", you can see him creating step by step through the SRL Scripting help sections.

So how could he have copied it then?

O, nice find for all those stuff. Ill say oWnEd by WinterShadow :redface:

Ok Ok This has gone far enough.
Since there is so much commotion about this script being copied, i will close this because its obviously a no.

Because Kushal insists it is his script, then he can make ANOTHER ONE because there is too much controversy behind his.

If you really can script kushal, writing a different one should be too much of a hassle, hope to see another app from you in the future.
Remember there is a one month waiting period.