这个脚本是配合日服信喵之野望,gamecity每天送gc开箱子做的,以前一个月250GC,后来取消了福利,大概一个月能点50GC左右
Text = Plugin.File.ReadFileEx("C:\id.txt")
my = split(Text, "|")
j = UBound(my)
For i= 1 to j-1
two = split(my(i), ",")
FindPic 0,0,1024,768,"Attachment:\今日.bmp",0.8,intX,intY
If intX > 1 And intY > 1 Then
MoveTo intX+10, intY+10
End If
Delay 1000
LeftClick 1
Delay 2000
Call Plugin.Sys.SetCLB(two(0))
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
Delay 1000
KeyPress "Tab", 1
Delay 1000
Call Plugin.Sys.SetCLB(two(1))
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
Delay 1000
FindPic 0,0,1024,768,"Attachment:\登入.bmp",0.9,intX,intY
If intX > 1 And intY > 1 Then
MoveTo intX+10, intY+10
End If
Delay 1000
LeftClick 1
Delay 3000
FindPic 0,0,1024,768,"Attachment:\箱子.bmp",0.9,intX,intY
If intX > 1 And intY > 1 Then
MoveTo intX+10, intY+10
End If
Delay 1000
LeftClick 1
Delay 5000
Next