New!: V.4 was taken and rewriten to have added Anit-Randoms! Now you can be at a famous selling spot and just have SCAR declaring your text and just incase some random person would come to you and speak V.4 will deal with them and keep on going. V.4 has also been added with a feature that stops the procedure if your not logged into Runescape. Think about it this way if your not logged in it wont go typing all your edited text in things like Browsers that your in or even SCAR if your still on that. V.4 has been named New G.G for New Game Generation.
Please post any bugs, even though I've tested this like crazy I dont think there are any bugs but you never know.Code:{ LevExidus AutoTalker V.4 B.P ] [ By Jvwarrior ] [__________________________________________] [ Credits: ] [ Makers Of SCAR ] [ Metho D for anti help ] [__________________________________________] [ Fix's ] [ V.1: Basic one word AutoTalker. ] [ V.2: Allowed mulitple words. ] [ V.3: Randomized sentences. ] [ V.3.2: CountDown Added. ] [ V.4: Anti-Randoms + Log In Failure ] [__________________________________________] [ Instructions: ] [1. Ok First As You See ] [ There Are Talk, Say, Talk2, Say2, ] [ TalkAgain. ] [ First Fill In What You Want It ] [ To Say In The (' ') Marks. ] [ If You Want To Only Have Say, ] [ Two Of The Talk, Say, Talk2, Say2, ] [ TalkAgain Just Leave The ] [ FieldsEmpty. ] [ ] [2. After Done With That Start Up ] [ Runescape (Better If Game Client), ] [ Go To Login Screen, Dont Log In! ] [ Specifie The RS Window By ] [ ClickingThe Specifie Mark Thingy. ] [ ] [3. Then Log In Normaly Once Logged ] [ In Press SCAR And Run The Script. ] [ Right After You Run The Script ] [ Click On Runescape Again ] [ And Begin Playing Normally. ] [ ] [4. Just Walk Around And Watch SCAR ] [ Do All The Hard Typing For You. Enjoy =) ] [__________________________________________] [ Chat Effects ] [ ] [ *Color Effects* ] [ glow1 ] [ glow2 ] [ flash1 ] [ flash2 ] [ flash3 ] [ red ] [ green ] [ cyan ] [ white ] [ ] [ *Special Effect* ] [ shake: ] [ scroll: ] [ wave: ] [ slide: ] [__________________________________________} // I have made it Noob friendly for people who want to know whats going on. Feel free to use this in future scripts of yours. // if you want to only have a certain //amount of text just keep them blank. //to prevent you from being detected i suggest //you dont change the TWait. For better //protection make it higher. program AutoTalker; {.Include SRL/SRL.Scar} {================= EDIT YOUR TEXT IN HERE ======================} const Talk = 'Input All Text Between ('') Those Marks!'; //what to say TWait = 1000; //time to wait after typing Say = 'If You Want One Not To Be Used Just Keep Them Empty'; // Second Text Talk2 = 'Be Sure To Insert Things Between The ('') Marks'; //Third text Say2 = 'Insert Your Other Sentences Here'; // Fourth Text TalkAgain = 'More Text To Be Insterted Here'; // Last Text (Fifth) procedure DeclarePlayers; begin HowManyPlayers := 1; NumberOfPlayers(HowManyPlayers); CurrentPlayer := 0; Players[0].Name := 'Usernamehere'; //place your username here Players[0].Pass := 'Passwordhere'; //place your password here Players[0].Nick := 'Nicknamehere'; //3 - 4 letters of YOUR username, example: sern Players[0].Active := True; end; {===================== NO MORE TOUCHING! =================================} procedure Credits; begin Writeln(' Welcome To LevExidus AutoTalker V.4!'); Wait(900); Writeln('Credits to Metho D for Anti help'); Wait(500); Writeln(' *============ LevExidus AutoTalker V.4 ============*') Writeln(' *=========== By Jvwarrior ===========*') end; procedure Startup; begin Writeln('Initializing'); Wait(2000); Writeln('3'); Wait(1000); Writeln('2'); Wait(1000); Writeln('1'); Wait(1500); Writeln('You May Now Click On Your Runescape Windows'); Wait(1500); end; procedure AndoTalkin; begin Wait(TWait + random(700)); if (not(LoggedIn)) then Exit; case Random(5) of 1: typesend(Talk); 2: typesend(Say); 3: typesend(Talk2); 4: typesend(Say2); 5: typesend(TalkAgain); end; FindNormalRandoms; end; begin // begins ClearDebug; Credits; Startup; DeclarePlayers; NickNameBMP := CreateBitmapMaskFromText(Players[CurrentPlayer].Nick, UpChars); repeat //Repeats The Following after this until the until(): if (InChat('yo')) then typesend('whats up?'); AndoTalkin; // Does everything in procedure TalkOn; until (false) // False = keeps going Forever.. Ends Repeat. end. //End of entire Script
For the people who like to download the script the download will be availaible below.
This is my 5th script and even though its pretty basic I already know a lot of stuff like even forms so if you think this script is horrible go ahead and let your feelings express themselves by posting. Dont give me some slack give me a whack!
Download Below:


Reply With Quote


