How to disable AntiRandoms?

Discussion in 'Scar/Simba Help' started by memenow, Sep 18, 2008.

How to disable AntiRandoms?
  1. Unread #1 - Sep 18, 2008 at 11:50 PM
  2. memenow
    Joined:
    Aug 31, 2008
    Posts:
    13
    Referrals:
    0
    Sythe Gold:
    0

    memenow Newcomer

    How to disable AntiRandoms?

    I am getting this error message when I run a script

    [Runtime Error] : Out Of Range in line 1103 in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/AntiRandoms/AntiRandoms.scar

    Is there a way to disable antirandom handling? I just need to alch with this script and I am in games room so don't need to handle randoms

    I'm using SRL revision 20 as the thing says and 3.15

    http://www.sythe.org/showthread.php?t=388743

    Thanks
     
  3. Unread #2 - Sep 20, 2008 at 10:36 AM
  4. WhoCares357
    Joined:
    Jan 21, 2007
    Posts:
    608
    Referrals:
    1
    Sythe Gold:
    0

    WhoCares357 Forum Addict

    How to disable AntiRandoms?

    Code:
    procedure Alch;
    begin
      StartAlch;
      repeat
        if FindTalk then FindNormalRandoms;
        wait(400+random(400))
        Mouse(x, y, 0, 0, true);
        Wait(1800+random(100));
        if isUpTextMultiCustom(['Ca','st']) then
        begin
          Mouse(x, y, 0, 0, true);
          Alchs:=Alchs + 1;
          Case Random(7) of
            0:Wait(100);
            1:AntiBan;
            2:Wait(100);
            3:FindNormalRandoms;
            4:Wait(100);
            5:Wait(100);
            6:Wait(100);
          end;
        end else
        StartAlch;
        until alchs=alchstodo;
        Finished;
    end;
    Find the lines "if FindTalk then FindNormalRandoms;" and "3: FindNormalRandoms;" and delete both of the lines. So the result would be:

    Code:
    procedure Alch;
    begin
      StartAlch;
      repeat
        wait(400+random(400))
        Mouse(x, y, 0, 0, true);
        Wait(1800+random(100));
        if isUpTextMultiCustom(['Ca','st']) then
        begin
          Mouse(x, y, 0, 0, true);
          Alchs:=Alchs + 1;
          Case Random(7) of
            0:Wait(100);
            1:AntiBan;
            2:Wait(100);
            4:Wait(100);
            5:Wait(100);
            6:Wait(100);
          end;
        end else
        StartAlch;
        until alchs=alchstodo;
        Finished;
    end;
    PS Ample Alcher or Ample Alcher ;)
     
< New to Scar - Need Help | Scar scripting >

Users viewing this thread
1 guest


 
 
Adblock breaks this site