kyroskoh

Windows Tricks With Scripts

Jun 27th, 2017
182
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.98 KB | None | 0 0
  1.  
  2. Here you can find the necessary code for the listed tricks.
  3. The necessary file extensions are provided in the trick title!
  4.  
  5.  
  6. 1) Keyboard lights trick (.vbs)
  7.  
  8. Set wshShell =wscript.CreateObject("WScript.Shell")
  9. do
  10. wscript.sleep 100
  11. wshshell.sendkeys "{CAPSLOCK}"
  12. wshshell.sendkeys "{NUMLOCK}"
  13. wshshell.sendkeys "{SCROLLLOCK}"
  14. loop
  15.  
  16. 2) Optical disc drive trick (.vbs)
  17.  
  18. Set oWMP = CreateObject("WMPlayer.OCX.7")
  19. Set colCDROMs = oWMP.cdromCollection
  20. do
  21. if colCDROMs.Count >= 1 then
  22. For i = 0 to colCDROMs.Count -1
  23. colCDROMs.Item(i).Eject
  24. Next
  25. For i = 0 to colCDROMs.Count -1
  26. colCDROMs.Item(i).Eject
  27. Next
  28. End If
  29. wscript.sleep 5000
  30. loop
  31.  
  32. 3) Fake error message (.vbs)
  33.  
  34. x=msgbox("Your Message Here", 0+16, "Your Title Here")
  35.  
  36. 4) Matrix code - type 1 (.bat)
  37.  
  38. @echo off
  39. color 02
  40. :start
  41. echo %random% %random% %random% %random% %random% %random% %random% %random% %random% %random%
  42. goto start
  43.  
  44. 5) Matrix code - type 2 (.bat)
  45.  
  46. @echo off
  47. :a
  48. color 2
  49. echo 1 1 1 0 1 0 0 0 1 1 1 1 0 0 0 1 1 0 0 1 0 0 0 1 1 0 1 0 1 0 0 0 1 1 1 1
  50. ping localhost -n 1 > nul
  51. echo 1 1 0 1 1 1 0 0 0 1 0 1 a f h 0 0 0 1 0 1 1 0 0 1 1 1 0 0 1 0 1 0 0 1 1 0
  52. echo 1 0 0 1 1 0 9 8 1 2 0 1 9 9 2 1 1 1 0 0 1 0 1 1 1 0 1 1 0 1 0 0 0 1 0 1 1
  53. ping localhost -n 1 > nul
  54. echo 0 1 0 0 0 1 0 0 0 1 0 0 0 1 0 1 0 0 1 0 1 0 1 1 0 1 0 0 0 01 0 1 0 0 1 0
  55. ping localhost -n 1 > nul
  56. echo 1 0 1 1 1 0 1 1 0 9 1 1 2 1 1 0 9 1 0 5 7 7 8 7 8 1 3 2 1 2 1 2 3 2 1 3 4
  57. ping localhost -n 1 > nul
  58. echo 1 1 1 0 1 0 0 1 0 0 0 1 1 1 0 0 1 1 1 4 1 2 1 1 2 0 1 0 1 2 2 1 0 1 1 0 1
  59. goto a
  60.  
  61. 6) Notepad diary (no special extension is required)
  62.  
  63. .LOG
  64.  
  65. 7) Guessing game (.bat)
  66.  
  67. @echo off
  68. color 0e
  69. title Guessing Game by seJma
  70. set /a guessnum=0
  71. set /a answer=%RANDOM%
  72. set variable1=surf33
  73. echo -------------------------------------------------
  74. echo Welcome to the Guessing Game!
  75. echo.
  76. echo Try and Guess my Number!
  77. echo -------------------------------------------------
  78. echo.
  79. :top
  80. echo.
  81. set /p guess=
  82. echo.
  83. if %guess% GTR %answer% ECHO Lower!
  84. if %guess% LSS %answer% ECHO Higher!
  85. if %guess%==%answer% GOTO EQUAL
  86. set /a guessnum=%guessnum% +1
  87. if %guess%==%variable1% ECHO Found the backdoor hey?, the answer is: %answer%
  88. goto top
  89. :equal
  90. echo Congratulations, You guessed right!!!
  91. echo.
  92. echo It took you %guessnum% guesses.
  93. echo.
  94. pause
  95.  
  96. 8) Password generator (.bat)
  97.  
  98. @echo off
  99. :Start2
  100. cls
  101. goto Start
  102. :Start
  103. title Password Generator
  104. echo I will make you a new password.
  105. echo Please write the password down somewhere in case you forget it.
  106. echo ----------------------------------------¬-----------------------
  107. echo 1) 1 Random Password
  108. echo 2) 5 Random Passwords
  109. echo 3) 10 Random Passwords
  110. echo Input your choice
  111. set input=
  112. set /p input= Choice:
  113. if %input%==1 goto A if NOT goto Start2
  114. if %input%==2 goto B if NOT goto Start2
  115. if %input%==3 goto C if NOT goto Start2
  116. :A
  117. cls
  118. echo Your password is %random%
  119. echo Now choose what you want to do.
  120. echo 1) Go back to the beginning
  121. echo 2) Exit
  122. set input=
  123. set /p input= Choice:
  124. if %input%==1 goto Start2 if NOT goto Start 2
  125. if %input%==2 goto Exit if NOT goto Start 2
  126. :Exit
  127. exit
  128. :B
  129. cls
  130. echo Your 5 passwords are %random%, %random%, %random%, %random%, %random%.
  131. echo Now choose what you want to do.
  132. echo 1) Go back to the beginning
  133. echo 2) Exit
  134. set input=
  135. set /p input= Choice:
  136. if %input%==1 goto Start2 if NOT goto Start 2
  137. if %input%==2 goto Exit if NOT goto Start 2
  138. :C
  139. cls
  140. echo Your 10 Passwords are %random%, %random%, %random%, %random%, %random%, %random%, %random%, %random%, %random%, %random%
  141. echo Now choose what you want to do.
  142. echo 1) Go back to the beginning
  143. echo 2) Exit
  144. set input=
  145. set /p input= Choice:
  146. if %input%==1 goto Start2 if NOT goto Start 2
  147. if %input%==2 goto Exit if NOT goto Start 2
  148.  
  149. 9) Private folder (.bat)
  150.  
  151. Quote:
  152. Quote: cls
  153. @ECHO OFF
  154. title Folder Private
  155. if EXIST "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" goto UNLOCK
  156. if NOT EXIST Private goto MDLOCKER
  157. :CONFIRM
  158. echo Are you sure you want to lock the folder(Y/N)
  159. set/p "cho=>"
  160. if %cho%==Y goto LOCK
  161. if %cho%==y goto LOCK
  162. if %cho%==n goto END
  163. if %cho%==N goto END
  164. echo Invalid choice.
  165. goto CONFIRM
  166. :LOCK
  167. ren Private "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
  168. attrib +h +s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
  169. echo Folder locked
  170. goto End
  171. :UNLOCK
  172. echo Enter password to unlock folder
  173. set/p "pass=>"
  174. if NOT %pass%== password goto FAIL
  175. attrib -h -s "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}"
  176. ren "Control Panel.{21EC2020-3AEA-1069-A2DD-08002B30309D}" Private
  177. echo Folder Unlocked successfully
  178. goto End
  179. :FAIL
  180. echo Invalid password
  181. goto end
  182. :MDLOCKER
  183. md Private
  184. echo Private created successfully
  185. goto End
  186. :End
  187.  
  188. 10) Text to speech (.vbs)
  189.  
  190. Dim message, sapi
  191. message=InputBox("What do you want me to say?","Speak to Me")
  192. Set sapi=CreateObject("sapi.spvoice")
  193. sapi.Speak message
  194.  
  195. 11) Shutdown computer with custom message (.bat)
  196.  
  197. @echo off
  198. Shutdown.exe -s -t 10
  199. cls
  200. msg * your message here!
Add Comment
Please, Sign In to add comment