Krentenbol78 Posted November 13, 2007 Share Posted November 13, 2007 Hi I was bored so I decided to make a prank The idea was to mess up the keyboard so if you press f you typ z ..... But here it comes... It doesn't work Can somebody take a look at the script and tell me what is wrong ? Thanks alot expandcollapse popup; Keyboard joke v 1.0 ; Made by Krentenbol78 ; ; HotKeySet("a","change") HotKeySet("A","change") HotKeySet("b","change") HotKeySet("B","change") HotKeySet("c","change") HotKeySet("C","change") HotKeySet("d","change") HotKeySet("D","change") HotKeySet("e","change") HotKeySet("E","change") HotKeySet("f","change") HotKeySet("F","change") HotKeySet("G","change") HotKeySet("g","change") HotKeySet("h","change") HotKeySet("H","change") HotKeySet("i","change") HotKeySet("I","change") HotKeySet("j","change") HotKeySet("J","change") HotKeySet("K","change") HotKeySet("k","change") HotKeySet("l","change") HotKeySet("L","change") HotKeySet("m","change") HotKeySet("M","change") HotKeySet("N","change") HotKeySet("n","change") HotKeySet("O","change") HotKeySet("o","change") HotKeySet("p","change") HotKeySet("P","change") HotKeySet("q","change") HotKeySet("Q","change") HotKeySet("r","change") HotKeySet("R","change") HotKeySet("s","change") HotKeySet("S","change") HotKeySet("T","change") HotKeySet("t","change") HotKeySet("U","change") HotKeySet("u","change") HotKeySet("V","change") HotKeySet("v","change") HotKeySet("W","change") HotKeySet("w","change") HotKeySet("x","change") HotKeySet("X","change") HotKeySet("Y","change") HotKeySet("y","change") HotKeySet("Z","change") HotKeySet("z","change") HotKeySet("!5","exitt") Func change() $letvar=Chr(Random(Asc("a"), Asc("z"), 1)) Sleep(100) Send($letvar,1) ; Does it make difference if I set the flag to 0 ? EndFunc Func Exitt() Exit EndFunc While 1 Sleep(10) WEnd Link to comment Share on other sites More sharing options...
PsaltyDS Posted November 13, 2007 Share Posted November 13, 2007 Take it to some other forum. That kind of garbage will only get you banned here. Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
Krentenbol78 Posted November 13, 2007 Author Share Posted November 13, 2007 Why ? Link to comment Share on other sites More sharing options...
DW1 Posted November 13, 2007 Share Posted November 13, 2007 WOW, you couldn't have written that more wrong... and I will not help with annoying programs like this. RTFM AutoIt3 Online Help Link to comment Share on other sites More sharing options...
Krentenbol78 Posted November 13, 2007 Author Share Posted November 13, 2007 (edited) Dude it's is just a joke not a OMFG wtf a virus on my computer!!! It's just a prank -.- And I could write it 10 ten times worse Edited November 13, 2007 by Krentenbol78 Link to comment Share on other sites More sharing options...
searchresult Posted November 13, 2007 Share Posted November 13, 2007 Help file will be only help with this one. Don't replay any more in this topic you are just getting deeper and deeper. Link to comment Share on other sites More sharing options...
Krentenbol78 Posted November 13, 2007 Author Share Posted November 13, 2007 I already read the helpfile but I don't know where to look. If I had I wouldn't been here So if someone can say in which direction I must search thanks alot Link to comment Share on other sites More sharing options...
Valuater Posted November 13, 2007 Share Posted November 13, 2007 I already read the helpfile but I don't know where to look.If I had I wouldn't been here So if someone can say in which direction I must search thanks alot You were given the correct answer, read again! Take it to some other forum....8) Link to comment Share on other sites More sharing options...
Krentenbol78 Posted November 13, 2007 Author Share Posted November 13, 2007 Thanks alot for all you're great help Link to comment Share on other sites More sharing options...
DW1 Posted November 13, 2007 Share Posted November 13, 2007 This is all the help I will give... Func change() $letvar=Chr(Random(Asc("a"), Asc("z"), 1)) Sleep(100) HotKeySet( $letvar ) Send($letvar,1) ; Does it make difference if I set the flag to 0 ? HotKeySet( $letvar, "change" ) EndFunc AutoIt3 Online Help Link to comment Share on other sites More sharing options...
Krentenbol78 Posted November 13, 2007 Author Share Posted November 13, 2007 Thanks alot I know have it. I did it totally the stupid way xD Here's the script: ( it's not finished) $letvar=Chr(Random(Asc("a"), Asc("z"), 1)) HotKeySet( $letvar, "change" ) Func change() $letvar=Chr(Random(Asc("a"), Asc("z"), 1)) Sleep(100) HotKeySet( $letvar ) Send($letvar,1); Does it make difference if I set the flag to 0 ? HotKeySet( $letvar, "change" ) EndFunc HotKeySet("!q","exitt") Func exitt() EndFunc While 1 Sleep(10) WEnd Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted November 13, 2007 Moderators Share Posted November 13, 2007 Question: Can a prank be as harmful as a virus? Answer: Yes! End of discussion. 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...
Recommended Posts