Results 1 to 24 of 24

Thread: auto annoy

  1. #1
    Join Date
    Jan 2009
    Posts
    24
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default auto annoy (updated)!

    i dont know how to add download so heres script u might get banned lol
    --------------------------------------------------------------------
    SCAR Code:
    program bother@updated;
    {.Include SRL\SRL.SCAR}
    procedure setup;
    begin
      writeln ('preparing to annoy enjoy!!!')
      SetupSRL;
    end;
    Begin
      Cleardebug;
      ActivateClient;
      Repeat
        SendKeysWait('1m a n00b and 1m Annoying',100,50);
        SendKeys(chr(13));
        Wait(1000);
      Until(False);
      End.

  2. #2
    Join Date
    Aug 2008
    Location
    Finland
    Posts
    2,851
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    haha u might want to add first wait(1000*60*5); so it waits 5 minutes before starting the spam :P

    pretty funny dude ^^
    U dont need to add download to that, but add it between [ scar] [ /scar] tags (without spaces ofc)

    SCAR Code:
    Program Bother;
    Begin
     MoveToTray;
     ActivateClient;
     wait(1000*60*5);
     Repeat
      SendKeysWait('1m a n00b and 1m Annoying',100,50);
      SendKeys(chr(13));
      Wait(1000);
     Until(False);
    End.

  3. #3
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

  4. #4
    Join Date
    Jul 2008
    Location
    Canada
    Posts
    1,612
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ^ im pretty sure this is supposed to get u banned

  5. #5
    Join Date
    Mar 2008
    Location
    New Jersey
    Posts
    1,673
    Mentioned
    1 Post(s)
    Quoted
    9 Post(s)

    Default

    why wait 5 minutes? then you'll have JUST logged out, unless that's the whole point of you telling him that .

  6. #6
    Join Date
    Jan 2009
    Posts
    24
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default ban

    yea ill change thread too annoy/ban =p

  7. #7
    Join Date
    Sep 2006
    Location
    include srl/srl.scar ( aussie)
    Posts
    2,875
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    Program Bother;
    Begin
    MoveToTray;
    ActivateClient;
    Repeat
    SendKeysWait('1m a n00b and 1m Annoying',100,50);
    SendKeys(chr(13));
    Wait(1000);
    Until(False);
    End.

    nice first script we all start somewhere dont we.

    first of all make it readable by adding in something called indents or standars.


    Program Bother;
    Begin
    --MoveToTray;
    --ActivateClient;
    --Repeat
    ----SendKeysWait('1m a n00b and 1m Annoying',100,50);
    ----SendKeys(chr(13));
    ----Wait(1000);
    --Until(False);
    End.


    so in scar that would be like

    SCAR Code:
    Program Bother;
    Begin
      MoveToTray;
      ActivateClient;
      Repeat
        SendKeysWait('1m a n00b and 1m Annoying',100,50);
        SendKeys(chr(13));
       Wait(1000);
      Until(False);
    End.

    as said before use TypeSend unstead of SendKeys wait. and mabby make it type some other things by useing a case statement.

    a case statementet with a random will just return a random numer and case that number off... its easy to give an example then type..

    SCAR Code:
    begin
      I:= Random(5);
      case I of
         1:
         2:
         3:
         4:
         5:
      end;  
    end;

    you could use the same system so it wouldnt allways type the same thing and you could have 5 different things and it would randomly choose one out of all them.

  8. #8
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    they want to wait 5 minutes so you can log in probably

    even though you need to have rs open and logged in to work..

    now I'm confused D:

    but if you want to script most stuff, you could read my tutorial

    (btw, GRATZ FOR LEARNING! ^^)

  9. #9
    Join Date
    Jan 2009
    Posts
    74
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Why would you want this? lol
    ~Will test any script and post feedback at your leisure~

  10. #10
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    you wouldn't it's just good that he's trying stuff.. >.>!

  11. #11
    Join Date
    Jan 2009
    Posts
    24
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol ull see its fun go in too highly populated world on a newb acc and just press play ppl will h8 u =]
    who ever said everything is possible never tried pushing backwards on a revolving door[BANANA]

  12. #12
    Join Date
    Apr 2007
    Location
    orygon
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    haha pretty ridiculous but good place to start learning

  13. #13
    Join Date
    Feb 2009
    Posts
    0
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol nice for a first script. It would be annoying.

  14. #14
    Join Date
    Feb 2007
    Location
    @ SRL
    Posts
    402
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by NiCbaZ View Post
    SCAR Code:
    Program Bother;
    Begin
    MoveToTray;
    ActivateClient;
    Repeat
    SendKeysWait('1m a n00b and 1m Annoying',100,50);
    SendKeys(chr(13));
    Wait(1000);
    Until(False);
    End.

    nice first script we all start somewhere dont we.

    first of all make it readable by adding in something called indents or standars.


    Program Bother;
    Begin
    --MoveToTray;
    --ActivateClient;
    --Repeat
    ----SendKeysWait('1m a n00b and 1m Annoying',100,50);
    ----SendKeys(chr(13));
    ----Wait(1000);
    --Until(False);
    End.


    so in scar that would be like

    SCAR Code:
    Program Bother;
    Begin
      MoveToTray;
      ActivateClient;
      Repeat
        SendKeysWait('1m a n00b and 1m Annoying',100,50);
        SendKeys(chr(13));
       Wait(1000);  // <-----------------
      Until(False);
    End.

    as said before use TypeSend unstead of SendKeys wait. and mabby make it type some other things by useing a case statement.

    a case statementet with a random will just return a random numer and case that number off... its easy to give an example then type..

    SCAR Code:
    begin
      I:= Random(5);
      case I of
         1:
         2:
         3:
         4:
         5:
      end;  
    end;

    you could use the same system so it wouldnt allways type the same thing and you could have 5 different things and it would randomly choose one out of all them.
    No, it would be like this. :P

    SCAR Code:
    Program Bother;
    Begin
      MoveToTray;
      ActivateClient;
      Repeat
        SendKeysWait('1m a n00b and 1m Annoying',100,50);
        SendKeys(chr(13));
        Wait(1000);
      Until(False);
    End.
    The game has an unexplainable attraction that convinces the player they are having fun, despite the fact that all they are doing is performing repetitive tasks to increase their statistics. "The game is actually a graphical nightmare and its gameplay is simple at best. Yet something, perhaps by subliminal means, forces the player - against his will - to play the game, and to believe that they are having fun".

  15. #15
    Join Date
    Dec 2008
    Posts
    10
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Try coding it to spam:

    A<space>q<space>p

    and

    <space><space><space><space><space>W


    This results in an ASCII of a p3n0r

  16. #16
    Join Date
    Feb 2007
    Location
    @ SRL
    Posts
    402
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by junle View Post
    Try coding it to spam:

    A<space>q<space>p

    and

    <space><space><space><space><space>W


    This results in an ASCII of a p3n0r

    Thats way to easy..
    here you go lol.

    SCAR Code:
    program New;

    {.include SRL/SRL.scar}

    Var
      A, Q, P, W, S, E: Byte;
      i: Integer;
    begin
      SetupSRL;
      ClearDebug;
      If Not LoggedIn Then
        TerminateScript;
      A := GetKeyCode('a');
      Q := GetKeyCode('q');
      P := GetKeyCode('p');
      W := GetKeyCode('w');
      S := GetKeyCode(Chr(32));
      E := GetKeyCode(Chr(12));
      Repeat
        If Not LoggedIn Then
          TerminateScript;
        TypeByte(A);
        TypeByte(S);
        TypeByte(Q);
        TypeByte(S);
        TypeByte(P);
        TypeByte(E);
        For i := 1 To 5 Do
          TypeByte(S);
        TypeByte(W);
        TypeByte(E);
      Until(False);
    end.
    The game has an unexplainable attraction that convinces the player they are having fun, despite the fact that all they are doing is performing repetitive tasks to increase their statistics. "The game is actually a graphical nightmare and its gameplay is simple at best. Yet something, perhaps by subliminal means, forces the player - against his will - to play the game, and to believe that they are having fun".

  17. #17
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    program New;

    {.include SRL/SRL.scar}

    Var
      A, Q, P, W, S, E: Byte;
      i: Integer;
    begin
      SetupSRL;
      ActivateClient;
      ClearDebug;
      If Not LoggedIn Then
        TerminateScript;
      A := GetKeyCode('a');
      Q := GetKeyCode('q');
      P := GetKeyCode('p');
      W := GetKeyCode('w');
      S := GetKeyCode(Chr(32));
      E := GetKeyCode(Chr(12));
      Repeat
        If Not LoggedIn Then
          TerminateScript;
        TypeByte(A);
        TypeByte(S);
        TypeByte(Q);
        TypeByte(S);
        TypeByte(P);
        TypeByte(E);
        For i := 1 To 5 Do
          TypeByte(S);
        TypeByte(W);
        TypeByte(E);
      Until(False);
    end.

    doesn't press enter

  18. #18
    Join Date
    Feb 2007
    Location
    @ SRL
    Posts
    402
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by 99_ View Post

    doesn't press enter
    oops lol, Just fixed it hah

    SCAR Code:
    program New;
     
    {.include SRL/SRL.scar}
     
    Var
      A, Q, P, W, S, E: Byte;
      i: Integer;
    begin
      SetupSRL;
      ClearDebug;
      If Not LoggedIn Then
        TerminateScript;
      A := GetKeyCode('a');
      Q := GetKeyCode('q');
      P := GetKeyCode('p');
      W := GetKeyCode('w');
      S := GetKeyCode(Chr(32));
      E := GetKeyCode(Chr(13));
      Repeat
        If Not LoggedIn Then
          TerminateScript;
        TypeByte(A);
        TypeByte(S);
        TypeByte(Q);
        TypeByte(S);
        TypeByte(P);
        TypeByte(E);
        For i := 1 To 5 Do
          TypeByte(S);
        TypeByte(W);
        TypeByte(E);
      Until(False);
    end.
    The game has an unexplainable attraction that convinces the player they are having fun, despite the fact that all they are doing is performing repetitive tasks to increase their statistics. "The game is actually a graphical nightmare and its gameplay is simple at best. Yet something, perhaps by subliminal means, forces the player - against his will - to play the game, and to believe that they are having fun".

  19. #19
    Join Date
    Aug 2008
    Location
    Finland
    Posts
    2,851
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    Haha, i said add there wait 5 minutes cos i read that the name of the script was "brother" not "bother" and tought its made for annyoing your brother who comes to the computer after u and is like "hey why is my pute suddenly spamming 'iam noob' " :P rofl misunderstanding...

  20. #20
    Join Date
    Mar 2009
    Posts
    24
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    program bother@updated@updatedagain;
    {.Include SRL\SRL.SCAR}
    procedure setup;
    begin
      writeln ('preparing to annoy enjoy!!!')
      SetupSRL;
    end;
    Begin
      Cleardebug;
      ActivateClient;
      Repeat
        SendKeysWait('1m a n00b and 1m Annoying',100,50);
        SendKeys(chr(13));
        Wait(1000 + Random(101));
      Until(False);
      End.

    A little more spiffing up won't do much harm. It's a little less detectable
    Why does Superman wear his underwear over his trousers?

  21. #21
    Join Date
    Mar 2009
    Posts
    3
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Lol at this script, I might just try it on a n00b account.

  22. #22
    Join Date
    Mar 2009
    Posts
    1
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    nice one!

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

    Default

    SCAR Code:
    TypeSend('{^}');
    Wait(100 + Random(74));
    TypeSend(' \/');

    Ice cones PWN!
    Ce ne sont que des gueux


  24. #24
    Join Date
    Jul 2008
    Location
    Canada
    Posts
    1,612
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    PHP Code:
    Program Spam;
    {.include 
    SRL\SRL.Scar}
    Procedure Spam;
    Begin
      Repeat
        TypeSend
    ('Ban me!!!!');
        
    Wait(500);
        
    TypeSend('Allz, go to srl forums, you crappy kids');
        
    Wait(600);
        
    TypeSend('BechNugget, har har har!');
         
    Wait(600);
        
    TypeSend('I macro hahaha');
        
    Wait(600);
        
    TypeSend('I am a jagex mod, spam customer support for free member');
        
    Wait(600);
        
    TypeSend('Buy free runescape accounts at the site');
         
    Wait(600);
        
    TypeSend('Selling accounts, trade me accounts for FREE');
        
    Wait(600);
        
    TypeSend('Good thing im blocking all these dumb adverts');
        
    Wait(600);
        
    TypeSend('Hey children, i give you free member for your address!!');
       
    until (false);
    End;

    Begin
      SetUpSrl
    ;
      
    ActivateClient;
      
    MoveToTray//FTW@!
      
    Spam;
    End
    That breaks all rules i think..

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Your Full Guide to Preparing to Auto [SCAR, SRL, SVN, HowTo Auto]
    By Runescapian321 in forum Outdated Tutorials
    Replies: 71
    Last Post: 10-11-2008, 03:46 AM
  2. The CopyCat! Annoy RS-Players!
    By King of Knives in forum RS3 Outdated / Broken Scripts
    Replies: 48
    Last Post: 11-25-2007, 06:39 PM
  3. Replies: 5
    Last Post: 11-23-2007, 08:45 PM
  4. need a good script , auto miner auto banker plz!!
    By samuel in forum RS3 Outdated / Broken Scripts
    Replies: 27
    Last Post: 11-19-2007, 08:46 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •