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