SRL Archive - Archive

<!– BEGIN TEMPLATE: formanswers –>
Torrent of Flame - SRL Member Application Form
Torrent of Flame

What is the meaning to life?


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



Programming Knowledge
A very small amount of Java

Other Communitys


How Long have You Played Runescape
About 3 Years

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

I can now write working functioning scripts containing DDTM's, DTM's and failsafes.

I learnt the standards of scripting pretty well, and am working on learning more on RadialWalk and RadialRoadWalk, aswell as fighting and eating functions.

I also finally learnt how to use SMART, and included FindAxe and CheckAxe.

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

{//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//
|                       Draynor Willow Crusher & Banker                        |
|                            By Torrent of Flame                               |
|                       Scar 3.14          SRL 4.0 Rev 14                      |
|                                 Version 1.6                                  |
|                    Chops Willows at Draynor and Banks them                   |
|                             Start from Draynor Bank                          |
|                                 Start Logged Out                             |
|                                                                              |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|                         How Many Loads at line 25                            |
|                        Setup Player at lines 39-42                           |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\
|Version 1.1 Includes                                                          |
|                                  Anti-Ban                                    |
|                                 Anti-Random                                  |
|                            Working Walking (Lol :D)                          |
|         Complete Revision of Script - Sorted Unnecissary codes and BMP's     |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|Version 1.2 Includes                                                          |
|    Essential Repairs for Banking - Willow DTM was invalid, WillowBMP added   |
|                                 Banking Works!                               |
|                         Main Loop Fixed - Repeats after banking              |
|                                                                              |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|Version 1.3 Includes                                                          |
|                                  Fixed Banking                               |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|Version 1.4 Includes                                                          |
|                                   SRL Stats                                  |
|                                  Multi-Player                                |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|Version 1.5 Includes                                                          |
|                               BankPin Compatibility                          |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|Version 1.6 Includes                                                          |
|                                A Few Failsafes!                              |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
|Version 1.7 Includes                                                          |
|                                 Modified Anti-Ban                            |
|                                      DTM's                                   |
|                                  SMART (Finally!)                            |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\                                                                               |
|Version 1.8 Includes                                                          |
|                                   Willow DDTM                                |
|                                   Axe Checker                                |
|                                Broken Axe Checker                            |
//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\}

Program WillowCrusher;
{.include SRL/SRL/Misc/SMART.scar}
{.include SRL/SRL.scar}
{.include SRL/SRL/Skill/WoodCutting.scar}


const
//-->Loads<--\\

Loads = 1; //How many loads per player before switching

//--->SRL ID<---\\
YourSRLId = '';
YourSRLPassword ='';

//--->Pin - Make same for ALL chars. If no Pin, leave blank<---\\
YourPin = '1993';

//SMART World\\
SMARTWorld = 152;


{-------------------------------------------------------
                       Player Setup
--------------------------------------------------------}

procedure DeclarePlayers;
begin

   HowManyPlayers := 2; //How many Players
   NumberOfPlayers(HowManyPlayers);
   CurrentPlayer :=0; //Starting Player

   Players[0].Name := '';
   Players[0].Pass := '';
   Players[0].Nick := '';
   Players[0].Active := True;

   Players[1].Name := '';
   Players[1].Pass := '';
   Players[1].Nick := '';
   Players[1].Active := False;

{  Players[2].Name := '';
   Players[2].Pass := '';
   Players[2].Nick := '';
   Players[2].Active := True;

   Players[3].Name := '';
   Players[3].Pass := '';
   Players[3].Nick := '';
   Players[3].Active := True;

   Players[4].Name := '';
   Players[4].Pass := '';
   Players[4].Nick := '';
   Players[4].Active := True;

   Players[5].Name := '';
   Players[5].Pass := '';
   Players[5].Nick := '';
   Players[5].Active := True;   }



end;

{----------------------------Do Not Edit Below This----------------------------}
var x, y: integer;
    LoadsNum: integer;
    LoadsNum2: integer;
    MMTree: integer;
    BrokenAxe: integer;
    BrokenAxes: integer;
    NormalAxe: integer;
    RandomBankTable: integer;


//Load DTM's\\

procedure LoadDTMs;
begin

       MMTree := DTMFromString('78DA6364636060E0604001497EA20CFF81342' +
               '310FF07024626208305558D7E9210986684F21939895003B28B19' +
               '558D7D8104A61A26026A5830D560D8C50A24D850D5B8997162DAC' +
               '58EE9771435EC84DD0C00E5D90BB5');

       BrokenAxe := DTMFromString('78DA636C616260E0636440061D697C601A26C' +
                  'AD80354C38FAA06260B57D30754C34D404D2F508D080135CD4035' +
                  '5C04D4D400D5A8E05703008C0604B4');

       NormalAxe := DTMFromString('78DA63E4626060E067400175F17C609A11CA6' +
                  '7640312720C688011550D0B909025A0860748B01050230E245809' +
                  'A81105127C04D480E439F1AB01004CBC01C4');

       RandomBankTable := DTMFromString('78DA635465606090634001A93EB20CFF81342' +
                        '310FF0702463E204312554D5EA42A986684F21941F282A86AA26D' +
                        '1850D5A800097E5435B5A95AA86A8C810427AA9AAABC445435E64' +
                        '04206CDCDDE3CA86A8C808412AA9AF6C62A5435207F2BA3AA09B1' +
                        '4073B320A61A4775064CBFB310708F2E906025A0C6144808A0F9B' +
                        'D281B450D0024D1126E');



end;

//Signature\\

procedure Signature;
 begin
   ClearDebug;
   wait(250 + random(30));
   writeln('   Torrents Willow Crusher&Banker V1.7    ');
   wait(250 + random(30));
   writeln(' _____                                _   ');
   wait(250 + random(30));
   writeln('(_   _)                              ( )_ ');
   wait(250 + random(30));
   writeln('  | |   _    _ __  _ __   __    ___  | ,_)');
   wait(250 + random(30));
   writeln('  | | / _`\ ( "__)( "__)/"__`\/" _ `\| |  ');
   wait(250 + random(30));
   writeln('  | |( (_) )| |   | |  (  ___/| ( ) || |_ ');
   wait(250 + random(30));
   writeln('  (_)`\___/ (_)   (_)  `\____)(_) (_) \__)');
   wait(500 + random(30));
 end;

//Torrent Proggy\\

procedure ToFProggy;
begin
  ClearDebug;
  Writeln(',,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,');
  Writeln('/\Please Post Progress Reports & Any problems /\ ');
  Writeln('/\      From Wherever you got the script      /\ ');
  Writeln('//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\ ');
  Writeln('//\\Worked For: '        + TimeRunning + '                   //\\');
  Writeln('//\\Did: '        + IntToStr(LoadsNum)+ ' Loads                            //\\');
  Writeln('//\\Broke: '        + IntToStr(BrokenAxes)+ ' Axes                         //\\');
  Writeln('//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\ ');
  Writeln('//\\      Thanks for Using my Script :D     //\\ ');
  Writeln('```````````````````````````````````````````````');
end;

//--------------------------------Anti-Ban!!------------------------------------\\
procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case Random(30) of
    0: TypeSend('Bored, notice how bored I am..');
    1: MMouse(0, 0, 762, 499);
    2: MMouse(0, 0, 762, 499);
    3: MMouse(0, 0, 762, 499);
    4: MMouse(0, 0, 762, 499);
    5: MMouse(0, 0, 762, 499);
    6: MMouse(0, 0, 762, 499);
    7: MMouse(0, 0, 762, 499);
    8: MMouse(0, 0, 762, 499);
    9: MMouse(0, 0, 762, 499);
    10: MMouse(0, 0, 762, 499);
    11: RandomRClick;
    12: HoverSkill('Woodcutting', False);
    13: RandomMovement;
    14: BoredHuman;
    15: PickUpMouse;
    16: AlmostLogout;
    17: DoEmote(400 +Random(90));
    18: begin
         GameTab(1 +Random(12));
         wait(2000 +Random(1000));
         GameTab(4);
       end;
  end;
end;

//------------------------------Anti-Randoms!!------------------------------\\

procedure FindRandoms;
begin
  FindTalk;
  FindNormalRandoms;
  FindLamp('Woodcutting');
  SolvePinball;
  FindEnt(x, y, true);
end;

//EntFinder\\

procedure EntFinder; //By Yohojo - Modded by BobboHobbo
var
  EX, EY: integer;
  FX, FY: integer;
  SafeEntWait: LongInt;
begin
  if (not (LoggedIn)) then
  Exit;
  begin
    Status('Ent Checking')
      if
      (FindObjCustom(EX, EY, ['Willow'], [4690821], 7)) then
    begin
      MMouse(EX, EY, 0, 0)
        if FindColorTolerance(FX, FY, 55769, 85, 15, 115, 15, 20) then
      begin
        Status('Found Ent');
        MarkTime(SafeEntWait)
          repeat
          FTWait(5)
            FindNormalRandoms;
          if not (LoggedIn) then
            NextPlayer(False);
        until TimeFromMark(SafeEntWait) > 20000 + Random(5000);
      end;
    end;
  end;
end;

//---------------------------------CheckAxe-----------------------------------\\

procedure CheckAxe;
begin
if FindAxe then
  begin
    Writeln('Axe Found')
  end
end;

//---------------------------------IsAxeBroken?--------------------------------\\

Procedure IsAxeBroke;
begin
if FindDTM(BrokenAxe, x, y, 547, 206, 734, 464) then
  begin
  if FindDTM(BrokenAxe, x, y, 547, 206, 734, 464) then
    begin
      ChooseOption('rop');
      BrokenAxes := BrokenAxes +1;
    end;

    if (FindSymbol(x, y, 'bank')) then
    begin
      Mouse(x, y, 2, 2, true);
      Flag;
      Writeln('Banking for new axe..');
      OpenBankQuiet('db');
      if (FindDTM(NormalAxe, x, y, 151, 210, 595, 281)) then
      begin
        ChooseOption('1')
        CheckAxe;
        CloseBank;
      end;
    end;
  end;
end;

//---------------------------------ChopTree-----------------------------------\\

procedure ChopTree;
var CuttingTime: integer;
    Tries: integer;
begin
  MarkTime(CuttingTime);
  MakeCompass('S');
  CheckAxe;
  IsAxeBroke;
  EntFinder;
  FindEnt(x, y, True);
  repeat
    if FindObjCustom(x, y, ['Wil', 'low'], [1989969, 3760987, 2844763], 7) then
    begin
      Mouse(x,y,0,0,false);
      if(IsUpText('Chop'))then
        Wait(5000 + (random(150)));
        ChooseOption('hop')
        AntiBan;
        if (FindDTM(BrokenAxe,  x, y, 547, 206, 734, 464)) then
          begin
            IsAxeBroke;
          end;

        if (not (FindObjCustom(x, y, ['Wil', 'low'], [1989969, 3760987, 2844763], 7))) then
          Wait(100+random(100));
          Tries := Tries + 1;
          if(Tries = 50)then
            Writeln ('Willow Logs not found. Switching Players..');
            Logout;
            NextPlayer(True);
     end;
  until(InvFull) or (TimeFromMark(CuttingTime) > 800000+random(60000));
end;


//----------------------Walking from Willows to Bank--------------------------\\

procedure WalkToBank;
begin
if (not(LoggedIn)) then
  Exit;
  SymbolAccuracy:= 0.2;
  Makecompass('N');

  if (not(FindSymbol(x, y, 'bank'))) then
  begin
    if (FindDTM(MMTree, x, y, 743, 241, 752, 251)) then
    begin
      Mouse(x, y, 2, 2, true);
      MakeCompass('N');
      SetAngle(True);
      if (FindDTM(RandomBankTable, x, y, 521, 418, 600, 462)) then
      begin
        Mouse(x, y, 2, 2, true);
        Flag;
        Writeln('Got to bank');
      end;
    end;
  end else

    if (FindSymbol(x, y, 'bank')) then
    begin
      Mouse(x, y, 2, 2, true);
      Flag;
      Writeln('Got to bank');
    end;
end;
//--------------------------------->Willow DDTM!<-----------------------------\\

function LoadWillows: integer;
var
  WillowMP: TDTMPointDef;
  WillowSP: array of TDTMPointDef;
  WillowDDTM: TDTM;
begin
  SetArrayLength(WillowSP, 2);

  WillowMP.x := 743;
  WillowMP.y := 434;
  WillowMP.color := 1852749;
  WillowMP.tolerance := 9;

  WillowSP[0].x := 733;
  WillowSP[0].y := 430;
  WillowSP[0].color := 4352627;
  WillowSP[0].tolerance := 0;

  WillowSP[1].x := 751;
  WillowSP[1].y := 441;
  WillowSP[1].color := 1720648;
  WillowSP[1].tolerance := 0;

  WillowDDTM.MainPoint :=  WillowMP;
  WillowDDTM.SubPoints :=  WillowSP;
  result := AddDTM(WillowDDTM);
end;

//-----------------------------Banking the Willows----------------------------\\

function Banking: Boolean;
begin
  if (InvFull) then
  begin
    MakeCompass('N')
    Wait (300 + random(160));
    OpenBankQuiet('db');
    if (PinScreen) then
    InPin(YourPin);

    if(not(FindDTM(LoadWillows, x, y, 547, 206, 734, 464)))then
    begin
      if(FindColorSpiral(x, y, 1985878, 547, 206, 734, 464)) then
      begin
        Mouse(x, y, 4, 3, false);
        ChooseOption('All');
        Result := True;
        if Result = True then
        begin
          LoadsNum := LoadsNum + 1;
          LoadsNum2 := LoadsNum2 + 1;
          ReportVars[1] := ReportVars[1] + 1;
          SendSRLReport;
        end;
      end;
  end else

  if(FindDTM(LoadWillows, x, y, 547, 206, 734, 464))then
  begin
    Mouse(x, y, 4, 3, false);
    ChooseOption('All');
    Result := True;
    if Result = True then
      begin
        LoadsNum := LoadsNum + 1;
        LoadsNum2 := LoadsNum2 + 1;
        ReportVars[1] := ReportVars[1] + 1;
        SendSRLReport;
      end;
  end;
    CloseBank;
    Wait(150 + random (278));
    MakeCompass('S');
  end;
end;


//-----------------------Walking from Bank to Willows-------------------------\\

procedure WalkToWillow;
var WaterColor : integer;

begin
  CheckAxe;
  IsAxeBroke;
  if (not (FindSymbol(x, y, 'fish'))) then
  begin
    MakeCompass('W');
    WaterColor := FindWaterColor;
    RadialWalk(WaterColor, 225, 351, 64, 2, 2);
    Flag;
    Writeln('At Willows Now');
  end else

  if (FindSymbol(x, y, 'fish')) then
  begin
    Mouse(x, y, 2, 2, true);
    Flag;
    Writeln('Got to Willows');
  end;
end;


//--------------------------->>>Main Loop<<<----------------------------------\\

procedure SetupScript;
begin
  SmartSetupEx(SMARTWorld, false, true);
  SetTargetDC(SmartGetDC);
  while not SmartReady do Wait(2000);
  SRLId := YourSRLId;
  SRLPassword:= YourSRLPassword;
  SetupSRL;
  ScriptID:= '687';
  Signature;
  DeclarePlayers;
  LoadDTMs;
end;

begin
  SetupScript;
  CheckAxe;
  repeat
   WalkToWillow;
    repeat
      ChopTree;
    until (InvFull) or (not LoggedIn)
    AntiBan;
    WalkToBank;
    Banking;
    if (LoadsNum2=Loads) then
    begin
       NextPlayer(True);
       LoadsNum2 := 0;
       MakeCompass('S')
       Writeln('Players Switched successfully')
    end;
   TofProggy;
   SRLRandomsReport;
  until (false)
end.

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

Yes. One thing:

procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case Random(30) of
    0,1,2,3,4,5,6,7,8,9,10: TypeSend('Bored, notice how bored I am..');
    11: RandomRClick;
    12: HoverSkill('Woodcutting', False);
    13: RandomMovement;
    14: BoredHuman;
    15: PickUpMouse;
    16: AlmostLogout;
    17: DoEmote(400 +Random(90));
    18: begin
         GameTab(1 +Random(12));
         wait(2000 +Random(1000));
         GameTab(4);
       end;
  end;
end;

Some suggestions:

function Banking: Boolean;
begin
  if (InvFull) then
  begin
    MakeCompass('N')
    Wait (300 + random(160));
    OpenBankQuiet('db');
    if (PinScreen) then
    InPin(YourPin);
 
    if(not(FindDTM(LoadWillows, x, y, 547, 206, 734, 464)))then
    begin
      if(FindColorSpiral(x, y, 1985878, 547, 206, 734, 464)) then
      begin
        Mouse(x, y, 4, 3, false);
        ChooseOption('All');
        Result := True;
        if Result = True then
        begin
          LoadsNum := LoadsNum + 1;
          LoadsNum2 := LoadsNum2 + 1;
          ReportVars[1] := ReportVars[1] + 1;
          SendSRLReport;
        end;
      end;
  end else
 
  if(FindDTM(LoadWillows, x, y, 547, 206, 734, 464))then
  begin
    Mouse(x, y, 4, 3, false);
    ChooseOption('All');
    Result := True;
    if Result = True then
      begin
        LoadsNum := LoadsNum + 1;
        LoadsNum2 := LoadsNum2 + 1;
        ReportVars[1] := ReportVars[1] + 1;
        SendSRLReport;
      end;
  end;
    CloseBank;
    Wait(150 + random (278));
    MakeCompass('S');
  end;
end;

Isnt the DTM LoadWillows a DTM for the willows? you're clicking it in a banking function.

end else
 
  if(FindDTM(LoadWillows, x, y, 547, 206, 734, 464))then
  begin
    Mouse(x, y, 4, 3, false);
    ChooseOption('All');
    Result := True;

Your DDTM has low tolerance, and your bank table DTM is large.

EDIT: Yes.

Use a DTM of MM bankers to get to the bank as a failsafe, or use FindSymbol(x, y, 'fish'); and mouse x - 20 y - 30 (not correct numbers lol).

Any chance seen my script, you use the //\\//\\ pattern at the start exactly what I was using until the next version lol.

For failsafe of walking to trees just use a Mouse() with a lot of randomness (all good since they cover a large area).

Don't always use right clicking for cutting. May I also suggest making your own tree finder pretty quickly :) FindObj = Botty.

But yea pretty nice work :)

I vote a yes. But there is one thing i don't like, that is the False loop. Also, in your anti-ban procedure you have 10 stupid little move mouse things. Wouldn't it be better off with just the one?

Good luck onto getting into SRL Members ;)

i think you kinda rushed your script imo…i vote no.

what is the point of the CheckAxe procedure? What happens if it doesnt find the axe lol? The point of a DDTM is the "dynamic" part of it…you use it to find a log in you inventory which could be easily done with a normal DTM plus you dont use the black outline of the item to your advantage in the DDTM at all.

I dont see many failsafes which is a big downer when i look at a script. Your ent finding should be implemented after you move the mouse to the tree no? I see that you have it before you even search (correct me if I missed something there :redface: )

You made a good effort dont get me wrong, but I see a lack of knowledge in a bunch of areas that could have been fixed if you were a lil more patient before applying.

Good luck ;)

EDIT: I looked at the script again and I do notice that you have more failsafes than i gave you credit for…sorry about the failsafe comment then :p still sticking with my vote though.

Has it been a month since you last applied? Or have you applied lately :confused: .. Well, I'll take a look.

Hmm.. It's nice but seems a bit "rushed" as gerauchter said it and a bit short too… I'll think.

I vote yes. Everything is relative in life, and if I think about other applications that have been accepted, then this one should be accepted also (I am thinking of my own app… still can't believe I got in with it :D). In any case, you have lots to learn like I did, but I am sure you'll do a great job. :)

From: GoF
Has it been a month since you last applied? Or have you applied lately :confused: .. Well, I'll take a look.

Hmm.. It's nice but seems a bit "rushed" as gerauchter said it and a bit short too… I'll think.

last app was on 2-24-08

soo omg maths! like 16 days or something lol :D Kinda quick to apply, could have made more solid improvements in certain areas, but it is a great improvement from your last app. ;)

vote: not sure…

but…

//---------------------------------CheckAxe-----------------------------------\\
 
procedure CheckAxe;
begin
if FindAxe then
  begin
    Writeln('Axe Found')
  end
end;

couldn't you just use it in the script and don't make a second procedure like this it's not bad but i think it is useless

Well thanks. By the shaky outlook of this, Ill edit it exessivley before I apply again.

And I know you can Use DDTM's for the dynamic part, but I read a tutorial and it was just using it to identify shrimp, so I just used it to identify logs.


I can tell you it wasnt rushed, maybe just not very well proof read. I really should take on board what was said here and if I dont get in, i shall perfect this script and re-apply in about a month.


EDIT: Nah frozen I didnt =P It just looked cool in my first release so I kept with it. and Frozen, your Frostbite uses FindObj :/

Ill look into making another :]

yeah i think it is too quick to reapply already so its not fair to others :S

though its good but ima have to vote no sorry

From: p1nky
yeah i think it is too quick to reapply already so its not fair to others :S

though its good but ima have to vote no sorry

Thats a bit harsh just voting no because they applied only 2 weeks ago, as I've seen people get into members who have applied just one week later…

I'm voting yes because its a full script that fits nearly all the requirements.

Note to wizzy: If his votes are like 7-5 then I think you should take into account that some people voted no just because it was only 2 weeks since his last app

How many do you need before you get accepted?

I had 7 against me when I get rejected first time.

EDIT: It would be nice to see why 3 people have voted no :[

Yeah, its a noying when people do that, on my app I had 6 no's out of 18 votes and only 2 people owned up. Its best if you say why you said no because then they know where they can improve.

EDIT: You need around 65-70% yes's

Omg. Another mysterious no vote.

Thakns anyone who voted no and explained themselves.

And like Dude Richard said, people are voting no not because of my scripting abilities, but because I applied a little early?

This is going to be a contraversial decision :'(

I voted no cause of the same reasons as p1nky and gerauchert. That's also why i didn't post anything about it before, 2 people have posted it allready, so no reason to repeat it.

i voted yes. If you really want me to post a big explanation why, just ask :p


-Ashur

From: Psychor
I voted no cause of the same reasons as p1nky and gerauchert. That's also why i didn't post anything about it before, 2 people have posted it allready, so no reason to repeat it.

See, was posting "I agree with p1nky and gera" that hard.

Thanks for the feedback.


GREAT. Another random no. And another.


Ahhh this is going to drag on :'(


Well. I have 5 voted explained, so 4 people CBA to post anything.

It's not perfect, but it's decent. DDTM, Decent standards, etc… I like it enough. Yes.

Thank you.

50-50 Again.


EDIT: Community Member :D

From: Dude Richard
Yeah, its a noying when people do that, on my app I had 6 no's out of 18 votes and only 2 people owned up. Its best if you say why you said no because then they know where they can improve.

EDIT: You need around 65-70% yes's

um, not really, i got in with a 54.75 vote or something (don't feel like checking it again)… but the higher the percent the better your chances :D don't worry, sometimes there are more "no"s, sometimes more "yes"s, sometimes it is equal, I'd just sit back until the vote is closed and an admin comes and announces your doom. ;)

Ok, Ill wait =[

Its so nerve racking though. Lol. I check it every half hour. How sad am I :P

12 - 9 <3 Anyone who has said yes so far (>^.^)>





Can an Admin/Mod give me a rough outline of when I pass/fail acceptance? (What %)

Voted No, because ahh.. Just look.

First if your doing If Result := True then. You can use If (Result) then it makes everything look better and in your bank procedure. If it cant find bank it doesnt do anything, FailSafes please.

DTMs, fail-safes, standards, yes. :).

From: Dude Richard
Yeah, its a noying when people do that, on my app I had 6 no's out of 18 votes and only 2 people owned up. Its best if you say why you said no because then they know where they can improve.

EDIT: You need around 65-70% yes's

um no its not?

From: p1nky
um no its not?

um, yes it is

Ummm.. yes it is?

And you seriousley cant talk. You gave me a no because I applied to early.. Thats nothing on my scripting ability. Isnt SRL Members for good scripters, not time obeyers..

Once again I'll have to come and tell that to become an SRL Member you need to have the correct attitude too, playing by the rules including waiting a month between the applies is almost just as important as the script, unless your script is… brilliant.

From: n3ss3s
Once again I'll have to come and tell that to become an SRL Member you need to have the correct attitude too, playing by the rules including waiting a month between the applies is almost just as important as the script, unless your script is… brilliant.

I've seen people before post on apps saying "bad luck, apply in 2 weeks and you might get it"

n3ss3s. I understand that completely. rules are set to be followed, right. Wizzup? said If I posted again in about 3 weeks, it would be acceptable, this was 2 weeks 4 days (Or something - My 2nd application was by accident. I hadnt realised that I already had one outstanding [My computer crashed at the same time - I was playing Guild Wars and it crahsed :/] so yeah, 2 weeks 4 days)

And I was disputing that it IS annoying when people do not post a reason as to why they put a no. How can I improve if they dont tell me to?

My general attitude around the forums is good, anyway. I help as much as I can in First Script and in the Scripting Help forums, too my scripting ability. I also posted a detailed tut on Chopping&Banking, that is practically unnoticed, and a tutorial on how to find your SRL Id, if you did not take a note of it in the first place, which is unnoticed.

If I do get rejected here, it is because some of my scripting is obviousley lacking, but also because I have been interpreted as the wrong type of person as I actually am.


Sorry for anything that makes me seem like an asshole. The above included.

Fuck this become an srl member already :)

:D Much appreciated =]

From: Torrent of Flame
n3ss3s. I understand that completely. rules are set to be followed, right. Wizzup? said If I posted again in about 3 weeks, it would be acceptable, this was 2 weeks 4 days (Or something - My 2nd application was by accident. I hadnt realised that I already had one outstanding [My computer crashed at the same time - I was playing Guild Wars and it crahsed :/] so yeah, 2 weeks 4 days)

And I was disputing that it IS annoying when people do not post a reason as to why they put a no. How can I improve if they dont tell me to?

My general attitude around the forums is good, anyway. I help as much as I can in First Script and in the Scripting Help forums, too my scripting ability. I also posted a detailed tut on Chopping&Banking, that is practically unnoticed, and a tutorial on how to find your SRL Id, if you did not take a note of it in the first place, which is unnoticed.

If I do get rejected here, it is because some of my scripting is obviousley lacking, but also because I have been interpreted as the wrong type of person as I actually am.


Sorry for anything that makes me seem like an asshole. The above included.

Even life doesn't write it in a debug box - you can get an unknown identifier error in real life - you never told me that you were told to apply in a few weeks instead of the full month ;) Good luck…

Cant be bothered to read other people's posts, so I'll just point out some errors I find myself.

procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case Random(30) of
    0: TypeSend('Bored, notice how bored I am..');
    1: MMouse(0, 0, 762, 499);
    2: MMouse(0, 0, 762, 499);
    3: MMouse(0, 0, 762, 499);
    4: MMouse(0, 0, 762, 499);
    5: MMouse(0, 0, 762, 499);
    6: MMouse(0, 0, 762, 499);
    7: MMouse(0, 0, 762, 499);
    8: MMouse(0, 0, 762, 499);
    9: MMouse(0, 0, 762, 499);
    10: MMouse(0, 0, 762, 499);
    11: RandomRClick;
    12: HoverSkill('Woodcutting', False);
    13: RandomMovement;
    14: BoredHuman;
    15: PickUpMouse;
    16: AlmostLogout;
    17: DoEmote(400 +Random(90));
    18: begin
         GameTab(1 +Random(12));
         wait(2000 +Random(1000));
         GameTab(4);
       end;
  end;
end;

Much better:

procedure AntiBan;
begin
  if not LoggedIn then Exit;
  case Random(30) of
    0: TypeSend('Bored, notice how bored I am..');
    1, 2, 3, 4, 5, 6, 7, 8, 9, 10: MMouse(0, 0, 762, 499); // <---
    11: RandomRClick;
    12: HoverSkill('Woodcutting', False);
    13: RandomMovement;
    14: BoredHuman;
    15: PickUpMouse;
    16: AlmostLogout;
    17: DoEmote(400 +Random(90));
    18: begin
           GameTab(1 +Random(12));
           wait(2000 +Random(1000));
           GameTab(4);
         end;
  end;
end;

..

var x, y: integer;
    LoadsNum: integer;
    LoadsNum2: integer;
    MMTree: integer;
    BrokenAxe: integer;
    BrokenAxes: integer;
    NormalAxe: integer;
    RandomBankTable: integer;

I like this better:

var 
  x, y, LoadsNum, LoadsNum2, MMTree, BrokenAxe, BrokenAxes, NormalAxe, RandomBankTable: integer;

———————————-

procedure FindRandoms;
begin
  FindTalk;
  FindNormalRandoms;
  FindLamp('Woodcutting');
  SolvePinball;
  FindEnt(x, y, true);
end;

Why? Shorter, better(?):

procedure FindRandoms;
begin
  FindNormalRandoms; // Also covers FindTalk and FindLamp. AFAIK also covers PinBall..?
  FindEnt(x, y, true);
end;

______________________________

procedure CheckAxe;
begin
if FindAxe then
  begin
    Writeln('Axe Found')
  end
end;
 

Unneeded begins/ends. Correct:

procedure CheckAxe;
begin
  if FindAxe then
    Writeln('Axe Found');
end;
 

—————

 Flag;

better –>

 FFlag(0);

Same proc, better failsafes.
—————

You've got potencial.
I'm voting yes.

Thank you Evil :] - I have edited all of the above in my next release :D

And thats n33ss3s :]


God DAMN! Can this be like closed or something soon :/

Sorry for DP but PLEASE

Can this be closed for an acceptance or voted against or whatever. I just want to see the outcome.

In! Welcome!