; Ref: https://www.reddit.com/r/windows/comments/id55il/volume_mixer_forgets_settings_volume_level_for/

#NoEnv
#Persistent
#SingleInstance, Force
SendMode Input
SetWorkingDir %A_ScriptDir%
Menu, Tray, Icon, D:\Cloud Storage\OneDrive\Development\AutoHotkey\Volume Mixer Fix\icon.ico

#Include VA.ahk
#Include Volume.ahk

SetAppVolume(app_name, volume:=15)
{
    ;WinWait, ahk_exe %app_name%
    WinGet, PIDVariable, PID, %app_name%

    name := AppVolume.GetProcessName(PIDVariable)
    vol := Floor(AppVolume(name).GetVolume())

    if vol is not space
        if volume != vol
            AppVolume(name).SetVolume(volume)
}

SetAppVolumeWithPID(PIDVariable, volume:=15)
{
    name := AppVolume.GetProcessName(PIDVariable)
    vol := Floor(AppVolume(PIDVariable).GetVolume())

    if vol is not space
        if volume != vol
            AppVolume(PIDVariable).SetVolume(volume)
}

loop
{
    if WinExist("ahk_exe vivaldi.exe")
        SetAppVolume("ahk_exe vivaldi.exe", 20)


    Process, Exist, ForzaHorizon4.exe
    cpid := ErrorLevel
    if (cpid > 0)
    {
        SetAppVolumeWithPID(cpid, 15)
    }

    sleep, 2000 ; change 2000 (ms) to custom number to increase frequency
}