Results 1 to 4 of 4

Thread: My First Scar

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

    Default My First Scar

    I want to learn scar and i looked up some tutorials, But i don't know if my first script is good, Would you guys look at it ?

    SCAR Code:
    program EnteringBoat;
    {.include srl/srl.scar}

    const
     BoatCol1 = '';

    procedure BoatFind;
    begin
     If(FindColor(x,y, BoatCol1, 0, 0, 100, 100));
      begin
       MMouse(x,y, 0, 0);
       If(isUpTest('ross'))Then
        begin
         Mouse(x,y, 0, 0,true)
         Exit;
        end;
      end;
    end;

    procedure Antiban;
    begin
      RotateEvery(15000);
      MakeCompass('N');
    end;

    begin
     BoatFind;
      Antiban;
    end.

    It's a little script for boarding the boat of Pc

  2. #2
    Join Date
    Aug 2006
    Posts
    21
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Ow Cmn Cant anyone check my script ?

  3. #3
    Join Date
    Jun 2006
    Location
    USA
    Posts
    1,828
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Dude, this one compiles now:
    SCAR Code:
    program EnteringBoat;
    {.include srl/srl.scar}
    {.include srl/srl/extended/xautotalk.scar}
    {.include srl/srl/extended/xantiban.scar}

    const
     BoatCol1 = 0000000;

    procedure BoatFind;
    begin
    If(FindColorTolerance(x,y, BoatCol1, MSX1, MSY1, MSX2, MSY2,10))then
      begin
       MMouse(x,y, 0, 0);
       If(isUpText('ross'))Then
         Mouse(x,y, 0, 0,true)
      end;
    end;

    procedure Antiban2;
    begin
      RotateEvery(15000);
      MakeCompass('N');
    end;

    begin
     SetUpSRL;
     BoatFind;
     Antiban2;
    end.

    And for finding objects, you can use SRL's FindObj -function.

  4. #4
    Join Date
    Jun 2007
    Location
    Kentucky, United States of America
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Might want to add a bit more to your anti-ban too. . .

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 15
    Last Post: 09-22-2008, 12:32 PM
  2. SCAR Divi 3.01 DONT associate .scar files!!!
    By chimpy in forum News and General
    Replies: 1
    Last Post: 04-21-2007, 08:49 PM
  3. Replies: 28
    Last Post: 06-22-2006, 04:27 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
  •