Morsealfabetet tangentbord (3 / 5 steg)
Steg 3: vbs-filer (innehåll-bokstäver)
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
B.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
C.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
D.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
E.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
F.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
G.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
H.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
I.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
J.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
K.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
L.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
M.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
N.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
O.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
P.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Q.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
R.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
S.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
T.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
U.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
V.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
W.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
X.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
Y.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
Z.vbs
Sätta wshShell = wscript. CreateObject("WScript.Shell")
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
WScript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"