Results 1 to 10 of 10

Thread: Please help me fix procedure

  1. #1
    Join Date
    May 2008
    Location
    Oregon, USA
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Please help me fix procedure

    Fixed by 99, Thankyou!!!!
    thanks for also helping richard!!!
    Last edited by spicynachos2; 06-23-2009 at 06:26 AM.

  2. #2
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    Procedure ProtectT3hPixles;
    var
    TP: TPointArray;
    I:integer;
    log:Boolean;


    begin
     repeat
     If FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5) then
     begin
     Mouse(982,191,4,3,true);
     Typesend('NOOB i rape you');
     I:=40;
    end else
      begin
      I:=0;
      clicking;
      repeat
       begin
       Wait(900+random(913));
       I:=I+1;
       end
       until(I:=35) or (FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5));
     end
    until(I=40);
    end;
    removed the =True somewhere in there

  3. #3
    Join Date
    May 2008
    Location
    Oregon, USA
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by 99_ View Post
    SCAR Code:
    Procedure ProtectT3hPixles;
    var
    TP: TPointArray;
    I:integer;
    log:Boolean;


    begin
     repeat
     If FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5) then
     begin
     Mouse(982,191,4,3,true);
     Typesend('NOOB i rape you');
     I:=40;
    end else
      begin
      I:=0;
      clicking;
      repeat
       begin
       Wait(900+random(913));
       I:=I+1;
       end
       until(I:=35) or (FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5));  ------error is here...
     end
    until(I=40);
    end;
    removed the =True somewhere in there
    Thanks but that aint fixin it i get the error at the spot i put the "error is here"... the until line
    error i got was Line 108: [Error] (21103:8): Closing parenthesis expected in script

    will you fix it if i give you the whole script?
    Last edited by spicynachos2; 06-23-2009 at 06:07 AM.

  4. #4
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    SCAR Code:
    Until(i:=35);

    You are assigning a value, which may be what gives you the error, you need to ask SCAR if the value matches 35:

    SCAR Code:
    Until(i = 35);

  5. #5
    Join Date
    May 2008
    Location
    Oregon, USA
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Richard View Post
    SCAR Code:
    Until(i:=35);

    You are assigning a value, which may be what gives you the error, you need to ask SCAR if the value matches 35:

    SCAR Code:
    Until(i = 35);
    How do i do that? can you please just edit the script. I really am going to blow my brains out if i can't get passed this... Wouldn't you like to have a nice very random EP trainer?

    Thanks for helping

    will you fix it if i give you the whole script?

  6. #6
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Haha can't believe I didn't see that. Change it to..

    SCAR Code:
    until((i = 35)or(FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5)));

    :]

  7. #7
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    SCAR Code:
    Procedure ProtectT3hPixles;
    var
      TP: TPointArray;
      I:integer;
      log:Boolean;
    begin
      repeat
      If FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5) then
      begin
        Mouse(982,191,4,3,true);
        Typesend('NOOB i rape you');
        I:=40;
      end else
      begin
        I:=0;
        clicking;
        repeat
          begin
            Wait(900+random(913));
            I:=I+1;
          end;
        until(I = 35) or (FindColorsTolerance(TP, 10551295, 416, 219, 551, 342, 5));
      end;
      until(I=40);
    end;

    Test it, may work.

    No idea what an EP trainer is

  8. #8
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I fixed it; there were other things too. He PM'd me ;]

  9. #9
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Quote Originally Posted by 99_ View Post
    I fixed it; there were other things too. He PM'd me ;]
    You? Mkay

  10. #10
    Join Date
    May 2008
    Location
    Oregon, USA
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by 99_ View Post
    I fixed it; there were other things too. He PM'd me ;]
    Thanks man... now i can get on with scripting...

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
  •