PutAttachment .\plugin *.dll UserVar caijileibie=DropList{其他采集:0|挖奎宿:1}=0 采集类别 UserVar caijifangshi=DropList{受伤上宠:0|免伤工具采集:1}=0 采集方式 Plugin hwnd=WindowEx.EnumWindowA(0,"寻仙",0,65536) UserVar jx=4 窗口间切换间隔(秒) Gosub 初始化 VBS i=0 While 1=1 For Gnum Gosub 采集 VBS i=((i+1)mod Gnum) Delay jx*1000 EndFor EndWhile Rem 结束标记 EndScript Sub 采集 Plugin WindowEx.SetWindowState(hwnd(i),1) Plugin WindowEx.SetWindowState(hwnd(i),7) Delay 2222 Plugin WindowEx.MoveWindow(hwnd(i),dx,dy) Delay 2222 x=1:y=1 While x>=0 and y>=0 VBSCall Call FindPic(400,330,500,400,"Attachment:\取消.bmp",0.8,x,y) If x>=0 and y>=0 MoveTo x+6 y+6 Delay 20 LeftClick 1 Delay 20 MoveR 20,20 Delay 222 EndIf EndWhile VBSCall Call FindPic(250,150,300,220,"Attachment:\装备栏.bmp",0.8,x,y) If x<0 and y<0 KeyPress 67,1 EndIf Delay 111 If caijileibie=1 VBSCall FindPic(660,180,720,280,"Attachment:\物品栏.bmp",0.8,x,y) If x>=0 and y>=0 Else KeyPress 66,1 EndIf EndIf Delay 111 If caijifangshi=0 IfColor 56,455,fefefe,0 KeyPress 55 1