Check if QuickTime is installed

// Returns 1 if quickTime is present and 0 if not
// It achieves this by trying to save a image as BMP which is only possible with quicktime installed
Function IsQuickTimeInstalled()
 
    variable err
    string errMsg
    
    // save current debugger state
    variable debuggerState, debugOnError, waveChecking
    DebuggerOptions
    debuggerState = V_enable
    debugOnError  = V_debugOnError
    waveChecking = V_NVAR_SVAR_WAVE_Checking
    // turn debugger off
    DebuggerOptions enable=0
 
    Make/FREE/N=(1,1) testImage
    NewPath/Q/O tempPath, SpecialDirPath("Temporary",0,0,0)
 
    err = GetRTError(0)
    ImageSave/P=tempPath/O testImage as "delete_me.bmp"
    errMsg = StringFromList(1,GetRTErrMessage())
    err = GetRTError(1)
 
    KillPath/Z tempPath
 
    // restore debugger state
    DebuggerOptions enable=debuggerState, debugOnError=debugOnError, NVAR_SVAR_WAVE_Checking=waveChecking
 
    if( err == 0 ) // quicktime found
        return 1
    else // err == 221 denotes that quicktime was not found, or other unknown error
        return 0
    endif
End