Tastiera Pazza

Questo è un piccolo programmino che ho scritto per fare un piccolo scherzo a qualche amico

una volta messo in esecuzione cambia totalmente il modo di scrivere.

se si preme la lettera a il programma cancellerà la letterà sostituendola con un altra da noi impostata, è un programmino abbastanza semplice,ma molto utile per chi vuole imparare l’autoIt.

;includo la libreria
#include<Misc.au3>

;Con questa opzione si nasconde il programma in modo da non poterlo chiudere dalla tray icon
#NoTrayIcon
;Tastiera pazza By Red Skull 92

;Apro una dll $dll = DllOpen("user32.dll")

;Ciclo infinito

While 1
Select

;_ispressed è la funzione che individua il tasto premuto
Case _IsPressed(41,$dll)

;Send Simula la pressione di un tasto o la battitura da tastiera
Send("{LEFT 1}")
Send("{DEL}")
Send("{RIGHT 1}")
Sleep(05)
Send("z")

Case _IsPressed(42,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“y”)

Case _IsPressed(43,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“x”)

Case _IsPressed(44,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“w”)

Case _IsPressed(45,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“v”)

Case _IsPressed(46,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“u”)

Case _IsPressed(47,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“t”)

Case _IsPressed(48,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“s”)

Case _IsPressed(49,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“r”)

Case _IsPressed(“4A”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“q”)

Case _IsPressed(“4B”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“p”)

Case _IsPressed(“4C”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“o”)

Case _IsPressed(“4D”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“n”)

Case _IsPressed(“4E”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“m”)

Case _IsPressed(“4F”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“l”)

Case _IsPressed(50,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“k”)

Case _IsPressed(51,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“j”)

Case _IsPressed(52,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“i”)

Case _IsPressed(53,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“h”)

Case _IsPressed(54,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“g”)

Case _IsPressed(55,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“f”)

Case _IsPressed(56,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“e”)

Case _IsPressed(57,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“d”)

Case _IsPressed(58,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“c”)

Case _IsPressed(59,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“b”)

Case _IsPressed(“5A”,$dll)
Send(“{LEFT 1}”)
Send(“{DEL}”)
Send(“{RIGHT 1}”)
Sleep(05)
Send(“a”)
EndSelect
WEnd

$dll2=DllClose($dll)

Spero vi sia utile per studiare il linguaggio + che fare scherzi

Torna alla HomePage