XPはなおったけど、2000は対応してないの?
# TODO: 初回の時刻を設定する手段を用意する
SetVolume(1)
#GetTime(hour, min, sec, day, month, year)
#If (hour > 6 or (hour = 6 and min >= 50))
# day = day + 1
#EndIf
#hour = 6
#min = 50
#
#Message(year & "年" & month & "月" & day & "日" & \
# hour & "時" & min & "分にタイマーを設定します。")
#RunAt(year, month, day, hour, min, \
# SystemPath("ScriptExe") \ "MortScript.exe", \
# """" & SystemPath("ScriptPath") \ SystemPath("ScriptName") & \
# SystemPath("ScriptExt") & """")
RunAt(TimeStamp() + 60 * 60 * 24, \
SystemPath("ScriptExe") \ "MortScript.exe", \
"""" & SystemPath("ScriptPath") \ SystemPath("ScriptName") & \
SystemPath("ScriptExt") & """")
Message("24時間後にタイマーを設定しました。") # デバッグ用表示
■ MortScriptで、Message()じゃなくbaloonやtoastやalarmみたいな表示をしたい。
Message()でも、他のアプリケーションに支障が出なければそれでいいんだが。
ずっとTMPのCtrl+F12使ってた。