Results 1 to 7 of 7

Thread: trouble

  1. #1
    Join Date
    Jun 2007
    Location
    NSW, Sydney,
    Posts
    105
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default trouble

    im really confused

    Line 57: [Error] (14506:51): Invalid number of parameters in script

    SCAR Code:
    program Hidecrafter;
    {.include SRL/SRL.scar}

    var
    Needle: Integer;
    HardLeather: Integer;
    Hidesdone: Integer;
    TotalXp: Integer;

    const
    HowManyLoads = 10;
    Direction = 'N'; //compass

    Procedure Declareplayers;
    begin
    HowManyPlayers:= 1;
    NumberOfPlayers(HowManyPlayers );
    CurrentPlayer := 0;

    Players[0].Name :='';
    Players[0].Pass :='';
    Players[0].Nick :='';
    Players[0].Loc :='.';
    Players[0].Active:=True;
    Players[0].String2:=''; //bank pin if any
    end;

    procedure LoadBitmaps;
    begin
    Hardleather := BitmapFromString(32, 32, 'z78DAE598C10EC32008865FA940B7' +
           'ACD72DBEFF2B2D593DD86C182C08DA71F86FD6EFD3262ACB62522' +
           '0C8D12AB3D18A095EF51CCC0868238474488145D5C86BB513DD90' +
           '72AA2D3AEFCE2FE63ABFC222E7E70B462EF3F2F3CC120B0D7FEDE' +
           'FB2268FB18019F9F7C4840FD89CF83BB8B8AEBF37FF597209BF91' +
           '05C3AF230FE5372077B418825F7B5F3AD40AF4C47B9885D8E5DAF' +
           'C6506F00B5C38FE7DC66F0B9591869F490D7FB38B0BF939FE062F' +
           '17FEF2FC9A963F5B18F36B5C8AB1ADF7FF11F8F5EFAF580BDBF7A' +
           'F277F8FFEC3B4FCCD2EFAD3C1A5A3059C91863FB4AF08A27E1163' +
           '31648F171AF34FEB0D19EDE5C7');
    end;

    procedure Report;
    begin
    SRLRandomsReport;
    WriteLn(' Rebels Hidescrafter Report')
    WriteLn(' Running Time: ' + (TimeRunning) + '')
    WriteLn(' Hidescrafted: ' + IntToStr(Hidesdone) + '')
    WriteLn(' XP Gained: ' + IntToStr(TotalXP) + '')
    end;

    procedure withdrawhides;
    begin
    OpenBank;
    If(PinScreen)Then
     InPin(Players[CurrentPlayer].String2);
    If(FindBitmap(hardleather,x,y,MSX1,MSY1,MSX2,MSY2))Then
    Mouse(x,y,1,1,true)
    Wait(100 + Random(200))
    ClickOption('All', 1)
    closebank;
    end;

    begin
    SetUpSRL;
    DeclarePlayers;
    Loadbitmaps
    loginplayer;
    withdrawhides;
    end.

  2. #2
    Join Date
    Jun 2006
    Location
    USA
    Posts
    1,828
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Line 56, change to: If(FindBitmap(hardleather,x,y))Then
    Or change it to FindbitMapIn like this: If(FindBitmapIn(hardleather,x,y,MSX1,MSY1,MSX2,MSY 2))Then

  3. #3
    Join Date
    Jun 2007
    Location
    NSW, Sydney,
    Posts
    105
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    *sigh* it only goes up to doing the bank bin...why can't it select the hides...it just quits out of the bank screen as soon as it does the bank pin...

    btw thank you pentti for helping

    I can't see whats wrong with my withdrawing procedure

  4. #4
    Join Date
    Oct 2006
    Location
    Texas
    Posts
    1,450
    Mentioned
    1 Post(s)
    Quoted
    1 Post(s)

    Default

    because you dont have repeats. by the look of the main loop it withdraws the hides and stops script.

  5. #5
    Join Date
    Jun 2007
    Location
    NSW, Sydney,
    Posts
    105
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Im adding more procedures to the scripts of course (later)...but what does adding repeats at this point going to help me withdraw the hides...

  6. #6
    Join Date
    Oct 2006
    Location
    Texas
    Posts
    1,450
    Mentioned
    1 Post(s)
    Quoted
    1 Post(s)

    Default

    You said it withdraws hides and stops. So repeats wouldnt make it stop. If you wanted to withdraw them good use.

    Code:
    WithDraw(1,1,0);

  7. #7
    Join Date
    Jun 2007
    Location
    NSW, Sydney,
    Posts
    105
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    No...I said it only goes up to finishing entering the bank pin...I think its quite clear i said that

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Always trouble
    By BlueDraGoN777 in forum OSR Help
    Replies: 3
    Last Post: 01-08-2008, 07:19 PM
  2. Having a little trouble....
    By ak473251 in forum OSR Help
    Replies: 2
    Last Post: 11-24-2007, 08:09 PM
  3. trouble with srl
    By wesleyar in forum OSR Help
    Replies: 4
    Last Post: 06-02-2007, 04:28 AM
  4. having a bit of trouble
    By XcanadamanX in forum OSR Help
    Replies: 14
    Last Post: 01-30-2007, 10:00 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
  •