'Toggles caps lock on and off -> looks cool if you have a caps lock indicator light, also does it to the num lock
'Otherwise, it makes YouR TeXT LoOk LikE THis
'Leave this part
Set b=wscript.CreateObject("WScript.Shell")
Dim a
a = 0
'Change the number below for the amount of times the message is sent
do while a < 6
'Change the message here, leave {ENTER}
b.sendkeys "IGUTSWAG{ENTER}"
'If you want to change the sleep time
wscript.sleep 1000
a = a+1
loop
'CAPS LOCK AND NUMLOCK SPAM [Numlock is more for the indicator on my PC]
Dim bearsaysyolo
bearsaysyolo = 0
do while num < 2
bearsaysyolo = bearsaysyolo+1
bearsaysyolo = bearsaysyolo-1
wscript.sleep 50
b.sendkeys "{CAPSLOCK}"
wscript.sleep 50
b.sendkeys "{NUMLOCK}"
loop
Comments