Delay 1000
///////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////
/*
=============================
=============================
【功能说明】
<说明您的脚本是做什么用的>
本助手协助玩家批量注册账号。
=============================
=============================
【使用说明】
<说明您的脚本应该怎么去用>
开启工具前先打开网龙安全中心网页，并最大化。 
设置必要的参数，如：账号前缀、密码、姓名、身份信息等。 
开启后，只需要玩家配合输入验证码并回车，就可以循环批量注册了。
=============================
=============================
【相关咨询】
<说明怎么联系脚本作者>
欢迎大家提出BUG或者需要改进的地方，倾听您宝贵的意见和建议。
联系QQ：771078200
=============================
=============================
*/
///////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////
Delay 1000
//
UserVar wuxiaoguo1=0  " "
UserVar zhanghaoqian="abc" "账号前缀"
UserVar qishi="100" "账号后缀"
UserVar xunhuan="100" "需注册账号个数"
//
UserVar mima="123456" "密码"
UserVar xingming="张杨" "姓名"
UserVar shenfenzheng="123456789012345678" "身份证编号"
UserVar shouji="12345678901" "手机号码"
//
UserVar wuxiaoguo2=0  " "
UserVar shuoming01="网页放大，打开：aq.91.com" "脚本说明"
UserVar wuxiaoguo3=0  " "
UserVar shuoming1="魔域批量注册账号助手" "脚本说明"
UserVar shuoming2="只需要您手动输入验证码" "脚本说明"
UserVar shuoming3="其他信息设置好" "脚本说明"
UserVar shuoming4="全自动输入" "脚本说明"
//
//runapp("C:\Program Files\Internet Explorer\iexplore.exe http://aq.91.com")
//
Rem haimeizhuce
FindPic 0,0,3000,2000,"Attachment:\网页注册还没注册.bmp",0.9,intXwyhmzc,intYwyhmzc
If intXwyhmzc > 0 And intYwyhmzc > 0 Then 
    Delay 100
    MoveTo intXwyhmzc + 10 ,intYwyhmzc + 5 
    Delay 100
    LeftClick 1
    Delay 1000
Else 
    Delay 1000
    Goto haimeizhuce
End If
//
For xunhuan
    //
    Call 点击注册()
    Delay 100
    SayString qishi
    Delay 100
    Call 自动()
    //
    Rem baocunzhanghao
    FindPic 0,0,3000,2000,"Attachment:\网页注册保存账号信息.bmp",0.9,intXwybczhxx,intYwybczhxx
    If intXwybczhxx > 0 And intYwybczhxx > 0 Then 
        Delay 100
    Else 
        Delay 1000
        Goto baocunzhanghao
    End If
    //
    qishi = qishi + 1
    //
Next
//
EndScript 
///////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////
///////////////////////////////////////////////////////////
Sub 点击注册()

    //
    FindPic 0,0,3000,2000,"Attachment:\网页注册账号按钮.bmp",0.9,intXwyzcan,intYwyzcan
    If intXwyzcan > 0 And intYwyzcan > 0 Then 
        Delay 100
        MoveTo intXwyzcan + 10 ,intYwyzcan + 10
        Delay 100
        LeftClick 1
        Delay 500
    End If