Jump to content

Deviant Fun with Computer Sound


thepip3r
 Share

Recommended Posts

If you have a friend, family member, coworker who continually listens to something on the computer that's WAY too loud or WAY too annoying, run this on their system!!! Have fun!

#include <Audio.au3>
#NoTrayIcon

Global $x,$state

$state = "inc"

For $x=0 to 3000; Runs approx a half day -- toggle number to increase/decrease duration
    _VariantVolLevel()
    Sleep(15000); Sleep 15 Seconds
Next




Func _VariantVolLevel()
    Local $curVolume
    $curVolume = Int(_SoundGetMasterVolume())
    
    Select
        Case $curVolume <= 0
            _SoundSetMasterVolume(1)
            $state = "inc"
        Case $curVolume >= 100
            _SoundSetMasterVolume(99)
            $state = "dec"
        Case $curVolume>=0 AND $curVolume<=100
            If $state="inc" Then
                $curVolume += 5
            ElseIf $state = "dec" Then
                $curVolume -= 5
            EndIf
            _SoundSetMasterVolume($curVolume)
    EndSelect
EndFunc

My Additions:- RunAs AdminDeviant Fun:- Variable Sound Volume

Link to comment
Share on other sites

are you gona say what it even does?

"FREEDOM is not FREE""Its a good thing war is so terrible, or we grow too fond of it" -Robert E. Lee[quote]Firestrom: global $warming = False[/quote]My scripts:Desktop Cleaner---->Total Downloads:167;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;111111;;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;11;;;;;;"a wise man once said why use your skills when we have technology"

Link to comment
Share on other sites

nvm script and titel says it all lol

"FREEDOM is not FREE""Its a good thing war is so terrible, or we grow too fond of it" -Robert E. Lee[quote]Firestrom: global $warming = False[/quote]My scripts:Desktop Cleaner---->Total Downloads:167;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;111111;;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;11;;;;;;;;;;;;;;;;1;;;;;;1;;;;;;;;;;;;;;11;;;;;;"a wise man once said why use your skills when we have technology"

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...