いつも音楽か動画をBluetoothイヤホンで聴きながら眠るくせがあります
寝付きはいいのでそれはいいのですが、音が鳴り続けていると朝早く起きたりしてしまいます
Powershell等のプログラムを用いて、表題のことを実現しています
寝る前にバッチファイルを叩いて2時間後(7200秒後)にミュートしています
今回はミュートですが、他のコマンドやアプリの呼び出しや終了に変えれば、一定時間後に~を実行する、ことが出来ます
以下、手順を示します
プログラムの中身の説明は省きます
詳しく知りたい方はググって下さい
1. .batと.ps1を格納するフォルダを作成します。
Ex. Dドライブ直下にvolumeというフォルダを作成します
2. volumeフォルダにvolume_mute_start.batなるファイルを作成し、以下の内容を貼り付け保存し閉じます
@echo off
cd /d %~dp0
timeout /t 7200 /nobreak
start "" .\volume_mute.bat
exit
3. volumeフォルダにvolume_mute.ps1なるファイルを作成し、以下の内容を貼り付け保存し閉じます
Add-Type -TypeDefinition @'
using System.Runtime.InteropServices;
[Guid("5CDF2C82-841E-4546-9722-0CF74078229A"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IAudioEndpointVolume
{
// f(), g(), ... are unused COM method slots. Define these if you care
int f(); int g(); int h(); int i();
int SetMasterVolumeLevelScalar(float fLevel, System.Guid pguidEventContext);
int j();
int GetMasterVolumeLevelScalar(out float pfLevel);
int k(); int l(); int m(); int n();
int SetMute([MarshalAs(UnmanagedType.Bool)] bool bMute, System.Guid pguidEventContext);
int GetMute(out bool pbMute);
}
[Guid("D666063F-1587-4E43-81F1-B948E807363F"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IMMDevice
{
int Activate(ref System.Guid id, int clsCtx, int activationParams, out IAudioEndpointVolume aev);
}
[Guid("A95664D2-9614-4F35-A746-DE8DB63617E6"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IMMDeviceEnumerator
{
int f(); // Unused
int GetDefaultAudioEndpoint(int dataFlow, int role, out IMMDevice endpoint);
}
[ComImport, Guid("BCDE0395-E52F-467C-8E3D-C4579291692E")] class MMDeviceEnumeratorComObject { }
public class AudioControl
{
static IAudioEndpointVolume Vol()
{
var enumerator = new MMDeviceEnumeratorComObject() as IMMDeviceEnumerator;
IMMDevice dev = null;
Marshal.ThrowExceptionForHR(enumerator.GetDefaultAudioEndpoint(/*eRender*/ 0, /*eMultimedia*/ 1, out dev));
IAudioEndpointVolume epv = null;
var epvid = typeof(IAudioEndpointVolume).GUID;
Marshal.ThrowExceptionForHR(dev.Activate(ref epvid, /*CLSCTX_ALL*/ 23, 0, out epv));
return epv;
}
public static float Volume
{
get { float v = -1; Marshal.ThrowExceptionForHR(Vol().GetMasterVolumeLevelScalar(out v)); return v; }
set { Marshal.ThrowExceptionForHR(Vol().SetMasterVolumeLevelScalar(value, System.Guid.Empty)); }
}
public static bool Mute
{
get { bool mute; Marshal.ThrowExceptionForHR(Vol().GetMute(out mute)); return mute; }
set { Marshal.ThrowExceptionForHR(Vol().SetMute(value, System.Guid.Empty)); }
}
}
'@
[AudioControl]::Volume = 0
[AudioControl]::Mute = $true
4. volumeフォルダにvolume_mute.batなるファイルを作成し以下の内容を貼り付け保存し閉じます
@echo off
cd /d %~dp0
powershell -NoProfile -ExecutionPolicy Unrestricted .\volume_mute.ps1 -verb runas
以上です
volume_mute_start.batを叩くと、7200秒後に音量が0になります
なお、このコマンドが走ったあとは音量が0になっているので、起きてPCを使う時音量を戻さなければなりません
手動では面倒なのでワンクリックで戻せるようにしています
方法は簡単で、3.、4.で作成したプログラムの一部を変更したものを新たに作成しておき、そのバッチを叩けばよいです。
3.のvolume_mute.ps1をコピーしvolume_set.ps1を作成し、中身の最終2行を変更保存します
[AudioControl]::Volume = 0.5(ボリューム50%にしたい場合)
[AudioControl]::Mute = $false
4.のvolume_mute.batをコピーしvolume_set.batを作成し、中身の最終行を変更保存します
powershell -NoProfile -ExecutionPolicy Unrestricted .\volume_set.ps1 -verb runas
あとは作成したvolume_set.batを実行すれば指定したボリュームになります