Paso 2: .vbs archivos (números de contenido + espacio)
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
1 vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
2 vbs
Set 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 900
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
3 vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
4 vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
5 vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
6 vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
7.el vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
8 vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
9. vbs
Set 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}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 900
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
Wscript.Sleep 300
WshShell.SendKeys "{SCROLLLOCK}"
SPACE.vbs
Set wshShell = wscript. CreateObject("WScript.Shell")
Wscript.Sleep 2100