Rejectedz

Yes i changed it a lil, sorry i couldent find your name for the credits

Its like 1337 talker just uses alt codes, idk if this is orignial but i whiped it up quick and i think its cool CODE#cs ---------------------------------------------------------------------------- AutoIt Version: 3.2.10.0 Author:Brett Email:Brett1605@hotmail.com Site:http://autoit.proboards98.com/index.cgi Script Function: Template AutoIt script. #ce ---------------------------------------------------------------------------- ; Script Start - Add your code below here $answer = msgbox(4, "Run program?", "Would you like to run Code Speaker-Made by: Rejectedz<Brett>?") ; Check the user's answer to the prompt (see the help file for MsgBox return values) ; If "No" was clicked (7) then exit the script If $answer = 7 Then Exit EndIf For $sethotkey = 97 to 122 HotKeySet(Chr($sethotkey),"_"&Chr($sethotkey)) Next Global $Newletter While 1 Sleep(1000) WEnd Func _a() $Int = Random(1,4,1) Select Case $Int = 1 $NewLetter = "A" Case $Int = 2 $NewLetter = "Â" Case $Int = 3 $NewLetter = "ª" Case $Int = 4 $NewLetter = "à" EndSelect Send($NewLetter) EndFunc Func _b() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "B" Case $Int = 2 $NewLetter = "ß" 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 = "c" Case $Int = 3 $NewLetter = "©" EndSelect Send($NewLetter) EndFunc Func _d() $Int = Random(1,3,1) Select Case $Int = 1 $NewLetter = "d" 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 = "£" Case $Int = 2 $NewLetter = "E" EndSelect Send($NewLetter) EndFunc Func _f() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "" 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 = "h" EndSelect Send($NewLetter) EndFunc Func _i() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "I" Case $Int = 2 $NewLetter = "ï" 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 = "¶" Case $Int = 2 $NewLetter = "l" 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 = "m" 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,6,1) Select Case $Int = 1 $NewLetter = "Õ" Case $Int = 2 $NewLetter = "o" Case $Int = 3 $NewLetter = "O" Case $Int = 4 $NewLetter = "Ø" Case $Int = 5 $NewLetter = "ð" Case $Int = 6 $NewLetter = "ø" EndSelect Send($NewLetter) EndFunc Func _p() $Int = Random(1,2,1) Select Case $Int = 1 $NewLetter = "P" Case $Int = 2 $NewLetter = "þ" Case $int = 3 $NewLetter = "þ" 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 = "®" 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 = "§" Case $Int = 4 $NewLetter = "§" Case $Int = 3 $NewLetter = "" EndSelect Send($NewLetter) EndFunc Func _t() $Int = Random(1,4,1) Select Case $Int = 1 $NewLetter = "" 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 = "W" 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 = "ÿ" 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 = "" EndSelect Send($NewLetter) EndFunc

Check helpfile i think i saw an example

but yes, you could make a program like that

You would need to give some more info on that if you want much help

Closed until i fix Credits.

filewrite? sorry im new at this xD

Something to make the file the first time (ONLY!) Then to start savin all the clippings Anyone have any ideas?

Hai aging, This time i need help i finished the Ghost Mouse ( not ready for public yet ) I need help though, how would i have it make a new file to save all the record clippings?

piano Thanks aging this really helped alot.

ty both

Never mind, i got it, thanks though.

Could someone show me how to make a simple recorder? Like Press Record and it will click and move where mouse moves? Any help would be greatly appershieted.

I know this is a simple mistake but im new im trying to make a mouse recorder i wana add a help tab this is what i have but it doesnt work $help = GUICtrlCreateMenuItem("Help", -1) Any help?

I tryed it, looks good