Results 1 to 5 of 5

Thread: Banking procedure errors please help!!!

  1. #1
    Join Date
    Jan 2008
    Location
    U.S.A
    Posts
    313
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Banking procedure errors please help!!!

    ok Here is My Banking Procedure
    SCAR Code:
    function LocateBank(TheBank: string): Boolean;
    var
      bx, by, TheDTM: Integer;
      WhichAngle: Extended;
    begin
      case TheBank of
      'db': TheDTM := DTMFromString('78DA636C67626008644001FFFFFD63F80FA41' +
            '9416C2060AC01AAF182C8B140D5FCF9C304A619A17CB09A204C35' +
            '22E86AC2F09B0300F8811153');
            end;
      if FindDtmRotated(TheDTM, bx, by, MMX1, MMY1, MMX2, MMY2, Radians(-30), Radians(30), 0.05,
            WhichAngle) then
          begin
            Mouse(bx, by, 0, 0, True);
    //        FTWait(8);
            FFlag(0);
            if OpenBankQuiet(TheBank) then
           begin
           Result := FindText(x, y, 'First', upchars, 175, 80, 212, 100);
            end;
             begin
      if (PinScreen) then
      begin
        Result := True;
        for iNumber := 1 to Length(pin) do
        begin
          MMouse(395, 175, 10, 10);
          Wait(200 + Random(200));
          ClickText(pin[iNumber], upchars, 1, 1, 512, 336, True);
          Wait(500 + Random(500));
        end;
        repeat
          Wait(100);
        until BankScreen or not LoggedIn;
      end;
    end;
            begin
              FixBank;
              Result := True;
              FreeDTM(TheDTM);
              Exit;
            end
            else Result := False;
          end
          else Result := False;
      FreeDTM(TheDTM);
    end;
    begin
      if (BankScreen) then
        Deposit(2, 28, 2);
    end.
    var
      i, Timer, Points: Integer;
    begin
      if(BankScreen)then
      begin
        MarkTime(Timer);
        repeat
          Mouse(485, 41, 4, 4, True);
          for i := 0 to 30 do
          begin
            Wait(100);
            Points := CountColorTolerance(2070783, 177, 30, 337, 52, 5);
            if(Points < 170)then
            begin
              Result := True;
              Break;
            end;
          end;
        until(Points < 170)or(TimeFromMark(Timer) > 8000)
      end;
    end;

    First Error: (Could Be more not sure)
    Line 164: [Error] (13037:5): Unknown identifier 'iNumber' in script C:\Program Files\SCAR 3.15\Scripts\Willow Slash3r.scar
    That is weird because I got it from Srl/Srl/Core/bank.scar and I never had to declare it or anything so I'm Confused on why this is an unknown identifier

    Please helpers will be Repped++
    Will test most scripts, offering members account to certain scripters! PM Me.
    Also need helping making a powerminer, Pst/Aim me!

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

    Default

    Becouse Bank.scar doesnt have a global variable called 'iNumber', you have to declare it yourself...


  3. #3
    Join Date
    Jan 2008
    Location
    U.S.A
    Posts
    313
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Could you give an example?
    Will test most scripts, offering members account to certain scripters! PM Me.
    Also need helping making a powerminer, Pst/Aim me!

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

    Default

    SCAR Code:
    var
      iFrom : Integer;
    Is that too hard to do?


  5. #5
    Join Date
    Jan 2008
    Location
    U.S.A
    Posts
    313
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Well ok I got the iNumber just giving some slightly easier to fix errors

    Line: 170 semicolon expected in script thats annoying
    Will test most scripts, offering members account to certain scripters! PM Me.
    Also need helping making a powerminer, Pst/Aim me!

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Best Banking Procedure?
    By souppy in forum OSR Help
    Replies: 5
    Last Post: 04-05-2008, 01:47 PM
  2. Banking Procedure
    By mpd in forum First Scripts
    Replies: 2
    Last Post: 01-14-2008, 08:07 PM
  3. New Banking Procedure Idea!
    By rawsilk in forum OSR Help
    Replies: 9
    Last Post: 01-05-2008, 03:09 AM

Posting Permissions

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