- s=s+1 //失败变量
- end if
- 否则
- Call Plugin.Msg.Tips("用户设置不要偷好友菜") //用户提示
- s=s+1 //失败变量
- End If
- //------------------好友敲蛋------------------
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- FindPic 0,0,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //判断是否有敲蛋标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then //没发现敲蛋标志,不需要敲蛋)为真,则
- 跳转到标记 f
- End If
- end if
- //------------------一页12位好友,循环12次-------------------
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒
- FindPic hyzdx,hyzdy+5,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //以上次的坐标为远点检测标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then)为真,则
- 跳转到标记 f
- End If
- end if
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒
- FindPic hyzdx,hyzdy+5,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //以上次的坐标为远点检测标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then)为真,则
- 跳转到标记 f
- End If
- end if
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒
- FindPic hyzdx,hyzdy+5,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //以上次的坐标为远点检测标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then)为真,则
- 跳转到标记 f
- End If
- end if
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒
- FindPic hyzdx,hyzdy+5,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //以上次的坐标为远点检测标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then)为真,则
- 跳转到标记 f
- End If
- end if
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒
- FindPic hyzdx,hyzdy+5,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //以上次的坐标为远点检测标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then)为真,则
- 跳转到标记 f
- End If
- end if
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒
- FindPic hyzdx,hyzdy+5,1366,768,"Attachment:\砸蛋标志.bmp",0.6,hyzdx,hyzdy //以上次的坐标为远点检测标志
- 如果表达式 (hyzdX > 0 And hyzdy > 0 Then //有,进入) 为真,则
- 鼠标移到 hyzdx , hyzdy
- 延时500 //点击延时毫秒
- 左键单击
- 延时1000 //网络延时毫秒
- Call ksq() //跳转到子程序开始敲蛋
- 否则如果(hyzdx < 0 and hyzdy < 0 Then)为真,则
- 跳转到标记 f
- End If
- end if
- 如果表达式 (var1 = 0 Then //用户允许敲蛋) 为真,则
- 延时1000 //循环延时毫秒