Results 1 to 17 of 17

Thread: Reflection walking help :)

  1. #1
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Reflection walking help :)

    SCAR Code:
    program FirstReflectionWalkerEver;
    {.Include SRL\SRL\Misc\Smart.Scar}
    {.Include SRL\SRL.Scar}
    {.Include SRL\SRL\Reflection\Reflection.Scar}

    // reminder for my self that i need that to make it run

    //------------------------Instructions----------------------//

     // This is my first script ever from walking with reflection.
     // Ive followed this tutorial and i hope it workks, and no
     // i dont got any failsafe in it, so if it dont find track
     // it will fuck you and logg out :O




    {--------------------------Smart---------------------------}

    Procedure SetupSmart;
    Begin
      SmartSetupex(16, False, True, False);//Change the number in 'world84'
      Wait(1000);                                       //to whichever world you want.
      SetTargetDC(SmartGetDC);
    end;

    {---------------------Setup player(s)------------------------}

    Procedure DeclarePlayers;
    Begin

      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;

      Players[0].Name :=''; //Your Username
      Players[0].Pass :='';  // Your password
      Players[0].Nick :='rgep';  //3-4 letters of your username.
      Players[0].Active:=True;

    end;

    {-------------------------------Path-----------------------}

    function LoadPath: TPointArray;
    begin
      SetLength(Result, 21);

      Result[0] := Point(3220, 3218);
      Result[1] := Point(3232, 3219);
      Result[2] := Point(3241, 3226);
      Result[3] := Point(3255, 3227);
      Result[4] := Point(3260, 3240);
      Result[5] := Point(3253, 3251);
      Result[6] := Point(3251, 3265);
      Result[7] := Point(3244, 3276);
      Result[8] := Point(3238, 3289);
      Result[9] := Point(3239, 3301);
      Result[10] := Point(3229, 3309);
      Result[11] := Point(3221, 3320);
      Result[12] := Point(3212, 3330);
      Result[13] := Point(3205, 3341);
      Result[14] := Point(3205, 3354);
      Result[15] := Point(3211, 3368);
      Result[16] := Point(3211, 3382);
      Result[17] := Point(3211, 3396);
      Result[18] := Point(3210, 3411);
      Result[19] := Point(3212, 3424);
      Result[20] := Point(3213, 3428);
    end;

    {------------------------------Walkpath-----------------------}

    Procedure WalkThePath;
    Var
      I: Integer;
      Path: TPointArray;

    Begin
      Path := LoadPath;
      for i := 1 to High(Path) do
        Begin
           TileToMM(Path[i]);  // line i added
           WalkToTile(Path[i], 3, 0);
        end;
          Wait(500+Random(300));
    end;

    {-------------------------------Loop-----------------------}

    begin
      SetupSRL;
      SetupSmart;
      DeclarePlayers;//Calls the DeclarePlayers procedure
      LoginPlayer;// This one logs you in xD
      GetAllLevels;
      SetChat('on',1);
      SetChat('friends',2);
      SetChat('on',3);
      SetAngle(True);
      Wait(1000+Random(300));
      WalkThePath;
      Logout; //This will log your player out!
    end.
    Last edited by slakan; 05-24-2009 at 06:41 PM.

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

    Default

    Password

  3. #3
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  4. #4
    Join Date
    Sep 2008
    Location
    Not here.
    Posts
    5,422
    Mentioned
    13 Post(s)
    Quoted
    242 Post(s)

    Default

    What does it mess up on?

  5. #5
    Join Date
    Mar 2007
    Posts
    3,042
    Mentioned
    1 Post(s)
    Quoted
    14 Post(s)

    Default

    Make sure you have the correct hooks. Try calling SetupReflection once SMART loads.

    Also, if you picked the tiles using Sumilion's Path Maker, you might want to pick them manually using GetMyPos or RSBot (or another bot that can debug your position).
    :-)

  6. #6
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Is messes up in the beginning. When i run it it loggs inn and the mouse goes out of the screen and nothing els happens.

  7. #7
    Join Date
    Sep 2008
    Location
    Not here.
    Posts
    5,422
    Mentioned
    13 Post(s)
    Quoted
    242 Post(s)

    Default

    SCAR Code:
    program FirstReflectionWalkerEver;
    {.Include SRL\SRL\Misc\Smart.Scar}
    {.Include SRL\SRL.Scar}
    {.Include SRL\SRL\Reflection\Reflection.Scar}

    // reminder for my self that i need that to make it run

    //------------------------Instructions----------------------//

     // This is my first script ever from walking with reflection.
     // Ive followed this tutorial and i hope it workks, and no
     // i dont got any failsafe in it, so if it dont find track
     // it will fuck you and logg out :O




    {--------------------------Smart---------------------------}

    Procedure SetupSmart;
    Begin
      SmartSetupex(16, False, True, False);//Change the number in 'world84'
      Wait(1000);                                       //to whichever world you want.
      SetTargetDC(SmartGetDC);
    end;

    {---------------------Setup player(s)------------------------}

    Procedure DeclarePlayers;
    Begin

      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;

      Players[0].Name :='Urgepurge'; //Your Username
      Players[0].Pass :='thisshitdontworkanyways';  // Your password
      Players[0].Nick :='rgep';  //3-4 letters of your username.
      Players[0].Active:=True;

    end;

    {-------------------------------Path-----------------------}
    function LoadPath: TPointArray;
    begin
      SetLength(Result, 21);

      Result[0] := Point(3225, 3218);
      Result[1] := Point(3235, 3223);
      Result[2] := Point(3249, 3226);
      Result[3] := Point(3259, 3232);
      Result[4] := Point(3259, 3244);
      Result[5] := Point(3251, 3254);
      Result[6] := Point(3250, 3267);
      Result[7] := Point(3241, 3278);
      Result[8] := Point(3239, 3290);
      Result[9] := Point(3238, 3304);
      Result[10] := Point(3229, 3310);
      Result[11] := Point(3222, 3320);
      Result[12] := Point(3212, 3330);
      Result[13] := Point(3206, 3342);
      Result[14] := Point(3204, 3354);
      Result[15] := Point(3206, 3365);
      Result[16] := Point(3210, 3379);
      Result[17] := Point(3211, 3392);
      Result[18] := Point(3211, 3407);
      Result[19] := Point(3211, 3420);
      Result[20] := Point(3213, 3429);
    end;

    {------------------------------Walkpath-----------------------}

    Procedure WalkThePath;
    Var
      I: Integer;
      Path: TPointArray;

    Begin
      Path := LoadPath;
      for i := 0 to High(Path) do
        Begin
           TileToMM(Path[i]);  // line i added
           WalkToTile(Path[i], 3, 0);
        end;
          Wait(500+Random(300));
    end;

    {-------------------------------Loop-----------------------}

    begin
      SetupSRL;
      SetupSmart;
      DeclarePlayers;//Calls the DeclarePlayers procedure
      LoginPlayer;// This one logs you in xD
      WalkThePath;
      Logout; //This will log your player out!
    end.

  8. #8
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    r ur using sumilions path walker to get them tiles?

  9. #9
    Join Date
    Sep 2008
    Location
    Not here.
    Posts
    5,422
    Mentioned
    13 Post(s)
    Quoted
    242 Post(s)

    Default

    i don't think it mattered. he forgot to use tiletomm.

  10. #10
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    SCAR Code:
    {*******************************************************************************
    Function WalkToTile(Tile: TPoint; Randomness, FlagD: Integer): Boolean;
    By: Wizzup and TheGuyWhoGotOn
    Description: Walks to the tile using minimap.
    *******************************************************************************}

    Function WalkToTile(Tile: TPoint; Randomness, FlagD: Integer): Boolean;

    Var
       wTile: TPoint;
       t: Integer;

    Begin
      Result := False;
      Tile := Point(RandomRange(Tile.X-Randomness, Tile.X+Randomness), RandomRange(Tile.Y-Randomness, Tile.Y+Randomness));
      wTile := TileToMM(Tile); // Notice This line
      If Not rs_OnMiniMap(wTile.X, wTile.Y) Then
        Exit;
      MFNF(wTile.x, wTile.y, -1, -1);
      Wait(RandomRange(80, 100));
      t := getsystemtime;
      R_FFlag(FlagD);
      Result := (GetSystemTime - t) < 60000;
    End;

  11. #11
    Join Date
    Sep 2008
    Location
    Not here.
    Posts
    5,422
    Mentioned
    13 Post(s)
    Quoted
    242 Post(s)

    Default

    meh... i took that out in my walktotile, so that my pathwalking is more better/1337

  12. #12
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    lol im pritty sure it wont work without it

  13. #13
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  14. #14
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  15. #15
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    did u use pathwalk by sumilion

  16. #16
    Join Date
    Nov 2007
    Posts
    236
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  17. #17
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    or use devs reflection they got the latest hooks that setupreflection; gets.
    I do visit every 2-6 months

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
  •