Page 1 of 2 12 LastLast
Results 1 to 25 of 28

Thread: LoginPlayer fix

  1. #1
    Join Date
    Nov 2006
    Posts
    2,369
    Mentioned
    4 Post(s)
    Quoted
    78 Post(s)

    Default LoginPlayer fix

    Ok so jagex changed the login screen and here is a little fix to get login working

    Code:
    procedure LoginPlayer;
    var
      Mark, Attempts: Integer;
      Actions: TVariantArray;
      RetryLogin: Boolean;
    label
      ProcStart;
    begin
      ActivateClient;
      Wait(100);
      TypeByte(vk_Escape);
    
      if (GetColor(212, 327) = 238301) then    //At Click To Play screen
      begin
        Wait(1000 + Random(3000));
        MouseBox(227, 337, 555, 364, 1);
        MarkTime(Mark);
        while (TimeFromMark(Mark) < 30000) and (not(LoggedIn)) do
          Wait(1000 + Random(1000));
      end;
      if (not(RSReady)) then
      begin
        MarkTime(Mark);
        while (not(RSReady)) do
        begin
          Wait(100);
          if (TimeFromMark(Mark) > 180000) then
          begin
            WriteLn('It has been 3 minutes and Runescape is not yet ready... Terminating.');
            TerminateScript;
          end;
        end;
        WriteLn('Welcome to Runescape.');
      end;
      
      LoginScreenMusic(True);
      if (not(GraphicsSet)) then
      begin
        SetAutoingDefaults;
        GraphicsSet := True;
      end;
      ProcStart:
    
      if (not(LoggedIn)) then
      begin
        if (not(Players[CurrentPlayer].Active)) then
        begin
          WriteLn('Player is not Active...');
          NextPlayer(False);
          Exit;
        end;
        Wait(900 + random(60));
    
        //Click 'Log In' on main menu
        while (GetColor(343, 175) <> 7750) do //while (GetColor(343, 174) <> 7750) do
        begin
          MouseBox(360, 180, 400, 185, 1);
          Wait(100 + Random(100));
        end;
    
        //Type Username
        Mouse(315, 272, 10, 5, True);
        while (CountColor(7750, 311, 269, 452, 284) > 13) do
        begin
          KeyDown(vk_Back);
          Wait(10 + Random(10));
          KeyUp(vk_Back);
          Wait(50 + Random(50));
        end;
        for Mark := 0 to 3 do
        begin
          KeyDown(vk_Back);
          Wait(10 + Random(10));
          KeyUp(vk_Back);
          Wait(50 + Random(50));
        end;
        Wait(100 + Random(200));
        WriteLn(Capitalize(Players[CurrentPlayer].Name));
        TypeSend(Players[CurrentPlayer].Name);
        Wait(100+random(50));
    
        //Type Password
        Mouse(315, 334, 10, 5, True);
        while (CountColor(7750, 311, 337, 452, 352) > 13) do
        begin
          KeyDown(vk_Back);
          Wait(10 + Random(10));
          KeyUp(vk_Back);
          Wait(50 + Random(50));
        end;
        for Mark := 0 to 3 do
        begin
          KeyDown(vk_Back);
          Wait(10 + Random(10));
          KeyUp(vk_Back);
          Wait(50 + Random(50));
        end;
        Wait(100 + Random(200));
        TypeSend(Players[CurrentPlayer].Pass);
        Wait(500 + Random(300));
    
        if (not(FindTextTPA(12509695, 0, 288, 205, 475, 247, 'login', StatChars, Nothing))) then   //If 'enter' from typesend didn't log us in
        begin
          MouseBox(355, 359, 403, 372, 1);  //Click 'login' login screen
          Wait(250 + random(100));
        end;
    
        MarkTime(Mark);
        repeat
          SetLength(Actions, 0);
    
          if (TimeFromMark(Mark) > 60000) then
            Actions := ['One minute has passed...', 0, 2, 'NextPlayer', 'Login Failed']
          else
          case (CountColor(12509695, 288, 205, 475, 247)) of   //Number of text colour points
            //   Actions := ['WriteLn Text', TimeToWait, NumberOfRetries, 'FinalAction', 'PlayerStatus'];
            760: Actions := ['Too many incorrect logins.', 5 * 60000, 2, 'NextPlayer', ''];
            536: Actions := ['Login limit exceeded. Please wait 1 minute and try again.', 60000, 2, 'NextPlayer', ''];
            711: Actions := ['Your account has been disabled', 0, 0, 'NextPlayer', 'Acc Disabled'];
            598: Actions := ['Invalid Username / Password', 0, 2, 'NextPlayer', 'Wrong User/Pass'];
            787: Actions := ['Not a Members Account', 0, 0, 'NextPlayer', 'Non-member'];
            408: Actions := ['World is full.', 5000, 20, 'Terminate', ''];
            623: Actions := ['Your account is already logged in', 5000, 0, 'RandomNextPlayer', ''];
            555: Actions := ['The Server is being updated.', 60000, 4, 'Terminate', 'Server Updating'];
            218: Actions := ['Error Connecting.', 20000, 9, 'Terminate', 'Error Connecting'];
            335: Actions := ['Unable to connect Login Server offline.',(20000) + Random(6000), 4, 'Terminate', 'Login Server Offline'];
            512: Actions := ['RuneScape has been updated. Script Terminated.', 0, 0, 'Terminate', 'RS Updated'];
            489: Actions := ['Connection timed out.', 0, 4, 'Terminate', 'Connection Timed Out'];
            737: Actions := ['You are standing in a members-only area.', 0, 0, 'NextPlayer', 'In Mems-Only Area'];
            //10: Actions := ['Error loading your profile.', 5000, 10, 'NextPlayer', 'Profile Loading Failed']; // Error loading your profile. Will attempt to re-login 5 more times.)
            //11: Actions := ['Login server rejected session.', 1000, 10, 'NextPlayer', 'Login Serv. Rejected'];  // Login server rejected session.
          end;
    
          if (Length(Actions) > 0) then
          begin
            WriteLn(Actions[0]);
            Wait(Actions[1] + Random(100));
            if (Actions[2] <> 0) then
              if (Attempts < Actions[2]) or (Actions[2] = -1) then
              begin
                RetryLogin := True;
                Break;
              end;
            if (Actions[4] <> '') then
              Players[CurrentPlayer].Loc := Actions[4];
            case Actions[3] of
              'NextPlayer': NextPlayer(False);
              'RandomNextPlayer': RandomNextPlayer(True);
              'Terminate': TerminateScript;
            end;
            Exit;
          end;
          Wait(100);
        until(GetColor(266, 69) = 1647915);//changed
    
        if (RetryLogin) then
        begin
          RetryLogin := False;
          Inc(Attempts);
          goto ProcStart;
        end;
    
        if (GetColor(266, 69) = 1647915) then//changed
        begin
          Wait(1000 + Random(2000));
          MouseBox(210, 410, 560, 450, 1);//changed
        end;
        MarkTime(Mark);
        while (TimeFromMark(Mark) < 30000) and (not(LoggedIn)) do
          Wait(1000 + Random(1000));
      end;
    
      if (LoggedIn) then
      begin
        PlayerStartTime := (GetSystemTime div 1000); // PlayerStartTime
        if Length(Players[CurrentPlayer].NickTPA) < 2 then
        begin;
          Writeln('Creating the NickTPA.');
          if Players[CurrentPlayer].Nick <> '' then
            Players[CurrentPlayer].NickTPA := CreateTPAFromText(Players[CurrentPlayer].Nick, UpChars)
          else
          begin;
            Writeln('Nickname isn''t set, taking the username instead..');
            Players[CurrentPlayer].NickTPA := CreateTPAFromText(Players[CurrentPlayer].Name, UpChars);
          end;
        end;
        AddToSRLLog('Current player: ' + Capitalize(Players[CurrentPlayer].Name));
      end;
    end;
    Quote Originally Posted by DeSnob View Post
    ETA's don't exist in SRL like they did in other communities. Want a faster update? Help out with updating, otherwise just gotta wait it out.

  2. #2
    Join Date
    Feb 2007
    Location
    Access Violation at 0x00000000
    Posts
    2,865
    Mentioned
    3 Post(s)
    Quoted
    18 Post(s)

    Default

    Thanks. Needed it quick.
    Ce ne sont que des gueux


  3. #3
    Join Date
    Feb 2009
    Location
    Philipines
    Posts
    600
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Nice, thanks antti mies

  4. #4
    Join Date
    Feb 2007
    Location
    PA, USA
    Posts
    5,240
    Mentioned
    36 Post(s)
    Quoted
    496 Post(s)

    Default

    that was fast enough
    i love srl getting bigger. it used to be a year ago... that when somthing changed it was atleast 3-5 days until a fix was out for public

  5. #5
    Join Date
    Jun 2007
    Posts
    83
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    thx

  6. #6
    Join Date
    Mar 2007
    Posts
    58
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Am I the only person this isn't working for?

  7. #7
    Join Date
    Jun 2007
    Posts
    83
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Quote Originally Posted by 70s_dollar View Post
    Am I the only person this isn't working for?
    it works for me.

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

    Default

    This won't be added permanently, cos its not a permanent update.

  9. #9
    Join Date
    Mar 2007
    Posts
    58
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Richard View Post
    This won't be added permanently, cos its not a permanent update.
    Well I replace this one with the old one and I get errors saying like RSReady error, help?

  10. #10
    Join Date
    Mar 2009
    Posts
    44
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Antti you are an absolute stud for making this update

    WELL DONE

  11. #11
    Join Date
    Nov 2006
    Posts
    2,369
    Mentioned
    4 Post(s)
    Quoted
    78 Post(s)

    Default

    Quote Originally Posted by 70s_dollar View Post
    Well I replace this one with the old one and I get errors saying like RSReady error, help?
    Huh I hope you didn't replace the login.scar with this... You were supposed to replace only with the loginplayer function inside the login.scar with this
    Quote Originally Posted by DeSnob View Post
    ETA's don't exist in SRL like they did in other communities. Want a faster update? Help out with updating, otherwise just gotta wait it out.

  12. #12
    Join Date
    Mar 2007
    Posts
    58
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by antti mies View Post
    Huh I hope you didn't replace the login.scar with this... You were supposed to replace only with the loginplayer function inside the login.scar with this
    hehehehe, thank you sir!

  13. #13
    Join Date
    Dec 2007
    Posts
    38
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thanx a bunch,antti
    When the login is back to normal,
    do I just replace the updated login.scar with the backup?
    Remember,it's easy to notice a lousy Autoer, especially if you're a freakin lvl.3 with a shitty name,and default clothes. I'll report your ass asap. Don't be a leecher!

  14. #14
    Join Date
    Oct 2006
    Location
    USA
    Posts
    304
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    yeah i was about to replace the whole thing. lol good thing im not lazy and read up. and im pretty sure its perm...:

    In Other News...

    The layout of the welcome screen has been changed slightly to allow us to add further information to it in the future.
    my error: Line 468: [Error] (5499:1): 'BEGIN' expected in script
    Last edited by Punkgi; 04-08-2009 at 07:34 PM.

  15. #15
    Join Date
    Jan 2008
    Location
    Ontario, Canada
    Posts
    7,805
    Mentioned
    5 Post(s)
    Quoted
    3 Post(s)

    Default

    Please see the sticky in this forum for the Developers fix.

    Thank you though anti.
    Last edited by Nava2; 04-08-2009 at 08:11 PM.
    Writing an SRL Member Application | [Updated] Pascal Scripting Statements
    My GitHub

    Progress Report:
    13:46 <@BenLand100> <SourceCode> @BenLand100: what you have just said shows you 
                        have serious physchological problems
    13:46 <@BenLand100> HE GETS IT!
    13:46 <@BenLand100> HE FINALLY GETS IT!!!!1

  16. #16
    Join Date
    Nov 2007
    Location
    PA
    Posts
    90
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by 70s_dollar View Post
    hehehehe, thank you sir!
    I did what 70's did, and i changed the script correctly, but the cursor in smart still hovers over that dumb bunny =(

    someone help plzz
    Last edited by Skepsis; 04-09-2009 at 05:53 AM.
    -It's not that women don't want to hear your opinion, it's that they want to hear their opinion, but in a deeper voice

    <a href="http://www.justsayhi.com/bb/fight5" style="display: block; background: url(http://assets.justsayhi.com/badges/7...8hnwzprff0.jpg) no-repeat; width: 296px; height: 84px; font-family: Arial, sans-serif; font-size: 42px; color: #fff; text-decoration: none; text-align: center; padding-top: 145px;">26</a><p></p>

  17. #17
    Join Date
    Mar 2009
    Location
    Stacey's Mom, Has got it goin on.
    Posts
    68
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    So you just add this to the top of any script?






    EDIT: Cheer's Arcana.
    Last edited by Bro; 04-10-2009 at 10:12 AM.

  18. #18
    Join Date
    Feb 2009
    Location
    Philipines
    Posts
    600
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Bro View Post
    So you just add this to the top of any script?



    No, you replace the loginplayer function inside the login.scar with this one.
    Last edited by Dark Arcana; 04-09-2009 at 09:13 AM.

  19. #19
    Join Date
    May 2008
    Posts
    64
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Line 21: [Error] (4977:9): Unknown identifier 'RSReady' in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/Login.scar

  20. #20
    Join Date
    Feb 2009
    Location
    Philipines
    Posts
    600
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by k1ng duffy View Post
    Line 21: [Error] (4977:9): Unknown identifier 'RSReady' in script C:\Program Files\SCAR 3.15\includes\SRL/SRL/Core/Login.scar
    You replaced the whole thing, you only replace loginplayer function.

    Replace your Login.scar with this.
    Last edited by Dark Arcana; 04-09-2009 at 09:13 AM.

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

    Default

    I've just put the function into my scripts, so that people don't have to worry about inserting this into there includes. I find it easier that way.

  22. #22
    Join Date
    Jun 2007
    Posts
    30
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    god can somone please update the login.scar and upload it so it can work im so close to 99 strength and i want to get it please

  23. #23
    Join Date
    Jan 2008
    Location
    Ontario, Canada
    Posts
    7,805
    Mentioned
    5 Post(s)
    Quoted
    3 Post(s)

    Default

    Quote Originally Posted by drag30 View Post
    god can somone please update the login.scar and upload it so it can work im so close to 99 strength and i want to get it please
    In the sticky at the top of this thread, just copy the file there and replace your Login.scar with that one.
    Writing an SRL Member Application | [Updated] Pascal Scripting Statements
    My GitHub

    Progress Report:
    13:46 <@BenLand100> <SourceCode> @BenLand100: what you have just said shows you 
                        have serious physchological problems
    13:46 <@BenLand100> HE GETS IT!
    13:46 <@BenLand100> HE FINALLY GETS IT!!!!1

  24. #24
    Join Date
    Jun 2007
    Posts
    30
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    when i do tht it pastes on just one line it doesnt go down. like thers only one line it doesnt go down like the other login
    Last edited by drag30; 04-10-2009 at 12:50 AM.

  25. #25
    Join Date
    Mar 2009
    Location
    Stacey's Mom, Has got it goin on.
    Posts
    68
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Guy's I'm only new to SRL and I can't even find where login.scar is!

    Help please, it would be greatly appreciated.






    EDIT: PPPPPPPPPPPPPPPPPPPPPPLLLLLLLLLLLLLLLLLLLLLEEEEEEE EEEEEEEEEEEEEEEAAAAAAAAAAAAAAAASSSSSSSSSSSSSEEEEEE EEEEEEE
    Last edited by Bro; 04-10-2009 at 02:30 PM.

Page 1 of 2 12 LastLast

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
  •