Poll: Did The Script Work?

Results 1 to 6 of 6

Thread: Auto Talker V 1.0(Works Great)

  1. #1
    Join Date
    Jul 2007
    Posts
    34
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Auto Talker V 1.0(Works Great)

    AUTO TALKER V 1.1!


    INSTRUCTIONS:


    "INSTRUCTIONS"
    1. DRAG CROSSHAIR TO RUNESCAPE SCREEN 2. SET UP LINE 74 ONLY!
    3. PRESS PLAY OR PRESS CTRL+ALT+R
    4. THEN CLIK THE BUTTON TO START THE SCRIPT
    5. THEN MINIMIZE THE SCAR WINDOW!
    - NOTE: THERE WILL BE A SHORT DELAY BEFORE THE AUTOTALKER STARTS SENDING THE
    MESSAGES SO THAT YOU HAVE ENOUGH TIME TO MINIMIZE SCAR!

    SCAR Code:
    /////////////////////////////////////////////////////////////////////////////////
    // "INSTRUCTIONS"                                                              //
    // 1. DRAG CROSSHAIR TO RUNESCAPE SCREEN                                       //
    // 2. SET UP LINE 74 ONLY!                                                     //
    // 3. PRESS PLAY OR PRESS CTRL+ALT+R                                           //
    // 4. THEN CLIK THE BUTTON TO START THE SCRIPT                                 //
    // 5. THEN MINIMIZE THE SCAR WINDOW!                                           //
    // - NOTE: THERE WILL BE A SHORT DELAY BEFORE THE AUTOTALKER STARTS SENDING THE//
    // MESSAGES SO THAT YOU HAVE ENOUGH TIME TO MINIMIZE SCAR!                     //
    /////////////////////////////////////////////////////////////////////////////////
    PROGRAM AutoTalker;
    VAR
      FrmDesign : TForm;
      Button1 : TButton;

    PROCEDURE Buttonclick(Sender: TObject);
    BEGIN
      Writeln('AT(Auto Talker) Started!');
      FrmDesign.Caption:= FrmDesign.Caption + '.';
      FrmDesign.ModalResult:= MrOk;
    END;

    PROCEDURE InitForm;
    BEGIN
      FrmDesign := CreateForm;
      FrmDesign.Left := 200;
      FrmDesign.Top := 200;
      FrmDesign.Width := 250;
      FrmDesign.Height := 150;
      frmDesign.Caption := 'AT(Auto Talker)';
      FrmDesign.Color := ClBtnFace;
      FrmDesign.Font.Color := clWindowText;
      FrmDesign.Font.Height := -11;
      FrmDesign.Font.Name := 'MS Sans Serif';
      FrmDesign.Font.Style := [];
      FrmDesign.Visible := False;
      FrmDesign.PixelsPerInch := 100;
      Button1 := TButton.Create(frmDesign);
      Button1.OnClick:= @buttonclick;
      Button1.Parent := frmDesign;
      Button1.Left := 100;
      Button1.Top := 100;
      Button1.Width := 220;
      Button1.Height := 100;
      Button1.Caption := 'START(After You Click Start MiniMize Scar!';
      Button1.TabOrder := 10;
    END;

    PROCEDURE SafeInitForm;
    VAR
      V: TVariantArray;
    BEGIN
      SetarrayLength(V, 0);
      ThreadSafeCall('InitForm', V);
    END;

    PROCEDURE ShowFormModal;
    BEGIN
      FrmDesign.ShowModal;
    END;

    PROCEDURE SafeShowFormModal;
    VAR
      V: TVariantArray;
    BEGIN
      SetArrayLength(V, 0);
      ThreadSafeCall('ShowFormModal', V);
    END;

     BEGIN
      SafeInitForm;
      SafeShowFormModal;
      Wait(5000);
      REPEAT
       SendKeys('Your Text HERE!'); // Text You Wish To Say Here
       Wait(1000+Random(1000));
       UNTIL(FALSE);
    END.

    Thanks "Lordgreggreg" For The Singnature!

  2. #2
    Join Date
    Oct 2006
    Location
    finland, helsinki
    Posts
    2,501
    Mentioned
    3 Post(s)
    Quoted
    2 Post(s)

    Default

    well first of all you should take a look in the tutorial island and look for standards tutorials. Then DONT capitalize the bolded words. Its "OK" (i do it(sometimes)) to capitalize the first letter.

    Begin
    End;

    etc...

    But else its good for a new comer.

    Code:
    • Narcle: I recall Jukka releasing a bunch of scripts like this before... Its how he rolls I think. rofl
    • Solarwind: Dude, you are like... t3h s3x.
    • Hy71194: JuKKa you're a machine! You released 3 scripts in 10 minutes! :O
    • benjaa: woah.... Jukka is the man Guildminer pwns all
    • NaumanAkhlaQ: And JuKKa Is my Her0!

  3. #3
    Join Date
    Dec 2006
    Location
    .̿̂̔͋͗̎̆ͥ̍̒ͤ͂̾̌̀̅
    Posts
    3,012
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    PLEASE DON'T TYPE THE "BOLDED" WORDS LIKE THIS.. IT'S ANNOYING AND BAD STANDARDDS AS THEY'RE SUPPOSED TO BE ONLY lower case..

    Ok, so.. This is a nice first script, I assume this is your first script..? Oh and I suggest including SRL and adding a option for using Typesend either than sendkeys.

    EDIT: Woo, 600th post.

  4. #4
    Join Date
    Jul 2007
    Posts
    34
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Yes this is sort of my first script. Like ive been making scripts and trying to learn for a while, and I won't capatalize the bold words anymore. Thanks for the feed back guys!

    Thanks "Lordgreggreg" For The Singnature!

  5. #5
    Join Date
    Feb 2007
    Location
    behind you, with a GUN
    Posts
    60
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    omg this looks to much more advanced than mine, with all that crap at the beggining for a form, u probably dont need it, mine is a 10 line auto talker and has none of it!!!!!!!! muhahahahahahah

    although im gonna try it now, to make my autoalker a lot more 1337 than urs!!
    muahahahhaah you have now got competition!!

  6. #6
    Join Date
    Nov 2006
    Location
    NSW, Australia
    Posts
    3,487
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    /////////////////////////////////////////////////////////////////////////////////
    // "INSTRUCTIONS"                                                              //
    // 1. DRAG CROSSHAIR TO RUNESCAPE SCREEN                                       //
    // 2. SET UP LINE 74 ONLY!                                                     //
    // 3. PRESS PLAY OR PRESS CTRL+ALT+R                                           //
    // 4. THEN CLIK THE BUTTON TO START THE SCRIPT                                 //
    // 5. THEN MINIMIZE THE SCAR WINDOW!                                           //
    // - NOTE: THERE WILL BE A SHORT DELAY BEFORE THE AUTOTALKER STARTS SENDING THE//
    // MESSAGES SO THAT YOU HAVE ENOUGH TIME TO MINIMIZE SCAR!                     //
    /////////////////////////////////////////////////////////////////////////////////
    PROGRAM AutoTalker;
    VAR
      FrmDesign : TForm;
      Button1 : TButton;
     
    PROCEDURE Buttonclick(Sender: TObject);
    BEGIN
      Writeln('AT(Auto Talker) Started!');
      FrmDesign.Caption:= FrmDesign.Caption + '.';
      FrmDesign.ModalResult:= MrOk;
    END;
     
    PROCEDURE InitForm;
    BEGIN
      FrmDesign := CreateForm;
      FrmDesign.Left := 200;
      FrmDesign.Top := 200;
      FrmDesign.Width := 250;
      FrmDesign.Height := 150;
      frmDesign.Caption := 'AT(Auto Talker)';
      FrmDesign.Color := ClBtnFace;
      FrmDesign.Font.Color := clWindowText;
      FrmDesign.Font.Height := -11;
      FrmDesign.Font.Name := 'MS Sans Serif';
      FrmDesign.Font.Style := [];
      FrmDesign.Visible := False;
      FrmDesign.PixelsPerInch := 100;
      Button1 := TButton.Create(frmDesign);
      Button1.OnClick:= @buttonclick;
      Button1.Parent := frmDesign;
      Button1.Left := 100;
      Button1.Top := 100;
      Button1.Width := 220;
      Button1.Height := 100;
      Button1.Caption := 'START(After You Click Start MiniMize Scar!';
      Button1.TabOrder := 10;
    END;
     
    PROCEDURE SafeInitForm;
    VAR
      V: TVariantArray;
    BEGIN
      SetarrayLength(V, 0);
      ThreadSafeCall('InitForm', V);
    END;
     
    PROCEDURE ShowFormModal;
    BEGIN
      FrmDesign.ShowModal;
    END;
     
    PROCEDURE SafeShowFormModal;
    VAR
      V: TVariantArray;
    BEGIN
      SetArrayLength(V, 0);
      ThreadSafeCall('ShowFormModal', V);
    END;
     
     BEGIN
      SafeInitForm;
      SafeShowFormModal;
      Wait(5000);
      REPEAT
       SendKeys('Your Text HERE!'); // Text You Wish To Say Here
       Wait(1000+Random(1000));
       UNTIL(FALSE);
    END.

    What's the point of the form if the script only types one message and that message isn't declared in the form?
    [CENTER][img]http://signatures.mylivesignature.com/54486/113/4539C8FAAF3EAB109A3CC1811EF0941B.png[/img][/CENTER]
    [CENTER][BANANA]TSN ~ Vacation! ~ says :I Love Santy[/BANANA][/CENTER]

    [CENTER][BANANA]Raymond - Oh rilie? says :Your smart[/BANANA][/CENTER]

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Auto Talker V 1.0!( Works Great)
    By RiSe AgAiNsT in forum RS3 Outdated / Broken Scripts
    Replies: 6
    Last Post: 09-18-2007, 12:38 PM
  2. Great Auto Talker with Forms
    By Fourscape in forum RS3 Outdated / Broken Scripts
    Replies: 8
    Last Post: 01-23-2007, 07:57 PM

Posting Permissions

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