; Jow.ahk 作者:wz520
;
; 整點或半點報時。
; 需要配合2個wav文件使用。
; dofasodo.wav 哆發嗦哆,哆嗦拉發。到整點就播放,然後敲鐘。半點不播放。
; dong.wav 敲鐘聲。幾點敲幾下。半點敲一下。
;
; 缺少任何文件便不報時。
#NoEnv
#SingleInstance, force
#Persistent
SetTimer, CheckTime, 1000
Return
CheckTime:
If !((A_Min = 0 || A_Min = 30 || A_Min= 15 || A_Min= 45 ) && (A_Sec = 0 ||
A_Sec = 1)) ;檢查是否是整點或半點,不是就返回。
return
IfNotExist, dofasodo.wav ;沒找到音頻文件就不報時
return
IfNotExist, dong.wav
return
FormatTime, CurrHour, , h ;得到12小時制的時,決定敲幾下鍾
If CurrHour = 0 ;如果是0點
CurrHour := 12 ;敲12下
If(A_Min = 30 || A_Min= 15 || A_Min=45) ;如果是半點
CurrHour := 1 ;敲1下
if A_Min = 0
soundplay, dofasodo.wav, Wait ;整點時播放哆發嗦哆,哆嗦拉發。半點不播放。
loop, %CurrHour%
soundplay, dong.wav, Wait ;敲鐘
return