Results 1 to 8 of 8

Thread: Xanith's Burner.

  1. #1
    Join Date
    Jun 2009
    Location
    New Jersey
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Xanith's Burner.

    It's my first script, but don't be afraid to be harsh on it.

    It uses Reflection and colors.

    I hope it is good.
    Take a look at a new OpenDepositBox here.

  2. #2
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Overall a pretty good script considering it your first script

    However,
    SCAR Code:
    procedure FixIt;
    var
      LeftTile : Tpoint;
    begin
      if(FindBlackChatMessage('here.'))then
        Wait(100 + Random(73));
        GetMyPos;
        WalkToTile(LeftTile, 0, 0);
    end;
    You don't assign the LeftTile to anything meaning it won't move.

    You have two walking procedures, you could make them into one.

  3. #3
    Join Date
    May 2007
    Location
    UK
    Posts
    4,007
    Mentioned
    1 Post(s)
    Quoted
    12 Post(s)

    Default

    on Frt's point do:
    SCAR Code:
    procedure FixIt;
    var
      LeftTile : Tpoint;
    begin
    LeftTile := (xxxx,xxxx); <-------------------
      if(FindBlackChatMessage('here.'))then
        Wait(100 + Random(73));
        GetMyPos;
        WalkToTile(LeftTile, 0, 0);
    end;

    Just add that bit

    T~M

  4. #4
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by The Man View Post
    on Frt's point do:
    SCAR Code:
    procedure FixIt;
    var
      LeftTile : Tpoint;
    begin
    LeftTile := (xxxx,xxxx); <-------------------
      if(FindBlackChatMessage('here.'))then
        Wait(100 + Random(73));
        GetMyPos;
        WalkToTile(LeftTile, 0, 0);
    end;

    Just add that bit

    T~M
    I think what he intended was something like:
    SCAR Code:
    procedure FixIt;
    var
      LeftTile : Tpoint;
    begin
      if(FindBlackChatMessage('here.'))then
        Wait(100 + Random(73));
        LeftTile := GetMyPos;
        WalkToTile(Point(LeftTile.x + 1, LeftTile.y), 0, 0);
    end;

  5. #5
    Join Date
    May 2007
    Location
    UK
    Posts
    4,007
    Mentioned
    1 Post(s)
    Quoted
    12 Post(s)

    Default

    OH, ok sorry I didnt read any of the script so I just put the default in

    T~M

  6. #6
    Join Date
    Jun 2009
    Location
    New Jersey
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    FRT, That's exactly what I was trying to go for but I wasn't sure how to do it. (I knew LeftTile wasn't going to click on the left tile, I just named it that)

    Thanks for the help guys.

    Is there anything else that could be fixed?
    Take a look at a new OpenDepositBox here.

  7. #7
    Join Date
    Oct 2007
    Location
    Denmark
    Posts
    409
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Xanith View Post
    FRT, That's exactly what I was trying to go for but I wasn't sure how to do it. (I knew LeftTile wasn't going to click on the left tile, I just named it that)

    Thanks for the help guys.

    Is there anything else that could be fixed?
    As I said, you have two walking procedures and two loadpaths.

    You could do something like:
    SCAR Code:
    function LoadPath(Which: Integer): TPointArray;
    begin
      case Which of
        0: Result := [Point(1, 1), Point(1, 2)];
    end;

    procedure Walk(Which: Integer);
    var
      Path: TPointArray;
      H, i: Integer;
    begin
      Path := LoadPath(Which);
      H := High(Path);
      for i := 0 to H do
      begin
        AntiBan;
        WalkToTile(Path[i], 1, 0);
      end;
    end;

  8. #8
    Join Date
    Jun 2009
    Location
    New Jersey
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I get what you are saying but not fully sure how to go about doing it.
    Take a look at a new OpenDepositBox here.

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
  •