SRL Archive - Archive

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

What is the meaning to life?


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


Programming Knowledge
HalfLife Engine scripting

Other Communitys
elxdraco scripting.

How Long have You Played Runescape
On and Off for 6 years.

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

Hey.
My name is Cameron, im 16 years old.
I'm from Australia, and I work at McDonalds lol.

I started SCAR scripting about a month ago, because I sick of people leeching HALFLIFE scripts on the elxdraco forum and then I realised that i was leeching SCAR scripts off people, so I though I would learn to script and try and help out the community.

And ive found there is a much greater sense of accomplishment with SCAR scripting than there is with leeching, so I intend to continue scripting for a long time :)

If my SCAR scripting history Ive created two complete working scripts,
A Gnome Agility Runner Script,
and the script Ive submitted with this application.

I think that really all I need to say..
Thank you for your time :D
Cya later.

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

/////////////////////////////////////////////////////////////////////
//                                    ________                     //
//                     ____    ____  /  _____/                     //
//                    /    \  / __ \/   \  ___                     //
//                   |   |  \|  ___/\    \_\  \                    //
//                   |___|  / \___  >\______  / _                  //
//                        \/      \/        \/ |_|                 //
//                                                                 //
//                         DUMMY CURSER BETA                       //
//          Setup Lines 17-20 and declare players lines 25+        //
//Thanks to the SRL Forums for all the tutorials and constant help!//                                                        //
/////////////////////////////////////////////////////////////////////
{
 _____________________________________
| CREDITS                              \
|  ChArMs for the antiban procedures.   \
|  fourscape for the antirandom ideas.   \
|  Everyone on the SRL forums!            \
|  Smartzkid for securing my account ;)   /
|  ANYONE THAT POSTS A PROGRESS REPORT!  /
|_______________________________________/
}
program SpellDummy;
{.include SRL\SRL.scar}
{.include SRL\SRL\Skill\Magic.scar}

const
RunAwayDir  =  'S'; // Direction to run away. N,S,E or W
CursesToDo  =  727; // Number of curses you wanna do before switching to the next player.
DummyColor  =  15658736; // Colour of your dummy
DummyName   =  'hick'; // Letters of the dummys name eg. 'oblin' for Goblin

var
NumOfCurses:integer;
AntiBann:Integer;
AB:Integer;

// Declare Players
Procedure DeclarePlayers;
begin
  Status('Loading Players')

  HowManyPlayers  := 1;
  NumberOfPlayers( HowManyPlayers );
  CurrentPlayer := 0;

     Players[0].Name      := 'username';
     Players[0].Pass      := 'rawrr';
     Players[0].Nick      := 'ser'; // 2-4 letters of username
     Players[0].Active    := True;
     
     //Players[1].Name      := 'username';
     //Players[1].Pass      := 'rawrr';
     //Players[1].Nick      := 'ser'; // 2-4 letters of username
     //Players[1].Active    := True;
end;

//antiban
//you can alter these if you like.
//I borrowed them from Charmz Willow Banker.
Procedure AntiBannage;
begin
    AB:= Random(8)+1;
    ActivateClient;
    Case AB of
      1 : SleepAndMoveMouse(750+Random(2000));
      2 : SendArrowSilentWait(((Random(2)*2)), 1000+Random(200));
      3 : SendArrowSilentWait(((Random(2)*2) + 1), 200+Random(200));
      4 : SendArrowSilentWait(((Random(2)*2)), 200+Random(200));
      5 : SendArrowSilentWait(((Random(2)*2) + 1), 20+Random(20));
      6 : SendArrowSilentWait(((Random(2)*2)), 20+Random(20));
      7 : IdleTime(500, 500, 1.0);
      8 : begin GameTab(1+Random(7)) Wait(Random(300)) GameTab(4) end;
      9 : IdleTime(300, 200, 2.0);
    end;
end;

// check inv for randoms every 2 out of 5 casts. (on average)
// does antiban every 3 out of 5 casts (on average)
Procedure NormalRandoms;
begin
  if(not(LoggedIn))then Exit;
  AntiBann:= 1 + Random(5)
  case AntiBann of
     1: FindNormalRandoms;
     2: FindNormalRandoms;
     3: AntiBannage;
     4: AntiBannage;
     5: AntiBannage;
    end;
end;


//Finds Talking randoms and fights.
procedure TalkingRandoms;
begin
 FindTalk;
 wait(10);
if (FindFight = true) then
 begin
  RunAwayDirection('N');
  Wait(10000 + random(2000));
  RunBack;
 end;
end;


// Progress Report
procedure Report;
begin
ClearDebug;
  SRLRandomsReport;
  WriteLn('////////////////////////////////////////////')
  WriteLn('    neGs Dummy Curser - Progress Report     ')
  WriteLn('                                            ')
  WriteLn('  Running Time: ' + (TimeRunning) + '')
  WriteLn('  Spells Cast: ' + IntToStr (NumOfCurses) +  '')
  WriteLn('  Approx. XP Gained: ' + IntToStr (NumOfCurses*29) +  '')
  WriteLn('////////////////////////////////////////////  ')
end;

//cursing procedure
procedure CurseDummy;
begin
 Status('Cursing...')
  Cast('Curse');
  TalkingRandoms;
  FindObj(x,y,DummyName,DummyColor,10);
  Mouse(x,y,2,2,true);
  TalkingRandoms;
  wait(10);
 NumOfCurses:=NumOfCurses+1;
  wait(10);
  TalkingRandoms;
 Report;
end;


//mainloop+setup
begin
 SetupSRL;
 ActivateClient;
 DeclarePlayers;
 Newline := Newline;
 begin
  If (Not(LoggedIn)) then
   begin
    Status('Logging In')
    Loginplayer;
    HighestAngle;
   end;
 end;
 repeat
  repeat
   TalkingRandoms;
   CurseDummy;
   NormalRandoms;
   If(Not(LoggedIn))Then NextPlayer(False)
  until(NumOfCurses=CursesToDo);
  LogOut;
  NextPlayer(True);
  NumOfCurses := 0;
  HighestAngle;
  If(Not(LoggedIn))Then NextPlayer(False)
 until(false);
end.

[PHP]
////////////////////////////////////////////
neGs Dummy Curser - Progress Report

Running Time: 50 Minutes and 33 Seconds
Spells Cast: 687
Approx. XP Gained: 19923
////////////////////////////////////////////

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
| SRL Randoms Report |
| www.villu-reborn.com |
|~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
| Talking Random : 1 |
| SandWich[es] Solved : 1 |
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/ [/PHP]

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

Too simple man. I say no until you can make it better. I'll vote tomorrow.

Good work. But I think you can add more. I am not going to vote because I think that you would be a great addition to the SRL community. I also believe that you could do better on that script. Take your time.

-Fours

Good Work. Yes from me.

Standards: check
Antirandoms: check
Player switching: check

Yes from from me.

From: Boreas
Standards: check
Antirandoms: check
Player switching: check

Yes from from me.

Im with boreas and voted yes putting you with more yes's than no's but i think that you should have put a little more time into it. Or , in turn, write a longer, more advanced script :D

From: WT-Fakawi
Good Work. Yes from me.

Well, if WT says yes i'm in :O.

Ooooo! more Yes's than No's! That makes me so happy :D
Thanks everyone who has voted so far, I understand and respect everything that has been said for both sides of the Poll.

How many votes does there need to be before there is the decision?

Cheers.

Sorry dude, I have to say no though. personally, I don't think that theres enough to the script. of course you have randoms, anti ban by charmz and player switching, but really its to easy of a script if you ask me, I mean I know it has everything really possible you could put into it, but I'd suggest trying something like a power chopper/power miner, because in my opinion that would be harder. good luck though, you look like a good scripter, keep it up.

Hmm, whats the longest proggy for that script?

The longest proggy I have is

[PHP]
////////////////////////////////////////////
neGs Dummy Curser - Progress Report

Running Time: 50 Minutes and 33 Seconds
Spells Cast: 687
Approx. XP Gained: 19923
////////////////////////////////////////////
[/PHP]

Try for a 2+ hour one with a few players.

Hmm, I understand that this script is just too simple and doesnt give enoough examples of my scripting ability.
So im going to make a PowerCutter and re-apply with that one in the near future.

Boreas Im not going to do another progress report because I have no runes or money from getting my magic to 55 over the last few days with the script, lol.

I say yes because it has all of the things we look for when someone applies. The people that say no because it's to simple haven't looked at older applications, it has the core necessities even if it is a bit simple. You will improve and your abilities will flourish.

Thanks TOB, you made my day :)

well of course he could will improve his abilities TOB, but you don't become a member and then learn to script. (not saying that he doesen't know how to script, but he still has more to learn) so you learn as much as you can, even more then what the nececities are before applying so you know how to script before you become a member. the time to learn to script is before, not after.

@ JAD

My script is simple because its a simple concept.

login
curse monster
check for randoms
do antiban
curse again
log out
do a progress report
log into the next player.

It works basically flawlessly and I cant think of anything else to add to it.
Of course I could have made a powerminer or chopper and that would be more complicated but I had a need for this script and I though I would make it and submit it for my application. I thought it would be ok because it covered the use of AntiRandoms, SRL, Antiban and Multiplayer.

On another note, what more would I have learnt from making an PowerMiner? except maybe Finding Gas and a Dropping Procedure which are relatively easy concepts to understand.
I suppose I should have used DTM's or Bitmaps but I just couldn't find a use for it in this script.

Look forward to hearing your reply JAD.

I'm not saying that this is that bad of a script, but it is a simple script and I think you should have attempted something harder thats all. and a Power Miner wouldn't be 1000* harder.. It would be harder though. I'll just go through what a power miner could have, and ofcourse your script has some of these too:
MultiPlayer
randoms
antiban
proggy
tolerance changer //as a fail safe incase it does not find the color of rock..
findrock
minerock
gasfinding
pickaxe head finding
options for dropping procedure//in my power miner I have you can use DTM's
while's and do's //to drop the ore, or you can drop stuff the
//randoms give you.


the thing is while this may not be that much more complicated.. there is more work to be put into a power miner I think. I'm not comparing you to this, but just using this as an example. what if somebody made a flawless cabbage picker upper with full anti randoms anti ban….etc, its flawless right? I'm just saying because a power miner would be more usefull, and a little bit harder, I'd suggest doing that because It'd be longer and more challenging I think. anyways, you may gain membership with this and other people may dis agree with me, but if you don't, try again in a month with a power miner and I bet you'll make it if you dedicate yourself.

Thanks for the reply JAD,
Awesome argument you put forward there :)
I can see where you are coming from now.

not trying to argue, just trying to help :)

In!