SRL Archive - First Scripts

Hello.

This is my first script for RS.I made it in about 30 mins.It's not flawless.
Actually it's on lame-level now.
What it does:
-High Alchemy
-Random Click breaks.
-Well…it works :D

future:
-Antiban
-Report stats
-End when out of alch-items

program SoHigh;

{$DEFINE SMART}
{$i SRL/srl.simba}

////////////////////////////BY KOLRO//////////////////////////////////////
////////////////////////////Ver 1.0//////////////////////////////////////




Procedure welcome;
begin
writeln(' '); //you can delate it all if it annoys you
writeln('Welcome to SoHigh');
writeln('Version 1.0 By Kolro');
writeln('Donat In-Game if you want :D');

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

Players[0].Name := ''; //Write your nick
Players[0].Pass := ''; //Write your password
Players[0].Nick := ''; //Write 3-4 first letters of your nick
Players[0].Active:=True;

end;
//don't touch below!//
procedure Mau5;
Begin



MoveMouse(746, 183);
wait(200 + Random(20));
Mouse(746, 183, 3, 3, true);
wait(200);
Mouse(746, 186, 3, 3, true);
wait(1000);
MoveMouse(574, 326);

end;
procedure Alchemy;
begin
Mouse(574, 326, 3, 3, True);
Wait(1200 + Random(35));
Mouse(574, 326, 3, 3, true);

end;




begin
Welcome;
Smart_Server := 86;
Smart_Members := True;
Smart_Signed := True;
Smart_SuperDetail := False;

SetUpSRL;
ActivateClient;
DeclarePlayers;
LoginPlayer;
ToggleXPBar(True);
Mau5;

repeat
Alchemy;
until(False)

end.

It's in pre-alpha mode so babysit ;)

hope i improoved basic skills for pascal by this script

cheers
-Kolro



PS:You can mod. it and do whatever you want with it.I'll be greatful if you give me some advice :)

You're using coordinates, which aren't good.
You should try using DTM's for more accurate results.

But an excellent attempt at a first script :)

Looks great! I always enjoy reading peoples first script. Some simple tips to improve:

1. Add FindNonInventoryRandoms in your repeat loop
2. Add If not(LoggedIn) then Break; in your repeat loop, so it doesn't continue when it's allready logged out
3. Ofcourse some dtms or bitmaps, but that can wait

Good luck scripting!

Thanks!
Could you just tell me what DTM stand for?
i was reading about this but it was about bitmap DTM

I mean…it would be easier if i have a library of "what does it stand for" for all scripts.I couldn't find it in simba and forum ;/

and thanks for motivation :)
i really want to make it flawless in 2-3 days !

There is a lot of information about them here: http://villavu.com/forum/forumdisplay.php?f=96

Note that a bitmap is an image it will search for and a dtm is a collection of points with a certain color and distances between them.

Oh my bad - I didn't search carefully
Next book to read ;)
But i get what is Dtm and bitmap now ^ ^
now i just have to learn it and improve script.