Do
If Hour(now) = 16 and Minute(now) = 50 then
For i = 0 To 19
MoveTo 800, 350 //iCIBA搜词框
LeftClick 1
KeyDown 17, 1 //Ctrl+A
KeyPress 65, 1
KeyUp 17, 1
KeyPress "Delete", 1
Text1 = Plugin.File.ReadFileEx("C:\Users\haier\Desktop\1.txt")
arr = split(Text1, "|")
SayString arr(i)
Delay 500
Next
Exit do
End If
Delay 500
loop