Results 1 to 4 of 4

Thread: plz help identifier needed

  1. #1
    Join Date
    Dec 2007
    Posts
    174
    Mentioned
    0 Post(s)
    Quoted
    43 Post(s)

    Default plz help identifier needed

    this is my very first script it is a gnome agility corse runner and i have no idea what im doing got this far and it has an error says identifier needed
    here is the script
    SCAR Code:
    program agilityrunner;
     {.include SRL/SRL.scar}



    Procedure DeclarePlayers;

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

      Players[0].Name        := 'westkevin12';
      Players[0].Pass        := '';
      Players[0].Nick        := 'wes';  //three non-capital letters from username
      Players[0].Active      := False;
      end;
     
     
     
     Procedure findthelog;
    Var zx, zy, x, y: integer;
    Begin
      If Not LoggedIn Then Exit;
      MakeCompass('n');
      If FindSymbol(zx, zy, 'agility') Then;
      Begin;
          Mouse(zx, zy, 5, 5, true);

          Flag;
        end;
       
    {***********************************************************************}
      {function ClickText2(txt: String; font, xs, ys, xe, ye: Integer; left: Boolean): Boolean;}



    begin
      IsUpTextMulti('Walk-across Log balance', 'ross Log bal', 'Log balance') then
      begin
        Mouse(x, y, 0, 0, true);
        end;
       
       
          begin
      IsUpTextMulti('Climb-over Obstacle net', 'Obstacle net', 'Obstacle') then
      begin
        Mouse(x, y, 0, 0, true);
        end;
       
        begin
      IsUpTextMulti('', '', '') then
      begin
        Mouse(x, y, 0, 0, true);
        end;
       
       
           begin
      IsUpTextMulti('', '', '') then
      begin
        Mouse(x, y, 0, 0, true);
        end;
       
       
    end.

  2. #2
    Join Date
    Dec 2007
    Posts
    30
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Here is an post with all kinds of errors (including identifier needed)
    http://www.villavu.com/forum/showthread.php?t=6413

    I hope this helps you out!

    Powerz.

  3. #3
    Join Date
    Jul 2007
    Location
    Players[CurrentPlayer].Loc:='Bank'
    Posts
    875
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

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



    Procedure DeclarePlayers;

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

      Players[0].Name        := 'westkevin12';
      Players[0].Pass        := '';
      Players[0].Nick        := 'wes';  //three non-capital letters from username
      Players[0].Active      := False;
    end;
    Var zx, zy, x, y: integer;



     Procedure findthelog;

    begin
      If Not LoggedIn Then Exit;
      MakeCompass('n');
      If FindSymbol(zx, zy, 'agility') Then;
      Begin;
        Mouse(zx, zy, 5, 5, true);
        Flag;
      end;
    end;

    {***********************************************************************}
      {function ClickText2(txt: String; font, xs, ys, xe, ye: Integer; left: Boolean): Boolean;}


    procedure log;
    begin
      if(IsUpTextMulti('Walk-across Log balance', 'ross Log bal', 'Log balance')) then
      begin
        Mouse(x, y, 0, 0, true);
      end;
    end;

    procedure net;
    begin
      if(IsUpTextMulti('Climb-over Obstacle net', 'Obstacle net', 'Obstacle')) then
      begin
        Mouse(x, y, 0, 0, true);
      end;
    end;

    procedure thing;
    begin
      if(IsUpTextMulti('', '', '')) then
      begin
        Mouse(x, y, 0, 0, true);
      end;
    end;

    procedure otherthing;
    begin
      if(IsUpTextMulti('', '', ''))then
      begin
        Mouse(x, y, 0, 0, true);
      end;
    end;

    begin
    end.

    You need to make procedures. First of all you can't just throw begins out there like that. Turn it into a procedure. Also for every begin you need an end. Here's the version that compiles.
    Quote Originally Posted by sirlaughsalot
    .... Obama had the devil jump out of his ass, run and stab Hillary in the back...
    ILMMTYAEAFHPY.

  4. #4
    Join Date
    Dec 2007
    Location
    Canada
    Posts
    187
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Richk1693 did make rewrite the script properly it properly compiles and executes with his version. Just read it over and find out what you did wrong. Like he said remember your procedures and however many begins you have thats how many ends you always have. Hope this helps.

    ~Insanomano~

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. eek. A little help needed:
    By malotthouse in forum OSR Help
    Replies: 4
    Last Post: 02-18-2008, 06:01 PM
  2. Help needed
    By faster789 in forum OSR Help
    Replies: 3
    Last Post: 08-23-2007, 06: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
  •