Paulie Posted August 25, 2006 Posted August 25, 2006 I know its not the best, and it took like 5 minutes to throw together, but here it is replaces your tpe with leetspeak feel free to edit as you see fit expandcollapse popupFor $sethotkey = 97 to 122 HotKeySet(Chr($sethotkey),"_"&Chr($sethotkey)) Next Global $Newletter While 1 Sleep(1000) WEnd Func _a() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "A" Case $Int = 2 $NewLetter = "4" Case $Int = 3 $NewLetter = "a" EndSelect Send($NewLetter) EndFunc Func _b() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "B" Case $Int = 2 $NewLetter = "8" EndSelect Send($NewLetter) EndFunc Func _c() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "C" Case $Int = 2 $NewLetter = "(" Case $Int = 3 $NewLetter = "[" EndSelect Send($NewLetter) EndFunc Func _d() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "|)" Case $Int = 2 $NewLetter = "])" Case $Int = 3 $NewLetter = "D" EndSelect Send($NewLetter) EndFunc Func _e() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "3" Case $Int = 2 $NewLetter = "E" EndSelect Send($NewLetter) EndFunc Func _f() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "-F" Case $Int = 2 $NewLetter = "F" EndSelect Send($NewLetter) EndFunc Func _g() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "G" Case $Int = 2 $NewLetter = "g" EndSelect Send($NewLetter) EndFunc Func _h() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "H" Case $Int = 2 $NewLetter = "h" Case $Int = 3 $NewLetter = "|-|" EndSelect Send($NewLetter) EndFunc Func _i() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "I" Case $Int = 2 $NewLetter = "i" EndSelect Send($NewLetter) EndFunc Func _j() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "J" Case $Int = 2 $NewLetter = "j" EndSelect Send($NewLetter) EndFunc Func _k() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "K" Case $Int = 2 $NewLetter = "K" EndSelect Send($NewLetter) EndFunc Func _l() $Int = Random(1,4,1) Select Case $Int = 1 $NewLetter = "1" Case $Int = 2 $NewLetter = "{!}" Case $Int = 3 $NewLetter = "L" Case $Int = 4 $NewLetter = "l" EndSelect Send($NewLetter) EndFunc Func _m() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "M" Case $Int = 2 $NewLetter = "M" Case $Int = 3 $NewLetter = "/\/\" EndSelect Send($NewLetter) EndFunc Func _n() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "N" Case $Int = 2 $NewLetter = "n" Case $Int = 3 $NewLetter = "|\|" EndSelect Send($NewLetter) EndFunc Func _o() $Int = Random(1,5,1) Select Case $Int = 1 $NewLetter = "0" Case $Int = 2 $NewLetter = "o" Case $Int = 3 $NewLetter = "O" Case $Int = 4 $NewLetter = "[]" Case $Int = 5 $NewLetter = "()" EndSelect Send($NewLetter) EndFunc Func _p() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "P" Case $Int = 2 $NewLetter = "p" EndSelect Send($NewLetter) EndFunc Func _q() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "Q" Case $Int = 2 $NewLetter = "q" EndSelect Send($NewLetter) EndFunc Func _r() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "|2" Case $Int = 2 $NewLetter = "R" Case $Int = 3 $NewLetter = "r" EndSelect Send($NewLetter) EndFunc Func _s() $Int = Random(1,4,1) Select Case $Int = 1 $NewLetter = "s" Case $Int = 2 $NewLetter = "S" Case $Int = 3 $NewLetter = "5" Case $Int = 4 $NewLetter = "$" EndSelect Send($NewLetter) EndFunc Func _t() $Int = Random(1,4,1) Select Case $Int = 1 $NewLetter = "7" Case $Int = 2 $NewLetter = "t" Case $Int = 3 $NewLetter = "T" Case $Int = 4 $NewLetter = "{+}" EndSelect Send($NewLetter) EndFunc Func _u() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "u" Case $Int = 2 $NewLetter = "U" Case $Int = 3 $NewLetter = "|_|" EndSelect Send($NewLetter) EndFunc Func _v() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "v" Case $Int = 2 $NewLetter = "V" Case $Int = 3 $NewLetter = "\/" EndSelect Send($NewLetter) EndFunc Func _w() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "\/\/" Case $Int = 2 $NewLetter = "w" Case $Int = 3 $NewLetter = "W" EndSelect Send($NewLetter) EndFunc Func _x() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "x" Case $Int = 2 $NewLetter = "><" Case $Int = 3 $NewLetter = "X" EndSelect Send($NewLetter) EndFunc Func _y() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "y" Case $Int = 2 $NewLetter = "Y" EndSelect Send($NewLetter) EndFunc Func _z() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "z" Case $Int = 2 $NewLetter = "Z" Case $Int = 3 $NewLetter = "2" EndSelect Send($NewLetter) EndFunc LOL C|-|ECK 0|_|+ H[]\/\/ I TYPE A1L !E3T \/\/ITH P4ULIE5 !E3T $PEAKER
comart Posted August 25, 2006 Posted August 25, 2006 Spam title generator ? lolo kidding. it looks cool in chat room >> AutoMee << NICE AutoIt UTILITY THAT I CAN'T LIVE WITHOUT !
Daniel W. Posted August 25, 2006 Posted August 25, 2006 Haha nice ^^ --------------------------------------------------------------------------------------------------------------------------------Scripts : _Encrypt UDF_UniquePCCode UDF MS like calculatorInstall programm *UPDATED* --------------------------------------------------------------------------------------------------------------------------------[quote name='Helge' post='213117' date='Jul 26 2006, 10:22 AM']Have you ever tried surfing the internet with a milk-carton ?This is similar to what you're trying to do.[/quote]
NELyon Posted August 25, 2006 Posted August 25, 2006 (O0!. I LIKE +|-|I$ 41[]7 /\/\A|\|! K3EP |_|P 7|-|E G()[]D W[]|2K
RazerM Posted August 25, 2006 Posted August 25, 2006 (edited) Good work, ^ took me ages to decipher that Edited August 25, 2006 by RazerM My Programs:AInstall - Create a standalone installer for your programUnit Converter - Converts Length, Area, Volume, Weight, Temperature and Pressure to different unitsBinary Clock - Hours, minutes and seconds have 10 columns each to display timeAutoIt Editor - Code Editor with Syntax Highlighting.Laserix Editor & Player - Create, Edit and Play Laserix LevelsLyric Syncer - Create and use Synchronised Lyrics.Connect 4 - 2 Player Connect 4 Game (Local or Online!, Formatted Chat!!)MD5, SHA-1, SHA-256, Tiger and Whirlpool Hash Finder - Dictionary and Brute Force FindCool Text Client - Create Rendered ImageMy UDF's:GUI Enhance - Enhance your GUIs visually.IDEA File Encryption - Encrypt and decrypt files easily! File Rename - Rename files easilyRC4 Text Encryption - Encrypt text using the RC4 AlgorithmPrime Number - Check if a number is primeString Remove - remove lots of strings at onceProgress Bar - made easySound UDF - Play, Pause, Resume, Seek and Stop.
theguy0000 Posted August 26, 2006 Posted August 26, 2006 |\|I[3 W[]||RK! The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN
Moderators SmOke_N Posted August 26, 2006 Moderators Posted August 26, 2006 This takes ebonics to a whole new level! 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.
camper Posted August 27, 2006 Posted August 27, 2006 H4|-|A|-A||-||-|A T|-|IS I5 FUN I7 |2EA!!Y \/\/ORK
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