Page 2 of 2 FirstFirst 12
Results 26 to 35 of 35

Thread: Biggest screw ups, fails, etc.? Post them here!

  1. #26
    Join Date
    Feb 2006
    Location
    Belgium
    Posts
    3,137
    Mentioned
    3 Post(s)
    Quoted
    5 Post(s)

    Default

    Quote Originally Posted by Widget View Post
    Edit: Don't run this, Freddy screwed up SCAR somewhat since I wrote this =\
    Heh, has nothing to do with me, but thx for the thought

  2. #27
    Join Date
    Aug 2008
    Location
    Auckland
    Posts
    132
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    No no no, I own you all at failing I mean check this script out and im still no better :P
    program Helloworld;
    begin
    sendenglishwords; HELOO//
    end.
    ~Tom~

  3. #28
    Join Date
    Apr 2007
    Location
    Australia
    Posts
    4,163
    Mentioned
    9 Post(s)
    Quoted
    19 Post(s)

    Default

    Had a failsafe in one of my miners which would occasionally result in the character clicking in the one place on the minimap constantly for hours until it got a random and died. Didn't realise it though lol, a character would die roughly 1 out of 3/4 nights I ran the script. Ran it for 2 months before any bans came, and ended up losing ~5 of my best autoers, a medium level (50+ in all skills) autoer-main and my best mate's level 90 main (which he appealed last week and got unbanned lol). This was back a year and a half ago or so.

  4. #29
    Join Date
    Jan 2007
    Posts
    8,876
    Mentioned
    123 Post(s)
    Quoted
    327 Post(s)

    Default

    Never released / maked a working script >.<

  5. #30
    Join Date
    Jun 2007
    Location
    Liverpool ,Nsw,Australia
    Posts
    740
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Haha my biggest crew up was when I started scripting i took like 2 weeks making it log in, before realising about SRLPlayerForm
    Quote Originally Posted by Darkmage View Post
    I got 2 questions'
    #1. When i run the script will it automatically pick up the mouse and move?

  6. #31
    Join Date
    Feb 2007
    Location
    South East England
    Posts
    2,906
    Mentioned
    2 Post(s)
    Quoted
    8 Post(s)

    Default

    SCAR Code:
    {//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//
    |                       Draynor Willow Crusher & Banker                        |
    |                            By Torrent of Flame                               |
    |                      Scar 3.14          SRL 4.0 Rev 14                       |
    |                                Version 1.2                                   |
    |                    Chops Willows at Draynor and Banks them                   |
    |                      Start from Draynor Bank or Willow Trees                 |
    |                        Enter your Pin before you start!                      |
    |     Start Logged Out if you start in bank, or in if you start at Willows     |
    |       HAS TO BE SAID:   ---> Works (alot) better without a pin <---          |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    |                         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                                                          |
    |                                Multi-Player                                  |
    |                            Fully working Repeat                              |
    |                          Fully working Tree Cutting                          |
    |                                Chatting                                      |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\}

     
     
    Program WillowCrusher;
    {.include SRL/SRL.scar}
    {.include SRL/SRL/Skill/WoodCutting.scar}
     
     
    const
    //-->Loads<--\\
     
    Loads = 5; //How many loads per player before switching
     
     
    {-------------------------------------------------------
                           Player Setup
    --------------------------------------------------------}

     
    procedure DeclarePlayers;
    begin
     
       HowManyPlayers := 1; //How many Players
       NumberOfPlayers(HowManyPlayers);
       CurrentPlayer :=0; //Starting Player
     
       Players[0].Name := '';
       Players[0].Pass := '';
       Players[0].Nick := '';
       Players[0].Active := True;
     
     
    end;
     
    {----------------------------Do Not Edit Below This----------------------------}
    var x, y: integer;
        LoadsNum: integer;
        LoadsNum2: integer;
     
       
    //Signature\\
     
    procedure Signature;
     begin
       ClearDebug;
       wait(250 + random(30));
       writeln('      Torrents Willow Crusher&Banker      ');
       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('//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\ ');
      Writeln('//\\      Thanks for Using my Script :D     //\\ ');
      Writeln('```````````````````````````````````````````````');
    end;
     
    //Logging in...\\
     
    procedure Login;
    begin
     if (not(LoggedIn)) then
     LoginPlayer;
    end;
     
    //--------------------------------Anti-Ban!!------------------------------------\\
    procedure AntiBan;
    begin
      if (not(LoggedIn)) then
      Exit;
      case Random(8) of
     
        0: RandomRClick;
        1: HoverSkill('Woodcutting', False);
        2: RandomMovement;
        3: BoredHuman;
        4: PickUpMouse;
        5: AlmostLogout;
        6: DoEmote(100 +Random(90));
        7: 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;
    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;
     
     
    //---------------------------------ChopTree-----------------------------------\\
     
    Procedure ChopTree;
    begin
      if not LoggedIn then
      Exit;
      MakeCompass('S');
      EntFinder;
      FindEnt(x, y, True);
      repeat
        if FindObjCustom(x, y, ['Wil', 'low'], [1989969, 3760987, 2844763], 7) then
         begin
           Mouse(x,y,0,0,false);
           repeat
             Wait(100 + (random(150)));
             ChooseOption('hop')
             AntiBan;
           until(InvFull)
         end;
      until(InvFull)
    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
          NextPlayer(False);
        end;
      begin
        if (FindSymbol(x, y, 'bank')) then
        begin
          Mouse(x, y, 2, 2, true);
          Flag;
          Writeln('Got to bank');
        end;
      end;
    end;
     
    //-----------------------------Banking the Willows----------------------------\\
     
    function Banking: Boolean;
    begin
      if (InvFull) then
      begin
        MakeCompass('N')
        Wait (300 + random(160));
        OpenBankQuiet('db');
          if(FindColorSpiral(x, y, 1852748, 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;
         end;
        end;
        CloseBank;
        Wait(150 + random (278));
        MakeCompass('S');
      end;
    end;
     
     
    //-----------------------Walking from Bank to Willows-------------------------\\
     
    procedure WalkToWillow;
    var WaterColor : integer;
    begin
      if (not(LoggedIn)) then
      Exit;
      MakeCompass('S');
      WaterColor := FindWaterColor;
      RadialWalk(WaterColor, 225, 351, 64, 2, 2);
      Flag;
      Writeln('At Willows Now');
    end;
     
     
    //--------------------------->>>Main Loop<<<----------------------------------\\
     
    procedure SetupScript;
    begin
      if (Loggedin) then Logout;
      SetupSRL;
      Signature;
      DeclarePlayers
      if (not (Loggedin)) then Login;
    end;
     
    begin
      SetupScript;
      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


    First members application, 8 no's and the standards are scarreeeh!


    Also, could never get this to work which was mega shit, might work on this and get it to work as there never has been one successful....

    SCAR Code:
    {//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//
    |                       Varrock West Bank Potion 3 to 4 Mixer                  |
    |                             By Torrent of Flame                              |
    |                       Scar 3.14          SRL 4.0 Rev 14                      |
    |                                 Version 1.1                                  |
    |                   Mixes Attack Potions in Varrock West from 3 to 4           |
    |                             Start in Varrock West Bank                       |
    |                                 Start Logged Out                             |
    |                        Put Potions in FIRST or SECOND Row                    |
    |                    First of a Kind Script as far as I know!                  |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    |                        Setup Player at lines 45 to 77                        |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    |                   Mega thanks to Dude Richard for helping me out!            |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    |                  NOTE: Will ONLY do ATTACK potions (Normal, Not Super!)      |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    |Version 1.1 Includes                                                          |
    |                                   Anti - Ban                                 |
    |                                 Anti - Randoms                               |
    |                                    FailSafes                                 |
    |                                 Pin Compatible                               |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    |Version 1.2 Includes                                                          |
    |                                    It Works!                                 |
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\}

     
     
    Program PotionMixer;
    {.include SRL/SRL.scar}
     
     
    const
     
    //---->Loads<-----\\
    Loads = 100; //Approximate Amount.
     
    //--->SRL ID<---\\
    YourSRLId = '';
    YourSRLPassword ='';
     
    //--->Pin - Make same for ALL chars. If no Pin, leave blank<---\\
    YourPin = '';
     
     
    {-------------------------------------------------------
                           Player Setup
    --------------------------------------------------------}

     
    procedure DeclarePlayers;
    begin
     
       HowManyPlayers := 1; //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, LoadsMixed, LoadsMixed2, PotionsMixed, PotionsMixed2, EmptyVial, AttackPotion: integer;
     
    //Signature\\
     
    procedure Signature;
     begin
       ClearDebug;
       wait(250 + random(30));
       writeln('        Torrents Potion 3 to 4 Mixer      ');
       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('//\\Mixed: '        + IntToStr(PotionsMixed)+ ' Potions                     //\\');
      Writeln('//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\ ');
      Writeln('//\\      Thanks for Using my Script :D     //\\ ');
      Writeln('```````````````````````````````````````````````');
    end;
     
    //------------------------------Anti-Randoms!!------------------------------\\
     
    procedure FindRandoms;
    begin
      FindTalk;
      FindNormalRandoms;
      FindLamp('Herblore');
    end;
     
     
    //------------------Attack Potion DTM & Empty Vial DTM-----------------------\\
    procedure LoadDTMs;
    begin
     
      AttackPotion := DTMFromString('78DA63146660609064400156672F816946289' +
                    'F510C4870A3AA29AB68C0542385AAC6ECEC455435207B6451D5A8' +
                    'CF9C83AA06E41E795435FEE72FA3AAE1C534C7E71C163568FE724' +
                    '757C30324C418D00023AA1A3E20C14B408D00906023A006648F02' +
                    'AA0ABD0DDB50D5F0030945FCE600007A400FDC');
     
     
      EmptyVial := DTMFromString('78DA63E4666060106540011919D9609A11CA6' +
                 '704A9614255131FAA83AA861F4888A0AA7171F1C454238DAA2638' +
                 '2412D32E3435393979A86AD831D5949494A1AA6101126204D480C' +
                 'C11445553515189AA861348F0A2AAA9ACAC4255C301245819D000' +
                 '23AA1A901902A82ABCBD0351D580DC2289AAC6CDDD1B530D9ABFE' +
                 'CED5D50D580DC2285DFEF0078731064');
    end;
     
    //-----------------------------Banking the Potions----------------------------\\
     
    function Banking: Boolean;
    begin
      Wait (300 + random(160));
      OpenBankQuiet('db');
      if (PinScreen) then
        InPin(YourPin);
       
      if (FindDTM(AttackPotion, x, y, 71, 59, 455, 249))then
      begin
        Mouse(x, y, 4, 3, false)
        ChooseOption('All');
      end else
     
      if (not(FindDTM(AttackPotion, x, y, 71, 59, 455, 249))) then
      begin
        Writeln('Potions NOT found. Make sure they are in the first 3 slots!');
        Exit;
      end;
     CloseBank;
     Wait(150 + random (278));
    end;
     
    //-----------------------------Mixing the Potions-----------------------------\\
     
    procedure MixingPotions;
    begin
      if (FindColorTolerance(x, y, 13815094, 564, 209, 728, 464, 10 )) then
      begin
        if IsUpText('Attack Potion(3)') then
          Mouse(x, y, 5, 5, False);
          ChooseOption('Use');
         
        if (FindColorTolerance(x, y, 13815094, 564, 209, 728, 464, 10 )) then
          begin
          Mouse (x, y , 5, 5, true);
              begin
                PotionsMixed := PotionsMixed + 27;
                PotionsMixed2 := PotionsMixed2 + 27;
                ReportVars[0] := ReportVars[0] + 27;
                LoadsMixed:=LoadsMixed + 1;
                LoadsMixed2 := LoadsMixed2 +1;
                ReportVars[1] := ReportVars[1] + 1;
                SendSRLReport;
              end;
          end;
      end;
    end;
     
     
    //-------------------------------->BankThisShit<------------------------------\\
     
    procedure BankThisShit;
    begin
      Mouse(692, 364, 724, 397, false);
      if IsUpText('(4)') then
         OpenBankQuiet('db');
         if (FindColorTolerance(x, y, 13815094, 564, 209, 728, 464, 10 )) then
         begin
           Mouse (x, y , 5, 5, false);
           ChooseOption('All')
         end;
     
         if (FindColorTolerance(x, y, 6512479, 564, 209, 728, 464, 10)) then
         begin
           Mouse(x, y, 4, 3, false)
           ChooseOption('All');
         end;
       CloseBank;
       Banking;
    end;
     
    //----------------------------->>>Main Loop<<<--------------------------------\\
     
    procedure SetupScript;
    begin
      SRLId := YourSRLId;
      SRLPassword:= YourSRLPassword;
      if (Loggedin) then Logout;
      SetupSRL;
      ScriptID:= '700';
      Signature;
      DeclarePlayers;
      LoadDTMs;
      LoginPlayer;
    end;
     
    begin
      SetupScript;
        repeat
          Banking;
          MixingPotions;
          BankThisShit;
          if (PotionsMixed=Loads) then
            begin
              NextPlayer(True);
              PotionsMixed2 := 0;
              Writeln('Players Switched successfully')
            end;
        until (false)
         TofProggy;
         SRLRandomsReport;
    end.
    Jus' Lurkin'

  7. #32
    Join Date
    May 2008
    Posts
    1,345
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Instead of the mixer, try making a decanter. It's faster and easier. Easily 1.8m + an hour legit to.

    Also, to keep this thread going, I'll post one of my more recent ones:

    I was working on my duel script, and couldn't figure out why one of the features wasn't working properly. Turns out I forgot a "Not". -.-.

  8. #33
    Join Date
    Feb 2007
    Location
    South East England
    Posts
    2,906
    Mentioned
    2 Post(s)
    Quoted
    8 Post(s)

    Default

    What is a Decanter?
    Jus' Lurkin'

  9. #34
    Join Date
    May 2008
    Posts
    1,345
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    It decants potions at the ge herby dude. Basically he turns the 3's into 4's, and it's much faster.

  10. #35
    Join Date
    Feb 2007
    Location
    South East England
    Posts
    2,906
    Mentioned
    2 Post(s)
    Quoted
    8 Post(s)

    Default

    Hmm. Sounds like a good idea, and pretty easy at that too.
    Might give it a go
    Jus' Lurkin'

Page 2 of 2 FirstFirst 12

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •