Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- '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
Advertisement
Add Comment
Please, Sign In to add comment