Results 1 to 7 of 7

Thread: Identifier expected?

  1. #1
    Join Date
    Aug 2006
    Posts
    151
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Identifier expected?

    SCAR Code:
    procedure clickfountain;
    begin
      FindRandoms;
      SRLRandomsReport;
       Ban;
       If (FindObj(x,y, 'fountain', FountainColor, ColorTolerance)) then
       end;
       
       begin
       if (not(FindObj(x,y, 'fountain', FountainColor, ColorTolerance)))then
       ColorTolerance := ColorTolerance+4;
             until(FindObj(x, y, 'fountain', FountainColor, ColorTolerance))or//this line gives error
                  (ColorTolerance > 20)
           end;

        if(ColorTolerance > 20)then
          begin
            Writeln('Couldnt find fountain try another color');
            NextPlayer(False);
          end;
      end;
    end;


    how come it keeps saying idetifier expected?

  2. #2
    Join Date
    Jan 2007
    Location
    Toronto.
    Posts
    150
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Could you narrow it down a bit? Can you give me the exact line number which causes the error.

  3. #3
    Join Date
    Aug 2006
    Posts
    151
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by NinjaTerrorist View Post
    Could you narrow it down a bit? Can you give me the exact line number which causes the error.

    Narrowed down didnt realy see the need to do anythign to it since its only like 10 lines of code sorry bout that

  4. #4
    Join Date
    Dec 2006
    Location
    Ky
    Posts
    390
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You have the until but you don't have a repeat. It doesn't know what the until is because there is no repeat and there fore is asking for you to identify it.
    SUMMER BREAK be back when I want to

  5. #5
    Join Date
    Sep 2006
    Posts
    5,219
    Mentioned
    4 Post(s)
    Quoted
    1 Post(s)

    Default

    get drigers tutorial.exe

  6. #6
    Join Date
    Dec 2006
    Posts
    374
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    u need a repeat for an until- so it should like this sort of..
    SCAR Code:
    begin
    repeat
       if (not(FindObj(x,y, 'fountain', FountainColor, ColorTolerance)))then
       ColorTolerance := ColorTolerance+4;
             until(FindObj(x, y, 'fountain', FountainColor, ColorTolerance))or//this line gives error
                  (ColorTolerance > 20)
           end;
    Another awsome scripting forum! Check it out: www.Uberbroproductions.net/forums
    TRY MY VARROCK ZAMMY MAGE CURSER/CONFUSER/WEAKENER! THE LINK IS BELOW
    http://www.srl-forums.com/forum/varr...56.html?t=6356
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ~~~~~


  7. #7
    Join Date
    Aug 2006
    Posts
    151
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    thnx guys i figured it out i thought i had a repeat at beginning but i must have forgoten it thats my last error hopefully fr now before my vial wanker is released

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Identifier Expected
    By Torrent of Flame in forum OSR Help
    Replies: 9
    Last Post: 02-23-2008, 01:21 PM
  2. Identifier expected
    By badandymitch in forum OSR Help
    Replies: 4
    Last Post: 05-31-2007, 11:57 PM
  3. Identifier Expected
    By PwNZoRNooB in forum OSR Help
    Replies: 5
    Last Post: 05-03-2007, 07:05 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
  •