Results 1 to 5 of 5

Thread: error help please.

  1. #1
    Join Date
    Oct 2011
    Location
    Australia, Vic
    Posts
    1,517
    Mentioned
    2 Post(s)
    Quoted
    120 Post(s)

    Default error help please.

    [Error] (79:5): Identifier expected at line 78
    Compiling failed.

    My simba coding:

    Simba Code:
    program EvlinsFleshCrawlerKillah;
    {$DEFINE SMART}
    {$i srl/srl.simba}
    {$i sps/sps.simba}

     Const
    {---SMART Setup Constants---}
      WORLD = 50;// Set a world, if you'd like.
      MEMBERS = False;// Change accordingly.
      SIGNED = True; // True if running a single account, false otherwise.
    {---------------------------}
    {--------Script Info--------}
      Author = 'Evlin';
      Name = 'EvlinsFleshCrawlerKillah';
      Version = '1.00';
    {---------------------------}



    procedure DeclarePlayers;


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

      Players[0].Name := '';
      Players[0].Pass := ''; // Password
      Players[0].Nick := ''; // 3-4 lowercase letters from username
      Players[0].Active := True; // Set to true if you want to use this player
      Players[0].Pin := ''; // Leave blank if the player doesn't have a bank pin
    end;


    procedure AntiBan;


    begin
      case Random(6) of
      0: HoverSkill('Random', False);
      1: begin
           RandomMovement;
           HoverSkill('Random', False);
         end;
      2: BoredHuman;
      3: BoredHuman;
      4: ExamineInv;
      5: begin
           RandomAngle(1);
           HoverSkill('Random', False);
           ExamineInv;
         end;
      end;
    end;


    procedure AntiRandoms;


    begin
      FindNormalRandoms;
    end;


    procedure ProgressReport;


    begin
      WriteLn('~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~');
      WriteLn(Name + ' by' + Author + ' V' + Version);
      WriteLn('~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~');
    end;


    procedure BanktoFleshCrawls;
      var myPath:
        begin
        SPS_Setup(RUNESCAPE_SURFACE,['10_6','10_7']);
        SPS_GetmyPos;
        myPath:= [Point(4204, 2685), Point(4195, 2686), Point(4194, 2695),
        Point(4197, 2702), Point(4207, 2703), Point(4218, 2705), Point(4226, 2705),
        Point(4233, 2711), Point(4235, 2721), Point(4234, 2733), Point(4233, 2746),
        Point(4232, 2755), Point(4231, 2765), Point(4231, 2778), Point(4228, 2785),
        Point(4217, 2785), Point(4213, 2791), Point(4200, 2791), Point(4187, 2787),
        Point(4185, 2802), Point(4188, 2810), Point(4189, 2819), Point(4189, 2828),
        Point(4188, 2837), Point(4189, 2845), Point(4192, 2854), Point(4196, 2863),
        Point(4196, 2874), Point(4197, 2884), Point(4199, 2893), Point(4193, 2901),
        Point(4193, 2909), Point(4193, 2917), Point(4194, 2926), Point(4192, 2934),
        Point(4187, 2939), Point(4182, 2945), Point(4176, 2950), Point(4167, 2956),
        Point(4159, 2958)];//Path from the path maker.
      end;


     procedure UseBankNPC


     begin
      Result := (LoggedIn) and (BankScreen or PinScreen);
      if (Result) then exit;
      Speed := GetColorToleranceSpeed;
      ColorToleranceSpeed(2);
      ColFace := 7513036;
      ColGrey := 4995649;
      ColBlue := 4336690;
      ColHair := 2506053;
      if (FindObjThroughMM(bx, by, 'npc', [ColFace, ColBlue, ColGrey, ColHair], [5, 5, 5, 5],
        ['ounter', 'se Co', 'anke', 'to B', 'Banker', 'nker'], 2, 2)) then
      begin
        Mouse(bx, by, 0, 0, False);
        if (WaitOptionMulti(['kly Co', 'se-qu', 'ank B', 'Bank Banker', 'ank', 'nker'], 750)) then
        begin
          t := (GetSystemTime + 5000);
          repeat
            if (BankScreen) or (PinScreen) then
            begin
              Result := true;
              Break;
            end;
            Wait(50);
          until(GetSystemTime > t);
          if (Length(Players) > 0) then
            if ((PinScreen) and (Players[CurrentPlayer].Pin <> '')) then
              InPin(Players[CurrentPlayer].Pin);
          Result := (BankScreen) or (PinScreen);
        end;
      end;
      ColorToleranceSpeed(Speed);
    end;



    begin
      Smart_Server := WORLD;
      Smart_Members := MEMBERS;
      Smart_Signed := SIGNED;
      Smart_SuperDetail := False; // These four lines, setup and run Smart, using the constants you made earlier.
      SetupSRL; // This is used to setup SRL's base features, and is almost always necessary.
      DeclarePlayers; // This runs your DeclarePlayers procedure, setting them up to run
      LoginPlayer; // This logs in your first player.
      SPS_Debug := true
      UseBankNPC
      BanktoFleshCrawls; // sps path used to getting to the dungeon.
    end.

    Help greatly appreciated.
    Last edited by John; 01-15-2012 at 07:31 AM.

  2. #2
    Join Date
    Jan 2012
    Posts
    190
    Mentioned
    0 Post(s)
    Quoted
    10 Post(s)

    Default

    Simba Code:
    var myPath:

    u forgot this semicolon. usually if it tells you whats wrong usually that is what is wrong.

  3. #3
    Join Date
    Oct 2011
    Location
    Australia, Vic
    Posts
    1,517
    Mentioned
    2 Post(s)
    Quoted
    120 Post(s)

    Default

    gave me a new error:

    [Error] (79:5): Identifier expected at line 78
    Compiling failed.

  4. #4
    Join Date
    Oct 2008
    Location
    C:\Simba\Includes\
    Posts
    7,566
    Mentioned
    19 Post(s)
    Quoted
    180 Post(s)

    Default

    Simba Code:
    var myPoint : TPointArray;

    That will fix your error, but, even after doing that, your code is hacky and looks like it was stripped from other scripts and placed in there.

    It won't compile since you're missing A LOT of needed parts in there.
    Away for awhile, life is keeping me busy. | Want to get my attention in a thread? @Kyle Undefined; me.
    { MSI Phoenix || SRL Stats Sigs || Paste || Scripts || Quotes || Graphics }

    When posting a bug, please post debug! Help us, help you!

    I would love to change the world, but they won't give me the source code. || To be the best, you've got to beat the rest. || Logic never changes, just the syntax.
    If you PM me with a stupid question or one listed in FAQ, or about a script that is not mine, I will NOT respond.


    SRL is a Library of routines made by the SRL community written for the Program Simba. We produce Scripts for the game Runescape.


  5. #5
    Join Date
    Oct 2011
    Location
    Australia, Vic
    Posts
    1,517
    Mentioned
    2 Post(s)
    Quoted
    120 Post(s)

    Default

    Quote Originally Posted by Kyle Undefined View Post
    Simba Code:
    var myPoint : TPointArray;

    That will fix your error, but, even after doing that, your code is hacky and looks like it was stripped from other scripts and placed in there.

    It won't compile since you're missing A LOT of needed parts in there.
    ok the banking was taken from another script the rest is from a tut apart from the sps.
    thanks anyways.

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
  •