自動選曲スクリプト
音楽ファイルのあるフォルダのサブフォルダを含めてランダムに10曲自動で選曲させるスクリプト。 例によって、Auto Hot Keyのスクリプト。 ---------------------------------------------------------------------------------- Gui, Margin,3,3Gui,Font,S24Gui,Add,Text,,選曲中・・・Gui,Add,Button,x100 w100,中止Gui,Show,w200FileDelete,%A_Temp%\AllSongsTemp.M3UFileDelete,%A_Temp%\AllSongs.M3UDir = C:\Documents and Settings\TOYBOX\My DocumentsLoop, %dir%\*.MP3,0,1FileAppend,%A_LoopFileFullPath%`n,%A_Temp%\AllSongs.M3UFileRead,M3UTEMP,%A_Temp%\AllSongs.M3USort,M3UTEMP,Random UFileAppend,%M3UTEMP%,%A_Temp%\AllSongsTemp.M3UFileDelete,%A_Temp%\AllSongs.M3UT = 1Loop{FileReadLine,M3UTEMP2,%A_Temp%\AllSongsTemp.M3U,%T%FileAppend,%M3UTEMP2%`n,%A_Temp%\AllSongs.M3UT++If T = 11Break}RunWait,"C:\Program Files\CLEveR\CLEveR.exe" loadplay "%A_Temp%\AllSongs.M3U",,hideFileDelete,%A_Temp%\AllSongsTemp.M3UFileDelete,%A_Temp%\AllSongs.M3UButton中止:ExitAppFileDelete,%A_Temp%\AllSongsTemp.M3UFileDelete,%A_Temp%\AllSongs.M3UReturnGuiClose:ExitAppFileDelete,%A_Temp%\AllSongsTemp.M3UFileDelete,%A_Temp%\AllSongs.M3UReturn----------------------------------------------------------------------------------