SRL Archive - Archive

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

What is the meaning to life?


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

Programming Knowledge
none

Other Communitys
moparisthebest

How Long have You Played Runescape
3 years

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

Ok im 11 years old and ive been useing the srl manual a few days after i started.I always help people at www.moparisthebest.com .I am a decent scar scripter and made some decent scripts.I am currently working on a few scripts wich is a cow hide tanner,auto alcher( not a auto clicker) and autofighter(runtime errors…).For every one of my scripts i use srl procedure sometimes functions and of course the srl include.I have been scripting for few months now and been helping people out with their scripts and problems(At moparisthebest).
I started at moparisthebest and got better and better from when i started.I have a helper always near me(junior), every time i need help he rarley says he doesnt know.

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

{  *********                   **               **    *    ********* ""
      **      **        **     ***********      **  **        **      ********
  $   **      **        **     **        **     *****     **  **      **
  **  **      **   $    **     **        **     ** **     **  **   $  ********
   ****       **        **     **        **     **   *     ****             **
    **         **********      **        **     **    *     **        ********
$                                  $           $
      ******        **   **********   **        ********      ********   $
     ** $$ **       **   **           **        **            **     *
    **********      **   **           *******   ********      ********
   **        **     **   **           **   **   **            **   **        $
  **          **    **   **********   **   **   ********      **    **
________________________________________________________________________________
+=++=++=++=++=++=++=++=++=++=+Read+At=Risk!++=++=++=++=++=++=++=++=++=++=++=++=+
ok im made a alcher wich i never thought i can do when i got back from my break.
I used the srl manual to help me with it so here it is, the new script from me!!
+=++=++=++=++=++=++=++=++=++=+++=+JunkJ+=++=++=++=++=++=++=++=++=++=++=++=++=++=
dead?banned?not my problem.
must have the item your alching in the 2nd inventory slot
Anti randoms
Anti ban
stores the money and items in your inventory in the bank so if you get scammed
the only things he will take are the things on you!Not The money! :-D
-------------------------------------------------------------------------------}

program autoalcher;
{.include srl/srl.scar}
{.include srl/srl/skill/magic.scar}
{.include srl/srl/misc/trade.scar}

var
alched :integer;
traded :integer;
randomfoundormod :integer;


const
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
highorlow=('?');//do you want to high alch or low alch? just put low or high
howmanyalchs=1000;//how many alchs do you want to do
name=('hobo');//your RS2 name
item=('??');  //your item name that your alching(must be full name!!)
nearbank=('yes');// a simple yes or no question, are you alching near a bank?
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\

procedure alchitdude;
begin
if(highorlow=('high'))then
begin
castspell(35)
useitem(2)
wait(4000+Random(1000))
alched:=howmanyalchs+1
end else
if(highorlow=('low'))then
begin
castspell(14)
useitem(2)
wait(1000+Random(1000))
alched:=howmanyalchs+1
end;
end;

procedure findthetrade;
begin
if(findtrade)then
Accepttrade;
wait(5000)
Decline;
typesend('nty, now scoot im Alching')
traded:=traded+1
end;



procedure hatetherandoms;
begin
FindNormalRandoms;
   if (FindTalk) then
   begin
   Writeln('talking or found a talk');
   randomfoundormod:=randomfoundormod+1

   if (FindMime) then
   begin
   writeln('lucky you, a mime!');
   randomfoundormod:=randomfoundormod+1

   if (FindMaze) then
   begin
   writeln('found maze');
   randomfoundormod:=randomfoundormod+1

   if (SolveFrog) then
   begin
   writeln('solved a frog');
   randomfoundormod:=randomfoundormod+1

   if (Findmod)then
   begin
   writeln('its the moderater!,AHHH!');
   randomfoundormod:=randomfoundormod+1

   if (solvepinball)then
   begin
   writeln('solved a pinball...');
   randomfoundormod:=randomfoundormod+1

   if (findforester) then
   begin
   writeln('found forester');
   randomfoundormod:=randomfoundormod+1

   if(findscaperune)then
   begin
   createscaperune;
   writeln('found scape rune');
   randomfoundormod:=randomfoundormod+1
end;
end;
end;
end;
end;
end;
end;
end;
end;

procedure hello;
begin
if (inchat('hello'))or
   (inchat('hi'))or
   (inchat('hey'))or
   (inchat('yo'))or
   (inchat(name))then
   typesend('hey')
end;

procedure whatsup;
begin
if (inchat('whats up'))or
   (inchat('whats new'))or
   (inchat('whats the 411'))then
   typesend('nothing')
end;

procedure friends;
begin
if (inchat('friends'))or
   (inchat('frends'))or
   (inchat('buddys'))or
   (inchat('add'))or
   (inchat('add me'))then
   typesend('sorry,got lots of them')
end;

procedure hatenoobcallers;
begin
if (inchat('noob'))or
   (inchat('noobie'))or
   (inchat('nub'))or
   (inchat('choob'))or
   (inchat('froobie'))or
   (inchat('choobie'))or
   (inchat('froob'))or
   (inchat('nubie'))then
end;

procedure yourmage;
begin
if(inchat('magic level'))or
  (inchat('magic lvl'))or
  (inchat('mage level'))or
  (inchat('mage lvl'))or
  (inchat('mge lvl'))or
  (inchat('mage'))or
  (inchat('magic'))then
  typesend(inttostr(getskilllevel('magic')))
end;

procedure proggy;
begin
writeln('!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=');
writeln('It finished or stopped in ' + (timerunning));
writeln('It alched ' + inttostr(howmanyalchs) + ' times');
writeln('Found ' + inttostr(randomfoundormod) + ' randoms or talks or mods');
writeln('You have been traded ' + inttostr(traded) + ' times');
writeln('!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=!@#$%^&*()-_+=');
end;

procedure thereaper;
begin
if(wearedead)then
begin
disguisescar('a dead script')
writeln('you died not me!');
proggy;
logout;
terminatescript;
end;
end;

procedure theintro;
begin
Writeln('**************************************************');
writeln('**|You are now using my wonderful alcher!Enjoy!|**');
writeln('*****|your doing ' + (highorlow) + ' alchemy|*****');
Writeln('*******|your current name is ' + (name) + '|******');
Writeln('**************************************************');
end;


procedure needtostoreit;
begin
if(nearbank=('yes'))then
begin
openbank;
depositall;
closebank;
end else
if(nearbank=('no'))then
end;



begin
disguisescar('a running script')
SetUpSRL;
ActivateClient;
ClearDebug;
theintro;
if(not(finditemname(item)))then Exit; logout; writeln('item for alching not found, try again or look at the way you spelled the item.'); terminatescript;
if(not(loggedin)) then Exit; writeln('not logged in, try the script again.'); terminatescript;
repeat
findnormalrandoms;
thereaper;
alchitdude;
hatetherandoms;
hatenoobcallers;
whatsup;
hello;
yourmage;
until(howmanyalchs=howmanyalchs)
if(howmanyalchs=howmanyalchs)then
cleardebug;
disguisescar('a done script')
srlrandomsreport;
needtostoreit;
logout;
proggy;
terminatescript;
end.

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

I will not vote yet, allowing you to change these things.

The Things :
1. Add the srl array to this. Not just one player. You may not think it is needed but at least we will know you understand what it is.
2.

procedure hatenoobcallers;
begin
if (inchat('noob'))or
   (inchat('noobie'))or
   (inchat('nub'))or
   (inchat('choob'))or
   (inchat('froobie'))or
   (inchat('choobie'))or
   (inchat('froob'))or
   (inchat('nubie'))then
end;

doesn't say what to do?

3.You forgot to add this. Without this none of the find talks will work. Add it in your main loop.

NickNameBMP := CreateBitmapMaskFromText(Nickk, UpChars);

4.

disguisescar('a running script');

If thats not a dead give away I don't know what is. See how the name is disguisescar? :p

5.

procedure hatetherandoms;
begin
FindNormalRandoms;
   if (FindTalk) then
   begin
   Writeln('talking or found a talk');
   randomfoundormod:=randomfoundormod+1
 
   if (FindMime) then
   begin
   writeln('lucky you, a mime!');
   randomfoundormod:=randomfoundormod+1
 
   if (FindMaze) then
   begin
   writeln('found maze');
   randomfoundormod:=randomfoundormod+1
 
   if (SolveFrog) then
   begin
   writeln('solved a frog');
   randomfoundormod:=randomfoundormod+1
 
   if (Findmod)then
   begin
   writeln('its the moderater!,AHHH!');
   randomfoundormod:=randomfoundormod+1
 
   if (solvepinball)then
   begin
   writeln('solved a pinball...');
   randomfoundormod:=randomfoundormod+1
 
   if (findforester) then
   begin
   writeln('found forester');
   randomfoundormod:=randomfoundormod+1
 
   if(findscaperune)then
   begin
   createscaperune;
   writeln('found scape rune');
   randomfoundormod:=randomfoundormod+1
end;
end;
end;
end;
end;
end;
end;
end;
end;

yeah that will not work. By saying that everything will have to happen before it. Such as it will have to FindTalk to start looking for a mime. You are really going to need to work on this to get anyone to vote yes yet I will withold my vote for a while.

Suggestions
~~~~~~~~~~~~
Add more antiBan.

junkj: No. Check out how other scripts set up the main loop, and player switching. And the random thing as pwnaz0r said.

pwnaz0r:
3. Loginplayer includes that, as long as the player array is declared of course.
4. It doesn't matter what it says, or even if it is used at all, because jagex can't see.
Suggestion: No, MouseSpeed is set by script users in SetupSRL.scar, not by scripts! It is set by individuals to reflect lag from computer specs. Auto-fighters sometimes change it temporarily, then change back, but that's another story. MouseSpeed does not need a random() in it, because the mouse functions that use it (MMouse, Mouse) already randomize it. Time it from A to B a few times, they will be different.

This script is pretty mediocre.
A LOT of stuff is unneeded.
Bassically all you need its

procedure alchitdude;
begin
if(highorlow=('high'))then
begin
castspell(35)
useitem(2)
wait(4000+Random(1000))
alched:=howmanyalchs+1
end else
if(highorlow=('low'))then
begin
castspell(14)
useitem(2)
wait(1000+Random(1000))
alched:=howmanyalchs+1
end;
end;

Everything else is handled by srl antirandoms ect.

I say most of it is just too simple and "BS" code like your antiranoms can be replaced by

FindNormalRandoms 

Not a bad start to scripting =)
But id say try making something a bit more intricate and advanced.


@pwanz0r

MMouse already always moves randomly at a random speed.

From: Boreas

pwnaz0r:
3. Loginplayer includes that, as long as the player array is declared of course.

EDIT: I see you meant the thing about NickNameNMP; Well nyways I like to call it again in main loop because today was the first day I called it in my script and it was the first day out of a monthi've actually seen it solve a random, no matter what script i was using.

Junk i am not going to vote - After you edit you mistakes then i will vote.

I'm neither going to vote until you correct the mistakes given above.

no from me

EDIT : your 11 o.O? thats young, usually people around here are at least 13.

Guys be rational,
The only real mistake was

procedure hatenoobcallers;
begin
if (inchat('noob'))or
   (inchat('noobie'))or
   (inchat('nub'))or
   (inchat('choob'))or
   (inchat('froobie'))or
   (inchat('choobie'))or
   (inchat('froob'))or
   (inchat('nubie'))then
end;

Everything else is fine,
And even if he DOES fix those, look at the script, its not very good…..

From: yohojo8
Guys be rational,
The only real mistake was

procedure hatenoobcallers;
begin
if (inchat('noob'))or
   (inchat('noobie'))or
   (inchat('nub'))or
   (inchat('choob'))or
   (inchat('froobie'))or
   (inchat('choobie'))or
   (inchat('froob'))or
   (inchat('nubie'))then
end;

Everything else is fine,
And even if he DOES fix those, look at the script, its not very good…..

His antirandoms were also screwed and thats a huge part of the script