Loop
{
    VA_IAudioMeterInformation_GetPeakValue(audioMeter, peakValue)
    if (peakValue > 0.0055 and trig="")
    {
      Trig=1
        Send {Space Down}
     }
    else if trig=1
    {
     Trig=
      Send {Space Up}
     }
    Sleep, %devicePeriod%
}

Loop
{
    VA_IAudioMeterInformation_GetPeakValue(audioMeter, peakValue)
    if peakValue > 0.0055
        GoSub, QDown
    if peakValue < 0.0055
        {
        Send {Space up}
        QToggle = 0
        Break
        }
    Sleep, %devicePeriod%
}
Return

QDown:
QToggle++
If QToggle = 1
{
    Send {Space down}
}
return

Loop
{
    VA_IAudioMeterInformation_GetPeakValue(audioMeter, peakValue)
    if peakValue > 0.0055
        Send {Space Down}
    else Send {Space Up}
    Sleep, %devicePeriod%
}

Level=0.1
if (peakvalue>level)
  Tooltip, %level%`n%peakvalue%
Else
  Tooltip

#SingleInstance, Force
MeterLength = 30
#include va.ahk

id=5
device := VA_GetDevice(id)
audioMeter := VA_GetAudioMeter(device)

VA_IAudioMeterInformation_GetMeteringChannelCount(audioMeter, channelCount)

; "The peak value for each channel is recorded over one device
;  period and made available during the subsequent device period."
VA_GetDevicePeriod("capture", devicePeriod)

Loop
{
    ; Get the peak value across all channels.
    VA_IAudioMeterInformation_GetPeakValue(audioMeter, peakValue)
    meter := MakeMeter(peakValue, MeterLength)

    ; Get the peak values of all channels.
    VarSetCapacity(peakValues, channelCount*4)
    VA_IAudioMeterInformation_GetChannelsPeakValues(audioMeter, channelCount, &peakValues)
    Loop %channelCount%
        meter .= "`n" MakeMeter(NumGet(peakValues, A_Index*4-4, "float"), MeterLength)

    ToolTip, %meter%
    Sleep, %devicePeriod%
}

MakeMeter(fraction, size)
{
    global MeterLength
    Loop % fraction*size
        meter .= "|"
    Loop % (1-fraction)*size
        meter .= "."
    meter .= "  " fraction
    return meter
}