Results 1 to 10 of 10

Thread: simple procedures

  1. #1
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default simple procedures

    this is a basic bone berying procedure i dont know if it works because i cant get rid of that evil bob error 3 procedures
    havent done standards yet but please coment
    SCAR Code:
    program buryer;


    procedure startscript;
    begin
    if InvFull then
    bury;
    chatsoff;
    if invempty then
    withdraw;
    chatsoff;
    end;

    procedure bury;
    begin
    gametab(4);
    MouseItem(1 ,left);
    MouseItem(2 ,left);
    MouseItem(3 ,left);
    MouseItem(4 ,left);
    MouseItem(5 ,left);
    MouseItem(6 ,left);
    MouseItem(7 ,left);
    MouseItem(8 ,left);
    MouseItem(9 ,left);
    MouseItem(10 ,left);
    MouseItem(11 ,left);
    MouseItem(12 ,left);
    MouseItem(13 ,left);
    MouseItem(14 ,left);
    MouseItem(15 ,left);
    MouseItem(16 ,left);
    MouseItem(17 ,left);
    MouseItem(18 ,left);
    MouseItem(19 ,left);
    MouseItem(20 ,left);
    MouseItem(21 ,left);
    MouseItem(22 ,left);
    MouseItem(23 ,left);
    MouseItem(24 ,left);
    MouseItem(25 ,left);
    MouseItem(26 ,left);
    MouseItem(27 ,left);
    MouseItem(28 ,left);
    end;

    procedure withdraw;
    //'akb', 'al kharid'
    //'lb', 'lumbridge'
    //'veb', 'varrock east'
    //'vwb','varrock west'
    //'feb', 'falador east'
    //'fwb', 'falador west'
    //'db', 'draynor'
    //'eb', 'edgeville bank'
    begin
    OpenBankFast(''): Boolean;//bank location read above e.g if ur in draynor put db in the ''e.g 'db'
    wait(5000);
    PinScreen; if true then
    InPin(0000);//pin put pin where 0000 is
    wait(5000);
    BankScreen; if true then
    FixBank;
    Withdraw(1, 1, 28);// bones must be in bank slot 1
    CloseBank;
    end;
    please post coments i will improve it my scar isnt working im just using functions and procedures of this website
    C:\Program Files\SCAR 3.14\help\SRL.html

  2. #2
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Work on standars! btw this is a script not a procedure.


  3. #3
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    Quote Originally Posted by cazax View Post
    Work on standars! btw this is a script not a procedure.
    this is a basic bone berying procedure i dont know if it works because i cant get rid of that evil bob error 3 procedures
    havent done standards yet but please coment
    if u read the begining of the thred ull see that i mentiond that i havent done standards and its not a script it doesnt have a end therfore i sed it has 3 procedures but thanks anyway 4 ur coment

  4. #4
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    InPin(0000)
    Thats worng. should be:
    SCAR Code:
    InPin('0000')


  5. #5
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    k does it work tho and do i need the ;
    can u please tell me ohow to fix the evil bob error

  6. #6
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    yes you need the ''


  7. #7
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    Quote Originally Posted by cazax View Post
    yes you need the ''
    i ment the ;
    any way cn u help me fix the evil bob error

  8. #8
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by pur3b100d View Post
    i ment the ;
    any way cn u help me fix the evil bob error
    the ; isnt necessary. Is the evilbob error in the line 57?


  9. #9
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    yes

  10. #10
    Join Date
    Feb 2007
    Location
    EST (US East Coast)
    Posts
    250
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    procedure bury;
    begin
    gametab(4);
    MouseItem(1 ,left);
    MouseItem(2 ,left);
    MouseItem(3 ,left);
    MouseItem(4 ,left);
    MouseItem(5 ,left);
    MouseItem(6 ,left);
    MouseItem(7 ,left);
    MouseItem(8 ,left);
    MouseItem(9 ,left);
    MouseItem(10 ,left);
    MouseItem(11 ,left);
    MouseItem(12 ,left);
    MouseItem(13 ,left);
    MouseItem(14 ,left);
    MouseItem(15 ,left);
    MouseItem(16 ,left);
    MouseItem(17 ,left);
    MouseItem(18 ,left);
    MouseItem(19 ,left);
    MouseItem(20 ,left);
    MouseItem(21 ,left);
    MouseItem(22 ,left);
    MouseItem(23 ,left);
    MouseItem(24 ,left);
    MouseItem(25 ,left);
    MouseItem(26 ,left);
    MouseItem(27 ,left);
    MouseItem(28 ,left);
    end;

    Cleaner like:
    SCAR Code:
    procedure Bury;
    var
      i : Integer;
    begin
      GameTab(4);
      for i := 1 to 28 do
      begin
        MouseItem(i, true);
        wait(500);
      end;
    end;

    For your evil bob error... latest SRL/SCAR and plugins successfully moved? If yes, make sure you are positive because most of those errors have to do with Vista messing with your installation or forgetting to move plugins.
    Temporarily inactive.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Ok, I cant get my procedures to run.....
    By mikevskater in forum OSR Help
    Replies: 7
    Last Post: 01-27-2008, 04:30 PM
  2. Replies: 5
    Last Post: 03-26-2007, 07:57 PM

Posting Permissions

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