Results 1 to 17 of 17

Thread: Is it possible do get scar to do this???

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

    Default Is it possible do get scar to do this???

    How would i get scar to read a .txt of usernames
    set out like
    name1, name2, name3, name4

    and then type 1 name
    and click a coordinate
    if it isnt logged in then backspace
    then type name2.... etc
    until it reaches the end of the txt?

  2. #2
    Join Date
    Dec 2006
    Location
    Sydney, New South Wales, Australia
    Posts
    4,603
    Mentioned
    15 Post(s)
    Quoted
    42 Post(s)

    Default

    Read up (learn about) on WriteFileString and ReadFileString These can be found in the SCAR manual (F1 when SCAR is open and is the active window).
    You may contact me with any concerns you have.
    Are you a victim of harassment? Please notify me or any other staff member.

    | SRL Community Rules | SRL Live Help & Chat | Setting up Simba | F.A.Q's |

  3. #3
    Join Date
    May 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thankyou very much ill look into it XDD

  4. #4
    Join Date
    Dec 2006
    Location
    Sydney, New South Wales, Australia
    Posts
    4,603
    Mentioned
    15 Post(s)
    Quoted
    42 Post(s)

    Default

    Quote Originally Posted by kewlscaper View Post
    Thankyou very much ill look into it XDD
    You might also look up into the Explode function as-well. As it can easily seperate name1,name2,name3 etc and order them like:
    name1
    name2
    name3

    Easier to parse
    You may contact me with any concerns you have.
    Are you a victim of harassment? Please notify me or any other staff member.

    | SRL Community Rules | SRL Live Help & Chat | Setting up Simba | F.A.Q's |

  5. #5
    Join Date
    Jan 2008
    Location
    California, US
    Posts
    2,765
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    it seems you double posted because I posted the same thing as IP Drowner.

  6. #6
    Join Date
    May 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Ok i think ive figured it out but im havin problem with delete i got no idea wat to do with it can you please give me sum code or give me an example someone
    Code:
    program Cracker;
    var
    usernames:string;
    
    procedure ReadUser;
    var user,mess:string;
    begin
      user := Between(' ', ',', usernames);
      delete(user, )    // i wanna delete the user from tha string usernames
      delete(mess, )    // i wanna delete the mess from tha string usernames
    end;
    
    begin
    usernames:=' leetman, fkdks, sjhajha,';
    mess:=', ';
    repeat
    begin
    ReadUser;
    end;
    until(false)
    end.

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

    Default

    You wil always get username 1 nomatter what.
    You should look at explode and how to work with arrays. Also for to do loops will help you

  8. #8
    Join Date
    May 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Im still stuck and ive been trying/looking for ages for the solution and i cant seem to work it out so could someone give me the code allready done

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

    Default

    Okay, so now I've made it. Please do not just copy/paste but read through and try to figure out what I'm doing
    SCAR Code:
    Program New;
    {.include SRL/SRL.scar}

    var
      Names: TStringArray;
     
    procedure WriteAndClick;
    var
      H, i: Integer;
    begin
      H := High(Names);
      for i := 0 to H do
      begin
        TypeSend(Names[i]);
        Mouse(1, 1, 5, 5, True); // Cordinates
      end;
    end;

    begin
    Names := ['Richard', 'George', 'Kim'];
    SetupSRL;
    WriteAndClick;
    end.

  10. #10
    Join Date
    May 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thankyou but the only problem now is i got 4000 names i wanna use it with and i cant possibly put them all into strings thats why i was trying to explode a .txt of names into an array of strings but yeh maybe i cant do this with scar... i might need to try vb or sumthin

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

    Default

    How is your names listed?
    This will give you an array with the names if they are seperated with commas:
    SCAR Code:
    Program New;
    {.include SRL/SRL.scar}

    const
      Path = AppPath + 'Names.txt';

    var
      T: Integer;
      S: String;
      TS: TStringArray;

    begin
    SetupSRL;
    T := OpenFile(Path, True);
    ReadFileString(T, S, FileSize(T));
    TS := explode(',', S);
    end.

  12. #12
    Join Date
    Jan 2008
    Location
    California, US
    Posts
    2,765
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    And you can buffer it into multiple arrays if there is a max. i am not sure if there is though as I never have 4k indexes lol.

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

    Default

    There isn't.
    SCAR Code:
    Program TestArrayLength;

    var
      i: Integer;
      IA: array [0..4000] of Integer;

    begin
    for i := 0 to 4000 do
      IA[i] := Random(10);
    Writeln(IntToStr(IA[4000]));
    end.

  14. #14
    Join Date
    Jan 2008
    Location
    California, US
    Posts
    2,765
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Dude this will work then..it's not that hard.

  15. #15
    Join Date
    May 2007
    Posts
    19
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Sweet i got my cracker up and running now Thankyou so much for all your help!

  16. #16
    Join Date
    Jan 2008
    Location
    California, US
    Posts
    2,765
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I'm a cracker .
    Let me see your code pl0x.

  17. #17
    Join Date
    Jan 2008
    Location
    NC, USA.
    Posts
    4,429
    Mentioned
    0 Post(s)
    Quoted
    4 Post(s)

    Default

    Dude its not going to work just maunually logging in. You'll get the 5 minute wait thing allloooottt.
    Quote Originally Posted by irc
    [00:55:29] < Guest3097> I lol at how BenLand100 has become noidea
    [01:07:40] <@BenLand100> i'm not noidea i'm
    [01:07:44] -!- BenLand100 is now known as BenLand42-
    [01:07:46] <@BenLand42-> shit
    [01:07:49] -!- BenLand42- is now known as BenLand420
    [01:07:50] <@BenLand420> YEA

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
  •