SRL Archive - First Scripts

lol sorry im bad speller anyhow i made a program with ghost mouse
since everyone has been looking for a auto dropper its very simple
and i added instructions aswell i hope it helps post questions if u need help i also added a garys hood auto talker and stuff and clicker for runescape.

here link to download all of it in a winrar its all in 1 folder =D make sure and extract the folder somewere

http://www.mediafire.com/?ummjuj2wqjm

i hope u enjoy

Have you tried using
Dropall;

no this is just for people that are lazy lol…
and runescape didn't ad a dropall button yet

There is a procedure in SRL that is DropAll; and it drops everything in your inventory.
I actually don't know why is it made that hard way, and doesnt even work 100% sure if you get a lagspike…
but here it is:

{*******************************************************************************
procedure DropAll;
By: Lorax
Description: Drops all items
*******************************************************************************}

procedure DropAll;
var
  i: Integer;
  arr:array of Integer;
begin
  arr :=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,
      18,19,20,21,22,23,24,25,26,27,28];
      
  for i := 1 to 28 - 4 do
    Swap(arr[RandomRange(i - 1, i + 4)], arr[RandomRange(i - 1, i + 4)] );

  for i := 0 to 27 do
    DropItem(arr[i]);
end;

you could make it work 100% sure like this

procedure DropAllForSure;
begin 
 repeat
  DropAll;
 until(not loggedin or InvEmpty);
end;

scar never works for me

you should get it working since this is SRL Resource Library.. (things for SCAR)

..

if you need help I can help you..

well when i download scar its all working then when i put in a good script that everyone says works it doesnt do anything when i press play? help please maybe my scar is out of date 3.12? can i have another download link?

http://freddy1990.com/download.php?uid=iQKVSJcN8ZewAkauZNl8

should work..

if not..

http://freddy1990.com/scar.php

and get the normal edition.. (first one)

and you need Tigris subversion..

here is the whole guide..

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

:)

thanks ill try it out =)
didnt let me download ver 3.15 i got 3.12 though?

and i used the tool>option>then updated it but still wont work?

you have to delete every other thing that has to do with scar, redownload 3.15 (or 3.20 if your a member of freddy1990's forums, not required though) and run as an administraitor, then try to download svn

^^ thats what i had to do to make my scar work, it might be different for you though

Why did you upload the script to media fire???!!___ARE YOU THAT LOST?__

There's such thing as SCAR tags and also you can attach files

 directly through the site...

For Example:

[scar][/.scar] //Without the dot infront of scar, in closing tag.

So it would look like this:

[scar]Program New;
begin
   Writeln('SCAR TAGS FTW');//DA CODE GOES bETWEEN THE TAGS
end.

u didnt even read what i said read before u post…

I cant Get it to work.

This is the code Im using

program alldrop;
{include SRL/SRL.scar}

procedure SetupScript;
begin
 SetupSRL;
 ClearDebug;
 DropAll;
end;

begin
 SetupScript;
end.

Any Idea how to fix it?

From: yago
I cant Get it to work.

This is the code Im using

program alldrop;
{include SRL/SRL.scar}

procedure SetupScript;
begin
 SetupSRL;
 ClearDebug;
 DropAll;
end;

begin
 SetupScript;
end.

Any Idea how to fix it?

It seemed tricky.

{include srl/srl.scar}

Needed a period before 'include'.

{.include srl/srl.scar}

Is this script correct at all? Because I've seen people do some very detailed auto drop scripts. I'm actually new to this since I just started 2 days ago. I have read some scar tuts but I need to learn about SRL.

You know how RS has an option for 1 mouse button or 2 mouse buttons? SRL works on only 1 mouse button right?

When I ran the script

program alldrop;
{.include SRL/SRL.scar}

procedure SetupScript;
begin
 SetupSRL;
 ClearDebug;
 DropAll;
end;

begin
 SetupScript;
end.

, Scar opened up another tab that said text.scar and had this error:

Dropping by pattern: 1
[Runtime Error] : Exception: Can't allocate the DIB handle in line 513 in script C:\Program Files\SCAR 3.22\includes\SRL\SRL\Core\Text.scar

Then When I tried your procedure, Scar went so slow it literally took 5 mins to drop the first one.

The procedure which you posted up there:

procedure DropAllForSure;
begin
 repeat
  DropAll;
 until(not loggedin or InvEmpty);
end;

Afterwords, I tried this code:

program alldrop;
{.include SRL/SRL.scar}

procedure DropAll;
var
  i: Integer;
  arr:array of Integer;
begin
  arr :=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,
      18,19,20,21,22,23,24,25,26,27,28];

  for i := 1 to 28 - 4 do
    Swap(arr[RandomRange(i - 1, i + 4)], arr[RandomRange(i - 1, i + 4)] );

  for i := 0 to 27 do
    DropItem(arr[i]);
end;

procedure DropAllForSure;
begin
 repeat
  DropAll;
 until(not loggedin or InvEmpty);
end;

begin
 DropAllForSure;
end.

And I got an error: Line 4: [Error] (21095:11): Duplicate identifier 'DROPALL' in script C:\Program Files\SCAR 3.22\Scripts\My Scripts\all drop.scar


And now I'm confused.

Any Tips/Help?

Read tutorials :D <3 u.
Read this and understand it fully:
WhoCares357 Unmatched Beginners guides
Then After u fully understand Whocares's guide, read this one.
Coh3n's All-In-One Tutorial

—–
The first one goes over the basics of the basics, Coh3n's does the same thing but in a more up to date, fast paced and accurately. Also Coh3n's explains Beginner to Advanced. Make sure You read WhoCares357 guide first just so you get the jist of it.

Reading these will give you all you need to know to understanding Scar/SRL and how everything works around it.

procedure DropAll;
var
i: Integer;
arr:array of Integer;
begin
arr :=[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,
18,19,20,21,22,23,24,25,26,27,28];

for i := 1 to 28 - 4 do
Swap(arr[RandomRange(i - 1, i + 4)], arr[RandomRange(i - 1, i + 4)] );

for i := 0 to 27 do
DropItem(arr);
end;

procedure DropAllForSure;
begin
repeat
DropAll;
until(not loggedin or InvEmpty);
end;

You will understand why this script did not work after you understand how everything is written.
DropAll; is Already in SRL/SRL's folder. That folder you included in the beginning of your script. Then you made a Procedure with the same name DropAll; That means theres 2 dropall functions. One in the Folder, and one in your script. This could be fixed by changing the name of the Procedure in your script from DropAll to DropAll1 or DropAllYago, Anything besides DropAll; since theres already a Procedure named that in the SRL Folder.

You know how RS has an option for 1 mouse button or 2 mouse buttons? SRL works on only 1 mouse button right?

I can honestly say theres nothing that Scar cannot Do. SRL is a Library of Functions/Procedures. It actually uses both of the buttons. Let me show you one of these Functions/Procedures. If it doesn't make sense at all, no worries, it will 600% make sense to you after reading tutorials.

X and Y are Coordinates. I think in Math Class you used a Coordinate Plane of some sort. This is basically what that is.
Mouse(X, Y, 4, 4, True);
The True in that Function means Left Click.
4, 4 In that Function is Randomness. You will learn about this in Tutorials.

Mouse(X, Y, 4, 4, False);
The False in that Function means Right Click.


If theres an Option after you right click (Which in RS there always will be)

ChooseOption('')
This function clicks on the option that you entered between ''.

I promise to you it will all make sense if you try to learn it from tutorials, its a promise, and if you decide to do it this way, all of us on this site will devote ourselves to you if you still need help.

Yes thank-you. For your help. I read some tuts and understand the basics but I really don't know the detailed rules and if you can say roots to this program. I started learning this program almost a week ago and thanks for bearing with me. And thank-you for clearing me out on the mouse button SRL uses. I wasn't thinking because I remember I read a tut that explained move mouse and x,y,true and false boleens. Also thank-you for the tut link. Much appreciated.

P.S. : 2 days ago I made my own Auto Drop using MoveMouseSmooth and Random and Hold and Releasemouse and stuff until I learned that SRL already had a better one, but I'm still a bit shaky on SRL and how it exactly works. But I will read the tuts and learn. And thanks again for the links. :)

i myself was shaky xD, it was so much to inhale, but tbh, i was so interested in it so it was all fun to me :D just devote yourself, its a wonderful experience learning it. Good luck dude! Your on your journey to becoming a master scripter!

Wow, I know what you mean. It is a lot to take in. But i wanna keep on even though I don't get half the stuff and rather sick. I guess a couple breaks would do.

On another note, is there a way to see the topics you've read?

What function, procedure, or code do you use to click NPC's? Or what should you use to click them or at least find them?

I'm working on my first script but I'm trying to click the banker flawlessly using color tracking but the problem is that the banker has the same colors as his/her surroundings.

Can you help with this problem?

If you've finished with reading the Intermediate section-Advanced then read this.
You dont need to use color tracking or anything, there are simple functions in SRL that helps us with Everything.

Includes -SRL - SRL - Core - Bank.
If you wanted to Open a Bank.
[Taken from Bank.Scar]

{*******************************************************************************
function OpenBank(WhichBank: String, ChangeCompass, ChangeAngle: Boolean): Boolean;
by: SRL Development Team
Description: Opens the bank if possible.
Valid arguments are:
'feb' (Falador East Bank)
'fwb' (Falador West Bank)
'veb' (Varrock East Bank)
'vwb' (Varrock West Bank)
'db'  (Draynor Bank)
'akb' (Al-Kharid Bank)
'eb'  (Edgeville Bank)
'lb'  (Lumbridge Bank)
'ctb' (Catherby bank)
'clt' (Camelot bank)
'nab' (North Ardougne bank)
'sab' (South Ardougne bank)
'ynb' (Yanille bank)
'ngb' (North gnome bank)
'sgb' (South gnome bank)
'wgb' (Warrior guild bank)
'fgb' (Fishing guild bank)
*******************************************************************************}

if you wanted to enter in a Pin Number

{*******************************************************************************
function PinScreen: Boolean;
by: NaumanAkhlaq
Description: Finds Pin Screen. Returns true if Found.
*******************************************************************************}

 {*******************************************************************************
function InPin(Pin: String): Boolean;
by: ZephyrsFury and Nava2
Description: Enters bank pin. Will try 3 times, returns true if bank is opened.
*******************************************************************************}

To Find an NPC / or anything for that matter, you would use Techniques that you have learned. You could search for the closest monster to your character, check the name of the monster, and click it.

Function FindGoblin : Boolean;
var GoblinColor : Integer;
begin
  GoblinColor := {Color of Goblin};
  FindColorSpiralTolerance(X, Y, GoblinColor, MSX1, MSY1, MSX2, MSY2, Tolerance);
  Mouse(X, Y, 4, 4, True);
  if WaitUpText('oblin', 4000) then // You'll learn about this in Tut's if you dont know.
  begin
    {w/e}
  end;
end;

SRL has so many Functions to use, check them out.

I know about those Srl functions but I'm horrible with SRL because they don't really give a lot of examples which I need lol but ill try and look around in the forums.

Also, most npc's are in surrounding that matches their color.

This is not something you learn picture by picture, you need to practice before you do.
Read the tuts, and you would understand. If you needed to you could make an AutoColor of the NPC, which is a very very accurate color made. But read the tuts man or else its no progress. Be sure to practice as well./