AntiBan ViewSkill

Well, this is an anti-ban feature, and I dunno if this should be put into SRL or what, but here's for people to use. It simply goes to the skill you want, clicks it, views the guide for 4-5 seconds, then closes it. Use at your own risk, though you shouldn't get banned :)

Quote:

---

//1 = Attack
//2 = Strength
//3 = Defense
//4 = Range
//5 = Prayer
//6 = Magic
//7 = Runecrafting
//8 = Construction
//9 = HP
//10 = Agility
//11 = Herblore
//12 = Thieving
//13 = Crafting
//14 = Fletching
//15 = Slayer
//16 = Hunting
//17 = Mining
//18 = Smithing
//19 = Fishing
//20 = Cooking
//21 = Firemaking
//22 = Woodcutting
//23 = Farming

---

SCAR Code:

procedure CloseIt;
var CloseButton, xx, yy : integer;
begin
  CloseButton := BitmapFromString(23, 20, 'z78DACD96D10EC32008457F0' +
       '9E39CF551EBFAFF9FB465EC41436528642B0FA449819E107BAF00' +
       'AF700F285BCCA30CEF1AD086E82BF89C43ACFEA059CD33319FAF5' +
       '4F04C4FFE527F6CF1964A4A2E7831CF672676E1041549C3B0FB54' +
       '42DD6B0EF7D8F49E04BEC54AECE279C8B49E87652027AD636833C' +
       'FC36EB8DB2ACF20CF9487DF2AE5D133501E31C38402AC65BD1AFC' +
       '95C18CC788E13A24EE3A27C4F60F5AF30B5B5519E9A1C8B3C44A6' +
       'BAA2A06EEA3505A27F7EE81230F1D70CD7D4424E7BE097A47FEE5' +
       '4D49722B7802AD2A5687');
  wait(2000+random(3000));
  if(FindBitmap(CloseButton, xx, yy))then
  begin
    MMouse(xx, yy, 1, 1);
    wait(50+random(50));
    Mouse(xx, yy, 0, 0, True);
    wait(1000+random(100));
  end;
end;

procedure ClickSkill(Skill : integer);
var LX, MX, RX : integer;
begin
  LX := 588;
  MX := 651;
  RX := 712;
  case Skill of
  1: begin
       MMouse(LX, 223, 2, 2);
       Mouse(LX, 223, 2, 2, True);
       CloseIt;
     end;
  2: begin
       MMouse(LX, 255, 2, 2);
       Mouse(LX, 255, 2, 2, True);
       CloseIt;
     end;
  3: begin
       MMouse(LX, 286, 2, 2);
       Mouse(LX, 286, 2, 2, True);
       CloseIt;
     end;
  4: begin
       MMouse(LX, 319, 2, 2);
       Mouse(LX, 319, 2, 2, True);
       CloseIt;
     end;
  5: begin
       MMouse(LX, 348, 2, 2);
       Mouse(LX, 348, 2, 2, True);
       CloseIt;
     end;
  6: begin
       MMouse(LX, 377, 2, 2);
       Mouse(LX, 377, 2, 2, True);
       CloseIt;
     end;
  7: begin
       MMouse(LX, 409, 2, 2);
       Mouse(LX, 409, 2, 2, True);
       CloseIt;
       end;
  8: begin
       MMouse(LX, 439, 2, 2);
       Mouse(LX, 439, 2, 2, True);
       CloseIt;
     end;
  9: begin
       MMouse(MX, 224, 2, 2);
       Mouse(MX, 224, 2, 2, True);
       CloseIt;
     end;
  10: begin
        MMouse(MX, 251, 2, 2);
        Mouse(MX, 251, 2, 2, True);
        CloseIt;
      end;
  11: begin
        MMouse(MX, 286, 2, 2);
        Mouse(MX, 286, 2, 2, True);
        CloseIt;
      end;
  12: begin
        MMouse(MX, 317, 2, 2);
        Mouse(MX, 317, 2, 2, True);
        CloseIt;
      end;
  13: begin
        MMouse(MX, 345, 2, 2);
        Mouse(MX, 345, 2, 2, True);
        CloseIt;
      end;
  14: begin
        MMouse(MX, 379, 2, 2);
        Mouse(MX, 379, 2, 2, True);
        CloseIt;
      end;
  15: begin
        MMouse(MX, 410, 2, 2);
        Mouse(MX, 410, 2, 2, True);
        CloseIt;
      end;
  16: begin
        MMouse(MX, 445, 2, 2);
        Mouse(MX, 445, 2, 2, True);
        CloseIt;
      end;
  17: begin
        MMouse(RX, 222, 2, 2);
        Mouse(RX, 222, 2, 2, True);
        CloseIt;
      end;
  18: begin
        MMouse(RX, 257, 2, 2);
        Mouse(RX, 257, 2, 2, True);
        CloseIt;
      end;
  19: begin
        MMouse(RX, 284, 2, 2);
        Mouse(RX, 284, 2, 2, True);
        CloseIt;
      end;
  20: begin
        MMouse(RX, 318, 2, 2);
        Mouse(RX, 318, 2, 2, True);
        CloseIt;
      end;
  21: begin
        MMouse(RX, 351, 2, 2);
        Mouse(RX, 351, 2, 2, True);
        CloseIt;
      end;
  22: begin
        MMouse(RX, 374, 2, 2);
        Mouse(RX, 374, 2, 2, True);
        CloseIt;
      end;
  23: begin
        MMouse(RX, 406, 2, 2);
        Mouse(RX, 406, 2, 2, True);
        CloseIt;
      end;
  end;
end;