Results 1 to 10 of 10

Thread: identifier expected line 94

  1. #1
    Join Date
    May 2007
    Location
    baltimore, md
    Posts
    836
    Mentioned
    0 Post(s)
    Quoted
    8 Post(s)

    Default identifier expected line 94

    SCAR Code:
    Function Findandpickpocket(x, y, Color1, color2, color3: integer; name1: string): boolean;
    var i,v,b: integer;
    var man: integer;
    begin
      man:= Createbitmapmaskfromtext(name1,upchars);
      i:=0;
      repeat
        i:=i+1;
        if findcolor(x,y,color1,1,1,700,700) or
           findcolor(x,y,color2,1,1,700,700) or
           findcolor(x,y,color3,1,1,700,700) then
        begin
          Mouse(x,y,0,0,false);
          if findpopup(name1) or
          (findbitmapmasktolerance(man,v,b,0,0,516,39,20,50)) then
          begin
            Popup('ickpock');
            wait(1000+random(1000));
            end else;
            if (GetlastChatTextblack ('You pick the woman')=true)
            or (GetlastChatTextblack('You pick')=true) then
            begin
              result:=true;
              DisguiseScar('successful');
              wait(2000+random(1000));
              DisguiseScar('Trying again');
              successfulPickpockets:=successfulPickpockets+1;
            end else;
            if (GetlastChatTextblack('You''ve been stunned')=true) or
             (GetlastChatTextblack('I can''t reach that')=true) then
            begin
              DisguiseScar('unsuccessful');
              wait(4000+random(1000));
              DisguiseScar('Trying Again');
              Result:=false;
              UnsuccessfulPickpockets:= UnsuccessfulPickpockets+1;
            end;
          end;
    line 94    end else;
        Result:=false;
        exit;
      until(result=true) or (i>=10);
    end;

    not really sure whats wrong

  2. #2
    Join Date
    Apr 2007
    Posts
    3,152
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    wheres line 94?
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  3. #3
    Join Date
    May 2007
    Location
    baltimore, md
    Posts
    836
    Mentioned
    0 Post(s)
    Quoted
    8 Post(s)

    Default

    lol i wrote line 94 in the script

    lol dan we both started to make these the same day

  4. #4
    Join Date
    Apr 2007
    Posts
    3,152
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    sry...i expected the 94 commmented in...lol yea we did start the same day(mine is simpler btw)and i would get rid of the end else, what does reult do?
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  5. #5
    Join Date
    May 2007
    Location
    baltimore, md
    Posts
    836
    Mentioned
    0 Post(s)
    Quoted
    8 Post(s)

    Default

    its so if it doesnt find any of the colors it is false and i can use the false result to do antirandoms or check hp or whatever... and i culd edit it but i will give this post a little more time

  6. #6
    Join Date
    Apr 2007
    Posts
    3,152
    Mentioned
    3 Post(s)
    Quoted
    1 Post(s)

    Default

    ok
    SCAR Tutorials: The Form Tutorial | Types, Arrays, and Classes
    Programming Projects: NotePad | Tetris | Chess


  7. #7
    Join Date
    Oct 2006
    Posts
    161
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    try
    [scar]

    else
    begin
    exit;
    end;
    [scar]

  8. #8
    Join Date
    Nov 2006
    Location
    In an Amish Paradise
    Posts
    729
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    You have too many ends...
    SCAR Code:
    //end;
          end;
    line 94    end else;
        Result:=false;
        exit;
      until(result=true) or (i>=10);
    end;

    Just take out one of the ends...Count you begins and ends and make shure thet match up, 6 ends and 6 begins

    Hope this helps
    ~Stupedspam

  9. #9
    Join Date
    Dec 2006
    Location
    B.C. Canada
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Oh man! lol i was just about to reply with that. o well

  10. #10
    Join Date
    May 2007
    Location
    baltimore, md
    Posts
    836
    Mentioned
    0 Post(s)
    Quoted
    8 Post(s)

    Default

    o i 4got to take an end else back 2 spaces

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 4
    Last Post: 11-02-2008, 12:39 PM
  2. Identifier expected...But no line given?...
    By OpenHearts in forum OSR Help
    Replies: 7
    Last Post: 08-04-2008, 09:35 PM
  3. Replies: 10
    Last Post: 06-01-2008, 02:15 PM
  4. Replies: 8
    Last Post: 02-03-2008, 01:58 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
  •