SRL Archive - RS3 Script Requests

I will not being anything that is insanely time consuming, or very profitable as that would ruin it. Just look for some ideas to work on in my spare time, Ill credit the idea to whoever creates it and such. Just throw out some ideas that would be relatively easy/very useful.

ranged guild, infact someone already made a build your own version, if you could just fix it up and give it to us that would help us out :)

From: ttm nick
ranged guild, infact someone already made a build your own version, if you could just fix it up and give it to us that would help us out :)

No….that is not how things work around here.

From: ttm nick
ranged guild, infact someone already made a build your own version, if you could just fix it up and give it to us that would help us out :)

Take some initiative and build it yourself then. Honestly it is not rocket science to learn how to script or even assemble a script together for that matter…

wtf, i watched the tutorials and it is confusing as fuck, all i need to know tbh is wtf a variable is… it says to ad variables but idk how/what that is -.- ….

A variable is a letter (or combo of letters)used to take the place of something else (normally a value) that the script needs to find.

From: ttm nick
wtf, i watched the tutorials and it is confusing as fuck, all i need to know tbh is wtf a variable is… it says to ad variables but idk how/what that is -.- ….

You don't have to be so angry at the fact that you haven't really 'tried'. Watching a video tutorial won't INSTANTLY teach you how to write a script. Gotta read some stuff too and develop your own methodology.

From: PatDuffy
No….that is not how things work around here.

okay then genius, then give me a step by step tut on how the fuck i am supposed to fix up this script. highly appreciated :) thx

You have to put effort in to learn anything, scripting is no exception. No knowledge will EVER come "naturally".

E: Careful…..

The whole point of the DIY script is for you to actually put it together yourself…. It's meant as a TEACHING tool. If you can't put it together, head back to the beginner scripting section and read more tutorials, and actually READ them and not just look at the code like "wtf is this garbage".

From: kevin33
A variable is a letter (or combo of letters)used to take the place of something else (normally a value) that the script needs to find.

so… here is the part of the thing i need help with
program RangGuild;
{$DEFINE SRL5}
{$DEFINE SMART}

{$i SRL/srl.simba}
{$i SRL/SRL/misc/paintsmart.simba}


Var
(declare variables here)

what do i put ^^^^ there

From: ttm nick
so… here is the part of the thing i need help with
program RangGuild;
{$DEFINE SRL5}
{$DEFINE SMART}

{$i SRL/srl.simba}
{$i SRL/SRL/misc/paintsmart.simba}


Var
(declare variables here)

what do i put ^^^^ there

We need the rest of the script to know what you need to define If you have more. Tell us what your plan is to do.

I'll like a thieving power leveling script.

a 100% working range guilder!!!!

Teaching is not telling you what to put, that won't help you at all. I can tell by your attitude that once we tell you what to put, you won't give it another glance as long as it "works", and if it doesn't work we will get flamed because that is what we told you.

Do it yourself, or don't use it. That is final.

From: ttm nick
wtf, i watched the tutorials and it is confusing as fuck, all i need to know tbh is wtf a variable is… it says to ad variables but idk how/what that is -.- ….

I doubt you even watched the videos I linked to you… It's very easy to comprehend since he does it in such a simplistic form.
You're just the ultimate leech, you can't be bothered to put in an hour of work. You just want everything right here, right now.
The point of Flights' thread was to encourage leechers to participate and hopefully get a feel for scripting. Then in time, give back to the community that has given so much to them.

Hey… I am willing to help him out to put him on the right track, I just need more info. Whats the next procedure/function?

From: PatDuffy
You have to put effort in to learn anything, scripting is no exception. No knowledge will EVER come "naturally".

E: Careful…..

The whole point of the DIY script is for you to actually put it together yourself…. It's meant as a TEACHING tool. If you can't put it together, head back to the beginner scripting section and read more tutorials, and actually READ them and not just look at the code like "wtf is this garbage".

you think i havent been reading the same shit over and over again? you know.. part of the learning process is asking questions.

thank you kevin33, you aren't one of the many —- in this community. CONGRATZ! do you have an irc client? i need ur help :P

kk guys, join the irc client #SRL, i made it to answer my questions, please help

Do not help him at all, his attitude deserves a ban not help.

You are not putting effort in, yet flaming when I call you out. Leave this community, your kind aren't welcome.

No i dont but I will answer any questions you have over this thread or pm.
I feel you gotta help people or they will never learn. I know from personal experience already, its hard to teach urself scripting with no previous knowledge of scripting.

Move this discussion somewhere else, also, ttm, I gave you an infraction for your language. It's NOT tolerated here. Period.

And to all you other leechers here, I've had enough of your attitude. I'm done giving out warnings, it will be straight up infractions from here on out.

Take this as your last and only warning.

Back on topic now.

From: Deadly Serious
I doubt you even watched the videos I linked to you… It's very easy to comprehend since he does it in such a simplistic form.
You're just the ultimate leech, you can't be bothered to put in an hour of work. You just want everything right here, right now.
The point of Flights' thread was to encourage leechers to participate and hopefully get a feel for scripting. Then in time, give back to the community that has given so much to them.

EXACTLY! give yourself a pat on the back. however, maybe i can get started if i can talk to someone on an irc?
and yah, sorry for raging/flaming/etc, its just frustrating and in the past 30 minutes on this thread.. so will you just help me besides giving me the same links to the same section? i clearly dont understand them.

program RangGuild;
  {$DEFINE SRL5}
  {$DEFINE SMART}

  {$i SRL/srl.simba}
  {$i SRL/SRL/misc/paintsmart.simba}


Var
(declare variables here)

  Procedure DeclarePlayers;
  begin
    HowManyPlayers := 1;
    NumberOfPlayers(HowManyPlayers);
    CurrentPlayer := 0;
    with Players[0] do
    begin
      Name        := '';
      Pass        := '';
      Pin         := '';
      BoxRewards  := ['XP','xp','lamp'];
      LampSkill   := 'Farming';
      Active      := True;
    end;
  end;
function FindArrows(var X, Y: Integer) :Boolean;
var
  TPA: TPointArray;
  aTPA : T2DPointArray;
  MiddlePoint :TPoint;
  Hi, I, TempCTS :Integer;
begin
  If Not LoggedIn then Exit;
  TempCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.03, 0.17);

  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 1781567, MIX1, MIY1, MIX2, MIY2, 8);
  If Length(TPA) = 0 Then Exit;
  aTPA := TPAToATPAEx(TPA, 5, 5);
  SortATPAFromFirstPoint(aTPA, Point(0, 0));
  MiddlePoint := MiddleTPA(aTPA[0]);
  MMouse(MiddlePoint.X, MiddlePoint.Y, 2, 2);
  If WaitUpTextMulti(['ronze', 'rrow'], 250) then
  begin
    GetMousePos(X, Y);
    Result := True;
  end;
  ColorToleranceSpeed(TempCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
end;


procedure SpamMouse(var x, y: Integer; Time: Integer);
begin
  If Not LoggedIn then Exit;
  HoldMouse(x, y, mouse_left);
  Wait(Round(Time / 2));
  ReleaseMouse(x, y, mouse_left);
  Wait(Time);
end;


procedure Competition;
var
 X, Y, C :Integer;
begin
  If Not LoggedIn then Exit;
  while not FindNPCChatText('orry', Nothing) do
  begin
    If FindNPCChatText('standard', Nothing) then
      If WaitArrow(X, Y, 1500) then Mouse(X, Y, 2, 2, True);

    if FireTarget(X, Y) then
      SpamMouse(x, y, RandomRange(Players[CurrentPlayer].Integers[1], Players[CurrentPlayer].Integers[2]));

    if not DidClick(True, 60) then Inc(C)
    else
      C := 0;
    if (C >= 2) then CloseWindow;
  end;
end;


function WaitNPCText(Text :String; Time :Integer) :Boolean;
var
 T :Integer;
begin
  If Not LoggedIn then Exit;
  MarkTime(T);
  while (TimeFromMark(T) < Time) do
  begin
    If Not LoggedIn then Exit;
    Wait(RandomRange(10, 25));
    if FindNPCChatText(Text, Nothing) then
    begin
      Result := True;
      Break;
    end;
  end;
end;


function FindJudge :Boolean;
var
  TPA: TPointArray;
  aTPA : T2DPointArray;
  MiddlePoint :TPoint;
  X, Y, Hi, I, TempCTS :Integer;
begin
  If Not LoggedIn then Exit;
  TempCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.40, 0.06);

  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 6512479, MSX1, MSY1, MSX2, MSY2, 14);
  If Length(TPA) = 0 Then Exit;
  aTPA := TPAToATPAEx(TPA, 20, 20);
  SortATPAFromFirstPoint(aTPA, Point(260, 32));
  DebugATPA(aTPA, '');
  Hi := Length(aTPA);
  for I := 0 to Hi - 1 do
  begin
    If Length(aTPA[I]) < 40 then Continue;
    MiddlePoint := MiddleTPA(aTPA[I]);
    MMouse(MiddlePoint.X, MiddlePoint.Y, 2, 2);
    If WaitUpTextMulti(['Competition', 'ompeti', 'Judge', 'udge'], 250) then
    begin
      ClickMouse2(False);
      If WaitOptionEx('alk', 'All', Nothing, 250) then
        begin
          If WaitOptionMulti(['Compete', 'ompete'], 250) then
            begin
              Flag;
              If WaitNPCText('Yes', 1500) then
              begin
                TypeSendEx('1', False);
                If WaitArrow(X, Y, 3500) then Mouse(X, Y, 2, 2, True);
              end;
            end;

          Result := True;
          Break;
        end;
    end;
  end;
  ColorToleranceSpeed(TempCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
end;



function FireTarget(var X, Y: Integer) :Boolean;
var
  TPA: TPointArray;
  aTPA : T2DPointArray;
  MiddlePoint :TPoint;
  Hi, I, TempCTS :Integer;
begin
  If Not LoggedIn then Exit;
  TempCTS := GetColorToleranceSpeed;
  ColorToleranceSpeed(2);
  SetColorSpeed2Modifiers(0.15, 1.28);

  FindColorsSpiralTolerance(MSCX, MSCY, TPA, 5330874, MSX1, MSY1, MSX2, MSY2, 2);
  If Length(TPA) = 0 Then Exit;
  aTPA := TPAToATPAEx(TPA, 20, 20);
  SortATPAFromFirstPoint(aTPA, Point(0, 0));
  DebugATPA(aTPA, '');
  MiddlePoint := MiddleTPA(aTPA[0]);
  MMouse(MiddlePoint.X, MiddlePoint.Y, 2, 2);
  If WaitUpTextMulti(['Fire', 'Target', 'arget'], 250) then
  begin
    GetMousePos(X, Y);
    Result := True;
  end;
  ColorToleranceSpeed(TempCTS);
  SetColorSpeed2Modifiers(0.2, 0.2);
end;


function WaitArrow(var X, Y :Integer; Time :Integer) :Boolean;
var
  T :Integer;
begin
  If Not LoggedIn then Exit;
  MarkTime(T);
  while (TimeFromMark(T) < Time) do
  begin
    If Not LoggedIn then Exit;
    Wait(RandomRange(10, 25));
    if FindArrows(X, Y) then
    begin
      Result := True;
      Break;
    end;
  end;
end;
begin
  SMART_Members := True;
  SMART_Signed  := True;
  SetupSRL();
  SetupSRLStats(222, SRLStatsUserName, SRLStatsPassword);
  SRLRandomsReport;
  ClearDebug();
  ActivateClient();
  DeclarePlayers();
  LoginPlayer();
  SetupScript();
(finish the rest)
end.

^^^script btw

kk, well thanks for the help everyone, go ahead and ban this account so i can make a new one.

Use simba tags around your code, and don't triple post.

Uhhh put variables u need for every function and procedure also use simba tags. For declare players you dont need any variables.

From: ttm nick
ranged guild, infact someone already made a build your own version, if you could just fix it up and give it to us that would help us out :)

No, build it yourself. Thats the point.

how about a rocktail fishing bot? :D

how about a fist of guthix fm bot?:)

From: Kyle Undefined
Move this discussion somewhere else, also, ttm, I gave you an infraction for your language. It's NOT tolerated here. Period.

And to all you other leechers here, I've had enough of your attitude. I'm done giving out warnings, it will be straight up infractions from here on out.

Take this as your last and only warning.

Back on topic now.

I made this thread as a way to maybe implement some new Ideas I had into scripting. Thanks for the post kyle, can a mod please close this thread? It turned into a leech moaning about not knowing how to put together a script. Duffy im just going to write some new scripts and pm them to you, if you could check them out to let me know how they are Id really appreciate it, I dont want them in the public section or first scripts after this thread.

Hmm… well maybe a bot that just cleans up weeds? Also has ability to use ectophilia, cabbage-port, and magic tele's? Be nice for lvl 1 farmers.

Also, theirs a great thieving chance for the master farmer.(Don't have Photoshop, just used Paint)
(Wear Regen Bracelet, Ring of life, incase something happens, and ability to eat food of course and not sure or not but buy food from the farming shop guy/girl?

*Red Dot=Area to start the script. Before starting it, you have to trap the master farmer inside the house, and not the attackable master farmer though.
*Purple Ring=Area where you can find him, along with the attackable farmer.

Btw Thats just north of Ardougune for those who don't "Get Around".

But dude, your the scripter, do what you want!

From: Darkcorn
Hmm… well maybe a bot that just cleans up weeds? Also has ability to use ectophilia, cabbage-port, and magic tele's? Be nice for lvl 1 farmers.

Also, theirs a great thieving chance for the master farmer.(Don't have Photoshop, just used Paint)
(Wear Regen Bracelet, Ring of life, incase something happens, and ability to eat food of course and not sure or not but buy food from the farming shop guy/girl?

*Red Dot=Area to start the script. Before starting it, you have to trap the master farmer inside the house, and not the attackable master farmer though.
*Purple Ring=Area where you can find him, along with the attackable farmer.




Btw Thats just north of Ardougune for those who don't "Get Around".

But dude, your the scripter, do what you want!

This is the first actual reply to this thread, so thankyou(: Thanks for not whining, or asking for a handout, you did what I asked and made a suggestion! Ill be working on this just because your not one of those leechers who just complains, see the rest of this thread :P

My suggestion is to make a script that YOU want or need. Not anyone else just you. If you choose to release the bot its up to you but personal bots would be nice too.