Adblock breaks this site

Need help with bitmap and SCAR banking!

Discussion in 'Scar/Simba Help' started by Ownedlikenoob, Jul 9, 2009.

  1. Ownedlikenoob

    Ownedlikenoob Newcomer

    Joined:
    Jul 9, 2009
    Posts:
    1
    Referrals:
    0
    Sythe Gold:
    0
    Need help with bitmap and SCAR banking!

    This is the Script...

    Code:
    program MagicTreeCut;
    
    var
    x,y: Integer;
    Use_Quickly: Integer;
    
    
    const
    TreeMap = 3956331;  //Change to tree on map
    TreeColor = 13891832; //Change to color of stars falling of magic tree
    SpellBook = 3437978;   //Change to colo of spellbook (orange part)
    Tele =  2697513;    //Change to Tele to skilling area teleport color
    Bank = 4276296;   //Change to Brown part of bank
    UseBank = 16777215; //Change if needed
    RunOff = 4540487;
    {Do Not Change Screen From Then On Or You Will Have To Do It All Again}
    begin
    ClickMouse(676, 485,True);
    wait(1000)
    if(FindColor(x,y,RunOff,516,168,763, 503)) then
     begin
      MoveMouseSmoothEx(x,y +random(0),20,40,45,25,20);
      Wait(100+random(10));
      ClickMouse(x,y,true);
      Wait(1000);
      end else
    begin
    if(FindColor(x,y,TreeMap,516,-1,582,64)) then
     begin
      MoveMouseSmoothEx(x,y +random(0),20,40,45,25,20);
      Wait(100+random(10));
      ClickMouse(x,y,true);
      Wait(8000);
    begin
    if(FindColor(x,y,TreeColor,0,1,516,340)) then
     begin
      MoveMouseSmoothEx(x,y +random(0),20,40,45,25,20);
      Wait(100+random(10));
      ClickMouse(x,y,true);
      wait(6000);
      begin
    if(FindColor(x,y,SpellBook,524,42,773,250)) then
     begin
      MoveMouseSmoothEx(x,y +random(0),20,40,45,25,20);
      Wait(100+random(10));
      ClickMouse(x,y,true);
      wait(1000);
      begin
    if(FindColor(x,y,Tele,684,254,739,315)) then
     begin
      MoveMouseSmoothEx(x,y +random(0),20,40,45,25,20);
      Wait(100+random(10));
      ClickMouse(x,y,true);
      wait(6000);
        begin
    if(FindColor(x,y,Bank,0,1,516,340)) then
     begin
      MoveMouseSmoothEx(x,y +random(0),20,40,45,25,20);
      Wait(100+random(10));
      ClickMouse(x,y,False);
      wait(2000);
    
      begin
        Use_Quickly := BitmapFromString(230, 92, 'beNrt2klygzAQBVAv' +
           'uGLufxRSSaoIRt2ayEDh9yoLBluI8BEN+PEAAAAAAAAAAAAAAAAAA' +
           'AAAAAAAAAAAAAAARr1xXxKLxF4kseunbU8Ps9cUdnK054913f/NZ6' +
           'P19ZPtz7V8+8QuyxLOXjmxh06O9vzrcC+fzoRqa2f6A9P5rLQssTd' +
           'O7MlQ/XFi9+1I7EUS27y+S6zEZoldnx3iMVQ6Zo2EKf26WGfb2joZ' +
           'Lqy3nNWx+y2G9W1W925fz0qLSrWcrWp2oFmKv2Zit+m9w/IyG5WEN' +
           'zOW5S3swH5Vs7VyIMrq2PryMpxZ7JuRnuvA/v+QdckYm8Wv/PxSCB' +
           'Pen7FKAbA+J2Q6seXltRx+wyCVsYkv0MWH6x3omc6y/b0LL1zHNsf' +
           'S7Eg1E34+sT3n0Whi68nMpmsPmk4kszOxwUl36zcI26Hfh7AndfuB' +
           'tPNm6gcTW6kxwtPqt4NUr2Ml9mffeYXHtzKWZvVqz51XlquwIq3fe' +
           'WXnQnl1yBLbvPOaCNXchoaWS2xZglYWNldlwvyEjYSzZccO02FPKk' +
           '+9RvdudHp0Q0PL65v2u4Jfffh/sy36XYHETr+D6Lw3lFiJ/fcRr/9' +
           'RhsRKbLOa/ZsIDdXYEgsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA' +
           'H94BL52Ang==');
    
      FreeBitmap(Use_Quickly);
    
      begin
      if(FindBitmap(Use_Quickly,x,y)) then
      begin
      MoveMouseSmoothEx(x,y+random(0),20,40,45,25,20);
      Wait(1000+random(100));
      ClickMouse(x,y,true);
      end;
      end;
      end;
      end;
     end;
    end;
      end;
      end;
      end;
      end;
      end;
    end;
    end;
    end.
    

    But anyways, I get this error when i run it...
    [Runtime Error] : Exception: Access violation at address 00410E28 in module 'scar.exe'. Read of address 00000000 in line 82 in script C:\Program Files\SCAR 3.20\Scripts\MagicTreeCut.scar

    line 82 is this: FreeBitmap(Use_Quickly);

    Any ideas?
    NOTE* This is for a runescape private server so I don't need any antiban.
     
< Guild Miner 4.2 - Will You Guys Check It Out? | SLR Function List? >


 
 
Adblock breaks this site