[General]
Description=ʾӣ¼ϲʱ
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=0
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=.
˵.
潨һ¼Զ.
.
.
ר  wx19841231.
.
.

[Script]
UserVar thing=Ҫ¼ ༭Ҫѵ¼
UserVar awoke=2(s) s,m,Сʱh
Set objShell = CreateObject("WScript.Shell")
x = objShell.SpecialFolders.Item("desktop")
//ȡ·
set fso=CreateObject("Scripting.FileSystemObject")
const forwriting=2
const forreading=1
set myfile=fso.createtextfile(x&"\¼.txt")
//дһTXT
myfile.writeline("ʱ:"&now)
myfile.writeline("¼:"&thing)
//одTXT
myfile.Close
Lleft=instr(1,awoke,"(")
Rright=instr(1,awoke,")")
o=mid(awoke,Lleft+1,Rright-Lleft-1)
//ʱλ
p=mid(awoke,1,Lleft-1)
//ʱ
If o="h"
    q=3600
ElseIf o="m"
    q=60
Else 
    q=1
EndIf 
t=now
Rem ʱ
If DateDiff("s",t,now)>=p*q
    //Ƚʱ
    Goto ʱ䵽
EndIf 
Delay 50
Goto ʱ
Rem ʱ䵽
Set myfile=fso.OpenTextFile(x&"\¼.txt",ForReading)
a=myfile.ReadLine
b=myfile.ReadLine
//ȡд
myfile.Close
MessageBox a&vbCr&b
//Ѹնȡʾ
RunApp x&"\¼.txt"
//иսTXTı
