go0b3r Posted February 9, 2006 Author Share Posted February 9, 2006 Wana bet? I'm a pissed off guy by nature so I would love to help... #include <INet.au3> $TO = "test@somewhere.com" While 1 $Rand = Chr(Random(Asc("A"), Asc("Z"), 1)) $X = 1 While $X < Random(1, 1000) $Rand = $Rand & Chr(Random(Asc("A"), Asc("Z"), 1)) $X = $X + 1 WEnd _INetMail($TO, "Hi There", $Rand) WinWaitActive("Hi There - Message") Sleep(2000) Send("{CTRLDOWN} {ENTER} {CTRLUP}") WEnd Ty for trying to help, while that would be an amusing script, its no quite what im looking for, but thanks anyways. Im not planning on letting my dad actualy send any of these messed up emails, once he looks at it and see's: ge keapid gaieng blah blah blah he'll erase it and tell me to turn it off lol. Link to comment Share on other sites More sharing options...
go0b3r Posted February 9, 2006 Author Share Posted February 9, 2006 Download the beta version. There is a link in my signature.o, ok ty. I was thinking of getting it but didn't know if it would have bugs in it, being its a beta version. Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted February 9, 2006 Moderators Share Posted February 9, 2006 (edited) You could use StringRegExpReplace() for this (Assuming what Nuff said, that you want A to be Z and Z to be A). Edit: After thinking about it, I think Valauter did something similar not to long ago concerning something else, and he also used StringRegExpReplace() (hope I didn't get who did it wrong). Edited February 9, 2006 by SmOke_N Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
go0b3r Posted February 9, 2006 Author Share Posted February 9, 2006 ok after i downloaded the beta version, and looked up _ispressed i found #include <Misc.au3> $dll = DllOpen("user32.dll") While 1 Sleep ( 250 ) If _IsPressed("41", $dll) Then ???????? ExitLoop EndIf WEnd DllClose($dll) what cani put in place of the " If _IsPressed("41", $dll) Then" thing that will replace the A? Link to comment Share on other sites More sharing options...
go0b3r Posted February 9, 2006 Author Share Posted February 9, 2006 i tired this to see if it would work but it doesn't: While 1 if _IsPressed(41) Then send ( "B" ) EndIf WEnd any thoughts... Link to comment Share on other sites More sharing options...
evilertoaster Posted February 10, 2006 Share Posted February 10, 2006 If you want the easy way...http://webpages.charter.net/krumsick/It's called KeyTweak....pretty much what your looking for. If you want to script it just look at the registry changes it shows you and do a regwrite.... The help file for it shows you how it works.... Link to comment Share on other sites More sharing options...
Knight Posted February 10, 2006 Share Posted February 10, 2006 (edited) expandcollapse popup; ---------------------------------------------------------------------------- ; ; AutoIt Version: 3.1.1 beta ; Author: Name <name@email.com ; ; Script Function: Replace keys ; ; ---------------------------------------------------------------------------- #include <misc.au3> HotKeySet("{END}", "Close") $Keys = 30 While 1 If _IsPressed("30") OR _ _IsPressed("31") OR _ _IsPressed("32") OR _ _IsPressed("33") OR _ _IsPressed("34") OR _ _IsPressed("35") OR _ _IsPressed("36") OR _ _IsPressed("37") OR _ _IsPressed("38") OR _ _IsPressed("39") OR _ _IsPressed("41") OR _ _IsPressed("42") OR _ _IsPressed("43") OR _ _IsPressed("44") OR _ _IsPressed("45") OR _ _IsPressed("46") OR _ _IsPressed("47") OR _ _IsPressed("48") OR _ _IsPressed("49") OR _ _IsPressed("4A") OR _ _IsPressed("4B") OR _ _IsPressed("4C") OR _ _IsPressed("4D") OR _ _IsPressed("4E") OR _ _IsPressed("4F") OR _ _IsPressed("50") OR _ _IsPressed("51") OR _ _IsPressed("52") OR _ _IsPressed("53") OR _ _IsPressed("54") OR _ _IsPressed("55") OR _ _IsPressed("56") OR _ _IsPressed("57") OR _ _IsPressed("58") OR _ _IsPressed("59") OR _ _IsPressed("5A") Then Send(Chr(Random(32, 127)), 1) Else Sleep(10) EndIf WEnd Func Close() Exit EndFunc EDIT: Fixed~ Edited February 10, 2006 by Knight Link to comment Share on other sites More sharing options...
Guest BinaryVision Posted February 10, 2006 Share Posted February 10, 2006 (edited) In the previous posts, what is the '1' representing...I'm a little confused as to what condition the While statement is testing. EDIT: Ok, I guess the '1' is creating an infinite loop. I usually try to stay away from those.... >_> Edited February 10, 2006 by BinaryVision Link to comment Share on other sites More sharing options...
go0b3r Posted February 10, 2006 Author Share Posted February 10, 2006 expandcollapse popup; ---------------------------------------------------------------------------- ; ; AutoIt Version: 3.1.1 beta ; Author: Name <name@email.com ; ; Script Function: Replace keys ; ; ---------------------------------------------------------------------------- #include <misc.au3> HotKeySet("{END}", "Close") $Keys = 30 While 1 If _IsPressed("30") OR _ _IsPressed("31") OR _ _IsPressed("32") OR _ _IsPressed("33") OR _ _IsPressed("34") OR _ _IsPressed("35") OR _ _IsPressed("36") OR _ _IsPressed("37") OR _ _IsPressed("38") OR _ _IsPressed("39") OR _ _IsPressed("41") OR _ _IsPressed("42") OR _ _IsPressed("43") OR _ _IsPressed("44") OR _ _IsPressed("45") OR _ _IsPressed("46") OR _ _IsPressed("47") OR _ _IsPressed("48") OR _ _IsPressed("49") OR _ _IsPressed("4A") OR _ _IsPressed("4B") OR _ _IsPressed("4C") OR _ _IsPressed("4D") OR _ _IsPressed("4E") OR _ _IsPressed("4F") OR _ _IsPressed("50") OR _ _IsPressed("51") OR _ _IsPressed("52") OR _ _IsPressed("53") OR _ _IsPressed("54") OR _ _IsPressed("55") OR _ _IsPressed("56") OR _ _IsPressed("57") OR _ _IsPressed("58") OR _ _IsPressed("59") OR _ _IsPressed("5A") Then Send(Chr(Random(32, 127)), 1) Else Sleep(10) EndIf WEnd Func Close() Exit EndFunc EDIT: Fixed~ lol ty, thats an awsome script. My dad will be so confused. Link to comment Share on other sites More sharing options...
go0b3r Posted February 10, 2006 Author Share Posted February 10, 2006 question: what does that $Keys = 30 do exactly? does it need to be told how many keys you wanna change or something? Link to comment Share on other sites More sharing options...
ACalcutt Posted February 10, 2006 Share Posted February 10, 2006 as far as i can see $Keys does nothing(it is not used anywhere in the script)....it looks like it can be removed...correct me if i am wrong Andrew Calcutt Http://www.Vistumbler.net Http://www.TechIdiots.net Its not an error, its a undocumented feature Link to comment Share on other sites More sharing options...
ACalcutt Posted February 10, 2006 Share Posted February 10, 2006 In the previous posts, what is the '1' representing...I'm a little confused as to what condition the While statement is testing.EDIT: Ok, I guess the '1' is creating an infinite loop. I usually try to stay away from those.... >_>yes, it is an infinate loop, but it exits with the press of a hotkey...infinate loops are good Andrew Calcutt Http://www.Vistumbler.net Http://www.TechIdiots.net Its not an error, its a undocumented feature Link to comment Share on other sites More sharing options...
Knight Posted February 10, 2006 Share Posted February 10, 2006 oops that $Keys = 30 does absolutely nothing. I was using it when I was doing the same thing a different way. I forgot to remove it. Link to comment Share on other sites More sharing options...
DaLiMan Posted February 13, 2006 Share Posted February 13, 2006 Hi, This topic started me making my own script for a good laugh. So I've created this "KeyScrambler" program for use on my colleagues. Below is a screenshot of the "client" which sends commands to the "server" that is located on a remote PC. I'm having so much fun......LOL The buttons represent the commands you can send to the other PC. Are there any more good ideas for tormenting??? Link to comment Share on other sites More sharing options...
Nuffilein805 Posted February 13, 2006 Share Posted February 13, 2006 how bout fixing the mouse? or capture keys and send them 20 times instead of once my little chatmy little encryption toolmy little hidermy unsafe clickbot Link to comment Share on other sites More sharing options...
D4rk^S0ul Posted February 13, 2006 Share Posted February 13, 2006 As ur tryin to replace the keys u can just use hotkeyset much easyer then _ifpressed functions because it blocks the original key. btw this could be classed as a malicous program what is not alowed on this forum. Link to comment Share on other sites More sharing options...
DaLiMan Posted February 14, 2006 Share Posted February 14, 2006 (edited) As ur tryin to replace the keys u can just use hotkeyset much easyer then _ifpressed functions because it blocks the original key.Cool, didn't think about that one....... btw this could be classed as a malicous program what is not alowed on this forum.Yes I know, but putting the function _IfPressed() in there is the first step as are the TCP...() functions.Please don't get me wrong here, I reject those who create programs like Trojans and Virii.I only created it for myself to see if I could do it and having some fun here over at work....... EDIT: It was NEVER intended as a malicous program!!(I did think about sharing, but then imagined JON and the other Admin would not like that.) Edited February 14, 2006 by DaLiMan Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now