Annoy-a-tron

[SofaKing]

Remember the classic, and really, really annoying ThinkGeek Annoy-a-tron? Now you can be the BOFH of your office without the physical thing. Works really well when the EXE is renamed to something like "svchost.exe".... And it works in GPO login scripts.

Enjoy. I know I have.

;break(0);Enable to disable Taskman killing
;hotkeyset('{esc}', 'halt');Enable to give an Escape from the madness
#NoTrayIcon;Hides the app

;***Escape Function***
func halt()
    exit
EndFunc
;***Variables***
Global $delay=500
Global $sleepMulti=1000
Global $sleepMin=60
Global $sleepMax=600
Global $sleep

;***Main loop***
while 1
    $sleep = $sleepMulti * Random($sleepMin,$sleepMax)
    Sleep($sleep)
    For $a = 1 to 10
        Send("{VOLUME_UP}")
    Next
    Beep(Random(500,4000), $delay)
wend

[JohnOne]

Its a bit silly really isnt it.

EDIT:

also, I thought you needed 5 posts to create a thread here.

Edited January 28, 2011 by JohnOne

[SofaKing]

I must be old school. I guess I could take it back until I have 5 posts under my belt.