Results 1 to 2 of 2

Thread: my scripts

  1. #1
    Join Date
    Nov 2006
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default my scripts

    use scar 2.02
    all scripts have autologin ( no sleeping )

    nature rune thiever, stand between the 2 chests map facing south

    SCAR Code:
    program NatureChestThiever;
    var
    x, y, searchchest: integer;
    const
    username ='';
    password ='';

    procedure BitmapLoad;
    begin
    searchchest := BitmapFromString(41, 12,
           'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000FFFFFFFFFFFF000000' +
           '000000000000000000000000000000FFFFFF000000000000000000' +
           'FFFFFFFFFFFF000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000FFFFFFFFFFFF000000000000000000000000000000' +
           '000000FFFFFF000000000000000000000000000000000000000000' +
           'FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000FFFFFFFFFFFF' +
           'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
           '000000FFFFFFFFFFFF000000000000000000FFFFFFFFFFFFFFFFFF' +
           '000000000000000000000000FFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF000000FFFFFF000000000000000000FFFFFFFFFFFF000000' +
           'FFFFFFFFFFFF000000000000000000FFFFFFFFFFFF000000000000' +
           'FFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF' +
           '000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
           'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000000000' +
           'FFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000000000' +
           '000000FFFFFFFFFFFF000000000000000000000000000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           'FFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFFFFFFFFFFFFFF' +
           'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000FFFFFFFFFFFF' +
           '000000FFFFFFFFFFFF000000000000000000FFFFFFFFFFFF000000' +
           '000000000000000000000000FFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF000000000000000000000000000000000000FFFFFFFFFFFF' +
           '000000FFFFFFFFFFFF000000000000000000000000000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000' +
           '000000000000FFFFFFFFFFFF000000000000000000000000000000' +
           'FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFF' +
           '000000000000000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF000000FFFFFFFFFFFF000000000000000000FFFFFFFFFFFF' +
           '000000000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000' +
           'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
           '000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000' +
           '000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF' +
           '000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000');
    end;

    procedure ThieveChest;
    begin
    if (FindColorSpiral (x, y, 13027014, 571, 147, 664, 194)) then
    begin
            ClickMouse (x, y, False);
            wait(500);
            if (FindBitmap (searchchest, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
                 Wait(1000);
            end;
        end;
    end;

    procedure Autologin;
    begin
         if (FindColorSpiral (x,y, 3472636, 500, 142, 505, 148)) then
         begin
              ClickMouse(680, 290,true);
              wait(500);
              Sendkeys(username);
              wait(500);
              ClickMouse(602,307,true);
              wait(500);
              SendKeys(password);
              wait(500);
              ClickMouse(830,250,true);
              wait(3000);
              ClickMouse(661,246,true);
         end;
    end;

    begin
          BitmapLoad;
    repeat
          ThieveChest;
          Autologin;
    until (False);
    end.

    airrunepickup

    SCAR Code:
    program AirRunePickup;
    var
    x, y, rune: integer;
    const
    username ='';
    password ='';

    procedure BitmapLoad;
    begin
    rune := BitmapFromString(14, 14,
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000FF9040FF9040FF9040FF9040FF9040000000000000000000' +
           '000000000000000000000000000000000000FF9040000000000000' +
           '000000FF9040FF9040000000000000000000000000000000000000' +
           '000000000000FF9040000000000000000000FF9040FF9040000000' +
           'FF9040FF9040000000000000FF9040FF9040000000FF9040000000' +
           '000000000000FF9040FF9040000000FF9040FF9040000000000000' +
           'FF9040FF9040000000FF9040FF9040FF9040FF9040FF9040000000' +
           '000000FF9040FF9040000000000000FF9040FF9040000000FF9040' +
           '000000000000FF9040FF9040000000000000FF9040FF9040000000' +
           '000000FF9040FF9040000000FF9040000000000000000000FF9040' +
           'FF9040000000FF9040FF9040000000000000FF9040FF9040000000' +
           'FF9040000000000000000000FF9040FF9040000000FF9040FF9040' +
           '000000FF9040FF9040FF9040000000FF9040000000000000000000' +
           '000000FF9040FF9040000000FF9040FF9040000000FF9040FF9040' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000');
    end;

    procedure Pickup;
    begin
    if (FindColorSpiral (x, y, 11774111, 416, 11, 929, 331)) or
       (FindColorSpiral (x, y, 8616047, 416, 11, 929, 331)) then
        begin
            wait(500);
            ClickMouse (x, y, False);
            wait(500);
            if (FindBitmap (rune, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
                 Wait(1000);
            end;
        end;
    end;

    procedure Autologin;
    begin
         if (FindColorSpiral (x,y, 3472636, 500, 142, 505, 148)) then
         begin
              ClickMouse(680, 290,true);
              wait(500);
              Sendkeys(username);
              wait(500);
              ClickMouse(602,307,true);
              wait(500);
              SendKeys(password);
              wait(500);
              ClickMouse(830,250,true);
              wait(3000);
              ClickMouse(661,246,true);
         end;
    end;

    begin
          BitmapLoad;
    repeat
          Pickup;
          Autologin;
    until (False);
    end.

    Cakestealer, stand between the wall and stall map facing north

    SCAR Code:
    program CakeStealer;
    var
    x, y, StealCake: integer;
    const
    username ='';
    password ='';

    procedure BitmapLoad;
    begin
    StealCake := BitmapFromString(20, 13,
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '00000000000000000000000000000000000000FFFF00FFFF00FFFF' +
           '00FFFF00FFFF00FFFF000000000000000000000000000000000000' +
           '00000000000000000000000000000000000000000000000000FFFF' +
           '00FFFF00000000000000000000FFFF00FFFFFFFFFF000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           '00000000FFFF00FFFF00000000000000000000FFFF00FFFFFFFFFF' +
           'FFFFFF000000FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000' +
           '00000000000000000000FFFF00FFFF00000000000000000000FFFF' +
           '00FFFFFFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF00000000000000000000000000FFFF00FFFF00FFFF00FFFF' +
           '00FFFF00FFFF000000FFFFFF000000000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF00000000000000000000000000FFFF00FFFF' +
           '00000000000000000000FFFF00FFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           '00FFFF00FFFF00000000000000000000FFFF00FFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
           '00000000000000FFFF00FFFF00000000000000000000FFFF00FFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
           '00000000000000000000000000FFFF00FFFF00FFFF00FFFF00FFFF' +
           '00FFFF000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000');
    end;

    procedure StealCakes;
    begin
    if (FindColorSpiral (x, y, 11774111, 659, 159, 693, 188)) then
        begin
            ClickMouse (x, y, False);
            wait(500);
            if (FindBitmap (StealCake, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
                 Wait(1000);
            end;
        end;
    end;

    procedure Autologin;
    begin
         if (FindColorSpiral (x,y, 3472636, 500, 142, 505, 148)) then
         begin
              ClickMouse(680, 290,true);
              wait(500);
              Sendkeys(username);
              wait(500);
              ClickMouse(602,307,true);
              wait(500);
              SendKeys(password);
              wait(500);
              ClickMouse(830,250,true);
              wait(3000);
              ClickMouse(661,246,true);
         end;
    end;

    begin
          BitmapLoad;
    repeat
          StealCakes;
          Autologin;
    until (False);
    end.

    graveyard afk trainer face map north will run when needs to sleep

    SCAR Code:
    program GraveyardAFKtrainer;
    var
    x, y: integer;
    const
    username ='';
    password ='';

    procedure AttackMode;
    begin
    if (FindColorSpiral (x, y, 7850, 424, 37, 596, 51)) or
       (FindColorSpiral (x, y, 6820, 424, 37, 596, 51)) then
       begin
            Wait(200);
            ClickMouse (495,107, True);
            Wait(5000);
       end;
    end;

    procedure Run;
    begin
    if (FindColorSpiral (x, y, 65280, 424, 306, 567, 322)) or
       (FindColorSpiral (x, y, 65280, 424, 306, 567, 322)) then
       begin
            ClickMouse (877,17, True);
            Wait(100);
            ClickMouse (910,100,True);
            wait(500);
       end;
    end;

    procedure AutoLogin;
    begin
      if (FindColorSpiral (x,y, 3472636, 500, 142, 505, 148)) then
         begin
              ClickMouse(680, 290,true);
              wait(500);
              Sendkeys(username);
              wait(500);
              ClickMouse(602,307,true);
              wait(500);
              SendKeys(password);
              wait(500);
              ClickMouse(830,250,true);
              wait(3000);
              ClickMouse(661,246,true);
         end;
    end;
    begin
       repeat
          AttackMode;
          Run;
          AutoLogin;
       until (False);
    end.

    Redspiders afk trainer on karamja, face map north, will run if need sleep

    SCAR Code:
    program RedSpidersAFKtrainer;
    var
    x, y: integer;
    const
    username ='';
    password ='';

    procedure AttackMode;
    begin
    if (FindColorSpiral (x, y, 197768, 424, 37, 596, 51)) or
       (FindColorSpiral (x, y, 395409, 424, 37, 596, 51)) then
       begin
            Wait(200);
            ClickMouse (495,107, True);
            Wait(5000);
       end;
    end;

    procedure Run;
    begin
    if (FindColorSpiral (x, y, 65280, 424, 306, 567, 322)) or
       (FindColorSpiral (x, y, 65280, 424, 306, 567, 322)) then
       begin
            ClickMouse (876,18, True);
            Wait(50);
            ClickMouse (780,130,True);
            wait(500);
       end;
    end;

    procedure AutoLogin;
    begin
      if (FindColorSpiral (x,y, 3472636, 500, 142, 505, 148)) then
         begin
              ClickMouse(680, 290,true);
              wait(500);
              Sendkeys(username);
              wait(500);
              ClickMouse(602,307,true);
              wait(500);
              SendKeys(password);
              wait(500);
              ClickMouse(830,250,true);
              wait(3000);
              ClickMouse(661,246,true);
         end;
    end;
    begin
       repeat
          AttackMode;
          Run;
          AutoLogin;
       until (False);
    end.

    Thieves guards and picks up coins, runes and arrows

    SCAR Code:
    program ThieveGuard;
    var
    x, y, PPG, rune, coins, arrows: integer;
    const
    username ='';
    password ='';

    procedure BitmapLoad;
    begin
    PPG := BitmapFromString(36, 14,
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           'FFFFFF000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000FFFFFF000000000000000000' +
           '000000000000000000000000FFFF00FFFF00FFFF00FFFF00000000' +
           '000000000000000000000000000000000000000000000000000000' +
           'FFFFFF000000000000000000000000000000000000000000000000' +
           '000000000000000000000000FFFFFFFFFFFF000000000000000000' +
           '000000000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
           '000000000000000000000000000000000000000000000000000000' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
           'FFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF000000000000' +
           '000000000000FFFF00FFFF00000000000000000000000000000000' +
           '000000FFFF00FFFF00000000000000FFFF00FFFF00000000000000' +
           'FFFFFF000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000000000' +
           '000000000000FFFF00FFFF00000000000000000000000000000000' +
           '000000FFFF00FFFF00000000000000FFFF00FFFF00000000FFFF00' +
           'FFFFFFFFFFFFFFFFFF000000000000000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000000000' +
           '000000000000FFFF00FFFF00000000000000FFFF00FFFF00FFFF00' +
           '000000FFFF00FFFF00000000000000FFFF00FFFF00000000000000' +
           'FFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFFFFFFFFFFFFFF' +
           'FFFFFFFFFFFFFFFFFF000000FFFFFFFFFFFF000000000000000000' +
           '000000000000FFFF00FFFF00000000000000000000FFFF00FFFF00' +
           '000000FFFF00FFFF00000000000000FFFF00FFFF00000000000000' +
           'FFFFFF000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
           '000000000000000000000000FFFFFFFFFFFF000000000000000000' +
           '000000000000FFFF00FFFF00000000000000000000FFFF00FFFF00' +
           '000000FFFF00FFFF00000000000000FFFF00FFFF00000000FFFF00' +
           'FFFFFF000000000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000000000' +
           '000000000000000000FFFF00FFFF00000000000000FFFF00FFFF00' +
           '000000FFFF00FFFF00000000FFFF00FFFF00FFFF00000000FFFF00' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
           'FFFFFFFFFFFF000000000000000000FFFFFFFFFFFF000000000000' +
           '000000000000000000000000FFFF00FFFF00FFFF00FFFF00000000' +
           '000000000000FFFF00FFFF00000000FFFF00FFFF00000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '');
    rune := BitmapFromString(14, 14,
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000FF9040FF9040FF9040FF9040FF9040000000000000000000' +
           '000000000000000000000000000000000000FF9040000000000000' +
           '000000FF9040FF9040000000000000000000000000000000000000' +
           '000000000000FF9040000000000000000000FF9040FF9040000000' +
           'FF9040FF9040000000000000FF9040FF9040000000FF9040000000' +
           '000000000000FF9040FF9040000000FF9040FF9040000000000000' +
           'FF9040FF9040000000FF9040FF9040FF9040FF9040FF9040000000' +
           '000000FF9040FF9040000000000000FF9040FF9040000000FF9040' +
           '000000000000FF9040FF9040000000000000FF9040FF9040000000' +
           '000000FF9040FF9040000000FF9040000000000000000000FF9040' +
           'FF9040000000FF9040FF9040000000000000FF9040FF9040000000' +
           'FF9040000000000000000000FF9040FF9040000000FF9040FF9040' +
           '000000FF9040FF9040FF9040000000FF9040000000000000000000' +
           '000000FF9040FF9040000000FF9040FF9040000000FF9040FF9040' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000');
    coins := BitmapFromString(27, 13,
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000FFFFFFFFFFFF000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000FF9040FF9040FF9040FF9040000000000000000000' +
           '000000FFFFFFFFFFFF000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000FF9040FF9040000000000000FF9040FF9040000000000000' +
           '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
           'FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000' +
           'FF9040FF9040000000000000000000000000000000000000000000' +
           '000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           'FF9040FF9040000000000000000000000000000000000000FF9040' +
           '000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           'FF9040FF9040000000000000000000000000000000000000FF9040' +
           '000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000' +
           'FF9040FF9040000000000000000000000000000000000000FF9040' +
           '000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000FFFFFF' +
           'FFFFFF000000000000000000000000000000000000000000000000' +
           'FF9040FF9040000000000000000000000000000000000000FF9040' +
           '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           '000000FF9040FF9040000000000000FF9040FF9040000000FF9040' +
           '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000000000' +
           'FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000' +
           '000000000000FF9040FF9040FF9040FF9040000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '');
    arrows := BitmapFromString(25, 15,
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000FFFFFFFFFFFF000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000FF9040FF9040FF9040FF9040' +
           'FF9040FF9040000000000000FFFFFFFFFFFF000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000FF9040FF9040000000000000000000FF9040' +
           'FF9040000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000' +
           '000000FF9040FF9040000000000000000000FF9040FF9040000000' +
           'FFFFFFFFFFFF000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
           '000000000000FFFFFFFFFFFF000000000000000000000000FF9040' +
           'FF9040000000000000000000FF9040FF9040000000FFFFFFFFFFFF' +
           'FFFFFFFFFFFF000000000000000000FFFFFFFFFFFF000000000000' +
           'FFFFFFFFFFFF000000000000000000000000FF9040FF9040FF9040' +
           'FF9040FF9040FF9040000000000000FFFFFFFFFFFFFFFFFFFFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF' +
           '000000000000000000000000FF9040FF9040000000000000000000' +
           'FF9040FF9040000000FFFFFFFFFFFF000000FFFFFFFFFFFF000000' +
           '000000FFFFFFFFFFFF000000000000000000000000000000000000' +
           '000000000000FF9040FF9040000000000000000000FF9040FF9040' +
           '000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000000000000000' +
           'FF9040FF9040000000000000000000FF9040FF9040000000FFFFFF' +
           'FFFFFF000000000000FFFFFFFFFFFF000000000000FFFFFFFFFFFF' +
           'FFFFFFFFFFFF000000000000000000000000000000FF9040FF9040' +
           'FF9040FF9040FF9040FF9040000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000000000000000000000' +
           '000000000000000000000000000000000000');
    end;

    procedure AttackMode;
    begin
    if (FindColorSpiral (x, y, 127, 425, 38, 595, 112)) then
    begin
            Wait(100);
            ClickMouse (489, 104, True);
            Wait(500);
         end;
    end;

    procedure Menu;
    begin
    if (FindColorSpiral (x, y, 8585216, 728, 3, 925, 35)) then
    begin
            Wait(100);
            ClickMouse (419, 2, False);
            Wait(1000);
         end;
    end;

    procedure Guard;
    begin
    if (FindColorSpiral (x, y, 8752875, 418, 10, 927, 333)) then
       begin
            Wait(500);
            ClickMouse (x, y, False);
            wait(1000);
            if (FindBitmap (PPG, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
            end;
        end;
    end;

    procedure runes;
    begin
    if (FindColorSpiral (x, y, 10721423, 418, 10, 927, 333)) then
       begin
            Wait(100);
            ClickMouse (x, y, False);
            wait(1000);
            if (FindBitmap (rune, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
            end;
        end;
    end;

    procedure BRunes;
    begin
    if (FindColorSpiral (x, y, 10721423, 418, 10, 927, 333)) or
       (FindColorSpiral (x, y, 5393738, 418, 10, 927, 333)) then
       begin
            Wait(500);
            ClickMouse (x, y, False);
            wait(500);
            if (FindBitmap (rune, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
            end;
        end;
    end;

    procedure Money;
    begin
    if (FindColorSpiral (x, y, 49404, 418, 10, 927, 333)) then
       begin
            Wait(500);
            ClickMouse (x, y, False);
            wait(500);
            if (FindBitmap (coins, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
            end;
        end;
    end;

    procedure BArrows;
    begin
    if (FindColorSpiral (x, y, 3302317, 418, 10, 927, 333)) then
       begin
            Wait(500);
            ClickMouse (x, y, False);
            wait(500);
            if (FindBitmap (arrows, x, y)) then
            begin
                 ClickMouse (x+2, y+2, True);
            end;
        end;
    end;

    procedure AutoLogin;
    begin
         if (FindColorSpiral (x,y, 3472636, 500, 142, 505, 148)) then
         begin
              ClickMouse(680, 290,true);
              wait(500);
              Sendkeys(username);
              wait(500);
              ClickMouse(602,307,true);
              wait(500);
              SendKeys(password);
              wait(500);
              ClickMouse(830,250,true);
              wait(3000);
              ClickMouse(661,246,true);
         end;
    end;

    begin
          BitmapLoad;
    repeat
          AttackMode;
          Menu;
          Guard;
          BRunes;
          Runes;
          Money;
          BArrows;
          AutoLogin;
    until (False);
    end.

  2. #2
    Join Date
    Feb 2006
    Location
    Tracy/Davis, California
    Posts
    12,631
    Mentioned
    135 Post(s)
    Quoted
    418 Post(s)

    Default

    I'm pretty sure clickmouse/movemouse can still get you banned on RSC. You bitmaps are really huge too! You dont need the entire item/object, just a small unique piece of it! Also isn't there an RSC include that has some basic procedures/functions like a login?

    Anyways, good effort making these scripts, keep on learning!

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
  •